386BSD 0.1 development

[unix-history] / usr / src / sbin / dmesg / dmesg.c

diff --git a/usr/src/sbin/dmesg/dmesg.c b/usr/src/sbin/dmesg/dmesg.c
index 9120d63..7143771 100644 (file)
--- a/usr/src/sbin/dmesg/dmesg.c
+++ b/usr/src/sbin/dmesg/dmesg.c
@@ -1,132 +1,188 @@
-/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
+/*-
+ * Copyright (c) 1991 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.

  */
 
 #ifndef lint
  */
 
 #ifndef lint

-static char sccsid[] = "@(#)dmesg.c    5.4 (Berkeley) %G%";
-#endif not lint
+char copyright[] =
+"@(#) Copyright (c) 1991 The Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */

 
 

-/*
- *     Suck up system messages
- *     dmesg
- *             print current buffer
- *     dmesg -
- *             print and update incremental history
- */
+#ifndef lint
+static char sccsid[] = "@(#)dmesg.c    5.9 (Berkeley) 5/2/91";
+#endif /* not lint */

 
 

-#include <stdio.h>
-#include <sys/param.h>
-#include <nlist.h>
-#include <signal.h>
-#include <sys/file.h>
-#include <sys/vm.h>
+#include <sys/cdefs.h>

 #include <sys/msgbuf.h>
 #include <sys/msgbuf.h>

+#include <time.h>
+#include <nlist.h>
+#include <kvm.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <ctype.h>

 
 

-struct msgbuf msgbuf;
-char   *msgbufp;
-int    sflg;
-int    of      = -1;
-
-struct msgbuf omesg;
-struct nlist nl[2] = {
-       { "_msgbuf" },
-       { "" }
+struct nlist nl[] = {
+#define        X_MSGBUFP       0
+       { "_msgbufp" },
+       { NULL },

 };
 
 };
 

+void usage(), vputc();
+void err __P((const char *, ...));
+

 main(argc, argv)
 main(argc, argv)

