| 1 | 154 | olivier.gi | /*===========================================================================*/
 | 
      
         | 2 |  |  | /* Copyright (C) 2001 Authors                                                */
 | 
      
         | 3 |  |  | /*                                                                           */
 | 
      
         | 4 |  |  | /* This source file may be used and distributed without restriction provided */
 | 
      
         | 5 |  |  | /* that this copyright statement is not removed from the file and that any   */
 | 
      
         | 6 |  |  | /* derivative work contains the original copyright notice and the associated */
 | 
      
         | 7 |  |  | /* disclaimer.                                                               */
 | 
      
         | 8 |  |  | /*                                                                           */
 | 
      
         | 9 |  |  | /* This source file is free software; you can redistribute it and/or modify  */
 | 
      
         | 10 |  |  | /* it under the terms of the GNU Lesser General Public License as published  */
 | 
      
         | 11 |  |  | /* by the Free Software Foundation; either version 2.1 of the License, or    */
 | 
      
         | 12 |  |  | /* (at your option) any later version.                                       */
 | 
      
         | 13 |  |  | /*                                                                           */
 | 
      
         | 14 |  |  | /* This source is distributed in the hope that it will be useful, but WITHOUT*/
 | 
      
         | 15 |  |  | /* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or     */
 | 
      
         | 16 |  |  | /* FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public       */
 | 
      
         | 17 |  |  | /* License for more details.                                                 */
 | 
      
         | 18 |  |  | /*                                                                           */
 | 
      
         | 19 |  |  | /* You should have received a copy of the GNU Lesser General Public License  */
 | 
      
         | 20 |  |  | /* along with this source; if not, write to the Free Software Foundation,    */
 | 
      
         | 21 |  |  | /* Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA        */
 | 
      
         | 22 |  |  | /*                                                                           */
 | 
      
         | 23 |  |  | /*===========================================================================*/
 | 
      
         | 24 |  |  | /*                            DEBUG INTERFACE:  RD / WR                      */
 | 
      
         | 25 |  |  | /*---------------------------------------------------------------------------*/
 | 
      
         | 26 |  |  | /* Test the UART debug interface:                                            */
 | 
      
         | 27 |  |  | /*                        - Check RD/WR access to all adressable             */
 | 
      
         | 28 |  |  | /*                          debug registers.                                 */
 | 
      
         | 29 |  |  | /*                                                                           */
 | 
      
         | 30 |  |  | /* Author(s):                                                                */
 | 
      
         | 31 |  |  | /*             - Olivier Girard,    olgirard@gmail.com                       */
 | 
      
         | 32 |  |  | /*                                                                           */
 | 
      
         | 33 |  |  | /*---------------------------------------------------------------------------*/
 | 
      
         | 34 |  |  | /* $Rev: 19 $                                                                */
 | 
      
         | 35 |  |  | /* $LastChangedBy: olivier.girard $                                          */
 | 
      
         | 36 |  |  | /* $LastChangedDate: 2009-08-04 23:47:15 +0200 (Tue, 04 Aug 2009) $          */
 | 
      
         | 37 |  |  | /*===========================================================================*/
 | 
      
         | 38 |  |  |  
 | 
      
         | 39 |  |  | .include "pmem_defs.asm"
 | 
      
         | 40 |  |  |  
 | 
      
         | 41 |  |  | .global main
 | 
      
         | 42 |  |  |  
 | 
      
         | 43 |  |  |  
 | 
      
         | 44 |  |  | WAIT_FUNC:
 | 
      
         | 45 |  |  |         dec r14
 | 
      
         | 46 |  |  |         jnz WAIT_FUNC
 | 
      
         | 47 |  |  |         ret
 | 
      
         | 48 |  |  |  
 | 
      
         | 49 |  |  | main:
 | 
      
         | 50 |  |  |         mov #DMEM_250, r1       ; # Initialize stack pointer
 | 
      
         | 51 |  |  |         mov   #0x0000, &DMEM_200
 | 
      
         | 52 |  |  |         mov   #0x0000, r15
 | 
      
         | 53 |  |  |  
 | 
      
         | 54 |  |  |  
 | 
      
         | 55 |  |  |         mov   #0x0300, r14
 | 
      
         | 56 |  |  |         call  #WAIT_FUNC
 | 
      
         | 57 |  |  |  
 | 
      
         | 58 |  |  |         mov   #0x1000, r15
 | 
      
         | 59 |  |  |  
 | 
      
         | 60 |  |  |  
 | 
      
         | 61 |  |  |  
 | 
      
         | 62 |  |  |  
 | 
      
         | 63 |  |  |         /* ----------------------         END OF TEST        --------------- */
 | 
      
         | 64 |  |  | end_of_test:
 | 
      
         | 65 |  |  |         nop
 | 
      
         | 66 |  |  |         br #0xffff
 | 
      
         | 67 |  |  |  
 | 
      
         | 68 |  |  |  
 | 
      
         | 69 |  |  |         /* ----------------------         INTERRUPT VECTORS  --------------- */
 | 
      
         | 70 |  |  |  
 | 
      
         | 71 |  |  | .section .vectors, "a"
 | 
      
         | 72 |  |  | .word end_of_test        ; Interrupt  0 (lowest priority)    
 | 
      
         | 73 |  |  | .word end_of_test        ; Interrupt  1                      
 | 
      
         | 74 |  |  | .word end_of_test        ; Interrupt  2                      
 | 
      
         | 75 |  |  | .word end_of_test        ; Interrupt  3                      
 | 
      
         | 76 |  |  | .word end_of_test        ; Interrupt  4                      
 | 
      
         | 77 |  |  | .word end_of_test        ; Interrupt  5                      
 | 
      
         | 78 |  |  | .word end_of_test        ; Interrupt  6                      
 | 
      
         | 79 |  |  | .word end_of_test        ; Interrupt  7                      
 | 
      
         | 80 |  |  | .word end_of_test        ; Interrupt  8                      
 | 
      
         | 81 |  |  | .word end_of_test        ; Interrupt  9                      
 | 
      
         | 82 |  |  | .word end_of_test        ; Interrupt 10                      Watchdog timer
 | 
      
         | 83 |  |  | .word end_of_test        ; Interrupt 11                      
 | 
      
         | 84 |  |  | .word end_of_test        ; Interrupt 12                      
 | 
      
         | 85 |  |  | .word end_of_test        ; Interrupt 13                      
 | 
      
         | 86 |  |  | .word end_of_test        ; Interrupt 14                      NMI
 | 
      
         | 87 |  |  | .word main               ; Interrupt 15 (highest priority)   RESET
 |