X-Git-Url: https://git.whamcloud.com/?a=blobdiff_plain;f=lustre%2Futils%2Fdebug.c;h=96bbf1d1c516f7725efe131b09a0ad894e8f8c73;hb=4d5a2eba617780eadf172cb5c1fc28d5ab023a97;hp=e87a30c820ceea35e0ca9e58002697e5463a94bc;hpb=1f6c7e91ce774815808d5616cfa48402f716ebb3;p=fs%2Flustre-release.git diff --git a/lustre/utils/debug.c b/lustre/utils/debug.c index e87a30c..96bbf1d 100644 --- a/lustre/utils/debug.c +++ b/lustre/utils/debug.c @@ -1,445 +1,880 @@ -/* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*- - * vim:expandtab:shiftwidth=8:tabstop=8: +/* + * GPL HEADER START * - * Copyright (C) 2001, 2002 Cluster File Systems, Inc. + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. * - * This file is part of Portals, http://www.sf.net/projects/lustre/ + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License version 2 only, + * as published by the Free Software Foundation. * - * Portals is free software; you can redistribute it and/or - * modify it under the terms of version 2 of the GNU General Public - * License as published by the Free Software Foundation. + * This program is distributed in the hope that it will be useful, but + * WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * General Public License version 2 for more details (a copy is included + * in the LICENSE file that accompanied this code). * - * Portals is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. + * You should have received a copy of the GNU General Public License + * version 2 along with this program; If not, see + * http://www.gnu.org/licenses/gpl-2.0.html * - * You should have received a copy of the GNU General Public License - * along with Portals; if not, write to the Free Software - * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + * GPL HEADER END + */ +/* + * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved. + * Use is subject to license terms. * - * Some day I'll split all of this functionality into a cfs_debug module - * of its own. That day is not today. + * Copyright (c) 2011, 2017, Intel Corporation. + */ +/* + * This file is part of Lustre, http://www.lustre.org/ * + * lnet/utils/debug.c + * Some day I'll split all of this functionality into a cfs_debug module + * of its own. That day is not today. */ +#define __USE_FILE_OFFSET64 +#ifndef _GNU_SOURCE +#define _GNU_SOURCE +#endif + +#include +#include +#include +#include #include -#include #include #include -#include -#include -#include -#include - -#include -#include #include +#include #include -#include -#include -#include -#include +#include +#include -#include "lctl.h" +#include -/* current debug flag - */ -int lctl_debug; +#include +#include +#include +#include +#include static char rawbuf[8192]; static char *buf = rawbuf; static int max = 8192; -static int g_pfd = -1; -static int subsystem_array[1 << 8]; +/*static int g_pfd = -1;*/ +static int subsystem_mask = ~0; static int debug_mask = ~0; -static const char *portal_debug_subsystems[] = - {"undefined", "mdc", "mds", "osc", "ost", "class", "obdfs", "llite", - "rpc", "ext2obd", "portals", "socknal", "qswnal", "pinger", "filter", - "obdtrace", "echo", "ldlm", "lov", "gmnal", "router", NULL}; -static const char *portal_debug_masks[] = - {"trace", "inode", "super", "ext2", "malloc", "cache", "info", "ioctl", - "blocks", "net", "warning", "buffs", "other", "dentry", "portals", - "page", "dlmtrace", NULL}; - -int debug_setup(int argc, char **argv) { - memset(subsystem_array, 1, sizeof(subsystem_array)); - return 0; +#define MAX_MARK_SIZE 256 + +static const char *const libcfs_debug_subsystems[] = LIBCFS_DEBUG_SUBSYS_NAMES; +static const char *const libcfs_debug_masks[] = LIBCFS_DEBUG_MASKS_NAMES; + +#define DAEMON_CTL_NAME "daemon_file" +#define SUBSYS_DEBUG_CTL_NAME "subsystem_debug" +#define DEBUG_CTL_NAME "debug" +#define DUMP_KERNEL_CTL_NAME "dump_kernel" + +/* + * Open the parameter file "debug" which controls the debugging + * flags used to determine what information ends up in the lustre + * logs collected by lctl dk or the debug daemon. + */ +static int +dbg_open_ctlhandle(const char *str) +{ + glob_t path; + int fd, rc; + + rc = cfs_get_param_paths(&path, "%s", str); + if (rc != 0) { + fprintf(stderr, "invalid parameter '%s'\n", str); + return -1; + } + + fd = open(path.gl_pathv[0], O_WRONLY); + if (fd < 0) + fprintf(stderr, "open '%s' failed: %s\n", + path.gl_pathv[0], strerror(errno)); + + cfs_free_param_data(&path); + return fd; } -static int do_debug_mask(char *name, int enable) { - int found = 0, i; - - for (i = 0; portal_debug_subsystems[i] != NULL; i++) { - if (strcasecmp(name, portal_debug_subsystems[i]) == 0 || - strcasecmp(name, "all_subs") == 0) { - fprintf(stderr, "%s output from subsystem \"%s\"\n", - enable ? "Enabling" : "Disabling", - portal_debug_subsystems[i]); - subsystem_array[i] = enable; - found = 1; - } - } - for (i = 0; portal_debug_masks[i] != NULL; i++) { - if (strcasecmp(name, portal_debug_masks[i]) == 0 || - strcasecmp(name, "all_types") == 0) { - fprintf(stderr, "%s output of type \"%s\"\n", - enable ? "Enabling" : "Disabling", - portal_debug_masks[i]); - if (enable) - debug_mask |= (1 << i); - else - debug_mask &= ~(1 << i); - found = 1; - } - } - - return found; +static void +dbg_close_ctlhandle(int fd) +{ + close(fd); } -/* if 'raw' is true, don't strip the debug information from the - * front of the lines */ -static void dump_buffer(FILE *fd, char *buf, int size, int raw) { - char *p, *z; - unsigned long subsystem, debug, dropped = 0, kept = 0; - int max_sub, max_type; - - for (max_sub = 0; portal_debug_subsystems[max_sub] != NULL; max_sub++) - ; - for (max_type = 0; portal_debug_masks[max_type] != NULL; max_type++) - ; - - while (size) { - p = memchr(buf, '\n', size); - if (!p) - break; - subsystem = strtoul(buf, &z, 16); - debug = strtoul(z + 1, &z, 16); - - z++; - /* for some reason %*s isn't working. */ - *p = '\0'; - if (subsystem < max_sub && - subsystem_array[subsystem] && - (!debug || (debug_mask & debug))) { - if (raw) - fprintf(fd, "%s\n", buf); - else - fprintf(fd, "%s\n", z); - //printf("%s\n", buf); - kept++; - } else { - //fprintf(stderr, "dropping line (%lx:%lx): %s\n", subsystem, debug, buf); - dropped++; - } - *p = '\n'; - p++; - size -= (p - buf); - buf = p; - } - - fprintf(stderr, "Debug log: %lu lines, %lu kept, %lu dropped.\n", - dropped + kept, kept, dropped); +static int +dbg_write_cmd(int fd, char *str, int len) +{ + int rc = write(fd, str, len); + + return (rc == len ? 0 : 1); } -int jt_debug_kernel(int argc, char **argv) { - int rc, raw = 0; - FILE *fd = stdout; - const int databuf_size = (6 << 20); - struct portal_ioctl_data data, *newdata; - char *databuf = NULL; - - PORTALS_CONNECT; - - if (argc > 3) - return CMD_HELP; - - if (argc > 1) { - fd = fopen(argv[1], "w"); - if (fd == NULL) { - fprintf(stderr, "fopen(%s) failed: %s\n", argv[1], - strerror(errno)); - return -1; - } - } - if (argc > 2) - raw = atoi(argv[2]); - - databuf = malloc(databuf_size); - if (!databuf) { - fprintf(stderr, "No memory for buffer.\n"); - goto out; - } - - memset(&data, 0, sizeof(data)); - data.ioc_plen1 = databuf_size; - data.ioc_pbuf1 = databuf; - - if (portal_ioctl_pack(&data, &buf, max) != 0) { - fprintf(stderr, "portal_ioctl_pack failed.\n"); - goto out; - } - - rc = ioctl(g_pfd, IOC_PORTAL_GET_DEBUG, buf); - if (rc) { - fprintf(stderr, "IOC_PORTAL_GET_DEBUG failed: %s\n", - strerror(errno)); - goto out; - } - - newdata = (struct portal_ioctl_data *)buf; - if (newdata->ioc_size > 0) - dump_buffer(fd, databuf, newdata->ioc_size, raw); - else - fprintf(stderr, "No data in the debug buffer.\n"); -out: - if (databuf) - free(databuf); - if (fd != stdout) - fclose(fd); - return 0; +static int do_debug_mask(char *name, int enable) +{ + int found = 0; + int i; + + for (i = 0; libcfs_debug_subsystems[i] != NULL; i++) { + if (strcasecmp(name, libcfs_debug_subsystems[i]) == 0 || + strcasecmp(name, "all_subs") == 0) { + printf("%s output from subsystem \"%s\"\n", + enable ? "Enabling" : "Disabling", + libcfs_debug_subsystems[i]); + if (enable) + subsystem_mask |= (1 << i); + else + subsystem_mask &= ~(1 << i); + found = 1; + } + } + for (i = 0; libcfs_debug_masks[i] != NULL; i++) { + if (strcasecmp(name, libcfs_debug_masks[i]) == 0 || + strcasecmp(name, "all_types") == 0) { + printf("%s output of type \"%s\"\n", + enable ? "Enabling" : "Disabling", + libcfs_debug_masks[i]); + if (enable) + debug_mask |= (1 << i); + else + debug_mask &= ~(1 << i); + found = 1; + } + } + + return found; } -int jt_debug_file(int argc, char **argv) { - int rc, fd = -1, raw = 0; - FILE *output = stdout; - char *databuf = NULL; - struct stat statbuf; - - if (argc > 4 || argc < 2) - return CMD_HELP; - - fd = open(argv[1], O_RDONLY); - if (fd < 0) { - fprintf(stderr, "fopen(%s) failed: %s\n", argv[1], - strerror(errno)); - return -1; - } - rc = fstat(fd, &statbuf); - if (rc < 0) { - fprintf(stderr, "fstat failed: %s\n", strerror(errno)); - goto out; - } - - if (argc == 3) { - output = fopen(argv[2], "w"); - if (output == NULL) { - fprintf(stderr, "fopen(%s) failed: %s\n", argv[2], - strerror(errno)); - goto out; - } - } - - if (argc == 4) - raw = atoi(argv[3]); - - databuf = mmap(NULL, statbuf.st_size, PROT_READ | PROT_WRITE, - MAP_PRIVATE, fd, 0); - if (databuf == NULL) { - fprintf(stderr, "mmap failed: %s\n", strerror(errno)); - goto out; - } - - dump_buffer(output, databuf, statbuf.st_size, raw); +int dbg_initialize(int argc, char **argv) +{ + return 0; +} -out: - if (databuf) - munmap(databuf, statbuf.st_size); - if (output != stdout) - fclose(output); - if (fd > 0) - close(fd); - return 0; +int jt_dbg_filter(int argc, char **argv) +{ + int i; + + if (argc < 2) { + fprintf(stderr, "usage: %s \n", + argv[0]); + return 0; + } + + for (i = 1; i < argc; i++) + if (!do_debug_mask(argv[i], 0)) + fprintf(stderr, "Unknown subsystem or debug type: %s\n", + argv[i]); + return 0; } -int jt_debug_clear(int argc, char **argv) { - int rc; - struct portal_ioctl_data data; - - PORTALS_CONNECT; - if (argc != 1) - return CMD_HELP; - - memset(&data, 0, sizeof(data)); - if (portal_ioctl_pack(&data, &buf, max) != 0) { - fprintf(stderr, "portal_ioctl_pack failed.\n"); - return -1; - } - - rc = ioctl(g_pfd, IOC_PORTAL_CLEAR_DEBUG, buf); - if (rc) { - fprintf(stderr, "IOC_PORTAL_CLEAR_DEBUG failed: %s\n", - strerror(errno)); - return -1; - } - return 0; +int jt_dbg_show(int argc, char **argv) +{ + int i; + + if (argc < 2) { + fprintf(stderr, "usage: %s \n", + argv[0]); + return 0; + } + + for (i = 1; i < argc; i++) + if (!do_debug_mask(argv[i], 1)) + fprintf(stderr, "Unknown subsystem or debug type: %s\n", + argv[i]); + + return 0; +} + +static int applymask(char *param, int value) +{ + int rc; + char buf[64]; + int len = scnprintf(buf, sizeof(buf), "%d", value); + + int fd = dbg_open_ctlhandle(param); + if (fd < 0) + return fd; + + rc = dbg_write_cmd(fd, buf, len+1); + if (rc != 0) { + fprintf(stderr, "Write to %s failed: %s\n", + param, strerror(errno)); + } + + dbg_close_ctlhandle(fd); + + return rc; +} + +static void applymask_all(unsigned int subs_mask, unsigned int debug_mask) +{ + applymask(SUBSYS_DEBUG_CTL_NAME, subs_mask); + applymask(DEBUG_CTL_NAME, debug_mask); + printf("Applied subsystem_debug=%d, debug=%d to lnet\n", + subs_mask, debug_mask); +} + +int jt_dbg_list(int argc, char **argv) +{ + int i; + + if (argc != 2) { + fprintf(stderr, "usage: %s \n", argv[0]); + return 0; + } + + if (strcasecmp(argv[1], "subs") == 0) { + printf("Subsystems: all_subs"); + for (i = 0; libcfs_debug_subsystems[i] != NULL; i++) + if (libcfs_debug_subsystems[i][0]) + printf(", %s", libcfs_debug_subsystems[i]); + printf("\n"); + } else if (strcasecmp(argv[1], "types") == 0) { + printf("Types: all_types"); + for (i = 0; libcfs_debug_masks[i] != NULL; i++) + printf(", %s", libcfs_debug_masks[i]); + printf("\n"); + } else if (strcasecmp(argv[1], "applymasks") == 0) { + applymask_all(subsystem_mask, debug_mask); + } + return 0; +} + +/* all strings nul-terminated; only the struct and hdr need to be freed */ +struct dbg_line { + struct ptldebug_header *hdr; + char *file; + char *fn; + char *text; +}; + +static int cmp_rec(const void *p1, const void *p2) +{ + struct dbg_line *d1 = *(struct dbg_line **)p1; + struct dbg_line *d2 = *(struct dbg_line **)p2; + + if (d1->hdr->ph_sec < d2->hdr->ph_sec) + return -1; + if (d1->hdr->ph_sec == d2->hdr->ph_sec && + d1->hdr->ph_usec < d2->hdr->ph_usec) + return -1; + if (d1->hdr->ph_sec == d2->hdr->ph_sec && + d1->hdr->ph_usec == d2->hdr->ph_usec) + return 0; + return 1; } -int jt_debug_mark(int argc, char **argv) { - int rc; - struct portal_ioctl_data data; - char *text; - time_t now = time(NULL); - - PORTALS_CONNECT; - if (argc > 2) - return CMD_HELP; - - if (argc == 2) { - text = argv[1]; - } else { - text = ctime(&now); - text[strlen(text) - 1] = '\0'; /* stupid \n */ - } - - memset(&data, 0, sizeof(data)); - data.ioc_inllen1 = strlen(text) + 1; - data.ioc_inlbuf1 = text; - if (portal_ioctl_pack(&data, &buf, max) != 0) { - fprintf(stderr, "portal_ioctl_pack failed.\n"); - return -1; - } - - rc = ioctl(g_pfd, IOC_PORTAL_MARK_DEBUG, buf); - if (rc) { - fprintf(stderr, "IOC_PORTAL_MARK_DEBUG failed: %s\n", - strerror(errno)); - return -1; - } - return 0; +static void print_rec(struct dbg_line ***linevp, int used, int fdout) +{ + struct dbg_line **linev = *linevp; + int i; + + qsort(linev, used, sizeof(struct dbg_line *), cmp_rec); + for (i = 0; i < used; i++) { + struct dbg_line *line = linev[i]; + struct ptldebug_header *hdr = line->hdr; + char out[4097]; + char *buf = out; + int bytes; + ssize_t bytes_written; + + bytes = scnprintf(out, sizeof(out), + "%08x:%08x:%u.%u%s:%u.%06llu:%u:%u:%u:" + "(%s:%u:%s()) %s", + hdr->ph_subsys, hdr->ph_mask, + hdr->ph_cpu_id, hdr->ph_type, + hdr->ph_flags & PH_FLAG_FIRST_RECORD ? "F" : "", + hdr->ph_sec, (unsigned long long)hdr->ph_usec, + hdr->ph_stack, hdr->ph_pid, hdr->ph_extern_pid, + line->file, hdr->ph_line_num, line->fn, + line->text); + while (bytes > 0) { + bytes_written = write(fdout, buf, bytes); + if (bytes_written <= 0) + break; + bytes -= bytes_written; + buf += bytes_written; + } + free(line->hdr); + free(line); + } + free(linev); + *linevp = NULL; +} + +static int add_rec(struct dbg_line *line, struct dbg_line ***linevp, int *lenp, + int used) +{ + struct dbg_line **linev = *linevp; + + if (used == *lenp) { + int nlen = *lenp + 4096; + int nsize = nlen * sizeof(struct dbg_line *); + + linev = realloc(*linevp, nsize); + if (!linev) + return -ENOMEM; + + *linevp = linev; + *lenp = nlen; + } + linev[used] = line; + + return 0; } -int jt_debug_filter(int argc, char **argv) { - int i; - - if (argc < 2) - return CMD_HELP; - - for (i = 1; i < argc; i++) - if (!do_debug_mask(argv[i], 0)) - fprintf(stderr, "Unknown subsystem or " - "debug type: %s\n", argv[i]); - return 0; +static void dump_hdr(unsigned long long offset, struct ptldebug_header *hdr) +{ + fprintf(stderr, "badly-formed record at offset = %llu\n", offset); + fprintf(stderr, " len = %u\n", hdr->ph_len); + fprintf(stderr, " flags = %x\n", hdr->ph_flags); + fprintf(stderr, " subsystem = %x\n", hdr->ph_subsys); + fprintf(stderr, " mask = %x\n", hdr->ph_mask); + fprintf(stderr, " cpu_id = %u\n", hdr->ph_cpu_id); + fprintf(stderr, " type = %u\n", hdr->ph_type); + fprintf(stderr, " seconds = %u\n", hdr->ph_sec); + fprintf(stderr, " microseconds = %lu\n", (long)hdr->ph_usec); + fprintf(stderr, " stack = %u\n", hdr->ph_stack); + fprintf(stderr, " pid = %u\n", hdr->ph_pid); + fprintf(stderr, " host pid = %u\n", hdr->ph_extern_pid); + fprintf(stderr, " line number = %u\n", hdr->ph_line_num); } -int jt_debug_show(int argc, char **argv) { - int i; - - if (argc < 2) - return CMD_HELP; +#define HDR_SIZE sizeof(*hdr) + +static int parse_buffer(int fdin, int fdout) +{ + struct dbg_line *line; + struct ptldebug_header *hdr; + char buf[4097]; + char *ptr; + unsigned long dropped = 0; + unsigned long kept = 0; + unsigned long bad = 0; + struct dbg_line **linev = NULL; + int linev_len = 0; + int rc; + + hdr = (void *)buf; + + while (1) { + int first_bad = 1; + int count; + + count = HDR_SIZE; + ptr = buf; +readhdr: + rc = read(fdin, ptr, count); + if (rc <= 0) + goto print; + + ptr += rc; + count -= rc; + if (count > 0) + goto readhdr; + + if (hdr->ph_len > 4094 || /* is this header bogus? */ + hdr->ph_stack > 65536 || + hdr->ph_sec < (1 << 30) || + hdr->ph_usec > 1000000000 || + hdr->ph_line_num > 65536) { + if (first_bad) + dump_hdr(lseek(fdin, 0, SEEK_CUR), hdr); + bad += first_bad; + first_bad = 0; + + /* try to restart on next line */ + while (count < HDR_SIZE && buf[count] != '\n') + count++; + if (buf[count] == '\n') + count++; /* move past '\n' */ + if (HDR_SIZE - count > 0) { + int left = HDR_SIZE - count; + + memmove(buf, buf + count, left); + ptr = buf + left; + + goto readhdr; + } + + continue; + } + + if (hdr->ph_len == 0) + continue; + + count = hdr->ph_len - HDR_SIZE; +readmore: + rc = read(fdin, ptr, count); + if (rc <= 0) + break; + + ptr += rc; + count -= rc; + if (count > 0) + goto readmore; + + first_bad = 1; + + if ((hdr->ph_subsys && !(subsystem_mask & hdr->ph_subsys)) || + (hdr->ph_mask && !(debug_mask & hdr->ph_mask))) { + dropped++; + continue; + } + +retry_alloc: + line = malloc(sizeof(*line)); + if (line == NULL) { + if (linev) { + fprintf(stderr, "error: line malloc(%u): " + "printing accumulated records\n", + (unsigned int)sizeof(*line)); + print_rec(&linev, kept, fdout); + + goto retry_alloc; + } + fprintf(stderr, "error: line malloc(%u): exiting\n", + (unsigned int)sizeof(*line)); + break; + } + + line->hdr = malloc(hdr->ph_len + 1); + if (line->hdr == NULL) { + free(line); + if (linev) { + fprintf(stderr, "error: hdr malloc(%u): " + "printing accumulated records\n", + hdr->ph_len + 1); + print_rec(&linev, kept, fdout); + + goto retry_alloc; + } + fprintf(stderr, "error: hdr malloc(%u): exiting\n", + hdr->ph_len + 1); + break; + } + + ptr = (void *)line->hdr; + memcpy(line->hdr, buf, hdr->ph_len); + ptr[hdr->ph_len] = '\0'; + + ptr += sizeof(*hdr); + line->file = ptr; + ptr += strlen(line->file) + 1; + line->fn = ptr; + ptr += strlen(line->fn) + 1; + line->text = ptr; + +retry_add: + if (add_rec(line, &linev, &linev_len, kept) < 0) { + if (linev) { + fprintf(stderr, "error: add_rec[%u] failed; " + "print accumulated records\n", + linev_len); + print_rec(&linev, kept, fdout); + + goto retry_add; + } + fprintf(stderr, "error: add_rec[0] failed; exiting\n"); + break; + } + kept++; + } + +print: + if (linev) + print_rec(&linev, kept, fdout); + + printf("Debug log: %lu lines, %lu kept, %lu dropped, %lu bad.\n", + dropped + kept + bad, kept, dropped, bad); + + return 0; +} - for (i = 1; i < argc; i++) - if (!do_debug_mask(argv[i], 1)) - fprintf(stderr, "Unknown subsystem or " - "debug type: %s\n", argv[i]); +int jt_dbg_debug_kernel(int argc, char **argv) +{ + struct stat st; + char filename[PATH_MAX]; + int raw = 0; + int save_errno; + int fdin; + int fdout; + int rc; + + if (argc > 3) { + fprintf(stderr, "usage: %s [file] [raw]\n", argv[0]); + return 0; + } + + if (argc > 2) { + raw = atoi(argv[2]); + } else if (argc > 1 && (argv[1][0] == '0' || argv[1][0] == '1')) { + raw = atoi(argv[1]); + argc--; + } + + /* If we are dumping raw (which means no conversion step to ASCII) + * then dump directly to any supplied filename, otherwise this is + * just a temp file and we dump to the real file at convert time. */ + if (argc > 1 && raw) { + if (strlen(argv[1]) >= sizeof(filename)) { + fprintf(stderr, "File name too long: %s\n", argv[1]); + return 1; + } + strncpy(filename, argv[1], sizeof(filename)); + } else { + if (snprintf(filename, sizeof(filename), "%s%lu.%u", + LIBCFS_DEBUG_FILE_PATH_DEFAULT, time(NULL), + getpid()) + >= sizeof(filename)) { + fprintf(stderr, "File name too long\n"); + return 1; + } + } + + if (stat(filename, &st) == 0 && S_ISREG(st.st_mode)) + unlink(filename); + + fdin = dbg_open_ctlhandle(DUMP_KERNEL_CTL_NAME); + if (fdin < 0) { + fprintf(stderr, "open(dump_kernel) failed: %s\n", + strerror(errno)); + return 1; + } + + rc = dbg_write_cmd(fdin, filename, strlen(filename)); + save_errno = errno; + dbg_close_ctlhandle(fdin); + if (rc != 0) { + fprintf(stderr, "write(%s) failed: %s\n", filename, + strerror(save_errno)); + return 1; + } + + if (raw) + return 0; + + fdin = open(filename, O_RDONLY); + if (fdin < 0) { + if (errno == ENOENT) /* no dump file created */ + return 0; + fprintf(stderr, "fopen(%s) failed: %s\n", filename, + strerror(errno)); + return 1; + } + if (argc > 1) { + fdout = open(argv[1], O_WRONLY | O_CREAT | O_TRUNC, + S_IRUSR | S_IWUSR); + if (fdout < 0) { + fprintf(stderr, "fopen(%s) failed: %s\n", argv[1], + strerror(errno)); + close(fdin); + return 1; + } + } else { + fdout = fileno(stdout); + } + + rc = parse_buffer(fdin, fdout); + close(fdin); + if (argc > 1) + close(fdout); + if (rc) { + fprintf(stderr, "parse_buffer failed; leaving tmp file %s " + "behind.\n", filename); + } else { + rc = unlink(filename); + if (rc) + fprintf(stderr, "dumped successfully, but couldn't " + "unlink tmp file %s: %s\n", filename, + strerror(errno)); + } + + return rc; +} - return 0; +int jt_dbg_debug_file(int argc, char **argv) +{ + int fdin; + int fdout; + int rc; + + if (argc > 3 || argc < 2) { + fprintf(stderr, "usage: %s [output]\n", argv[0]); + return 0; + } + + fdin = open(argv[1], O_RDONLY | O_LARGEFILE); + if (fdin < 0) { + fprintf(stderr, "open(%s) failed: %s\n", argv[1], + strerror(errno)); + return 1; + } + if (argc > 2) { + fdout = open(argv[2], + O_CREAT | O_TRUNC | O_WRONLY | O_LARGEFILE, + 0600); + if (fdout < 0) { + fprintf(stderr, "open(%s) failed: %s\n", argv[2], + strerror(errno)); + close(fdin); + return 1; + } + } else { + fdout = fileno(stdout); + } + + rc = parse_buffer(fdin, fdout); + + close(fdin); + if (fdout != fileno(stdout)) + close(fdout); + + return rc; } -int jt_debug_list(int argc, char **argv) { - int i; - - if (argc != 2) - return CMD_HELP; - - if (strcasecmp(argv[1], "subs") == 0) { - printf("Subsystems: all_subs"); - for (i = 0; portal_debug_subsystems[i] != NULL; i++) - printf(", %s", portal_debug_subsystems[i]); - printf("\n"); - } else if (strcasecmp(argv[1], "types") == 0) { - printf("Types: all_types"); - for (i = 0; portal_debug_masks[i] != NULL; i++) - printf(", %s", portal_debug_masks[i]); - printf("\n"); - } - return 0; +const char debug_daemon_usage[] = "usage: %s {start file [MB]|stop}\n"; + +int jt_dbg_debug_daemon(int argc, char **argv) +{ + int rc; + int fd; + char *resolved_path = NULL; + + if (argc <= 1) { + fprintf(stderr, debug_daemon_usage, argv[0]); + return 1; + } + + fd = dbg_open_ctlhandle(DAEMON_CTL_NAME); + if (fd < 0) + return -1; + + rc = -1; + if (strcasecmp(argv[1], "start") == 0) { + if (argc < 3 || argc > 4 || + (argc == 4 && strlen(argv[3]) > 5)) { + fprintf(stderr, debug_daemon_usage, argv[0]); + goto out; + } + if (argc == 4) { + char buf[12]; + const long min_size = 10; + const long max_size = 20480; + long size; + char *end; + + size = strtoul(argv[3], &end, 0); + if (size < min_size || + size > max_size || + *end != 0) { + fprintf(stderr, "size %s invalid, must be in " + "the range %ld-%ld MB\n", argv[3], + min_size, max_size); + goto out; + } + snprintf(buf, sizeof(buf), "size=%ld", size); + rc = dbg_write_cmd(fd, buf, strlen(buf)); + + if (rc != 0) { + fprintf(stderr, "set %s failed: %s\n", + buf, strerror(errno)); + goto out; + } + } + + rc = cfs_abs_path(argv[2], &resolved_path); + if (rc != 0) { + fprintf(stderr, + "%s debug_daemon: cannot resolve path '%s': %s\n", + program_invocation_short_name, argv[2], + strerror(-rc)); + goto out; + } + rc = dbg_write_cmd(fd, resolved_path, strlen(resolved_path)); + if (rc != 0) { + fprintf(stderr, "start debug_daemon on %s failed: %s\n", + argv[2], strerror(errno)); + goto out; + } + rc = 0; + goto out; + } + if (strcasecmp(argv[1], "stop") == 0) { + rc = dbg_write_cmd(fd, "stop", 4); + if (rc != 0) { + fprintf(stderr, "stopping debug_daemon failed: %s\n", + strerror(errno)); + goto out; + } + + rc = 0; + goto out; + } + + fprintf(stderr, debug_daemon_usage, argv[0]); + rc = -1; +out: + dbg_close_ctlhandle(fd); + if (resolved_path != NULL) + free(resolved_path); + return rc; } -int jt_debug_modules(int argc, char **argv) { - char *modules[] = {"portals", "ksocknal", "obdclass", "ptlrpc", - "obdext2", "ost", "osc", "mds", "mdc", "llite", - "obdecho", "ldlm", "obdfilter", "extN", "lov", - "mds_ext2", "mds_ext3", "mds_extN", NULL}; - char *paths[] = {"portals/linux/oslib", "portals/linux/socknal", - "lustre/obdclass", "lustre/ptlrpc", "lustre/obdext2", - "lustre/ost", "lustre/osc", "lustre/mds", "lustre/mdc", - "lustre/llite", "lustre/obdecho", "lustre/ldlm", - "lustre/obdfilter", "lustre/extN", "lustre/lov", - "lustre/mds", "lustre/mds", "lustre/mds", NULL}; - char *path = ".."; - char *kernel = "linux"; - int i; - - if (argc >= 2) - path = argv[1]; - if (argc == 3) - kernel = argv[2]; - if (argc > 3) { - printf("%s [path] [kernel]\n", argv[0]); - return 0; - } - - printf("set height 1000\n" - "symbol-file\n" - "delete\n" - "symbol-file %s\n" - "b panic\n" - "b stop\n", kernel); - - for (i = 0; modules[i] != NULL; i++) { - struct module_info info; - int rc; - size_t crap; - int query_module(const char *name, int which, void *buf, - size_t bufsize, size_t *ret); - - rc = query_module(modules[i], QM_INFO, &info, sizeof(info), - &crap); - if (rc < 0) { - if (errno != ENOENT) - printf("query_module(%s) failed: %s\n", - modules[i], strerror(errno)); - } else { - printf("add-symbol-file %s/%s/%s.o 0x%0lx\n", path, - paths[i], modules[i], - info.addr + sizeof(struct module)); - } - } - printf("set height 24\n"); - - return 0; +int jt_dbg_clear_debug_buf(int argc, char **argv) +{ + int rc; + struct libcfs_ioctl_data data; + + if (argc != 1) { + fprintf(stderr, "usage: %s\n", argv[0]); + return 0; + } + + memset(&data, 0, sizeof(data)); + if (libcfs_ioctl_pack(&data, &buf, max) != 0) { + fprintf(stderr, "libcfs_ioctl_pack failed.\n"); + return -1; + } + + rc = l_ioctl(LNET_DEV_ID, IOC_LIBCFS_CLEAR_DEBUG, buf); + if (rc) { + fprintf(stderr, "IOC_LIBCFS_CLEAR_DEBUG failed: %s\n", + strerror(errno)); + return -1; + } + return 0; } -int jt_debug_panic(int argc, char **argv) { - int rc; - struct portal_ioctl_data data; - - PORTALS_CONNECT; - if (argc != 1) - return CMD_HELP; - - memset(&data, 0, sizeof(data)); - if (portal_ioctl_pack(&data, &buf, max) != 0) { - fprintf(stderr, "portal_ioctl_pack failed.\n"); - return -1; - } - - rc = ioctl(g_pfd, IOC_PORTAL_PANIC, buf); - if (rc) { - fprintf(stderr, "IOC_PORTAL_PANIC failed: %s\n", - strerror(errno)); - return -1; - } - return 0; +int jt_dbg_mark_debug_buf(int argc, char **argv) +{ + static char scratch[MAX_MARK_SIZE] = ""; + struct libcfs_ioctl_data data; + char *text; + int rc; + + memset(&data, 0, sizeof(data)); + + if (argc > 1) { + int count, max_size = sizeof(scratch) - 1; + + strncpy(scratch, argv[1], max_size); + max_size -= strlen(argv[1]); + for (count = 2; (count < argc) && (max_size > 1); count++) { + strncat(scratch, " ", max_size); + max_size -= 1; + strncat(scratch, argv[count], max_size); + max_size -= strlen(argv[count]); + } + scratch[sizeof(scratch) - 1] = '\0'; + text = scratch; + } else { + time_t now = time(NULL); + text = ctime(&now); + } + + data.ioc_inllen1 = strlen(text) + 1; + data.ioc_inlbuf1 = text; + + if (libcfs_ioctl_pack(&data, &buf, max) != 0) { + fprintf(stderr, "libcfs_ioctl_pack failed.\n"); + return -1; + } + + rc = l_ioctl(LNET_DEV_ID, IOC_LIBCFS_MARK_DEBUG, buf); + if (rc) { + fprintf(stderr, "IOC_LIBCFS_MARK_DEBUG failed: %s\n", + strerror(errno)); + return -1; + } + return 0; } -int jt_debug_lctl(int argc, char **argv) { - if (argc == 2) { - lctl_debug = strtoul(argv[1], NULL, 0); - } else - printf("current lctl_debug: 0x%x\n", lctl_debug); - return 0; +static struct mod_paths { + char *name, *path; +} mod_paths[] = { + { .name = "libcfs", .path = "libcfs/libcfs" }, + { .name = "lnet", .path = "lnet/lnet" }, + { .name = "ko2iblnd", .path = "lnet/klnds/o2iblnd" }, + { .name = "kgnilnd", .path = "lnet/klnds/gnilnd"}, + { .name = "ksocklnd", .path = "lnet/klnds/socklnd" }, + { .name = "obdclass", .path = "lustre/obdclass" }, + { .name = "llog_test", .path = "lustre/obdclass" }, + { .name = "ptlrpc_gss", .path = "lustre/ptlrpc/gss" }, + { .name = "ptlrpc", .path = "lustre/ptlrpc" }, + { .name = "gks", .path = "lustre/sec/gks" }, + { .name = "gkc", .path = "lustre/sec/gks" }, + { .name = "ost", .path = "lustre/ost" }, + { .name = "osc", .path = "lustre/osc" }, + { .name = "mds", .path = "lustre/mds" }, + { .name = "mdc", .path = "lustre/mdc" }, + { .name = "lustre", .path = "lustre/llite" }, + { .name = "ldiskfs", .path = "ldiskfs" }, + { .name = "obdecho", .path = "lustre/obdecho" }, + { .name = "ldlm", .path = "lustre/ldlm" }, + { .name = "obdfilter", .path = "lustre/obdfilter" }, + { .name = "lov", .path = "lustre/lov" }, + { .name = "lmv", .path = "lustre/lmv" }, + { .name = "lquota", .path = "lustre/quota" }, + { .name = "mgs", .path = "lustre/mgs" }, + { .name = "mgc", .path = "lustre/mgc" }, + { .name = "mdt", .path = "lustre/mdt" }, + { .name = "mdd", .path = "lustre/mdd" }, + { .name = "osd", .path = "lustre/osd" }, + { .name = "cmm", .path = "lustre/cmm" }, + { .name = "fid", .path = "lustre/fid"}, + { .name = "fld", .path = "lustre/fld"}, + { .name = "lod", .path = "lustre/lod"}, + { .name = "osp", .path = "lustre/osp"}, + { .name = "lfsck", .path = "lustre/lfsck" }, + { .name = NULL } +}; + +int jt_dbg_modules(int argc, char **argv) +{ + struct mod_paths *mp; + char *path = ""; + const char *proc = "/proc/modules"; + char modname[128]; + char buf[4096]; + unsigned long modaddr; + FILE *file; + + if (argc >= 2) + path = argv[1]; + if (argc > 3) { + printf("%s [path] [kernel]\n", argv[0]); + return 0; + } + + file = fopen(proc, "r"); + if (!file) { + printf("failed open %s: %s\n", proc, strerror(errno)); + return 0; + } + + while (fgets(buf, sizeof(buf), file) != NULL) { + if (sscanf(buf, "%s %*s %*s %*s %*s %lx", + modname, &modaddr) == 2) { + for (mp = mod_paths; mp->name != NULL; mp++) { + if (!strcmp(mp->name, modname)) + break; + } + if (mp->name) { + printf("add-symbol-file %s%s%s/%s.o 0x%0lx\n", + path, path[0] ? "/" : "", + mp->path, mp->name, modaddr); + } + } + } + + fclose(file); + return 0; }