blob: 32896d49e1a82a57715a3eca8bc61bef1a9c96b7 [file] [log] [blame]
Jon Loeligerdebb7352006-04-26 17:58:56 -05001/*
Jon Loeligercfc7a7f2007-08-02 14:42:20 -05002 * Copyright 2004, 2007 Freescale Semiconductor.
Jon Loeligerdebb7352006-04-26 17:58:56 -05003 * Srikanth Srinivasan <srikanth.srinivaan@freescale.com>
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
22 */
23
24/* U-Boot - Startup Code for 86xx PowerPC based Embedded Boards
25 *
26 *
27 * The processor starts at 0xfff00100 and the code is executed
28 * from flash. The code is organized to be at an other address
29 * in memory, but as long we don't jump around before relocating.
30 * board_init lies at a quite high address and when the cpu has
31 * jumped there, everything is ok.
32 */
Wolfgang Denk25ddd1f2010-10-26 14:34:52 +020033#include <asm-offsets.h>
Jon Loeligerdebb7352006-04-26 17:58:56 -050034#include <config.h>
35#include <mpc86xx.h>
36#include <version.h>
37
38#include <ppc_asm.tmpl>
39#include <ppc_defs.h>
40
41#include <asm/cache.h>
42#include <asm/mmu.h>
Peter Tyserd98b0522010-10-14 23:33:24 -050043#include <asm/u-boot.h>
Jon Loeligerdebb7352006-04-26 17:58:56 -050044
Jon Loeligercfc7a7f2007-08-02 14:42:20 -050045/*
46 * Need MSR_DR | MSR_IR enabled to access I/O (printf) in exceptions
47 */
Jon Loeligerdebb7352006-04-26 17:58:56 -050048
49/*
50 * Set up GOT: Global Offset Table
51 *
Joakim Tjernlund0f8aa152010-01-19 14:41:56 +010052 * Use r12 to access the GOT
Jon Loeligerdebb7352006-04-26 17:58:56 -050053 */
54 START_GOT
55 GOT_ENTRY(_GOT2_TABLE_)
56 GOT_ENTRY(_FIXUP_TABLE_)
57
58 GOT_ENTRY(_start)
59 GOT_ENTRY(_start_of_vectors)
60 GOT_ENTRY(_end_of_vectors)
61 GOT_ENTRY(transfer_to_handler)
62
63 GOT_ENTRY(__init_end)
Po-Yu Chuang44c6e652011-03-01 22:59:59 +000064 GOT_ENTRY(__bss_end__)
Jon Loeligerdebb7352006-04-26 17:58:56 -050065 GOT_ENTRY(__bss_start)
66 END_GOT
67
68/*
69 * r3 - 1st arg to board_init(): IMMP pointer
70 * r4 - 2nd arg to board_init(): boot flag
71 */
72 .text
Jon Loeligerffff3ae2006-08-22 12:06:18 -050073 .long 0x27051956 /* U-Boot Magic Number */
Jon Loeligerdebb7352006-04-26 17:58:56 -050074 .globl version_string
75version_string:
Andreas Bießmann09c2e902011-07-18 20:24:04 +020076 .ascii U_BOOT_VERSION_STRING, "\0"
Jon Loeligerdebb7352006-04-26 17:58:56 -050077
78 . = EXC_OFF_SYS_RESET
79 .globl _start
80_start:
Jon Loeligerdebb7352006-04-26 17:58:56 -050081 b boot_cold
Jon Loeligerdebb7352006-04-26 17:58:56 -050082
83 /* the boot code is located below the exception table */
84
85 .globl _start_of_vectors
86_start_of_vectors:
87
88/* Machine check */
89 STD_EXCEPTION(0x200, MachineCheck, MachineCheckException)
90
91/* Data Storage exception. */
92 STD_EXCEPTION(0x300, DataStorage, UnknownException)
93
94/* Instruction Storage exception. */
95 STD_EXCEPTION(0x400, InstStorage, UnknownException)
96
97/* External Interrupt exception. */
98 STD_EXCEPTION(0x500, ExtInterrupt, external_interrupt)
99
100/* Alignment exception. */
101 . = 0x600
102Alignment:
Rafal Jaworowski02032e82007-06-22 14:58:04 +0200103 EXCEPTION_PROLOG(SRR0, SRR1)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500104 mfspr r4,DAR
105 stw r4,_DAR(r21)
106 mfspr r5,DSISR
107 stw r5,_DSISR(r21)
108 addi r3,r1,STACK_FRAME_OVERHEAD
Joakim Tjernlundfc4e1882010-01-19 14:41:55 +0100109 EXC_XFER_TEMPLATE(Alignment, AlignmentException, MSR_KERNEL, COPY_EE)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500110
111/* Program check exception */
112 . = 0x700
113ProgramCheck:
Rafal Jaworowski02032e82007-06-22 14:58:04 +0200114 EXCEPTION_PROLOG(SRR0, SRR1)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500115 addi r3,r1,STACK_FRAME_OVERHEAD
Joakim Tjernlundfc4e1882010-01-19 14:41:55 +0100116 EXC_XFER_TEMPLATE(ProgramCheck, ProgramCheckException,
117 MSR_KERNEL, COPY_EE)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500118
119 STD_EXCEPTION(0x800, FPUnavailable, UnknownException)
120
121 /* I guess we could implement decrementer, and may have
122 * to someday for timekeeping.
123 */
124 STD_EXCEPTION(0x900, Decrementer, timer_interrupt)
125 STD_EXCEPTION(0xa00, Trap_0a, UnknownException)
126 STD_EXCEPTION(0xb00, Trap_0b, UnknownException)
127 STD_EXCEPTION(0xc00, SystemCall, UnknownException)
128 STD_EXCEPTION(0xd00, SingleStep, UnknownException)
129 STD_EXCEPTION(0xe00, Trap_0e, UnknownException)
130 STD_EXCEPTION(0xf00, Trap_0f, UnknownException)
131 STD_EXCEPTION(0x1000, SoftEmu, SoftEmuException)
132 STD_EXCEPTION(0x1100, InstructionTLBMiss, UnknownException)
133 STD_EXCEPTION(0x1200, DataTLBMiss, UnknownException)
134 STD_EXCEPTION(0x1300, InstructionTLBError, UnknownException)
135 STD_EXCEPTION(0x1400, DataTLBError, UnknownException)
136 STD_EXCEPTION(0x1500, Reserved5, UnknownException)
137 STD_EXCEPTION(0x1600, Reserved6, UnknownException)
138 STD_EXCEPTION(0x1700, Reserved7, UnknownException)
139 STD_EXCEPTION(0x1800, Reserved8, UnknownException)
140 STD_EXCEPTION(0x1900, Reserved9, UnknownException)
141 STD_EXCEPTION(0x1a00, ReservedA, UnknownException)
142 STD_EXCEPTION(0x1b00, ReservedB, UnknownException)
143 STD_EXCEPTION(0x1c00, DataBreakpoint, UnknownException)
144 STD_EXCEPTION(0x1d00, InstructionBreakpoint, UnknownException)
145 STD_EXCEPTION(0x1e00, PeripheralBreakpoint, UnknownException)
146 STD_EXCEPTION(0x1f00, DevPortBreakpoint, UnknownException)
147
148 .globl _end_of_vectors
149_end_of_vectors:
150
151 . = 0x2000
152
153boot_cold:
Becky Bruce1266df82008-11-03 15:44:01 -0600154 /*
155 * NOTE: Only Cpu 0 will ever come here. Other cores go to an
156 * address specified by the BPTR
157 */
Jon Loeligercfc7a7f2007-08-02 14:42:20 -05001581:
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200159#ifdef CONFIG_SYS_RAMBOOT
Jon Loeligerdebb7352006-04-26 17:58:56 -0500160 /* disable everything */
Jon Loeligercfc7a7f2007-08-02 14:42:20 -0500161 li r0, 0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500162 mtspr HID0, r0
163 sync
164 mtmsr 0
Jon Loeligercfc7a7f2007-08-02 14:42:20 -0500165#endif
166
Dave Liudc2adad2008-10-28 17:46:12 +0800167 /* Invalidate BATs */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500168 bl invalidate_bats
169 sync
Dave Liudc2adad2008-10-28 17:46:12 +0800170 /* Invalidate all of TLB before MMU turn on */
171 bl clear_tlbs
172 sync
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500173
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200174#ifdef CONFIG_SYS_L2
Jon Loeligerdebb7352006-04-26 17:58:56 -0500175 /* init the L2 cache */
Jon Loeligercfc7a7f2007-08-02 14:42:20 -0500176 lis r3, L2_INIT@h
Jon Loeligerdebb7352006-04-26 17:58:56 -0500177 ori r3, r3, L2_INIT@l
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500178 mtspr l2cr, r3
Jon Loeligerdebb7352006-04-26 17:58:56 -0500179 /* invalidate the L2 cache */
180 bl l2cache_invalidate
181 sync
182#endif
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500183
Jon Loeligerdebb7352006-04-26 17:58:56 -0500184 /*
185 * Calculate absolute address in FLASH and jump there
186 *------------------------------------------------------*/
Becky Brucebf9a8c32008-11-05 14:55:35 -0600187 lis r3, CONFIG_SYS_MONITOR_BASE_EARLY@h
188 ori r3, r3, CONFIG_SYS_MONITOR_BASE_EARLY@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500189 addi r3, r3, in_flash - _start + EXC_OFF_SYS_RESET
190 mtlr r3
191 blr
192
193in_flash:
194 /* let the C-code set up the rest */
195 /* */
196 /* Be careful to keep code relocatable ! */
197 /*------------------------------------------------------*/
198 /* perform low-level init */
199
200 /* enable extended addressing */
201 bl enable_ext_addr
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500202
Jon Loeligerdebb7352006-04-26 17:58:56 -0500203 /* setup the bats */
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600204 bl early_bats
Jon Loeligerdebb7352006-04-26 17:58:56 -0500205
Jon Loeligerdebb7352006-04-26 17:58:56 -0500206 /*
207 * Cache must be enabled here for stack-in-cache trick.
208 * This means we need to enable the BATS.
209 * Cache should be turned on after BATs, since by default
210 * everything is write-through.
211 */
212
213 /* enable address translation */
Becky Brucec1e1cf62008-11-05 14:55:34 -0600214 mfmsr r5
215 ori r5, r5, (MSR_IR | MSR_DR)
216 lis r3,addr_trans_enabled@h
217 ori r3, r3, addr_trans_enabled@l
218 mtspr SPRN_SRR0,r3
219 mtspr SPRN_SRR1,r5
220 rfi
Jon Loeligerdebb7352006-04-26 17:58:56 -0500221
Becky Brucec1e1cf62008-11-05 14:55:34 -0600222addr_trans_enabled:
Jon Loeligerdebb7352006-04-26 17:58:56 -0500223 /* enable and invalidate the data cache */
224/* bl l1dcache_enable */
Wolfgang Denk47a69892006-10-24 15:32:57 +0200225 bl dcache_enable
Jon Loeligerdebb7352006-04-26 17:58:56 -0500226 sync
227
228#if 1
229 bl icache_enable
230#endif
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500231
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200232#ifdef CONFIG_SYS_INIT_RAM_LOCK
Jon Loeligerdebb7352006-04-26 17:58:56 -0500233 bl lock_ram_in_cache
234 sync
235#endif
236
Becky Bruce3111d322008-11-06 17:37:35 -0600237#if (CONFIG_SYS_CCSRBAR_DEFAULT != CONFIG_SYS_CCSRBAR)
238 bl setup_ccsrbar
239#endif
240
Jon Loeligerdebb7352006-04-26 17:58:56 -0500241 /* set up the stack pointer in our newly created
242 * cache-ram (r1) */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200243 lis r1, (CONFIG_SYS_INIT_RAM_ADDR + CONFIG_SYS_GBL_DATA_OFFSET)@h
244 ori r1, r1, (CONFIG_SYS_INIT_RAM_ADDR + CONFIG_SYS_GBL_DATA_OFFSET)@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500245
Wolfgang Denk47a69892006-10-24 15:32:57 +0200246 li r0, 0 /* Make room for stack frame header and */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500247 stwu r0, -4(r1) /* clear final stack frame so that */
248 stwu r0, -4(r1) /* stack backtraces terminate cleanly */
249
250 GET_GOT /* initialize GOT access */
Wolfgang Denk8c4734e2011-04-20 22:11:21 +0200251
Wolfgang Denk47a69892006-10-24 15:32:57 +0200252 /* run low-level CPU init code (from Flash) */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500253 bl cpu_init_f
254 sync
255
Wolfgang Denk47a69892006-10-24 15:32:57 +0200256#ifdef RUN_DIAG
Jon Loeligerdebb7352006-04-26 17:58:56 -0500257
Wolfgang Denk47a69892006-10-24 15:32:57 +0200258 /* Load PX_AUX register address in r4 */
Becky Brucec759a012008-11-06 17:36:04 -0600259 lis r4, PIXIS_BASE@h
Wolfgang Denk47a69892006-10-24 15:32:57 +0200260 ori r4, r4, 0x6
261 /* Load contents of PX_AUX in r3 bits 24 to 31*/
262 lbz r3, 0(r4)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500263
Wolfgang Denk47a69892006-10-24 15:32:57 +0200264 /* Mask and obtain the bit in r3 */
265 rlwinm. r3, r3, 0, 24, 24
266 /* If not zero, jump and continue with u-boot */
267 bne diag_done
Jon Loeligerdebb7352006-04-26 17:58:56 -0500268
Wolfgang Denk47a69892006-10-24 15:32:57 +0200269 /* Load back contents of PX_AUX in r3 bits 24 to 31 */
270 lbz r3, 0(r4)
271 /* Set the MSB of the register value */
272 ori r3, r3, 0x80
273 /* Write value in r3 back to PX_AUX */
274 stb r3, 0(r4)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500275
Wolfgang Denk47a69892006-10-24 15:32:57 +0200276 /* Get the address to jump to in r3*/
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200277 lis r3, CONFIG_SYS_DIAG_ADDR@h
278 ori r3, r3, CONFIG_SYS_DIAG_ADDR@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500279
Wolfgang Denk47a69892006-10-24 15:32:57 +0200280 /* Load the LR with the branch address */
281 mtlr r3
Jon Loeligerdebb7352006-04-26 17:58:56 -0500282
Wolfgang Denk47a69892006-10-24 15:32:57 +0200283 /* Branch to diagnostic */
284 blr
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500285
286diag_done:
287#endif
Jon Loeligerdebb7352006-04-26 17:58:56 -0500288
Wolfgang Denk47a69892006-10-24 15:32:57 +0200289/* bl l2cache_enable */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500290
Wolfgang Denk47a69892006-10-24 15:32:57 +0200291 /* run 1st part of board init code (from Flash) */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500292 bl board_init_f
293 sync
294
Peter Tyser52ebd9c2010-09-14 19:13:53 -0500295 /* NOTREACHED - board_init_f() does not return */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500296
297 .globl invalidate_bats
298invalidate_bats:
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500299
Jon Loeligercfc7a7f2007-08-02 14:42:20 -0500300 li r0, 0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500301 /* invalidate BATs */
302 mtspr IBAT0U, r0
303 mtspr IBAT1U, r0
304 mtspr IBAT2U, r0
305 mtspr IBAT3U, r0
Wolfgang Denk47a69892006-10-24 15:32:57 +0200306 mtspr IBAT4U, r0
307 mtspr IBAT5U, r0
308 mtspr IBAT6U, r0
309 mtspr IBAT7U, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500310
311 isync
312 mtspr DBAT0U, r0
313 mtspr DBAT1U, r0
314 mtspr DBAT2U, r0
315 mtspr DBAT3U, r0
Wolfgang Denk47a69892006-10-24 15:32:57 +0200316 mtspr DBAT4U, r0
317 mtspr DBAT5U, r0
318 mtspr DBAT6U, r0
319 mtspr DBAT7U, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500320
321 isync
322 sync
323 blr
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500324
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600325/*
326 * early_bats:
327 *
328 * Set up bats needed early on - this is usually the BAT for the
Becky Bruce104992f2008-11-02 18:19:32 -0600329 * stack-in-cache, the Flash, and CCSR space
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600330 */
331 .globl early_bats
332early_bats:
Becky Bruce104992f2008-11-02 18:19:32 -0600333 /* IBAT 3 */
334 lis r4, CONFIG_SYS_IBAT3L@h
335 ori r4, r4, CONFIG_SYS_IBAT3L@l
336 lis r3, CONFIG_SYS_IBAT3U@h
337 ori r3, r3, CONFIG_SYS_IBAT3U@l
338 mtspr IBAT3L, r4
339 mtspr IBAT3U, r3
340 isync
341
342 /* DBAT 3 */
343 lis r4, CONFIG_SYS_DBAT3L@h
344 ori r4, r4, CONFIG_SYS_DBAT3L@l
345 lis r3, CONFIG_SYS_DBAT3U@h
346 ori r3, r3, CONFIG_SYS_DBAT3U@l
347 mtspr DBAT3L, r4
348 mtspr DBAT3U, r3
349 isync
350
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600351 /* IBAT 5 */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200352 lis r4, CONFIG_SYS_IBAT5L@h
353 ori r4, r4, CONFIG_SYS_IBAT5L@l
354 lis r3, CONFIG_SYS_IBAT5U@h
355 ori r3, r3, CONFIG_SYS_IBAT5U@l
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600356 mtspr IBAT5L, r4
357 mtspr IBAT5U, r3
Jon Loeligerdebb7352006-04-26 17:58:56 -0500358 isync
359
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600360 /* DBAT 5 */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200361 lis r4, CONFIG_SYS_DBAT5L@h
362 ori r4, r4, CONFIG_SYS_DBAT5L@l
363 lis r3, CONFIG_SYS_DBAT5U@h
364 ori r3, r3, CONFIG_SYS_DBAT5U@l
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600365 mtspr DBAT5L, r4
366 mtspr DBAT5U, r3
367 isync
Jon Loeligerdebb7352006-04-26 17:58:56 -0500368
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600369 /* IBAT 6 */
Becky Brucebf9a8c32008-11-05 14:55:35 -0600370 lis r4, CONFIG_SYS_IBAT6L_EARLY@h
371 ori r4, r4, CONFIG_SYS_IBAT6L_EARLY@l
372 lis r3, CONFIG_SYS_IBAT6U_EARLY@h
373 ori r3, r3, CONFIG_SYS_IBAT6U_EARLY@l
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600374 mtspr IBAT6L, r4
375 mtspr IBAT6U, r3
376 isync
377
378 /* DBAT 6 */
Becky Brucebf9a8c32008-11-05 14:55:35 -0600379 lis r4, CONFIG_SYS_DBAT6L_EARLY@h
380 ori r4, r4, CONFIG_SYS_DBAT6L_EARLY@l
381 lis r3, CONFIG_SYS_DBAT6U_EARLY@h
382 ori r3, r3, CONFIG_SYS_DBAT6U_EARLY@l
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600383 mtspr DBAT6L, r4
384 mtspr DBAT6U, r3
385 isync
Becky Bruce3111d322008-11-06 17:37:35 -0600386
387#if(CONFIG_SYS_CCSRBAR_DEFAULT != CONFIG_SYS_CCSRBAR)
388 /* IBAT 7 */
389 lis r4, CONFIG_SYS_CCSR_DEFAULT_IBATL@h
390 ori r4, r4, CONFIG_SYS_CCSR_DEFAULT_IBATL@l
391 lis r3, CONFIG_SYS_CCSR_DEFAULT_IBATU@h
392 ori r3, r3, CONFIG_SYS_CCSR_DEFAULT_IBATU@l
393 mtspr IBAT7L, r4
394 mtspr IBAT7U, r3
395 isync
396
397 /* DBAT 7 */
398 lis r4, CONFIG_SYS_CCSR_DEFAULT_DBATL@h
399 ori r4, r4, CONFIG_SYS_CCSR_DEFAULT_DBATL@l
400 lis r3, CONFIG_SYS_CCSR_DEFAULT_DBATU@h
401 ori r3, r3, CONFIG_SYS_CCSR_DEFAULT_DBATU@l
402 mtspr DBAT7L, r4
403 mtspr DBAT7U, r3
404 isync
405#endif
Becky Bruce1a41f7c2008-01-23 16:31:00 -0600406 blr
407
408 .globl clear_tlbs
409clear_tlbs:
410 addis r3, 0, 0x0000
411 addis r5, 0, 0x4
412 isync
413tlblp:
414 tlbie r3
415 sync
416 addi r3, r3, 0x1000
417 cmp 0, 0, r3, r5
418 blt tlblp
Jon Loeligerdebb7352006-04-26 17:58:56 -0500419 blr
420
Jon Loeligerdebb7352006-04-26 17:58:56 -0500421 .globl disable_addr_trans
422disable_addr_trans:
423 /* disable address translation */
424 mflr r4
425 mfmsr r3
426 andi. r0, r3, (MSR_IR | MSR_DR)
427 beqlr
428 andc r3, r3, r0
429 mtspr SRR0, r4
430 mtspr SRR1, r3
431 rfi
432
433/*
434 * This code finishes saving the registers to the exception frame
435 * and jumps to the appropriate handler for the exception.
436 * Register r21 is pointer into trap frame, r1 has new stack pointer.
437 */
438 .globl transfer_to_handler
439transfer_to_handler:
440 stw r22,_NIP(r21)
441 lis r22,MSR_POW@h
442 andc r23,r23,r22
443 stw r23,_MSR(r21)
444 SAVE_GPR(7, r21)
445 SAVE_4GPRS(8, r21)
446 SAVE_8GPRS(12, r21)
447 SAVE_8GPRS(24, r21)
448 mflr r23
449 andi. r24,r23,0x3f00 /* get vector offset */
450 stw r24,TRAP(r21)
451 li r22,0
452 stw r22,RESULT(r21)
453 mtspr SPRG2,r22 /* r1 is now kernel sp */
454 lwz r24,0(r23) /* virtual address of handler */
455 lwz r23,4(r23) /* where to go when done */
456 mtspr SRR0,r24
457 mtspr SRR1,r20
458 mtlr r23
459 SYNC
460 rfi /* jump to handler, enable MMU */
461
462int_return:
463 mfmsr r28 /* Disable interrupts */
464 li r4,0
465 ori r4,r4,MSR_EE
466 andc r28,r28,r4
467 SYNC /* Some chip revs need this... */
468 mtmsr r28
469 SYNC
470 lwz r2,_CTR(r1)
471 lwz r0,_LINK(r1)
472 mtctr r2
473 mtlr r0
474 lwz r2,_XER(r1)
475 lwz r0,_CCR(r1)
476 mtspr XER,r2
477 mtcrf 0xFF,r0
478 REST_10GPRS(3, r1)
479 REST_10GPRS(13, r1)
480 REST_8GPRS(23, r1)
481 REST_GPR(31, r1)
482 lwz r2,_NIP(r1) /* Restore environment */
483 lwz r0,_MSR(r1)
484 mtspr SRR0,r2
485 mtspr SRR1,r0
486 lwz r0,GPR0(r1)
487 lwz r2,GPR2(r1)
488 lwz r1,GPR1(r1)
489 SYNC
490 rfi
491
492 .globl dc_read
493dc_read:
494 blr
495
496 .globl get_pvr
497get_pvr:
498 mfspr r3, PVR
499 blr
500
501 .globl get_svr
502get_svr:
503 mfspr r3, SVR
504 blr
505
506
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500507/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200508 * Function: in8
509 * Description: Input 8 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500510 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500511 .globl in8
512in8:
513 lbz r3,0x0000(r3)
514 blr
515
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500516/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200517 * Function: out8
518 * Description: Output 8 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500519 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500520 .globl out8
521out8:
522 stb r4,0x0000(r3)
523 blr
524
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500525/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200526 * Function: out16
527 * Description: Output 16 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500528 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500529 .globl out16
530out16:
531 sth r4,0x0000(r3)
532 blr
533
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500534/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200535 * Function: out16r
536 * Description: Byte reverse and output 16 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500537 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500538 .globl out16r
539out16r:
540 sthbrx r4,r0,r3
541 blr
542
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500543/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200544 * Function: out32
545 * Description: Output 32 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500546 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500547 .globl out32
548out32:
549 stw r4,0x0000(r3)
550 blr
551
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500552/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200553 * Function: out32r
554 * Description: Byte reverse and output 32 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500555 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500556 .globl out32r
557out32r:
558 stwbrx r4,r0,r3
559 blr
560
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500561/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200562 * Function: in16
563 * Description: Input 16 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500564 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500565 .globl in16
566in16:
567 lhz r3,0x0000(r3)
568 blr
569
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500570/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200571 * Function: in16r
572 * Description: Input 16 bits and byte reverse
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500573 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500574 .globl in16r
575in16r:
576 lhbrx r3,r0,r3
577 blr
578
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500579/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200580 * Function: in32
581 * Description: Input 32 bits
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500582 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500583 .globl in32
584in32:
585 lwz 3,0x0000(3)
586 blr
587
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500588/*
Wolfgang Denk47a69892006-10-24 15:32:57 +0200589 * Function: in32r
590 * Description: Input 32 bits and byte reverse
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500591 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500592 .globl in32r
593in32r:
594 lwbrx r3,r0,r3
595 blr
596
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500597/*
Jon Loeligerdebb7352006-04-26 17:58:56 -0500598 * void relocate_code (addr_sp, gd, addr_moni)
599 *
600 * This "function" does not return, instead it continues in RAM
601 * after relocating the monitor code.
602 *
603 * r3 = dest
604 * r4 = src
605 * r5 = length in bytes
606 * r6 = cachelinesize
607 */
608 .globl relocate_code
609relocate_code:
610
Wolfgang Denk47a69892006-10-24 15:32:57 +0200611 mr r1, r3 /* Set new stack pointer */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500612 mr r9, r4 /* Save copy of Global Data pointer */
613 mr r10, r5 /* Save copy of Destination Address */
Haiying Wang67256672006-08-15 15:13:15 -0400614
Joakim Tjernlund0f8aa152010-01-19 14:41:56 +0100615 GET_GOT
Jon Loeligerdebb7352006-04-26 17:58:56 -0500616 mr r3, r5 /* Destination Address */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200617 lis r4, CONFIG_SYS_MONITOR_BASE@h /* Source Address */
618 ori r4, r4, CONFIG_SYS_MONITOR_BASE@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500619 lwz r5, GOT(__init_end)
620 sub r5, r5, r4
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200621 li r6, CONFIG_SYS_CACHELINE_SIZE /* Cache Line Size */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500622
623 /*
624 * Fix GOT pointer:
625 *
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200626 * New GOT-PTR = (old GOT-PTR - CONFIG_SYS_MONITOR_BASE) + Destination Address
Jon Loeligerdebb7352006-04-26 17:58:56 -0500627 *
628 * Offset:
629 */
630 sub r15, r10, r4
631
632 /* First our own GOT */
Joakim Tjernlund0f8aa152010-01-19 14:41:56 +0100633 add r12, r12, r15
Jon Loeligerdebb7352006-04-26 17:58:56 -0500634 /* then the one used by the C code */
635 add r30, r30, r15
636
637 /*
638 * Now relocate code
639 */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500640 cmplw cr1,r3,r4
641 addi r0,r5,3
642 srwi. r0,r0,2
643 beq cr1,4f /* In place copy is not necessary */
644 beq 7f /* Protect against 0 count */
645 mtctr r0
646 bge cr1,2f
647
648 la r8,-4(r4)
649 la r7,-4(r3)
6501: lwzu r0,4(r8)
651 stwu r0,4(r7)
652 bdnz 1b
653 b 4f
654
6552: slwi r0,r0,2
656 add r8,r4,r0
657 add r7,r3,r0
6583: lwzu r0,-4(r8)
659 stwu r0,-4(r7)
660 bdnz 3b
Jon Loeligerdebb7352006-04-26 17:58:56 -0500661/*
662 * Now flush the cache: note that we must start from a cache aligned
663 * address. Otherwise we might miss one cache line.
664 */
6654: cmpwi r6,0
666 add r5,r3,r5
667 beq 7f /* Always flush prefetch queue in any case */
668 subi r0,r6,1
669 andc r3,r3,r0
670 mr r4,r3
6715: dcbst 0,r4
672 add r4,r4,r6
673 cmplw r4,r5
674 blt 5b
675 sync /* Wait for all dcbst to complete on bus */
676 mr r4,r3
6776: icbi 0,r4
678 add r4,r4,r6
679 cmplw r4,r5
680 blt 6b
Wolfgang Denk47a69892006-10-24 15:32:57 +02006817: sync /* Wait for all icbi to complete on bus */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500682 isync
683
684/*
685 * We are done. Do not return, instead branch to second part of board
686 * initialization, now running from RAM.
687 */
688 addi r0, r10, in_ram - _start + EXC_OFF_SYS_RESET
689 mtlr r0
690 blr
691
692in_ram:
Jon Loeligerdebb7352006-04-26 17:58:56 -0500693 /*
Joakim Tjernlund0f8aa152010-01-19 14:41:56 +0100694 * Relocation Function, r12 point to got2+0x8000
Jon Loeligerdebb7352006-04-26 17:58:56 -0500695 *
696 * Adjust got2 pointers, no need to check for 0, this code
697 * already puts a few entries in the table.
698 */
699 li r0,__got2_entries@sectoff@l
700 la r3,GOT(_GOT2_TABLE_)
701 lwz r11,GOT(_GOT2_TABLE_)
702 mtctr r0
703 sub r11,r3,r11
704 addi r3,r3,-4
7051: lwzu r0,4(r3)
Joakim Tjernlundafc3ba02009-10-08 02:03:51 +0200706 cmpwi r0,0
707 beq- 2f
Jon Loeligerdebb7352006-04-26 17:58:56 -0500708 add r0,r0,r11
709 stw r0,0(r3)
Joakim Tjernlundafc3ba02009-10-08 02:03:51 +02007102: bdnz 1b
Jon Loeligerdebb7352006-04-26 17:58:56 -0500711
712 /*
713 * Now adjust the fixups and the pointers to the fixups
714 * in case we need to move ourselves again.
715 */
Joakim Tjernlundafc3ba02009-10-08 02:03:51 +0200716 li r0,__fixup_entries@sectoff@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500717 lwz r3,GOT(_FIXUP_TABLE_)
718 cmpwi r0,0
719 mtctr r0
720 addi r3,r3,-4
721 beq 4f
7223: lwzu r4,4(r3)
723 lwzux r0,r4,r11
Joakim Tjernlundd1e0b102010-10-14 11:51:44 +0200724 cmpwi r0,0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500725 add r0,r0,r11
Joakim Tjernlund34bbf612010-11-04 19:02:00 +0100726 stw r4,0(r3)
Joakim Tjernlundd1e0b102010-10-14 11:51:44 +0200727 beq- 5f
Jon Loeligerdebb7352006-04-26 17:58:56 -0500728 stw r0,0(r4)
Joakim Tjernlundd1e0b102010-10-14 11:51:44 +02007295: bdnz 3b
Jon Loeligerdebb7352006-04-26 17:58:56 -05007304:
731/* clear_bss: */
732 /*
733 * Now clear BSS segment
734 */
735 lwz r3,GOT(__bss_start)
Po-Yu Chuang44c6e652011-03-01 22:59:59 +0000736 lwz r4,GOT(__bss_end__)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500737
738 cmplw 0, r3, r4
739 beq 6f
740
741 li r0, 0
7425:
743 stw r0, 0(r3)
744 addi r3, r3, 4
745 cmplw 0, r3, r4
746 bne 5b
7476:
Haiying Wang6cfea332006-05-10 09:38:06 -0500748 mr r3, r9 /* Init Date pointer */
749 mr r4, r10 /* Destination Address */
750 bl board_init_r
Jon Loeligerdebb7352006-04-26 17:58:56 -0500751
752 /* not reached - end relocate_code */
753/*-----------------------------------------------------------------------*/
754
755 /*
756 * Copy exception vector code to low memory
757 *
758 * r3: dest_addr
759 * r7: source address, r8: end address, r9: target address
760 */
761 .globl trap_init
762trap_init:
Joakim Tjernlund0f8aa152010-01-19 14:41:56 +0100763 mflr r4 /* save link register */
764 GET_GOT
Jon Loeligerdebb7352006-04-26 17:58:56 -0500765 lwz r7, GOT(_start)
766 lwz r8, GOT(_end_of_vectors)
767
768 li r9, 0x100 /* reset vector always at 0x100 */
769
770 cmplw 0, r7, r8
771 bgelr /* return if r7>=r8 - just in case */
Jon Loeligerdebb7352006-04-26 17:58:56 -05007721:
773 lwz r0, 0(r7)
774 stw r0, 0(r9)
775 addi r7, r7, 4
776 addi r9, r9, 4
777 cmplw 0, r7, r8
778 bne 1b
779
780 /*
781 * relocate `hdlr' and `int_return' entries
782 */
783 li r7, .L_MachineCheck - _start + EXC_OFF_SYS_RESET
784 li r8, Alignment - _start + EXC_OFF_SYS_RESET
7852:
786 bl trap_reloc
787 addi r7, r7, 0x100 /* next exception vector */
788 cmplw 0, r7, r8
789 blt 2b
790
791 li r7, .L_Alignment - _start + EXC_OFF_SYS_RESET
792 bl trap_reloc
793
794 li r7, .L_ProgramCheck - _start + EXC_OFF_SYS_RESET
795 bl trap_reloc
796
797 li r7, .L_FPUnavailable - _start + EXC_OFF_SYS_RESET
798 li r8, SystemCall - _start + EXC_OFF_SYS_RESET
7993:
800 bl trap_reloc
801 addi r7, r7, 0x100 /* next exception vector */
802 cmplw 0, r7, r8
803 blt 3b
804
805 li r7, .L_SingleStep - _start + EXC_OFF_SYS_RESET
806 li r8, _end_of_vectors - _start + EXC_OFF_SYS_RESET
8074:
808 bl trap_reloc
809 addi r7, r7, 0x100 /* next exception vector */
810 cmplw 0, r7, r8
811 blt 4b
812
813 /* enable execptions from RAM vectors */
814 mfmsr r7
815 li r8,MSR_IP
816 andc r7,r7,r8
Jon Loeligercfc7a7f2007-08-02 14:42:20 -0500817 ori r7,r7,MSR_ME /* Enable Machine Check */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500818 mtmsr r7
819
820 mtlr r4 /* restore link register */
821 blr
822
Jon Loeligerdebb7352006-04-26 17:58:56 -0500823.globl enable_ext_addr
824enable_ext_addr:
825 mfspr r0, HID0
Wolfgang Denk47a69892006-10-24 15:32:57 +0200826 lis r0, (HID0_HIGH_BAT_EN | HID0_XBSEN | HID0_XAEN)@h
Jon Loeligerdebb7352006-04-26 17:58:56 -0500827 ori r0, r0, (HID0_HIGH_BAT_EN | HID0_XBSEN | HID0_XAEN)@l
Wolfgang Denk47a69892006-10-24 15:32:57 +0200828 mtspr HID0, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500829 sync
830 isync
831 blr
832
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200833#if (CONFIG_SYS_CCSRBAR_DEFAULT != CONFIG_SYS_CCSRBAR)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500834.globl setup_ccsrbar
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500835setup_ccsrbar:
Jon Loeligerdebb7352006-04-26 17:58:56 -0500836 /* Special sequence needed to update CCSRBAR itself */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200837 lis r4, CONFIG_SYS_CCSRBAR_DEFAULT@h
838 ori r4, r4, CONFIG_SYS_CCSRBAR_DEFAULT@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500839
Becky Bruce3111d322008-11-06 17:37:35 -0600840 lis r5, CONFIG_SYS_CCSRBAR_PHYS_LOW@h
841 ori r5, r5, CONFIG_SYS_CCSRBAR_PHYS_LOW@l
842 srwi r5,r5,12
843 li r6, CONFIG_SYS_CCSRBAR_PHYS_HIGH@l
844 rlwimi r5,r6,20,8,11
845 stw r5, 0(r4) /* Store physical value of CCSR */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500846 isync
847
Wolfgang Denk14d0a022010-10-07 21:51:12 +0200848 lis r5, CONFIG_SYS_TEXT_BASE@h
849 ori r5,r5,CONFIG_SYS_TEXT_BASE@l
Jon Loeligerdebb7352006-04-26 17:58:56 -0500850 lwz r5, 0(r5)
851 isync
852
Becky Bruce3111d322008-11-06 17:37:35 -0600853 /* Use VA of CCSR to do read */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200854 lis r3, CONFIG_SYS_CCSRBAR@h
855 lwz r5, CONFIG_SYS_CCSRBAR@l(r3)
Jon Loeligerdebb7352006-04-26 17:58:56 -0500856 isync
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500857
Jon Loeligerdebb7352006-04-26 17:58:56 -0500858 blr
859#endif
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500860
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200861#ifdef CONFIG_SYS_INIT_RAM_LOCK
Jon Loeligerdebb7352006-04-26 17:58:56 -0500862lock_ram_in_cache:
863 /* Allocate Initial RAM in data cache.
864 */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200865 lis r3, (CONFIG_SYS_INIT_RAM_ADDR & ~31)@h
866 ori r3, r3, (CONFIG_SYS_INIT_RAM_ADDR & ~31)@l
Wolfgang Denk553f0982010-10-26 13:32:32 +0200867 li r4, ((CONFIG_SYS_INIT_RAM_SIZE & ~31) + \
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200868 (CONFIG_SYS_INIT_RAM_ADDR & 31) + 31) / 32
Nick Spence39243842008-08-28 14:09:15 -0700869 mtctr r4
Jon Loeligerdebb7352006-04-26 17:58:56 -05008701:
871 dcbz r0, r3
872 addi r3, r3, 32
873 bdnz 1b
874#if 1
875/* Lock the data cache */
876 mfspr r0, HID0
877 ori r0, r0, 0x1000
878 sync
879 mtspr HID0, r0
880 sync
881 blr
882#endif
883#if 0
884 /* Lock the first way of the data cache */
885 mfspr r0, LDSTCR
886 ori r0, r0, 0x0080
887#if defined(CONFIG_ALTIVEC)
888 dssall
889#endif
890 sync
891 mtspr LDSTCR, r0
892 sync
893 isync
894 blr
895#endif
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500896
Jon Loeligerdebb7352006-04-26 17:58:56 -0500897.globl unlock_ram_in_cache
898unlock_ram_in_cache:
899 /* invalidate the INIT_RAM section */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200900 lis r3, (CONFIG_SYS_INIT_RAM_ADDR & ~31)@h
901 ori r3, r3, (CONFIG_SYS_INIT_RAM_ADDR & ~31)@l
Wolfgang Denk553f0982010-10-26 13:32:32 +0200902 li r4, ((CONFIG_SYS_INIT_RAM_SIZE & ~31) + \
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200903 (CONFIG_SYS_INIT_RAM_ADDR & 31) + 31) / 32
Nick Spence39243842008-08-28 14:09:15 -0700904 mtctr r4
Jon Loeligerdebb7352006-04-26 17:58:56 -05009051: icbi r0, r3
906 addi r3, r3, 32
907 bdnz 1b
Wolfgang Denk47a69892006-10-24 15:32:57 +0200908 sync /* Wait for all icbi to complete on bus */
Jon Loeligerdebb7352006-04-26 17:58:56 -0500909 isync
910#if 1
911/* Unlock the data cache and invalidate it */
Wolfgang Denk47a69892006-10-24 15:32:57 +0200912 mfspr r0, HID0
913 li r3,0x1000
914 andc r0,r0,r3
Jon Loeligerdebb7352006-04-26 17:58:56 -0500915 li r3,0x0400
916 or r0,r0,r3
917 sync
Wolfgang Denk47a69892006-10-24 15:32:57 +0200918 mtspr HID0, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500919 sync
920 blr
921#endif
Jon Loeligerffff3ae2006-08-22 12:06:18 -0500922#if 0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500923 /* Unlock the first way of the data cache */
Wolfgang Denk47a69892006-10-24 15:32:57 +0200924 mfspr r0, LDSTCR
925 li r3,0x0080
926 andc r0,r0,r3
Jon Loeligerdebb7352006-04-26 17:58:56 -0500927#ifdef CONFIG_ALTIVEC
928 dssall
929#endif
930 sync
Wolfgang Denk47a69892006-10-24 15:32:57 +0200931 mtspr LDSTCR, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500932 sync
933 isync
934 li r3,0x0400
935 or r0,r0,r3
936 sync
Wolfgang Denk47a69892006-10-24 15:32:57 +0200937 mtspr HID0, r0
Jon Loeligerdebb7352006-04-26 17:58:56 -0500938 sync
939 blr
940#endif
941#endif