bioslabcfg.lst

SEED_TMS320vc5402dsk是在TI的TMS320VC5402DSK板基础上简化开发出来的

3                         .if __far_mode              ; if far mode of C54x
3                           .word     STD_TARGWORDMAUS * 6
3                         .else                               ; if near mode of C54x
3        000025 0004        .word     STD_TARGWORDMAUS * 4
3                         .endif
3                     
3                         .if __far_mode              ; if far mode of C54x
3                           .word     :name: 
3                           .xlong    :fxn:           ; fxn
3                           .word     :arg1:          ; arg1
3                           .word     :arg0:          ; arg0
3                           .word     :cfxn:          ; cfxn
3                           .word     0x54f           ; pad
3                         .else                               ; if near mode of C54x
3        000026 0009-       .word     RTA_fromHost$pipe$rdfxn 
3        000027 0000!       .word     RTA_F_or                ; fxn
3        000028 0001        .word     1<<0            ; arg1
3        000029 0000!       .word     LNK_D_fromHostMask              ; arg0
3        00002a 0000        .word     0               ; cfxn
TMS320C54x COFF Assembler         Version 3.50     Sun Apr 02 13:46:40 2000
Copyright (c) 1996-1999 Texas Instruments Incorporated
bioslabcfg.s54                                                       PAGE   18

3                         .endif
3                     
2                     
2        00000d       RTA_fromHost$pipe$aaa .usect ".pip", STD_TARGWORDMAUS * 1
2                     
2        00002b               .sect ".cinit"
2                     
2        00002b 0001          .field  STD_TARGWORDMAUS * 1
2                     
2        00002c 000D-         .field RTA_fromHost$pipe$aaa
2                     
2                             .if ($symcmp("none", "reader") = 0)
2                                 .field :name:$sts
2                             .else
2        00002d 0000              .field 0
2                             .endif
2                     
2        00000e       RTA_fromHost$pipe$wr .usect ".pip", STD_TARGWORDMAUS * 8
2                     
2                             .if __far_mode          ; if far mode of C54x
2                     :name:$pad1 .usect ".pip", STD_TARGWORDMAUS * 1
2                             .endif
2                     
2        00002e               .sect ".cinit"
2                     
2                             .if __far_mode          ; if far mode of C54x
2                               .field        STD_TARGWORDMAUS * 9
2                             .else                           ; if near mode of C54x
2        00002e 0008            .field        STD_TARGWORDMAUS * 8
2                             .endif
2                     
2        00002f 000E-         .field RTA_fromHost$pipe$wr
2                     
2        000030 0000          .field  0                       ; writer take-probe
2        000031 0000          .field  0                       ; writer addr
2        000032 0004          .field  04H             ; writer size
2        000033 0000-         .field  RTA_fromHost$pipe$dtab             ; writer curdesc
2        000034 0009-         .field  RTA_fromHost$pipe$rd+PIP_O_FXNOBJ  ; writer pfxnobj
2        000035 0001          .field  01H             ; writer numframes
2        000036 0000          .field  0                       ; writer give-probe
2        000037 0006-         .field  RTA_fromHost$pipe$rd+PIP_O_NUMFRAMES       ; writer pnumframes
2                     
2                             .if __far_mode                  ; if far mode of C54x
2                               .field        0x54f           ; pad1
2                             .endif
2                     
2        000038               FXN_Obj RTA_fromHost$pipe$wrfxn, _FXN_F_nop, 00H, 00H, ".pip"
3        000038           CHK_nargs "FXN_Obj", section
3                         .if ($symcmp("", "error") = 0)
3                             .emsg "FXN_Obj parameter error"
3                         .endif
3                     
3                         .var cfxn
3                     
3                         .if ($symcmp("_", "_") = 0)
TMS320C54x COFF Assembler         Version 3.50     Sun Apr 02 13:46:40 2000
Copyright (c) 1996-1999 Texas Instruments Incorporated
bioslabcfg.s54                                                       PAGE   19

3                             .asg "1", cfxn
3                         .else
3                             .asg "0", cfxn
3                         .endif
3                     
3                     RTA_fromHost$pipe$wrfxn  .tag    FXN_Obj
3                     
3                         .if __far_mode              ; if far mode of C54x
3                     :name:  .usect ":section:", STD_TARGWORDMAUS * 6
3                         .else                       ; if near mode of C54x
3        000016       RTA_fromHost$pipe$wrfxn .usect ".pip", STD_TARGWORDMAUS * 4
3                         .endif
3                     
3        000038           .sect ".cinit"
3                     
3                         .if __far_mode              ; if far mode of C54x
3                           .word     STD_TARGWORDMAUS * 6
3                         .else                               ; if near mode of C54x
3        000038 0004        .word     STD_TARGWORDMAUS * 4
3                         .endif
3                     
3                         .if __far_mode              ; if far mode of C54x
3                           .word     :name: 
3                           .xlong    :fxn:           ; fxn
3                           .word     :arg1:          ; arg1
3                           .word     :arg0:          ; arg0
3                           .word     :cfxn:          ; cfxn
3                           .word     0x54f           ; pad
3                         .else                               ; if near mode of C54x
3        000039 0016-       .word     RTA_fromHost$pipe$wrfxn 
3        00003a 0000!       .word     _FXN_F_nop              ; fxn
3        00003b 0000        .word     00H             ; arg1
3        00003c 0000        .word     00H             ; arg0
3        00003d 0001        .word     1               ; cfxn
3                         .endif
3                     
2                     
2        00001a       RTA_fromHost$pipe$bbb .usect ".pip", STD_TARGWORDMAUS * 1
2                     
2                             .if __far_mode          ; if far mode of C54x
2                     :name:$pad2 .usect ".pip", STD_TARGWORDMAUS * 1
2                             .endif
2                     
2        00003e               .sect ".cinit"
2                     
2                             .if __far_mode          ; if far mode of C54x
2                               .field        STD_TARGWORDMAUS * 2
2                             .else                           ; if near mode of C54x
2        00003e 0001            .field        STD_TARGWORDMAUS * 1
2                             .endif
2                     
2        00003f 001A-         .field RTA_fromHost$pipe$bbb
2                     
2                             .if ($symcmp("none", "writer") = 0)
2                                 .field      :name:$sts
TMS320C54x COFF Assembler         Version 3.50     Sun Apr 02 13:46:40 2000
Copyright (c) 1996-1999 Texas Instruments Incorporated
bioslabcfg.s54                                                       PAGE   20

