source: rtems/c/src/lib/libbsp/powerpc/dmv177/start/start.S @ 60179c2

4.104.114.84.95
Last change on this file since 60179c2 was 60179c2, checked in by Joel Sherrill <joel.sherrill@…>, on Jul 12, 2000 at 1:42:40 PM

Removed unnecessary include of targopts.h.

  • Property mode set to 100644
File size: 3.0 KB
Line 
1/*
2 * This is based on the mvme-crt0.S file from libgloss/rs6000.
3 * crt0.S -- startup file for PowerPC systems.
4 *
5 * Copyright (c) 1995 Cygnus Support
6 *
7 * The authors hereby grant permission to use, copy, modify, distribute,
8 * and license this software and its documentation for any purpose, provided
9 * that existing copyright notices are retained in all copies and that this
10 * notice is included verbatim in any distributions. No written agreement,
11 * license, or royalty fee is required for any of the authorized uses.
12 * Modifications to this software may be copyrighted by their authors
13 * and need not follow the licensing terms described here, provided that
14 * the new terms are clearly indicated on the first page of each file where
15 * they apply.
16 *
17 *  $Id$
18 */
19
20#include "ppc-asm.h"
21
22        .file   "start.s"
23        .section ".got2","aw"
24        .align  2
25
26.LCTOC1 = .+32768
27
28        .extern FUNC_NAME(atexit)
29        .globl  FUNC_NAME(__atexit)
30        .section ".sdata","aw"
31        .align  2
32FUNC_NAME(__atexit):                    /* tell C's eabi-ctor's we have an atexit function */
33        .long   FUNC_NAME(atexit)@fixup /* and that it is to register __do_global_dtors */
34
35        .section ".fixup","aw"
36        .align  2
37        .long   FUNC_NAME(__atexit)
38
39        .section ".got2","aw"
40.Ltable = .-.LCTOC1
41        .long   .LCTOC1                 /* address we think .LCTOC1 is loaded at */
42
43.Lbss_start = .-.LCTOC1
44        .long   __bss_start
45
46.Lend = .-.LCTOC1
47        .long   _end
48
49.Lstack = .-.LCTOC1                     /* stack address if set by user */
50        .long   __stack
51
52        .text
53.Lptr:
54        .long .LCTOC1-.Laddr
55
56        .globl  _start
57        .type   _start,@function
58_start:
59        lis     r5,0
60        mr      r4,r5
61        ori     r4,r4,0x0000            /* 0x2030  */
62        mtmsr   r4
63
64/* Add special purpose register initialization based upon the console driver
65 * initialization of these registers   XXXXX
66 */
67
68        bl      .Laddr                  /* get current address */
69       
70.Laddr:
71        mflr    r4                      /* real address of .Laddr */
72        lwz     r5,(.Lptr-.Laddr)(r4)   /* linker generated address of .LCTOC1 */
73        add     r5,r5,r4                /* correct to real pointer */
74        lwz     r4,.Ltable(r5)          /* get linker's idea of where .Laddr is */
75        subf    r4,r4,r5                /* calculate difference between where linked and current */
76
77        /* clear bss */
78        lwz     r6,.Lbss_start(r5)      /* calculate beginning of the BSS */
79        lwz     r7,.Lend(r5)            /* calculate end of the BSS */
80        add     r6,r6,r4                /* adjust pointers */
81        add     r7,r7,r4
82
83        cmplw   1,r6,r7
84        bc      4,4,.Ldone
85
86        subf    r8,r6,r7                /* number of bytes to zero */
87        srwi    r9,r8,2                 /* number of words to zero */
88        mtctr   r9
89        li      r0,0                    /* zero to clear memory */
90        addi    r6,r6,-4                /* adjust so we can use stwu */
91.Lloop:
92        stwu    r0,4(r6)                /* zero bss */
93        bdnz    .Lloop
94
95.Ldone:
96
97        lwz     r0,.Lstack(r5)          /* stack address or 0 */
98        cmplwi  1,r0,0                  /* equal to 0? */
99        bc      12,6,.Lnostack          /* use default stack if == 0 */
100        mr      sp,r0                   /* use user defined stack */
101
102.Lnostack:
103        /* set up initial stack frame */
104        addi    sp,sp,-4                /* make sure we don't overwrite debug mem */
105        lis     r0,0
106        stw     r0,0(sp)                /* clear back chain */
107        stwu    sp,-56(sp)              /* push another stack frame */
108
109        /* Let her rip */
110        bl      FUNC_NAME(boot_card)
111
112        /* return value from boot_card is argument to exit */
113        /* bl   FUNC_NAME(exit) */
114        trap
115.Lstart:
116        .size   _start,.Lstart-_start
Note: See TracBrowser for help on using the repository browser.