Return to pstatus.c CVS log

Up to [CSRG BSD Unix] / 42BSD / ucb / pascal / pdx / process

Annotation of 42BSD/ucb/pascal/pdx/process/pstatus.c, revision 1.1.1.1

1.1       root        1: /* Copyright (c) 1982 Regents of the University of California */
                      2: 
                      3: static char sccsid[] = "@(#)pstatus.c 1.3 2/11/82";
                      4: 
                      5: /*
                      6:  * process status routines
                      7:  */
                      8: 
                      9: #include "defs.h"
                     10: #include <signal.h>
                     11: #include "process.h"
                     12: #include "machine.h"
                     13: #include "breakpoint.h"
                     14: #include "source.h"
                     15: #include "object.h"
                     16: #include "process.rep"
                     17: 
                     18: /*
                     19:  * Print the status of the process.
                     20:  * This routine does not return.
                     21:  */
                     22: 
                     23: printstatus()
                     24: {
                     25:     if (process->signo == SIGINT) {
                     26:        isstopped = TRUE;
                     27:        printerror();
                     28:     }
                     29:     if (isbperr() && isstopped) {
                     30:        skimsource(srcfilename(pc));
                     31:        printf("stopped at ");
                     32:        printwhere(curline, cursource);
                     33:        putchar('\n');
                     34:        if (curline > 0) {
                     35:            printlines(curline, curline);
                     36:        } else {
                     37:            printinst(pc, pc);
                     38:        }
                     39:        erecover();
                     40:     } else {
                     41:        isstopped = FALSE;
                     42:        fixbps();
                     43:        fixintr();
                     44:        if (process->status == FINISHED) {
                     45:            quit(0);
                     46:        } else {
                     47:            printerror();
                     48:        }
                     49:     }
                     50: }
                     51: 
                     52: 
                     53: /*
                     54:  * Print out the "line N [in file F]" information that accompanies
                     55:  * messages in various places.
                     56:  */
                     57: 
                     58: printwhere(lineno, filename)
                     59: LINENO lineno;
                     60: char *filename;
                     61: {
                     62:     if (lineno > 0) {
                     63:        printf("line %d", lineno);
                     64:        if (nlhdr.nfiles > 1) {
                     65:            printf(" in file %s", filename);
                     66:        }
                     67:     } else {
                     68: #      if (isvaxpx)
                     69:            printf("location %d\n", pc);
                     70: #      else
                     71:            printf("location 0x%x\n", pc);
                     72: #      endif
                     73:     }
                     74: }
                     75: 
                     76: /*
                     77:  * Return TRUE if the process is finished.
                     78:  */
                     79: 
                     80: BOOLEAN isfinished(p)
                     81: PROCESS *p;
                     82: {
                     83:     return(p->status == FINISHED);
                     84: }

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