Вид для печати
В SD падает на тесте EAE. Возможно и там с него же улетает :)
Код:.TRPSET #AREA,#TRPEAE ;Catch traps to 4 or 10
CLRB @#EAECS0 ;Check first possible location
---------- Post added at 01:30 ---------- Previous post was at 01:27 ----------
То есть попросту драйвер перехватил @#10 и не может потом с ним грамотно разобраться.
Ага, у меня в эмуляторе есть потоковый дизассемблер, которым можно управлять из исполняемого эмулятором кода.Цитата:
Сообщение от form
Значит, запуск дизассемблера нужно вставить в этом месте и собрать новый RESORC.SAV
Сейчас попробую..
hobot, У Вас на первой картинке чуть ниже обведенного что-то там от WD.
Это у Вас "эталонная дискете от СЭМЗ - с ситемой" такая? ;-)
Дизассемблер не запускается, значит этот код не выполняется.Код:.TRPSET #AREA,#TRPEAE ;Catch traps to 4 or 10
CLRB @#EAECS0 ;Check first possible location
NOP ;Delay an instruction due to T11
BCC 26$ ;If no trap, then Carry clear
25$: .TRPSET #AREA,#TRPEAE ;Catch for second try
CLRB @#EAECS1 ;Check second possible location
NOP ;Delay an instruction due to T11
BCS 113$ ;If trapped, no EAE
26$: PRINT EAE,<Extended Arithmetic Element (EAE)> ;Tell the user
Если установить запуск дизассемблера на метку START, установить быстродействие эмулятора 0.025 MIPS, выполнить команду SH CON, убедиться что был выход в KMON и тут же закрыть эмулятор - потоковый дизассемблер успевает сгенерить больше 5 мегабайт листинга.
Вот его начало:
Код:011676 [000000]: MOV SP, 001046 ; R6 :001000 -> 001046
011702 [000000]: MOV #1978., @#000046 ; 011704:003672 -> 000046
011710 [000000]: EMT 355
141206 [000000]: BIC #15., 2(SP) ; 141210:000017 -> 000776:000000
141214 [000004]: MOV R5, -(SP) ; R5 :135656 -> 000772
141216 [000010]: MOV R4, -(SP) ; R4 :133730 -> 000770
141220 [000010]: MOV 4(SP), R5 ; 000774:011712 -> R5
141224 [000000]: MOV -(R5), R4 ; 011710:104355 -> R4
141226 [000010]: CMPB R4, #251. ; R4 : 355 -> 141230: 373
141232 [000011]: BEQ 141050
141234 [000011]: JSR R3, 151020 ; R3 :075000 -> 000766
151020 [000011]: MOV R2, -(SP) ; R2 :011670 -> 000764
151022 [000001]: MOV R1, -(SP) ; R1 :000016 -> 000762
151024 [000001]: MOV R0, -(SP) ; R0 :030730 -> 000760
151026 [000001]: CALL (R3) ; R7 :151030 -> 000756
141240 [000001]: TST (SP)+ ; 000756:151030
141242 [000010]: CLR R2 ; R2 :011670
141244 [000004]: MOV 136176, R5 ; 136176:137264 -> R5
141250 [000010]: INC 268.(R5) ; 137700:000000
141254 [000000]: MOV SP, R1 ; R6 :000760 -> R1
141256 [000000]: CMPB R4, #252. ; R4 : 355 -> 141260: 374
141262 [000011]: BCS 141372
141372 [000011]: ADD #16., R1 ; 141374:000020 -> R1 :000760
141376 [000000]: MOV R4, R5 ; R4 :104355 -> R5
141400 [000010]: BIC #-16., R4 ; 141402:177760 -> R4 :104355
141404 [000000]: BIC #-241., R5 ; 141406:177417 -> R5 :104355
141410 [000000]: ASR R5 ; R5 :000340
141412 [000000]: ASR R5 ; R5 :000160
141414 [000000]: ASR R5 ; R5 :000070
141416 [000000]: ADD PC, R5 ; R7 :141420 -> R5 :000034
141420 [000010]: MOV -838.(R5), R5 ; 137746:003354 -> R5
141424 [000000]: ROR R5 ; R5 :003354
141426 [000000]: BCC 141436
141436 [000000]: ASR R5 ; R5 :001566
141440 [000000]: BCC 141454
141454 [000000]: ASL R5 ; R5 :000673
141456 [000000]: MOV R5, -(SP) ; R5 :001566 -> 000756
141460 [000000]: MOV 136176, R5 ; 136176:137264 -> R5
141464 [000010]: ASL R4 ; R4 :000015
141466 [000000]: MOV R4, R3 ; R4 :000032 -> R3
141470 [000000]: ASL R3 ; R3 :000032
141472 [000000]: ASL R3 ; R3 :000064
141474 [000000]: ADD R4, R3 ; R4 :000032 -> R3 :000150
141476 [000000]: ADD 24.(R5), R3 ; 137314:135662 -> R3 :000202
141502 [000010]: CLRB @#000052 ; 000052: 000
141506 [000004]: ADD (SP)+, PC ; 000756:001566 -> R7 :141510
143276 [000010]: TST (R4)+ ; 000032:000000
143300 [000004]: ADD PC, R4 ; R7 :143302 -> R4 :000034
143302 [000010]: ADD (R4), PC ; 143336:177372 -> R7 :143304
142676 [000011]: CLRB 199.(R5) ; 137573: 000
142702 [000004]: CALL 145326 ; R7 :142706 -> 000756
145326 [000004]: MOV @#000044, R3 ; 000044:020000 -> R3
145332 [000000]: BIC #-20481., R3 ; 145334:127777 -> R3 :020000
145336 [000004]: BIT #4096., R3 ; 145340:010000 -> R3 :000000
145342 [000004]: BEQ 145350
145350 [000004]: MTPS #224. ; 145352: 340 -> PSW :000004
145354 [000340]: NOP
145356 [000340]: BIC #20480., 260.(R5) ; 145360:050000 -> 137670:050000
145364 [000344]: BIS R3, 260.(R5) ; R3 :000000 -> 137670:000000
145370 [000344]: MTPS #0 ; 145372: 000 -> PSW :000344
145374 [000000]: RETURN ; 000756:142706 -> R7
142706 [000000]: BR 142674
142674 [000000]: BR 142464
142464 [000000]: MOV (SP)+, R0 ; 000760:030730 -> R0
142466 [000000]: MOV (SP)+, R1 ; 000762:000016 -> R1
142470 [000000]: MOV (SP)+, R2 ; 000764:011670 -> R2
142472 [000000]: MOV (SP)+, R3 ; 000766:075000 -> R3
142474 [000000]: MOV 136176, R5 ; 136176:137264 -> R5
142500 [000010]: DEC 268.(R5) ; 137700:000001
142504 [000004]: BNE 142546
142506 [000004]: MOV 270.(R5), R4 ; 137702:000000 -> R4
142512 [000004]: BEQ 142546
142546 [000004]: JMP 153532
153532 [000004]: MOV (SP)+, R4 ; 000770:133730 -> R4
153534 [000010]: MOV (SP)+, R5 ; 000772:135656 -> R5
153536 [000010]: RTI
011712 [000000]: MOV 001046, SP ; 001046:001000 -> R6
011716 [000000]: MOV #988., -(SP) ; 011720:001734 -> 000776
011722 [000000]: MOV #747., -(SP) ; 011724:001353 -> 000774
011726 [000000]: MOV #580., -(SP) ; 011730:001104 -> 000772
011732 [000000]: CLR -(SP) ; 000770:133730
011734 [000004]: EMT 345
141206 [000000]: BIC #15., 2(SP) ; 141210:000017 -> 000766:000004
141214 [000004]: MOV R5, -(SP) ; R5 :135656 -> 000762
141216 [000010]: MOV R4, -(SP) ; R4 :133730 -> 000760
141220 [000010]: MOV 4(SP), R5 ; 000764:011736 -> R5
141224 [000000]: MOV -(R5), R4 ; 011734:104345 -> R4
141226 [000010]: CMPB R4, #251. ; R4 : 345 -> 141230: 373
141232 [000011]: BEQ 141050
141234 [000011]: JSR R3, 151020 ; R3 :075000 -> 000756
151020 [000011]: MOV R2, -(SP) ; R2 :011670 -> 000754
151022 [000001]: MOV R1, -(SP) ; R1 :000016 -> 000752
151024 [000001]: MOV R0, -(SP) ; R0 :030730 -> 000750
151026 [000001]: CALL (R3) ; R7 :151030 -> 000746
141240 [000001]: TST (SP)+ ; 000746:151030
141242 [000010]: CLR R2 ; R2 :011670
141244 [000004]: MOV 136176, R5 ; 136176:137264 -> R5
141250 [000010]: INC 268.(R5) ; 137700:000000
141254 [000000]: MOV SP, R1 ; R6 :000750 -> R1
141256 [000000]: CMPB R4, #252. ; R4 : 345 -> 141260: 374
141262 [000011]: BCS 141372
141372 [000011]: ADD #16., R1 ; 141374:000020 -> R1 :000750
141376 [000000]: MOV R4, R5 ; R4 :104345 -> R5
141400 [000010]: BIC #-16., R4 ; 141402:177760 -> R4 :104345
141404 [000000]: BIC #-241., R5 ; 141406:177417 -> R5 :104345
141410 [000000]: ASR R5 ; R5 :000340
141412 [000000]: ASR R5 ; R5 :000160
141414 [000000]: ASR R5 ; R5 :000070
141416 [000000]: ADD PC, R5 ; R7 :141420 -> R5 :000034
141420 [000010]: MOV -838.(R5), R5 ; 137746:003354 -> R5
141424 [000000]: ROR R5 ; R5 :003354
141426 [000000]: BCC 141436
141436 [000000]: ASR R5 ; R5 :001566
141440 [000000]: BCC 141454
141454 [000000]: ASL R5 ; R5 :000673
141456 [000000]: MOV R5, -(SP) ; R5 :001566 -> 000746
141460 [000000]: MOV 136176, R5 ; 136176:137264 -> R5
141464 [000010]: ASL R4 ; R4 :000005
141466 [000000]: MOV R4, R3 ; R4 :000012 -> R3
141470 [000000]: ASL R3 ; R3 :000012
141472 [000000]: ASL R3 ; R3 :000024
141474 [000000]: ADD R4, R3 ; R4 :000012 -> R3 :000050
141476 [000000]: ADD 24.(R5), R3 ; 137314:135662 -> R3 :000062
141502 [000010]: CLRB @#000052 ; 000052: 000
141506 [000004]: ADD (SP)+, PC ; 000746:001566 -> R7 :141510
143276 [000010]: TST (R4)+ ; 000012:000340
143300 [000000]: ADD PC, R4 ; R7 :143302 -> R4 :000014
143302 [000010]: ADD (R4), PC ; 143316:000416 -> R7 :143304
143722 [000010]: MOV #-32768., R4 ; 143724:100000 -> R4
143726 [000010]: MOV #12., R2 ; 143730:000014 -> R2
143732 [000000]: BR 143762
В принципе можно установить проверку адреса, чтобы в листинг попадали только команды из младших адресов..
Сейчас так сделаю.
---------- Post added at 22:07 ---------- Previous post was at 22:01 ----------
Совсем другое дело - сразу видно, на чём всё заканчивается:
Код:013536 [000000]: BIT #64., R3 ; 013540:000100 -> R3 :105061
013542 [000004]: BNE 013576
013544 [000004]: MOV SP, R2 ; R6 :000772 -> R2
013546 [000000]: MOV #16384., -(R2) ; 013550:040000 -> 000770
013552 [000000]: CLR -(R2) ; 000766:013536
013554 [000004]: MOV #16384., -(R2) ; 013556:040000 -> 000764
013560 [000000]: CLR -(R2) ; 000762:010520
013562 [000004]: 075002 - Команда не опознана.
Trap to 010
Trap to 010 -> PC:126750 PSW:340
000000 [000000]: BIC R0, R0 ; R0 :004430 -> R0 :
000002 [000004]: EMT 350
Patron, скорее всего вылетает при проверке FIS-инструкций, EIS определяется по слову конфигурации.
Надо найти это место в исходнике RESORC ( я взял исходники RESORC от RT-11 v05.04 ) и запустить с того места дизассемблер в полном объёме.Цитата:
Сообщение от Alex_K
Ну собственно на команде FADD R2 и вылетает. И явно видно, что именно из вектора берется 0, а там прописан .EXITЦитата:
Сообщение от Alex_K
---------- Post added at 02:14 ---------- Previous post was at 02:13 ----------
Цитата:
Сообщение от Patron
Код:CLR -(R2) ;
FADD R2 ;Do a floating point add
NOP ;One instruction delay for T11.
Вот это место:
Код:42$: PRINT MICFPU,<Floating Point Microcode>
BR 1$
41$: BIT #C1.FPU,R3 ;Got an FPU?
BEQ 1$ ;Branch if not
PRINT HWFPU,<FP11 Hardware Floating Point Unit>
1$: BIT #C2.EIS,R4 ;How about EIS?
BEQ 2$ ;Branch if no
PRINT EISET,<Extended Instruction Set (EIS)>
2$: BIT #C1.FPU,R3 ;Got an FPU?
BNE 3$ ;Yes. Don't check for FIS
MOV SP,R2 ;Point to stack (but don't destroy)
MOV #40000,-(R2) ;We'll check for FIS by adding .5 to .5
CLR -(R2) ;
MOV #40000,-(R2) ;
CLR -(R2) ;
FADD R2 ;Do a floating point add
NOP ;One instruction delay for T11.
BCS 3$ ;If C set, no FIS
PRINT FIS,<Floating Instruction Set (FIS)> ;Tell the user
Хотя должна брать 126750 и 340.Цитата:
Сообщение от form