-char **argv;
+       int argc;
+       char **argv;

 {
 {

-       int mem;
-       register char *mp, *omp, *mstart;
-       int samef, sawnl, ignore;
+       register int ch, newl, skip;
+       register char *p, *ep;
+       struct msgbuf cur;
+       int msgbufat;
+       char *core, *namelist;

 
 

-       if (argc>1 && argv[1][0] == '-') {
-               sflg++;
-               argc--;
-               argv++;
-       }
-       if (sflg) {
-               of = open("/usr/adm/msgbuf", O_RDWR | O_CREAT, 0644);
-               if (of < 0)
-                       done("Can't open /usr/adm/msgbuf\n");
-               read(of, (char *)&omesg, sizeof(omesg));
-               lseek(of, 0L, 0);
-       }
-       sflg = 0;
-       nlist(argc>2? argv[2]:"/vmunix", nl);
-       if (nl[0].n_type==0)
-               done("Can't get kernel namelist\n");
-       if ((mem = open((argc>1? argv[1]: "/dev/kmem"), 0)) < 0)
-               done("Can't read kernel memory\n");
-       lseek(mem, (long)nl[0].n_value, 0);
-       read(mem, &msgbuf, sizeof (msgbuf));
-       if (msgbuf.msg_magic != MSG_MAGIC)
-               done("Magic number wrong (namelist mismatch?)\n");
-       if (msgbuf.msg_bufx >= MSG_BSIZE)
-               msgbuf.msg_bufx = 0;
-       if (omesg.msg_bufx >= MSG_BSIZE)
-               omesg.msg_bufx = 0;
-       mstart = &msgbuf.msg_bufc[omesg.msg_bufx];
-       omp = &omesg.msg_bufc[msgbuf.msg_bufx];
-       mp = msgbufp = &msgbuf.msg_bufc[msgbuf.msg_bufx];
-       samef = 1;
-       do {
-               if (*mp++ != *omp++) {
-                       mstart = msgbufp;
-                       samef = 0;
-                       pdate();
-                       printf("...\n");
+       core = namelist = NULL;
+       while ((ch = getopt(argc, argv, "M:N:")) != EOF)
+               switch(ch) {
+               case 'M':
+                       core = optarg;
+                       break;
+               case 'N':
+                       namelist = optarg;

                        break;
                        break;

+               case '?':
+               default:
+                       usage();

                }
                }

-               if (mp >= &msgbuf.msg_bufc[MSG_BSIZE])
-                       mp = msgbuf.msg_bufc;
-               if (omp >= &omesg.msg_bufc[MSG_BSIZE])
-                       omp = omesg.msg_bufc;
-       } while (mp != mstart);
-       if (samef && omesg.msg_bufx == msgbuf.msg_bufx)
-               exit(0);
-       mp = mstart;
-       pdate();
-       sawnl = 1;
-       do {
-               if (sawnl && *mp == '<')
-                       ignore = 1;
-               if (*mp && (*mp & 0200) == 0 && !ignore)
-                       putchar(*mp);
-               if (ignore && *mp == '>')
-                       ignore = 0;
-               sawnl = (*mp == '\n');
-               mp++;
-               if (mp >= &msgbuf.msg_bufc[MSG_BSIZE])
-                       mp = msgbuf.msg_bufc;
-       } while (mp != msgbufp);
-       done((char *)NULL);
+       argc -= optind;
+       argv += optind;
+
+       /* Read in kernel message buffer, do sanity checks. */
+       if (kvm_openfiles(namelist, core, NULL) == -1)
+               err("kvm_openfiles: %s", kvm_geterr());
+       if (kvm_nlist(nl) == -1)
+               err("kvm_nlist: %s", kvm_geterr());
+       if (nl[X_MSGBUFP].n_type == 0)
+               err("msgbufp not found namelist");
+
+        kvm_read((void *)nl[X_MSGBUFP].n_value, (void *)&msgbufat, sizeof(msgbufat));
+        kvm_read((void *)msgbufat, (void *)&cur, sizeof(cur));
+       if (cur.msg_magic != MSG_MAGIC)
+               err("magic number incorrect");
+       if (cur.msg_bufx >= MSG_BSIZE)
+               cur.msg_bufx = 0;
+
+       /*
+        * The message buffer is circular; start at the read pointer, and
+        * go to the write pointer - 1.
+        */
+       p = cur.msg_bufc + cur.msg_bufx;
+       ep = cur.msg_bufc + cur.msg_bufx - 1;
+       for (newl = skip = 0; p != ep; ++p) {
+               if (p == cur.msg_bufc + MSG_BSIZE)
+                       p = cur.msg_bufc;
+               ch = *p;
+               /* Skip "\n<.*>" syslog sequences. */
+               if (skip) {
+                       if (ch == '>')
+                               newl = skip = 0;
+                       continue;
+               }
+               if (newl && ch == '<') {
+                       skip = 1;
+                       continue;
+               }
+               if (ch == '\0')
+                       continue;
+               newl = (ch = *p) == '\n';
+               vputc(ch);
+       }
+       if (!newl)
+               (void)putchar('\n');
+       exit(0);

 }
 
 }
 

-done(s)
-char *s;
+void
+vputc(ch)
+       register int ch;

 {
 {

-       register char *p, *q;
+       int meta;

 
 

-       if (s) {
-               pdate();
-               printf(s);
-       } else if (of != -1)
-               write(of, (char *)&msgbuf, sizeof(msgbuf));
-       exit(s!=NULL);
+       if (!isascii(ch)) {
+               (void)putchar('M');
+               (void)putchar('-');
+               ch = toascii(ch);
+               meta = 1;
+       } else
+               meta = 0;
+       if (isprint(ch) || !meta && (ch == ' ' || ch == '\t' || ch == '\n'))
+               (void)putchar(ch);
+       else {
+               (void)putchar('^');
+               (void)putchar(ch == '\177' ? '?' : ch | 0100);
+       }

 }
 
 }
 

-pdate()
+#if __STDC__
+#include <stdarg.h>
+#else
+#include <varargs.h>
+#endif
+
+void
+#if __STDC__
+err(const char *fmt, ...)
+#else
+err(fmt, va_alist)
+       char *fmt;
+        va_dcl
+#endif

 {
 {

-       extern char *ctime();
-       static firstime;
-       time_t tbuf;
+       va_list ap;
+#if __STDC__
+       va_start(ap, fmt);
+#else
+       va_start(ap);
+#endif
+       (void)fprintf(stderr, "dmesg: ");
+       (void)vfprintf(stderr, fmt, ap);
+       va_end(ap);
+       (void)fprintf(stderr, "\n");
+       exit(1);
+       /* NOTREACHED */
+}

 
 

-       if (firstime==0) {
-               firstime++;
-               time(&tbuf);
-               printf("\n%.12s\n", ctime(&tbuf)+4);
-       }
+void
+usage()
+{
+       (void)fprintf(stderr, "usage: dmesg [-M core] [-N system]\n");
+       exit(1);

 }
 }