BSD 4_3_Net_2 release
[unix-history] / usr / src / usr.sbin / kgmon / kgmon.c
index ae8e3f3..a1e06ba 100644 (file)
@@ -2,19 +2,33 @@
  * Copyright (c) 1983 The Regents of the University of California.
  * All rights reserved.
  *
  * Copyright (c) 1983 The Regents of the University of California.
  * All rights reserved.
  *
- * Redistribution and use in source and binary forms are permitted provided
- * that: (1) source distributions retain this entire copyright notice and
- * comment, and (2) distributions including binaries display the following
- * acknowledgement:  ``This product includes software developed by the
- * University of California, Berkeley and its contributors'' in the
- * documentation or other materials provided with the distribution and in
- * all advertising materials mentioning features or use of this software.
- * 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 ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
- * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ * 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
@@ -24,14 +38,18 @@ char copyright[] =
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint
-static char sccsid[] = "@(#)kgmon.c    5.10 (Berkeley) 6/1/90";
+static char sccsid[] = "@(#)kgmon.c    5.12 (Berkeley) 7/1/91";
 #endif /* not lint */
 
 #endif /* not lint */
 
-#include <machine/pte.h>
-
 #include <sys/param.h>
 #include <sys/param.h>
+#if BSD >= 199103
+#define NEWVM
+#endif
 #include <sys/file.h>
 #include <sys/file.h>
+#ifndef NEWVM
+#include <machine/pte.h>
 #include <sys/vm.h>
 #include <sys/vm.h>
+#endif
 #include <sys/gprof.h>
 #include <stdio.h>
 #include <nlist.h>
 #include <sys/gprof.h>
 #include <stdio.h>
 #include <nlist.h>
@@ -82,29 +100,39 @@ main(argc, argv)
        int ch, mode, disp, openmode;
        char *system, *kmemf, *malloc();
 
        int ch, mode, disp, openmode;
        char *system, *kmemf, *malloc();
 
-       while ((ch = getopt(argc, argv, "bhpr")) != EOF)
+       kmemf = _PATH_KMEM;
+       system = _PATH_UNIX;
+       while ((ch = getopt(argc, argv, "M:N:bhpr")) != EOF)
                switch((char)ch) {
                switch((char)ch) {
+               case 'M':
+                       kmemf = optarg;
+                       kflag = 1;
+                       break;
+               case 'N':
+                       system = optarg;
+                       break;
                case 'b':
                case 'b':
-                       bflag++;
+                       bflag = 1;
                        break;
                case 'h':
                        break;
                case 'h':
-                       hflag++;
+                       hflag = 1;
                        break;
                case 'p':
                        break;
                case 'p':
-                       pflag++;
+                       pflag = 1;
                        break;
                case 'r':
                        break;
                case 'r':
-                       rflag++;
+                       rflag = 1;
                        break;
                default:
                        (void)fprintf(stderr,
                        break;
                default:
                        (void)fprintf(stderr,
-                           "usage: kgmon [-bhrp] [system [core]]\n");
+                           "usage: kgmon [-bhrp] [-M core] [-N system]\n");
                        exit(1);
                }
        argc -= optind;
        argv += optind;
 
                        exit(1);
                }
        argc -= optind;
        argv += optind;
 
-       kmemf = _PATH_KMEM;
+#define BACKWARD_COMPATIBILITY
+#ifdef BACKWARD_COMPATIBILITY
        if (*argv) {
                system = *argv;
                if (*++argv) {
        if (*argv) {
                system = *argv;
                if (*++argv) {
@@ -112,8 +140,7 @@ main(argc, argv)
                        ++kflag;
                }
        }
                        ++kflag;
                }
        }
-       else
-               system = _PATH_UNIX;
+#endif
 
        if (nlist(system, nl) < 0 || nl[0].n_type == 0) {
                (void)fprintf(stderr, "kgmon: %s: no namelist\n", system);
 
        if (nlist(system, nl) < 0 || nl[0].n_type == 0) {
                (void)fprintf(stderr, "kgmon: %s: no namelist\n", system);
@@ -144,6 +171,11 @@ main(argc, argv)
                rflag = bflag = hflag = 0;
        }
        if (kflag) {
                rflag = bflag = hflag = 0;
        }
        if (kflag) {
+#ifdef NEWVM
+               (void)fprintf(stderr,
+                   "kgmon: can't do core files yet\n");
+               exit(1);
+#else
                off_t off;
 
                Sysmap = (struct pte *)
                off_t off;
 
                Sysmap = (struct pte *)
@@ -157,6 +189,7 @@ main(argc, argv)
                (void)lseek(kmem, off, L_SET);
                (void)read(kmem, (char *)Sysmap,
                    (int)(nl[N_SYSSIZE].n_value * sizeof(struct pte)));
                (void)lseek(kmem, off, L_SET);
                (void)read(kmem, (char *)Sysmap,
                    (int)(nl[N_SYSSIZE].n_value * sizeof(struct pte)));
+#endif
        }
        mode = kfetch(N_PROFILING);
        if (hflag)
        }
        mode = kfetch(N_PROFILING);
        if (hflag)
@@ -175,6 +208,7 @@ main(argc, argv)
        turnonoff(disp);
        (void)fprintf(stdout,
            "kernel profiling is %s.\n", disp ? "off" : "running");
        turnonoff(disp);
        (void)fprintf(stdout,
            "kernel profiling is %s.\n", disp ? "off" : "running");
+       exit(0);
 }
 
 dumpstate()
 }
 
 dumpstate()
@@ -317,9 +351,12 @@ klseek(fd, base, off)
        int fd, off;
        off_t base;
 {
        int fd, off;
        off_t base;
 {
+
+#ifndef NEWVM
        if (kflag) {    /* get kernel pte */
                base &= ~KERNBASE;
                base = ctob(Sysmap[btop(base)].pg_pfnum) + (base & PGOFSET);
        }
        if (kflag) {    /* get kernel pte */
                base &= ~KERNBASE;
                base = ctob(Sysmap[btop(base)].pg_pfnum) + (base & PGOFSET);
        }
+#endif
        return (lseek(fd, base, off));
 }
        return (lseek(fd, base, off));
 }