source: trunk/libs/newlib/src/newlib/libc/machine/spu/spu_timer_flih.S @ 444

Last change on this file since 444 was 444, checked in by satin@…, 6 years ago

add newlib,libalmos-mkh, restructure shared_syscalls.h and mini-libc

File size: 6.1 KB
Line 
1/*
2(C) Copyright IBM Corp. 2008
3
4All rights reserved.
5
6Redistribution and use in source and binary forms, with or without
7modification, are permitted provided that the following conditions are met:
8
9* Redistributions of source code must retain the above copyright notice,
10this list of conditions and the following disclaimer.
11* Redistributions in binary form must reproduce the above copyright
12notice, this list of conditions and the following disclaimer in the
13documentation and/or other materials provided with the distribution.
14* Neither the name of IBM nor the names of its contributors may be
15used to endorse or promote products derived from this software without
16specific prior written permission.
17
18THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
19AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
22LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28POSSIBILITY OF SUCH DAMAGE.
29*/
30
31/*  First-level interrupt handler.  */
32
33/* The following two convenience macros assist in the coding of the
34   saving and restoring the volatile register starting from register
35   2 up to register 79.
36
37   saveregs     first, last    Saves registers from first to the last.
38   restoreregs  first, last    Restores registers from last down to first.
39
40   Note:       first must be less than or equal to last.  */
41
42.macro  saveregs        first, last
43        stqd            $\first, -(STACK_SKIP+\first)*16($SP)
44.if     \last-\first
45        saveregs        "(\first+1)",\last
46.endif
47.endm
48
49
50.macro  restoreregs     first, last
51        lqd             $\last, (82-\last)*16($SP)
52.if     \last-\first
53        restoreregs     \first,"(\last-1)"
54.endif
55.endm
56
57        .section        .interrupt,"ax"
58        .align          3
59        .type           spu_flih, @function
60spu_flih:
61        /* Adjust the stack pointer to skip the maximum register save area
62           (STACK_SKIP quadword registers) in case an interrupt occurred while
63           executing a leaf function that used the stack area without actually
64           allocating its own stack frame.  */
65        .set            STACK_SKIP, 125
66
67        /* Save the current link register on a new stack frame for the
68           normal spu_flih() version of this file.  */
69        stqd            $0,  -(STACK_SKIP+80)*16($SP)
70        stqd            $SP, -(STACK_SKIP+82)*16($SP)   /* Save back chain pointer.  */
71
72        saveregs        2, 39
73
74        il              $2,  -(STACK_SKIP+82)*16        /* Stack frame size.  */
75        rdch            $3, $SPU_RdEventStat            /* Read event status.  */
76
77        rdch            $6, $SPU_RdEventMask            /* Read event mask.  */
78        hbrp                                            /* Open a slot for instruction prefetch.  */
79
80        saveregs        40,59
81
82        clz             $4, $3                          /* Get first slih index.  */
83        stqd            $6,  -(STACK_SKIP+1)*16($SP)    /* Save event mask on stack.  */
84
85        saveregs        60, 67
86
87        /* Do not disable/ack the decrementer event here.
88           The timer library manages this and expects it
89           to be enabled upon entry to the SLIH. */
90        il              $7, 0x20
91        andc            $5, $3, $7
92        andc            $7, $6, $5                      /* Clear event bits.  */
93        saveregs        68, 69
94
95        wrch            $SPU_WrEventAck, $3             /* Ack events(s) - include decrementer event.  */
96        wrch            $SPU_WrEventMask, $7            /* Disable event(s) - exclude decrementer event.  */
97
98        saveregs        70, 79
99
100        a               $SP, $SP, $2                    /* Instantiate flih stack frame.  */
101next_event:
102        /* Fetch and dispatch the event handler for the first non-zero event. The
103           dispatch handler is indexed into the __spu_slih_handlers array using the
104           count of zero off the event status as an index.  */
105        ila             $5, __spu_slih_handlers         /* Slih array offset.  */
106
107        shli            $4, $4, 2                       /* Slih entry offset.  */
108        lqx             $5, $4, $5                      /* Load slih address.  */
109        rotqby          $5, $5, $4                      /* Rotate to word 0.  */
110        bisl            $0, $5                          /* Branch to slih.  */
111
112        clz             $4, $3                          /* Get next slih index.  */
113        brnz            $3, next_event
114
115
116        lqd             $2, 81*16($SP)                  /* Read event mask from stack.  */
117
118        restoreregs     40, 79
119
120        wrch            $SPU_WrEventMask, $2            /* Restore event mask.  */
121        hbrp                                            /* Open a slot for instruction pre-fetch.  */
122
123        restoreregs     2, 39
124
125        /* Restore the link register from the new stack frame for the
126           normal spu_flih() version of this file.  */
127        lqd             $0,  2*16($SP)
128
129        lqd             $SP, 0*16($SP)                 /* restore stack pointer from back chain ptr.  */
130
131        irete                                          /* Return from interrupt and re-enable interrupts.  */
132        .size           spu_flih, .-spu_flih
133/* spu_slih_handlers[]
134   Here we initialize 33 default event handlers.  The first entry in this array
135   corresponds to the event handler for the event associated with bit 0 of
136   Channel 0 (External Event Status).  The 32nd entry in this array corresponds
137   to bit 31 of Channel 0 (DMA Tag Status Update Event).  The 33rd entry in
138   this array is a special case entry to handle "phantom events" which occur
139   when the channel count for Channel 0 is 1, causing an asynchronous SPU
140   interrupt, but the value returned for a read of Channel 0 is 0.  The index
141   calculated into this array by spu_flih() for this case is 32, hence the
142   33rd entry.  */
143.data
144        .align  4
145        .extern __spu_default_slih
146        .global __spu_slih_handlers
147        .type   __spu_slih_handlers, @object
148__spu_slih_handlers:
149        .rept 33
150        .long   __spu_default_slih
151        .endr
152        .size   __spu_slih_handlers, .-__spu_slih_handlers
Note: See TracBrowser for help on using the repository browser.