/* * snmptable.c - walk a table and print it nicely * * Update: 1999-10-26 * Added ability to use MIB to query tables with non-sequential column OIDs * Added code to handle sparse tables * * Update: 1998-07-17 * Added text to usage(). */ /********************************************************************** Copyright 1997 Niels Baggesen All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies. I DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL I BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ #include #if HAVE_STDLIB_H #include #endif #if HAVE_UNISTD_H #include #endif #if HAVE_STRING_H #include #else #include #endif #include #if HAVE_NETINET_IN_H # include #endif #if TIME_WITH_SYS_TIME # ifdef WIN32 # include # else # include # endif # include #else # if HAVE_SYS_TIME_H # include # else # include # endif #endif #if HAVE_SYS_SELECT_H #include #endif #include #if HAVE_WINSOCK_H #include #endif #if HAVE_NETDB_H #include #endif #if HAVE_ARPA_INET_H #include #endif #include struct column { int width; oid subid; char *label; char *fmt; } *column = NULL; static char **data = NULL; static char **indices = NULL; static int index_width = sizeof("index") - 1; static int fields; static int entries; static int allocated; static int headers_only = 0; static int no_headers = 0; static int max_width = 0; static int brief = 0; static int show_index = 0; static char *field_separator = NULL; static char *table_name; static oid name[MAX_OID_LEN]; static size_t name_length; static oid root[MAX_OID_LEN]; static size_t rootlen; static int localdebug; static int exitval = 0; static int use_getbulk = 1; static int max_getbulk = 25; void usage(void); void get_field_names(char *); void get_table_entries(netsnmp_session * ss); void getbulk_table_entries(netsnmp_session * ss); void print_table(void); static void optProc(int argc, char *const *argv, int opt) { switch (opt) { case 'C': /* * Handle new '-C' command-specific meta-options */ while (*optarg) { switch (*optarg++) { case 'w': if (optind < argc) { if (argv[optind]) { max_width = atoi(argv[optind]); if (max_width == 0) { usage(); fprintf(stderr, "Bad -Cw option: %s\n", argv[optind]); exit(1); } } } else { usage(); fprintf(stderr, "Bad -Cw option: no argument given\n"); exit(1); } optind++; break; case 'f': if (optind < argc) { field_separator = argv[optind]; } else { usage(); fprintf(stderr, "Bad -Cf option: no argument given\n"); exit(1); } optind++; break; case 'h': headers_only = 1; break; case 'H': no_headers = 1; break; case 'B': use_getbulk = 0; break; case 'b': brief = 1; break; case 'i': show_index = 1; break; default: fprintf(stderr, "Bad option after -C: %c\n", optarg[-1]); usage(); } } break; } } void usage(void) { fprintf(stderr, "USAGE: snmptable "); snmp_parse_args_usage(stderr); fprintf(stderr, " TABLE-OID\n\n"); snmp_parse_args_descriptions(stderr); fprintf(stderr, " -C APPOPTS\t\tSet various application specific behaviours:\n"); fprintf(stderr, "\t\t\t b: brief field names\n"); fprintf(stderr, "\t\t\t B: do not use GETBULK requests\n"); fprintf(stderr, "\t\t\t f: print table delimitied with \n"); fprintf(stderr, "\t\t\t h: print only the column headers\n"); fprintf(stderr, "\t\t\t H: print no column headers\n"); fprintf(stderr, "\t\t\t i: print index values\n"); fprintf(stderr, "\t\t\t w: print table in parts of chars width\n"); } void reverse_fields(void) { struct column tmp; int i; for (i = 0; i < fields / 2; i++) { memcpy(&tmp, &(column[i]), sizeof(struct column)); memcpy(&(column[i]), &(column[fields - 1 - i]), sizeof(struct column)); memcpy(&(column[fields - 1 - i]), &tmp, sizeof(struct column)); } } int main(int argc, char *argv[]) { netsnmp_session session, *ss; char *tblname; setvbuf(stdout, NULL, _IOLBF, 1024); netsnmp_ds_set_boolean(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_QUICK_PRINT, 1); /* * get the common command line arguments */ switch (snmp_parse_args(argc, argv, &session, "C:", optProc)) { case -2: exit(0); case -1: usage(); exit(1); default: break; } /* * get the initial object and subtree */ /* * specified on the command line */ if (optind + 1 != argc) { fprintf(stderr, "Must have exactly one table name\n"); usage(); } rootlen = MAX_OID_LEN; if (!snmp_parse_oid(argv[optind], root, &rootlen)) { snmp_perror(argv[optind]); exit(1); } localdebug = netsnmp_ds_get_boolean(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_DUMP_PACKET); tblname = strrchr(argv[optind], '.'); if (!tblname) tblname = strrchr(argv[optind], ':'); if (tblname) ++tblname; else tblname = argv[optind]; get_field_names(tblname); reverse_fields(); /* * open an SNMP session */ SOCK_STARTUP; ss = snmp_open(&session); if (ss == NULL) { /* * diagnose snmp_open errors with the input netsnmp_session pointer */ snmp_sess_perror("snmptable", &session); SOCK_CLEANUP; exit(1); } if (ss->version == SNMP_VERSION_1) use_getbulk = 0; if (!headers_only) { if (use_getbulk) getbulk_table_entries(ss); else get_table_entries(ss); } snmp_close(ss); SOCK_CLEANUP; if (exitval) return exitval; if (entries || headers_only) print_table(); else printf("%s: No entries\n", table_name); return 0; } void print_table(void) { int entry, field, first_field, last_field = 0, width, part = 0; char **dp; char string_buf[SPRINT_MAX_LEN]; char *index_fmt = NULL; if (!no_headers && !headers_only) printf("SNMP table: %s\n\n", table_name); for (field = 0; field < fields; field++) { if (field_separator == NULL) sprintf(string_buf, "%%%ds", column[field].width + 1); else if (field == 0 && !show_index) sprintf(string_buf, "%%s"); else sprintf(string_buf, "%s%%s", field_separator); column[field].fmt = strdup(string_buf); } if (show_index) { if (field_separator == NULL) sprintf(string_buf, "%%%ds", index_width); else sprintf(string_buf, "%%s"); index_fmt = strdup(string_buf); } while (last_field != fields) { part++; if (part != 1 && !no_headers) printf("\nSNMP table %s, part %d\n\n", table_name, part); first_field = last_field; dp = data; if (show_index && !no_headers) { width = index_width; printf(index_fmt, "index"); } else width = 0; for (field = first_field; field < fields; field++) { width += column[field].width + 1; if (field != first_field && width > max_width && max_width != 0) break; if (!no_headers) printf(column[field].fmt, column[field].label); } last_field = field; if (!no_headers) printf("\n"); for (entry = 0; entry < entries; entry++) { if (show_index) printf(index_fmt, indices[entry]); for (field = first_field; field < last_field; field++) { printf(column[field].fmt, dp[field] ? dp[field] : "?"); } dp += fields; printf("\n"); } } } void get_field_names(char *tblname) { u_char *buf = NULL, *name_p = NULL; size_t buf_len = 0, out_len = 0; struct tree *tbl = NULL; int going = 1; tbl = find_tree_node(tblname, -1); if (tbl) { tbl = tbl->child_list; if (tbl) { root[rootlen++] = tbl->subid; tbl = tbl->child_list; } else { root[rootlen++] = 1; } } if (sprint_realloc_objid (&buf, &buf_len, &out_len, 1, root, rootlen - 1)) { table_name = buf; buf = NULL; buf_len = out_len = 0; } else { table_name = strdup("[TRUNCATED]"); out_len = 0; } fields = 0; while (going) { fields++; if (tbl) { if (tbl->access == MIB_ACCESS_NOACCESS) { fields--; tbl = tbl->next_peer; if (!tbl) { going = 0; } continue; } root[rootlen] = tbl->subid; tbl = tbl->next_peer; if (!tbl) going = 0; } else { root[rootlen] = fields; } out_len = 0; if (sprint_realloc_objid (&buf, &buf_len, &out_len, 1, root, rootlen + 1)) { name_p = strrchr(buf, '.'); if (name_p == NULL) { name_p = strrchr(buf, ':'); } if (name_p == NULL) { name_p = buf; } else { name_p++; } } else { break; } if (localdebug) { printf("%s %c\n", buf, name_p[0]); } if ('0' <= name_p[0] && name_p[0] <= '9') { fields--; break; } if (fields == 1) { column = (struct column *) malloc(sizeof(*column)); } else { column = (struct column *) realloc(column, fields * sizeof(*column)); } column[fields - 1].label = strdup(name_p); column[fields - 1].width = strlen(name_p); column[fields - 1].subid = root[rootlen]; } if (fields == 0) { fprintf(stderr, "Was that a table? %s\n", buf); exit(1); } *name_p = 0; memmove(name, root, rootlen * sizeof(oid)); name_length = rootlen + 1; name_p = strrchr(buf, '.'); if (name_p == NULL) { name_p = strrchr(buf, ':'); } if (name_p != NULL) { *name_p = 0; } if (brief && fields > 1) { char *f1, *f2; int common = strlen(column[0].label); int field, len; for (field = 1; field < fields; field++) { f1 = column[field - 1].label; f2 = column[field].label; while (*f1 && *f1++ == *f2++); len = f2 - column[field].label - 1; if (len < common) common = len; } if (common) { for (field = 0; field < fields; field++) { column[field].label += common; column[field].width -= common; } } } if (buf != NULL) { free(buf); } } void get_table_entries(netsnmp_session * ss) { int running = 1; netsnmp_pdu *pdu, *response; netsnmp_variable_list *vars; int count; int status; int i; int col; u_char *buf = NULL; size_t out_len = 0, buf_len = 0; char *cp; char *name_p = NULL; char **dp; int end_of_table = 0; int have_current_index; /* * TODO: * 1) Deal with multiple index fields * 2) Deal with variable length index fields * 3) optimize to remove a sparse column from get-requests */ while (running) { /* * create PDU for GETNEXT request and add object name to request */ pdu = snmp_pdu_create(SNMP_MSG_GETNEXT); for (i = 1; i <= fields; i++) { name[rootlen] = column[i - 1].subid; snmp_add_null_var(pdu, name, name_length); } /* * do the request */ status = snmp_synch_response(ss, pdu, &response); if (status == STAT_SUCCESS) { if (response->errstat == SNMP_ERR_NOERROR) { /* * check resulting variables */ vars = response->variables; entries++; if (entries >= allocated) { if (allocated == 0) { allocated = 10; data = (char **) malloc(allocated * fields * sizeof(char *)); memset(data, 0, allocated * fields * sizeof(char *)); if (show_index) indices = (char **) malloc(allocated * sizeof(char *)); } else { allocated += 10; data = (char **) realloc(data, allocated * fields * sizeof(char *)); memset(data + entries * fields, 0, (allocated - entries) * fields * sizeof(char *)); if (show_index) indices = (char **) realloc(indices, allocated * sizeof(char *)); } } dp = data + (entries - 1) * fields; col = -1; end_of_table = 1; /* assume end of table */ have_current_index = 0; name_length = rootlen + 1; for (vars = response->variables; vars; vars = vars->next_variable) { col++; name[rootlen] = column[col].subid; if ((vars->name_length < name_length) || ((int) vars->name[rootlen] != column[col].subid) || memcmp(name, vars->name, name_length * sizeof(oid)) != 0 || vars->type == SNMP_ENDOFMIBVIEW) { /* * not part of this subtree */ if (localdebug) { fprint_variable(stderr, vars->name, vars->name_length, vars); fprintf(stderr, " => ignored\n"); } continue; } /* * save index off */ if (!have_current_index) { end_of_table = 0; have_current_index = 1; name_length = vars->name_length; memcpy(name, vars->name, name_length * sizeof(oid)); out_len = 0; if (!sprint_realloc_objid (&buf, &buf_len, &out_len, 1, vars->name, vars->name_length)) { break; } i = vars->name_length - rootlen + 1; if (localdebug || show_index) { if (netsnmp_ds_get_boolean(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_EXTENDED_INDEX)) { name_p = strchr(buf, '['); } else { switch (netsnmp_ds_get_int(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_OID_OUTPUT_FORMAT)) { case NETSNMP_OID_OUTPUT_MODULE: case 0: name_p = strrchr(buf, ':'); break; case NETSNMP_OID_OUTPUT_SUFFIX: name_p = buf; break; case NETSNMP_OID_OUTPUT_FULL: case NETSNMP_OID_OUTPUT_NUMERIC: case NETSNMP_OID_OUTPUT_UCD: name_p = buf + strlen(table_name)+1; name_p = strchr(name_p, '.')+1; break; default: fprintf(stderr, "Unrecognized -O option: %d\n", netsnmp_ds_get_int(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_OID_OUTPUT_FORMAT)); exit(1); } name_p = strchr(name_p, '.') + 1; } } if (localdebug) { printf("Name: %s Index: %s\n", buf, name_p); } if (show_index) { indices[entries - 1] = strdup(name_p); i = strlen(name_p); if (i > index_width) index_width = i; } } if (localdebug && buf) { printf("%s => taken\n", buf); } out_len = 0; sprint_realloc_value(&buf, &buf_len, &out_len, 1, vars->name, vars->name_length, vars); for (cp = buf; *cp; cp++) { if (*cp == '\n') { *cp = ' '; } } dp[col] = buf; i = out_len; buf = NULL; buf_len = 0; if (i > column[col].width) { column[col].width = i; } } if (end_of_table) { --entries; /* * not part of this subtree */ if (localdebug) { printf("End of table: %s\n", buf ? (char *) buf : "[NIL]"); } running = 0; continue; } } else { /* * error in response, print it */ running = 0; if (response->errstat == SNMP_ERR_NOSUCHNAME) { printf("End of MIB\n"); } else { fprintf(stderr, "Error in packet.\nReason: %s\n", snmp_errstring(response->errstat)); if (response->errindex != 0) { fprintf(stderr, "Failed object: "); for (count = 1, vars = response->variables; vars && count != response->errindex; vars = vars->next_variable, count++) /*EMPTY*/; if (vars) { fprint_objid(stderr, vars->name, vars->name_length); } fprintf(stderr, "\n"); } exitval = 2; } } } else if (status == STAT_TIMEOUT) { fprintf(stderr, "Timeout: No Response from %s\n", ss->peername); running = 0; exitval = 1; } else { /* status == STAT_ERROR */ snmp_sess_perror("snmptable", ss); running = 0; exitval = 1; } if (response) snmp_free_pdu(response); } } void getbulk_table_entries(netsnmp_session * ss) { int running = 1; netsnmp_pdu *pdu, *response; netsnmp_variable_list *vars, *last_var; int count; int status; int i; int row, col; u_char *buf = NULL; size_t buf_len = 0, out_len = 0; char *cp; char *name_p = NULL; char **dp; while (running) { /* * create PDU for GETNEXT request and add object name to request */ pdu = snmp_pdu_create(SNMP_MSG_GETBULK); pdu->non_repeaters = 0; pdu->max_repetitions = max_getbulk; snmp_add_null_var(pdu, name, name_length); /* * do the request */ status = snmp_synch_response(ss, pdu, &response); if (status == STAT_SUCCESS) { if (response->errstat == SNMP_ERR_NOERROR) { /* * check resulting variables */ vars = response->variables; last_var = NULL; while (vars) { out_len = 0; sprint_realloc_objid(&buf, &buf_len, &out_len, 1, vars->name, vars->name_length); if (vars->type == SNMP_ENDOFMIBVIEW || memcmp(vars->name, name, rootlen * sizeof(oid)) != 0) { if (localdebug) { printf("%s => end of table\n", buf ? (char *) buf : "[NIL]"); } running = 0; break; } if (localdebug) { printf("%s => taken\n", buf ? (char *) buf : "[NIL]"); } if (netsnmp_ds_get_boolean(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_EXTENDED_INDEX)) { name_p = strchr(buf, '['); } else { switch (netsnmp_ds_get_int(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_OID_OUTPUT_FORMAT)) { case NETSNMP_OID_OUTPUT_MODULE: case 0: name_p = strrchr(buf, ':'); break; case NETSNMP_OID_OUTPUT_SUFFIX: name_p = buf; break; case NETSNMP_OID_OUTPUT_FULL: case NETSNMP_OID_OUTPUT_NUMERIC: case NETSNMP_OID_OUTPUT_UCD: name_p = buf + strlen(table_name)+1; name_p = strchr(name_p, '.')+1; break; default: fprintf(stderr, "Unrecognized -O option: %d\n", netsnmp_ds_get_int(NETSNMP_DS_LIBRARY_ID, NETSNMP_DS_LIB_OID_OUTPUT_FORMAT)); exit(1); } name_p = strchr(name_p, '.') + 1; } for (row = 0; row < entries; row++) if (strcmp(name_p, indices[row]) == 0) break; if (row == entries) { entries++; if (entries >= allocated) { if (allocated == 0) { allocated = 10; data = (char **) malloc(allocated * fields * sizeof(char *)); memset(data, 0, allocated * fields * sizeof(char *)); indices = (char **) malloc(allocated * sizeof(char *)); } else { allocated += 10; data = (char **) realloc(data, allocated * fields * sizeof(char *)); memset(data + entries * fields, 0, (allocated - entries) * fields * sizeof(char *)); indices = (char **) realloc(indices, allocated * sizeof(char *)); } } indices[row] = strdup(name_p); i = strlen(name_p); if (i > index_width) index_width = i; } dp = data + row * fields; out_len = 0; sprint_realloc_value(&buf, &buf_len, &out_len, 1, vars->name, vars->name_length, vars); for (cp = buf; *cp; cp++) if (*cp == '\n') *cp = ' '; for (col = 0; col < fields; col++) if (column[col].subid == vars->name[rootlen]) break; dp[col] = buf; i = out_len; buf = NULL; buf_len = 0; if (i > column[col].width) column[col].width = i; last_var = vars; vars = vars->next_variable; } if (last_var) { name_length = last_var->name_length; memcpy(name, last_var->name, name_length * sizeof(oid)); } } else { /* * error in response, print it */ running = 0; if (response->errstat == SNMP_ERR_NOSUCHNAME) { printf("End of MIB\n"); } else { fprintf(stderr, "Error in packet.\nReason: %s\n", snmp_errstring(response->errstat)); if (response->errstat == SNMP_ERR_NOSUCHNAME) { fprintf(stderr, "The request for this object identifier failed: "); for (count = 1, vars = response->variables; vars && count != response->errindex; vars = vars->next_variable, count++) /*EMPTY*/; if (vars) { fprint_objid(stderr, vars->name, vars->name_length); } fprintf(stderr, "\n"); } exitval = 2; } } } else if (status == STAT_TIMEOUT) { fprintf(stderr, "Timeout: No Response from %s\n", ss->peername); running = 0; exitval = 1; } else { /* status == STAT_ERROR */ snmp_sess_perror("snmptable", ss); running = 0; exitval = 1; } if (response) snmp_free_pdu(response); } }