]> granicus.if.org Git - strace/blobdiff - bjm.c
Include <sys/uio.h> unconditionally
[strace] / bjm.c
diff --git a/bjm.c b/bjm.c
index 2bb91a970f9d542870acdec583b9dcd352d41c8f..b34c6ed71ecfae7eee8cea10188b7b2418e576f1 100644 (file)
--- a/bjm.c
+++ b/bjm.c
-#include "defs.h"
+/*
+ * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
+ * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
+ * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
+ * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
+ * 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. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
+ */
 
+#include "defs.h"
 #include <fcntl.h>
 #include <sys/stat.h>
-#include <sys/time.h>
 #include <sys/wait.h>
 #include <sys/resource.h>
 #include <sys/utsname.h>
 #include <sys/user.h>
-#include <sys/syscall.h>
-#include <signal.h>
-#include <linux/module.h>
 
-/* WTA: #define these here: since Debian uses glibc2's includefiles
- * instead of the kernel includes we miss these otherwise.
- */
+/* Bits of module.flags.  */
+
+#define MOD_UNINITIALIZED      0
+#define MOD_RUNNING            1
+#define MOD_DELETED            2
+#define MOD_AUTOCLEAN          4
+#define MOD_VISITED            8
+#define MOD_USED_ONCE          16
+#define MOD_JUST_FREED         32
+#define MOD_INITIALIZING       64
+
+/* Values for query_module's which.  */
 
-#if !defined(QM_MODULES)
 #define QM_MODULES     1
 #define QM_DEPS                2
 #define QM_REFS                3
 #define QM_SYMBOLS     4
 #define QM_INFO                5
