KPIT GNU Tools (21) GNUSH v1202 SH7450 をシミュレート (5): SYSLAB blog

KPIT GNU Tools (21) GNUSH v1202 SH7450 をシミュレート (5) ― 2012年08月07日 19時20分12秒

main までたどり着いたところで今一度 reset_program.asm の内容を確認する。
①R15 にスタックアドレスを設定
②内蔵メモリアクセスモードを設定
③データ領域の初期化
④HardwareSetup 関数を呼び出し
⑤浮動小数点ユニットの初期化
⑥ステータスレジスタの設定
⑦main 関数を呼び出し
今までのところこれで問題ない。しかし、気になっていた INTHandler の設定がどこにもない。VBR を設定しなければならないはずだ。VBR をデフォルトのまま使うなら INTHandler のセクションを 0x100 にしなければならない。そうでなければ VBR に対して
INTHandler は 0x100 のオフセット
TLBmissHandler は 0x400 のオフセット
IRQHandler は 0x600 のオフセット
となる。①と②の間にベクタベースレジスタの設定を挿入する事にする。

●RESETPRG\SH4A.asm 変更（reset_program.asm のもとになるファイルに上記の内容を反映）
C:\Program Files\Renesas\Hew\System\Pg\KPIT GNUSH-ELF\GNUSH_Info\Generate\RESETPRG\SH4A.asm

　HEW_2004.08.03 ! reset_program.asm .list .section .text .global _start ! global Start routine #ifdef CPPAPP ___dso_handle: .global ___dso_handle #endif .equ INT_OFFSET, 0x100 #ifndef DEBUG_IN_GDB .extern _HardwareSetup ! external Sub-routine to initialise Hardware .extern _data .extern _mdata .extern _ebss .extern _bss #endif .extern _INTHandlerPRG .extern _edata .extern _main .extern _stack .extern _vects #if DEBUG .extern _exit #endif _start : ! initialise the SP for non-vectored code mov.l stack,r15 mov.l INIT_VBR,r0 ldc r0,vbr #ifndef DEBUG_IN_GDB mov.l ramcr_address,r1 mov.l ramcr_init_val,r3 mov.l r3,@r1 !load data section from ROM to RAM ! initialise sections mov.l edata,r1 ! edata in r1 mov.l mdata,r2 ! mdata in r2 mov.l data,r0 ! data in r0 cmp/eq r0,r1 bt start_1 nop start_l: mov.b @r2,r3 !get from src mov.b r3,@r0 !place in dest add #1,r2 !inc src add #1,r0 !inc dest cmp/eq r0,r1 !dest == edata? bf start_l nop start_1: ! zero out bss mov.l ebss,r1 mov.l bss,r0 cmp/eq r0,r1 bt start_3 sub r2,r2 start_2: mov.b r2,@r0 add #1,r0 cmp/eq r0,r1 bf start_2 nop start_3: ! Call the hardware initialiser mov.l HardwareSetup,r1 jsr @r1 nop #endif #ifdef CPPAPP !Initialize global constructor mov.l _InitCtors,r1 jsr @r1 nop #endif #if !defined (__SH2A_NOFPU__) #if defined (__SH2A__) || defined (__SH2E__) || defined (__SH3E__) || defined(__SH4_SINGLE__) ||defined(__SH4__) || defined(__SH4_SINGLE_ONLY__) mov.l set_fpscr_k, r1 jsr @r1 mov #0,r4 lds r3,fpscr #endif // defined (__SH2A__) || defined (__SH2E__) || defined (__SH3E__) || defined(__SH4_SINGLE__) || defined(__SH4__) || defined(__SH4_SINGLE_ONLY__) #endif // !defined (__SH2A_NOFPU__) !status-register initialised mov #0xf0,r4 extu.b r4,r4 ldc r4,sr mov.l main,r1 jsr @r1 nop ! call to exit #if DEBUG mov.l _exit_k,r1 jsr @r1 nop #endif #if RELEASE exit: bra exit nop #endif .align 2 #if !defined (__SH2A_NOFPU__) #if defined (__SH2A__) || defined (__SH2E__) || defined (__SH3E__) || defined(__SH4_SINGLE__) ||defined(__SH4__) || defined(__SH4_SINGLE_ONLY__) set_fpscr_k: .long ___set_fpscr #endif // defined (__SH2A__) || defined (__SH2E__) || defined (__SH3E__) || defined(__SH4_SINGLE__) || defined(__SH4__) || defined(__SH4_SINGLE_ONLY__) #endif // !defined (__SH2A_NOFPU__) .ALIGN 4 INIT_VBR: .long (_INTHandlerPRG - INT_OFFSET) ramcr_address: .long 0xff000074 ramcr_init_val: .long 0x00000200 #ifndef DEBUG_IN_GDB HardwareSetup: .long _HardwareSetup data: .long _data mdata: .long _mdata edata: .long _edata bss: .long _bss ebss: .long _ebss #endif stack: .long _stack main: .long _main #ifdef CPPAPP _InitCtors: .long ___main #endif #if DEBUG _exit_k: .long _exit #endif .end