2                             .else
2        000040 0000              .field      0
2                             .endif
2                     
2                             .if __far_mode          ; if far mode of C54x
2                                 .field      0x54f           ; pad2
2                             .endif
2                     
2                             ;
2                             ; put PIP descriptors into .bss section
2                             ;
2                             ;   addr[i]
2                             ;   size[i]
2                             ;   next[i]
2                             ;
2                             .global RTA_fromHost$pipe$dtab
2                     
2        000000               .bss RTA_fromHost$pipe$dtab, (3 * STD_TARGWORDMAUS * 01H), STD_TARGWORDMAUS
2                     
2        000041               .sect ".cinit"
2                     
2                             .var    temp0, temp1, boff
2                             .eval   0, temp0
2                             .eval   0, temp1
2                             .eval   0, boff
2                             .eval   01H * (3 * STD_TARGWORDMAUS), temp0
2                     
2        000041 0003          .field  3
2                     
2        000042 0000-         .field RTA_fromHost$pipe$dtab
2                     
2                             .eval   3 * STD_TARGWORDMAUS, temp1
2                     
2                             .loop   01H-1
2                                     .field :buf:+:boff:             ; addr[i]
2                                     .field :framesize:              ; size[i]
2                                     .field :name:$dtab + :temp1:    ; next[i]
2                                     .eval :boff:+(:framesize: * (STD_TARGWORDMAUS)), boff
2                                     .eval :temp1: + (3 * STD_TARGWORDMAUS), temp1
2                             .endloop
2                     
2        000043 0000-         .field  RTA_fromHost$buf+0            ; addr[n]
2        000044 0004          .field  04H             ; size[n]
2        000045 0000-         .field  RTA_fromHost$pipe$dtab             ; next[n]
2                     
2                             .if ($symcmp("none", "reader") = 0)
2                                     STS_Obj 1, :name:$sts, 0, 0, 0
2                             .endif
2                     
2                             .if ($symcmp("none", "writer") = 0)
2                                     STS_Obj 1, :name:$sts, 0, 0, 0
2                             .endif
2                     
2                             .eval 0 + 1, PIP$pipCount
2                     
TMS320C54x COFF Assembler         Version 3.50     Sun Apr 02 13:46:40 2000
Copyright (c) 1996-1999 Texas Instruments Incorporated
bioslabcfg.s54                                                       PAGE   21

1                             .endif
1                     
1                     
1                             .eval 0 + 1, HST$hstCount
1                     
     372              
     373              ;; ======== HST_Obj RTA_toHost ========
     374              ;; Used to access LOG and STS data
     375              ;;
     376              ;; HST_Obj RTA_toHost (mode, buf, framesize, numframes, stsflg, notify, arg0, arg1, lnk)
     377                      .global RTA_toHost
     378                      .asg "output", _mode
     379                      .asg "<NULL>", _buf
     380                      .asg 040H, _framesize
     381                      .asg 01H, _numframes
     382                      .asg 00H, _stsflg
     383                      .asg _FXN_F_nop, _notify
     384                      .asg 00H, _arg0
     385                      .asg 00H, _arg1
     386                      .asg "RTDX", _lnk
     387 000046               HST_Obj 1, RTA_toHost, 0, _mode, _buf, _framesize, _numframes, _stsflg, _notify, _arg0, _arg1, _lnk
1                     
1                             .if (1 = 0)
1                                 .mexit
1                             .endif
1                      
1        000046               CHK_nargs "HST_Obj", lnktype 
1                             .if ($symcmp("", "error") = 0)
1                                 .emsg "HST_Obj lnktype error"
1                             .endif
1                      
1        000046               CHK_domain HST_Obj, mode, "output,input", "output"
2                     
1                             .asg "output", mode
1                             .if ($symcmp("output", "error") = 0)
1                                 .emsg "HST_Obj mode error"
1                             .endif
1                      
1                             .global RTA_toHost, RTA_toHost$buf, RTA_toHost$rtdx
1                      
1                             .if ($symcmp("<NULL>", "<NULL>") = 0)
1        000046                   GBL_Obj     RTA_toHost$buf, 040H*01H, .hst0
2        000046               CHK_domain "GBL_Obj", alignFlag, "noalign,align", "noalign"