-#endif
-
-static struct xlat which[] = {
-       { 0,                    "0"                             },
-       { QM_MODULES,   "QM_MODULES"    },
-       { QM_DEPS,              "QM_DEPS"               },
-       { QM_REFS,              "QM_REFS"               },
-       { QM_SYMBOLS,   "QM_SYMBOLS"    },
-       { QM_INFO,              "QM_INFO"               },
-       { 0,                    NULL                    },
+
+struct module_symbol
+{
+       unsigned long value;
+       const char *name;
 };
 
-int
-sys_query_module(tcp)
-struct tcb *tcp;
+struct module_info
 {
+       unsigned long addr;
+       unsigned long size;
+       unsigned long flags;
+       long usecount;
+};
 
+#include "xlat/qm_which.h"
+#include "xlat/modflags.h"
+#include "xlat/delete_module_flags.h"
+
+int
+sys_query_module(struct tcb *tcp)
+{
        if (entering(tcp)) {
                printstr(tcp, tcp->u_arg[0], -1);
-               tprintf(", ");
-               printxval(which, tcp->u_arg[1], "L_???");
-               tprintf(", ");
-               printstr(tcp, tcp->u_arg[2], tcp->u_arg[3]);
-               tprintf(", %#lx", tcp->u_arg[4]);
+               tprints(", ");
+               printxval(qm_which, tcp->u_arg[1], "QM_???");
+               tprints(", ");
+       } else {
+               size_t ret;
+
+               if (!verbose(tcp) || syserror(tcp) ||
+                   umove(tcp, tcp->u_arg[4], &ret) < 0) {
+                       tprintf("%#lx, %lu, %#lx", tcp->u_arg[2],
+                               tcp->u_arg[3], tcp->u_arg[4]);
+               } else if (tcp->u_arg[1]==QM_INFO) {
+                       struct module_info      mi;
+                       if (umove(tcp, tcp->u_arg[2], &mi) < 0) {
+                               tprintf("%#lx, ", tcp->u_arg[2]);
+                       } else {
+                               tprintf("{address=%#lx, size=%lu, flags=",
+                                       mi.addr, mi.size);
+                               printflags(modflags, mi.flags, "MOD_???");
+                               tprintf(", usecount=%lu}, ", mi.usecount);
+                       }
+                       tprintf("%lu", (unsigned long)ret);
+               } else if ((tcp->u_arg[1]==QM_MODULES) ||
+                          (tcp->u_arg[1]==QM_DEPS) ||
+                          (tcp->u_arg[1]==QM_REFS)) {
+                       tprints("{");
+                       if (!abbrev(tcp)) {
+                               char*   data    = malloc(tcp->u_arg[3]);
+                               char*   mod     = data;
+                               size_t  idx;
+
+                               if (!data) {
+                                       fprintf(stderr, "out of memory\n");
+                                       tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                               } else {
+                                       if (umoven(tcp, tcp->u_arg[2],
+                                               tcp->u_arg[3], data) < 0) {
+                                               tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                                       } else {
+                                               for (idx = 0; idx < ret; idx++) {
+                                                       tprintf("%s%s",
+                                                               (idx ? ", " : ""),
+                                                               mod);
+                                                       mod += strlen(mod)+1;
+                                               }
+                                       }
+                                       free(data);
+                               }
+                       } else
+                               tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                       tprintf("}, %lu", (unsigned long)ret);
+               } else if (tcp->u_arg[1]==QM_SYMBOLS) {
+                       tprints("{");
+                       if (!abbrev(tcp)) {
+                               char*                   data    = malloc(tcp->u_arg[3]);
+                               struct module_symbol*   sym     = (struct module_symbol*)data;
+                               size_t                  idx;
+
+                               if (!data) {
+                                       fprintf(stderr, "out of memory\n");
+                                       tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                               } else {
+                                       if (umoven(tcp, tcp->u_arg[2],
+                                               tcp->u_arg[3], data) < 0) {
+                                               tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                                       } else {
+                                               for (idx = 0; idx < ret; idx++) {
+                                                       tprintf("%s{name=%s, value=%lu}",
+                                                               (idx ? " " : ""),
+                                                               data+(long)sym->name,
+                                                               sym->value);
+                                                       sym++;
+                                               }
+                                       }
+                                       free(data);
+                               }
+                       } else
+                               tprintf(" /* %lu entries */ ", (unsigned long)ret);
+                       tprintf("}, %ld", (unsigned long)ret);
+               } else {
+                       printstr(tcp, tcp->u_arg[2], tcp->u_arg[3]);
+                       tprintf(", %#lx", tcp->u_arg[4]);
+               }
        }
        return 0;
 }
 
 int
-sys_delete_module(tcp)
-struct tcb *tcp;
+sys_create_module(struct tcb *tcp)
 {
+       if (entering(tcp)) {
+               printpath(tcp, tcp->u_arg[0]);
+               tprintf(", %lu", tcp->u_arg[1]);
+       }
+       return RVAL_HEX;
+}
 
+int
+sys_delete_module(struct tcb *tcp)
+{
        if (entering(tcp)) {
                printstr(tcp, tcp->u_arg[0], -1);
+               tprints(", ");
+               printflags(delete_module_flags, tcp->u_arg[1], "O_???");
+       }
+       return 0;
+}
+
+int
+sys_init_module(struct tcb *tcp)
+{
+       if (entering(tcp)) {
+               tprintf("%#lx, %lu, ", tcp->u_arg[0], tcp->u_arg[1]);
+               printstr(tcp, tcp->u_arg[2], -1);
        }
        return 0;
 }
+
+#define MODULE_INIT_IGNORE_MODVERSIONS  1
+#define MODULE_INIT_IGNORE_VERMAGIC     2
+
+#include "xlat/module_init_flags.h"
+
+int
+sys_finit_module(struct tcb *tcp)
+{
+       if (exiting(tcp))
+               return 0;
+
+       /* file descriptor */
+       printfd(tcp, tcp->u_arg[0]);
+       tprints(", ");
+       /* param_values */
+       printstr(tcp, tcp->u_arg[1], -1);
+       tprints(", ");
+       /* flags */
+       printflags(module_init_flags, tcp->u_arg[2], "MODULE_INIT_???");
+
+       return 0;
+}