上記変更を行うと今度は vhandler\sh7450.s の具合が悪くなってくる。というわけで先日のソースを一部変更。
●vhandler\sh7450.s 変更
C:\Program Files\Renesas\Hew\System\Pg\KPIT GNUSH-ELF\GNUSH_Info\Generate\VECTTBL\SH7450.c

　 /* Exception handling routines */ .include "env.s" .equ IMASKclr_RBBLclr, (0xCFFFFFFF & 0xFFFFFF0F) .equ MDRBBLset, 0x70000000 .equ INTMASK, 0x000000F0 .extern _Exp_Vectors .global _int_term !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !* macro definition *! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .macro PUSH_EXP_BASE_REG stc.l ssr,@-r15 ! save ssr stc.l spc,@-r15 ! save spc sts.l pr,@-r15 ! save context registers sts.l fpscr,@-r15 ! save fpscr registers stc.l r7_bank,@-r15 stc.l r6_bank,@-r15 stc.l r5_bank,@-r15 stc.l r4_bank,@-r15 stc.l r3_bank,@-r15 stc.l r2_bank,@-r15 stc.l r1_bank,@-r15 stc.l r0_bank,@-r15 .endm ! .macro POP_EXP_BASE_REG ldc.l @r15+,r0_bank ! recover registers ldc.l @r15+,r1_bank ldc.l @r15+,r2_bank ldc.l @r15+,r3_bank ldc.l @r15+,r4_bank ldc.l @r15+,r5_bank ldc.l @r15+,r6_bank ldc.l @r15+,r7_bank lds.l @r15+,fpscr lds.l @r15+,pr ldc.l @r15+,spc ldc.l @r15+,ssr .endm !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! reset ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .section RSTHandler,"ax" _ResetHandler: mov.l EXPEVT_temp,r0 mov.l @r0,r0 shlr2 r0 shlr r0 mov.l _RESET_Vectors_temp,r1 add r1,r0 mov.l @r0,r0 jmp @r0 nop .align 4 EXPEVT_temp: .long EXPEVT _RESET_Vectors_temp: .long _Exp_Vectors !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! exceptional interrupt ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .section INTHandler,"ax" .global _INTHandlerPRG _INTHandlerPRG: _ExpHandler: PUSH_EXP_BASE_REG ! mov.l EXPEVT_temp1,r0 ! set event address mov.l @r0,r1 ! set exception code mov.l _INT_Vectors_temp1,r0 ! set vector table address ! add #0xC0,r1 ! exception code - h'40 shlr2 r1 shlr r1 mov.l @(r0,r1),r3 ! set interrupt function addr ! mov.l _INT_MASK_temp1,r0 ! interrupt mask table addr shlr2 r1 mov.b @(r0,r1),r1 ! interrupt mask extu.b r1,r1 ! stc sr,r0 ! save sr mov.l IMASKclr_RBBLclr_temp1,r2 ! RB,BL,mask clear data and r2,r0 ! clear mask data or r1,r0 ! set interrupt mask ldc r0,ssr ! set current status ! ldc r3,spc mov.l _int_term_temp1,r0 ! set interrupt terminate lds r0,pr ! rte nop ! .align 4 EXPEVT_temp1: .long EXPEVT _INT_Vectors_temp1: .long _Exp_Vectors _INT_MASK_temp1: .long INTMASK IMASKclr_RBBLclr_temp1: .long IMASKclr_RBBLclr _int_term_temp1: .long _int_term !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! Interrupt terminate ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .align 4 _int_term: mov.l MDRBBLset_temp,r0 ! set MD,BL,RB ldc r0,sr ! POP_EXP_BASE_REG rte ! return nop ! .align 4 MDRBBLset_temp: .long MDRBBLset !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! TLB miss interrupt ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .org 0x300 _TLBmissHandler: PUSH_EXP_BASE_REG ! mov.l EXPEVT_temp2,r0 ! set event address mov.l @r0,r1 ! set exception code mov.l _INT_Vectors_temp2,r0 ! set vector table address ! add #0xC0,r1 ! exception code - h'40 shlr2 r1 shlr r1 mov.l @(r0,r1),r3 ! set interrupt function addr ! mov.l _INT_MASK_temp2,r0 ! interrupt mask table addr shlr2 r1 mov.b @(r0,r1),r1 ! interrupt mask extu.b r1,r1 ! stc sr,r0 ! save sr mov.l IMASKclr_RBBLclr_temp2,r2 ! RB,BL,mask clear data and r2,r0 ! clear mask data or r1,r0 ! set interrupt mask ldc r0,ssr ! set current status ! ldc r3,spc mov.l _int_term_temp2,r0 ! set interrupt terminate lds r0,pr ! rte nop ! .align 4 EXPEVT_temp2: .long EXPEVT _INT_Vectors_temp2: .long _Exp_Vectors _INT_MASK_temp2: .long INTMASK IMASKclr_RBBLclr_temp2: .long IMASKclr_RBBLclr _int_term_temp2: .long _int_term !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! IRQ ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! .org 0x500 _IRQHandler: PUSH_EXP_BASE_REG ! mov.l INTEVT_temp,r0 ! set event address mov.l @r0,r1 ! set exception code mov.l _INT_Vectors_temp3,r0 ! set vector table address ! add #0xC0,r1 ! exception code - h'40 shlr2 r1 shlr r1 mov.l @(r0,r1),r3 ! set interrupt function addr ! mov.l _INT_MASK_temp3,r0 ! interrupt mask table addr shlr2 r1 mov.b @(r0,r1),r1 ! interrupt mask extu.b r1,r1 ! stc sr,r0 ! save sr mov.l IMASKclr_RBBLclr_temp3,r2 ! RB,BL,mask clear data and r2,r0 ! clear mask data or r1,r0 ! set interrupt mask ldc r0,ssr ! set current status ! ldc r3,spc mov.l _int_term_temp3,r0 ! set interrupt terminate lds r0,pr ! rte nop ! .align 4 IMASKclr_RBBLclr_temp3: .long IMASKclr_RBBLclr INTEVT_temp: .long INTEVT _int_term_temp3: .long _int_term _INT_Vectors_temp3: .long _Exp_Vectors _INT_MASK_temp3: .long INTMASK .end

