projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| de01b96d KT |
1 | /* |
| 2 | * Suck up system messages | |
| 3 | */ | |
| 4 | ||
| 5 | #include <stdio.h> | |
| 6 | #include <sys/param.h> | |
| 7 | #include <a.out.h> | |
| 8 | ||
| 9 | char msgbuf[MSGBUFS]; | |
| 10 | char *msgbufp; | |
| 11 | int sflg; | |
| 12 | int of = -1; | |
| 13 | ||
| 14 | struct { | |
| 15 | char *omsgflg; | |
| 16 | int omindex; | |
| 17 | char omsgbuf[MSGBUFS]; | |
| 18 | } omesg; | |
| 19 | struct nlist nl[3] = { | |
| 20 | {"_msgbuf"}, | |
| 21 | {"_msgbufp"} | |
| 22 | }; | |
| 23 | ||
| 24 | main(argc, argv) | |
| 25 | char **argv; | |
| 26 | { | |
| 27 | int mem; | |
| 28 | register char *mp, *omp, *mstart; | |
| 29 | int samef; | |
| 30 | ||
| 31 | if (argc>1 && argv[1][0] == '-') { | |
| 32 | sflg++; | |
| 33 | argc--; | |
| 34 | argv++; | |
| 35 | } | |
| 36 | if (sflg) | |
| 37 | of = open("/usr/adm/msgbuf", 2); | |
| 38 | read(of, (char *)&omesg, sizeof(omesg)); | |
| 39 | lseek(of, 0L, 0); | |
| 40 | sflg = 0; | |
| 41 | nlist(argc>2? argv[2]:"/unix", nl); | |
| 42 | if (nl[0].n_type==0) | |
| 43 | done("No namelist\n"); | |
| 44 | if ((mem = open((argc>1? argv[1]: "/dev/mem"), 0)) < 0) | |
| 45 | done("No mem\n"); | |
| 46 | lseek(mem, (long)nl[0].n_value, 0); | |
| 47 | read(mem, msgbuf, MSGBUFS); | |
| 48 | lseek(mem, (long)nl[1].n_value, 0); | |
| 49 | read(mem, (char *)&msgbufp, sizeof(msgbufp)); | |
| 50 | if (msgbufp < (char *)nl[0].n_value || msgbufp >= (char *)nl[0].n_value+MSGBUFS) | |
| 51 | done("Namelist mismatch\n"); | |
| 52 | msgbufp += msgbuf - (char *)nl[0].n_value; | |
| 53 | mstart = &msgbuf[omesg.omindex]; | |
| 54 | omp = &omesg.omsgbuf[msgbufp-msgbuf]; | |
| 55 | mp = msgbufp; | |
| 56 | samef = 1; | |
| 57 | do { | |
| 58 | if (*mp++ != *omp++) { | |
| 59 | mstart = msgbufp; | |
| 60 | samef = 0; | |
| 61 | pdate(); | |
| 62 | printf("...\n"); | |
| 63 | break; | |
| 64 | } | |
| 65 | if (mp == &msgbuf[MSGBUFS]) | |
| 66 | mp = msgbuf; | |
| 67 | if (omp == &omesg.omsgbuf[MSGBUFS]) | |
| 68 | omp = omesg.omsgbuf; | |
| 69 | } while (mp != mstart); | |
| 70 | if (samef && mstart == msgbufp) | |
| 71 | exit(0); | |
| 72 | mp = mstart; | |
| 73 | do { | |
| 74 | pdate(); | |
| 75 | if (*mp) | |
| 76 | putchar(*mp); | |
| 77 | mp++; | |
| 78 | if (mp == &msgbuf[MSGBUFS]) | |
| 79 | mp = msgbuf; | |
| 80 | } while (mp != msgbufp); | |
| 81 | done((char *)NULL); | |
| 82 | } | |
| 83 | ||
| 84 | done(s) | |
| 85 | char *s; | |
| 86 | { | |
| 87 | register char *p, *q; | |
| 88 | ||
| 89 | if (s && s!=omesg.omsgflg && sflg==0) { | |
| 90 | pdate(); | |
| 91 | printf(s); | |
| 92 | } | |
| 93 | omesg.omsgflg = s; | |
| 94 | q = omesg.omsgbuf; | |
| 95 | for (p = msgbuf; p < &msgbuf[MSGBUFS]; ) | |
| 96 | *q++ = *p++; | |
| 97 | omesg.omindex = msgbufp - msgbuf; | |
| 98 | write(of, (char *)&omesg, sizeof(omesg)); | |
| 99 | exit(s!=NULL); | |
| 100 | } | |
| 101 | ||
| 102 | pdate() | |
| 103 | { | |
| 104 | extern char *ctime(); | |
| 105 | static firstime; | |
| 106 | time_t tbuf; | |
| 107 | ||
| 108 | if (firstime==0) { | |
| 109 | firstime++; | |
| 110 | time(&tbuf); | |
| 111 | printf("\n%.12s\n", ctime(&tbuf)+4); | |
| 112 | } | |
| 113 | } |