Return to bad_trans_stack.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / dmp4

Annotation of cci/d/dmp4/bad_trans_stack.c, revision 1.1

1.1     ! root        1: 
        !             2: #include "dmp_defs.h"
        !             3: 
        !             4: /*************************************************************************
        !             5: *
        !             6: *      This routine is called when the stack is corrupted during a page
        !             7: *   fault. We assume that it's corrupted - the instruction PC that caused 
        !             8: *   the page fault isn't the instruction under test. If someone else is
        !             9: *   causing page faults then we're all screwed up anyway.
        !            10: *   This routine will print an error message if they are enabled. 
        !            11: *
        !            12: *  stack: fault type     = xxxxxxxx,  error after fault #xx
        !            13: *         fault address  = xxxxxxxx,  total faults expected = xx
        !            14: *         instruction PC = xxxxxxxx,  expected PC = xxxxxxxx
        !            15: *         PSL on stack   = xxxxxxxx
        !            16: *
        !            17: *************************************************************************/
        !            18: bad_trans_stack()
        !            19: {
        !            20:        if( prt_error ) {
        !            21:             prt_dmp_er_msg(" - STACK CORRUPTED AFTER A PAGE FAULT");
        !            22:             writes("stack: fault type     = ");
        !            23:             write32h( pop_val_1 );
        !            24:             writes(",  error after fault #");
        !            25:             writed( no_page_faults );
        !            26:             writes("\n       fault address  = ");
        !            27:             write32h( pop_val_2 );
        !            28:             writes(",  total faults expected = ");
        !            29:             writed( exp_page_faults );
        !            30:             writes("\n       instruction PC = ");
        !            31:             write32h( pop_val_3 );
        !            32:             writes(",  expected PC = ");
        !            33:             write32h( code_addr );
        !            34:             writes("\n       PSL on stack   = ");
        !            35:             write32h( pop_val_4 );
        !            36:             writec('\n');
        !            37:        }
        !            38:        if( halt_flg ) {
        !            39:             asm("movl _test_no,r0");           /* r0  = test number       */
        !            40:             asm("movl _addr_code,r1");         /* r1  = addr mode code    */
        !            41:             asm("movl $8,r2");                 /* r2  = error code  ( 8 ) */
        !            42:             asm("movl _cycle,r3");             /* r3  = cycle count       */
        !            43:             asm("movl _pop_val_1,r4");         /* r4  = fault type        */
        !            44:             asm("movl _pop_val_2,r5");         /* r5  = fault address     */
        !            45:             asm("movl _pop_val_3,r6");         /* r6  = PC on stack       */
        !            46:             asm("movl _pop_val_4,r7");         /* r7  = psl on stack      */
        !            47:             asm("movl _code_addr,r8");         /* r8  = PC expected       */
        !            48:             asm("movl _no_page_faults,r9");    /* r9  = last page fault   */
        !            49:             asm("movl _exp_page_faults,r10");  /* r10 = # faults expected */
        !            50:             asm("movl _index,r11");            /* r11 = data index        */
        !            51:             asm("halt");
        !            52:        }
        !            53:        if( loop_on_err )
        !            54:             force_loop = TRUE;         /* set loop flag */
        !            55:        asm("jmp _ex_code_return");     /* return to "run_code" */
        !            56: }
        !            57: 
        !            58: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.