ここらで割り込みの確認だ。 main 関数から set_cr() を実行して一般不当命令の例外処理をやらせてみる。
画面では分かりにくいかもしれないが割り込みが発生し _INTHandlerPRG を実行している。また、ベクター 180 の interrupt function も実行される。
これで一通りのことはできたと思う。後は現物が入ってからだ。

環境：High-performance Embedded Workshop Version 4.09.00.007
　　　 KPIT GNUSH v12.02 Windows Tool Chain (ELF)

コメントをどうぞ

※メールアドレスとURLの入力は必須ではありません。入力されたメールアドレスは記事に反映されず、ブログの管理者のみが参照できます。

※投稿には管理者が設定した質問に答える必要があります。

トラックバック

このエントリのトラックバックURL: http://syslab.asablo.jp/blog/2012/08/07/6535482/tb

<<前次>>

<< 2012/08 >>
日	月	火	水	木	金	土
			01	02	03	04
05	06	07	08	09	10	11
12	13	14	15	16	17	18
19	20	21	22	23	24	25
26	27	28	29	30	31

SYSLAB blog

このブログについて

カテゴリ一覧

最近のコメント

最近のトラックバック

バックナンバー

メモ

検索

LOVE in Action

携帯からアクセス

RSS

KPIT GNU Tools (21) GNUSH v1202 SH7450 をシミュレート (5) ― 2012年08月07日 19時20分12秒

コメント

トラックバック

SYSLAB blog

このブログについて

カテゴリ一覧

最近のコメント

最近のトラックバック

バックナンバー

メモ

検索

LOVE in Action

携帯からアクセス

RSS

ログイン

KPIT GNU Tools (21) GNUSH v1202 SH7450 をシミュレート (5) ― 2012年08月07日 19時20分12秒

コメント

トラックバック