| /* |
| * dfile.c - /dev/kmem-based HP-UX file processing functions for lsof |
| */ |
| |
| |
| /* |
| * Copyright 1994 Purdue Research Foundation, West Lafayette, Indiana |
| * 47907. All rights reserved. |
| * |
| * Written by Victor A. Abell |
| * |
| * This software is not subject to any license of the American Telephone |
| * and Telegraph Company or the Regents of the University of California. |
| * |
| * Permission is granted to anyone to use this software for any purpose on |
| * any computer system, and to alter it and redistribute it freely, subject |
| * to the following restrictions: |
| * |
| * 1. Neither the authors nor Purdue University are responsible for any |
| * consequences of the use of this software. |
| * |
| * 2. The origin of this software must not be misrepresented, either by |
| * explicit claim or by omission. Credit to the authors and Purdue |
| * University must appear in documentation and sources. |
| * |
| * 3. Altered versions must be plainly marked as such, and must not be |
| * misrepresented as being the original software. |
| * |
| * 4. This notice may not be removed or altered. |
| */ |
| |
| #ifndef lint |
| static char copyright[] = |
| "@(#) Copyright 1994 Purdue Research Foundation.\nAll rights reserved.\n"; |
| static char *rcsid = "$Id: dfile.c,v 1.14 2001/08/14 13:27:16 abe Exp $"; |
| #endif |
| |
| #if defined(HPUXKERNBITS) && HPUXKERNBITS>=64 |
| #define _TIME_T |
| typedef int time_t; |
| /* |
| * CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! |
| * |
| * Do NOT: |
| * |
| * #define INO_T |
| * typedef int ino_t; |
| * |
| * in this source file for HP-UX >= 10.30. Doing so will cause the kernel's |
| * ino_t type to be erroneously used instead of the application's. |
| * |
| * CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! CAUTION!!! |
| */ |
| #endif /* defined(HPUXKERNBITS) && HPUXKERNBITS>=64 */ |
| |
| #include "lsof.h" |
| |
| |
| /* |
| * get_max_fd() - get maximum file descriptor plus one |
| */ |
| |
| int |
| get_max_fd() |
| { |
| struct rlimit r; |
| |
| if (getrlimit(RLIMIT_NOFILE, &r)) |
| return(-1); |
| return(r.rlim_cur); |
| } |
| |
| |
| /* |
| * print_dev() - print device |
| */ |
| |
| char * |
| print_dev(lf, dev) |
| struct lfile *lf; /* file whose device is to be printed */ |
| dev_t *dev; /* device to be printed */ |
| { |
| static char buf[128]; |
| |
| (void) snpf(buf, sizeof(buf), "%d,%#x", GET_MAJ_DEV(*dev), |
| GET_MIN_DEV(*dev)); |
| return(buf); |
| } |
| |
| |
| /* |
| * process_file() - process file |
| */ |
| |
| void |
| process_file(fp) |
| KA_T fp; /* kernel file structure address */ |
| { |
| struct file f; |
| int flag; |
| |
| if (kread((KA_T)fp, (char *)&f, sizeof(f))) { |
| (void) snpf(Namech, Namechl, "can't read file struct from %s", |
| print_kptr(fp, (char *)NULL, 0)); |
| enter_nm(Namech); |
| return; |
| } |
| Lf->off = (SZOFFTYPE)f.f_offset; |
| |
| if (f.f_count) { |
| |
| #if defined(HASFSTRUCT) |
| /* |
| * Save file structure values. |
| */ |
| if (Fsv & FSV_CT) { |
| Lf->fct = (long)f.f_count; |
| Lf->fsv |= FSV_CT; |
| } |
| if (Fsv & FSV_FA) { |
| Lf->fsa = fp; |
| Lf->fsv |= FSV_FA; |
| } |
| if (Fsv & FSV_FG) { |
| Lf->ffg = (long)f.f_flag; |
| Lf->fsv |= FSV_FG; |
| } |
| if (Fsv & FSV_NI) { |
| Lf->fna = (KA_T)f.f_data; |
| Lf->fsv |= FSV_NI; |
| } |
| #endif /* defined(HASFSTRUCT) */ |
| |
| /* |
| * Construct access code. |
| */ |
| if ((flag = (f.f_flag & (FREAD | FWRITE))) == FREAD) |
| Lf->access = 'r'; |
| else if (flag == FWRITE) |
| Lf->access = 'w'; |
| else if (flag == (FREAD | FWRITE)) |
| Lf->access = 'u'; |
| /* |
| * Process structure by its type. |
| */ |
| switch (f.f_type) { |
| |
| #if defined(DTYPE_LLA) |
| case DTYPE_LLA: |
| process_lla((KA_T)f.f_data); |
| return; |
| #endif /* DTYPE_LLA */ |
| |
| case DTYPE_VNODE: |
| process_node((KA_T)f.f_data); |
| return; |
| case DTYPE_SOCKET: |
| process_socket((KA_T)f.f_data); |
| return; |
| default: |
| if (!f.f_type || (f.f_ops && (KA_T)f.f_ops != Vnfops)) { |
| (void) snpf(Namech, Namechl, |
| "%s file struct, ty=%#x, op=%#x", |
| print_kptr(fp, (char *)NULL, 0), f.f_type, f.f_ops); |
| enter_nm(Namech); |
| return; |
| } |
| } |
| } |
| enter_nm("no more information"); |
| } |
| |
| |
| #if HPUXV>=1030 |
| /* |
| * read_mi() - read stream's module information |
| * |
| * Note: this function is included in this module, because ino_t is not |
| * redfined to the kernel's type, but is left at the application's type. |
| * See the CAUTION statement inside the HPUXKERNBITS>=64 #if/#endif |
| * block at the beginning of this file. |
| */ |
| |
| int |
| read_mi(sh, ip, pcb, pn) |
| KA_T sh; /* stream head address */ |
| KA_T *ip; /* returned IP q_ptr */ |
| KA_T *pcb; /* returned TCP or UDP q_ptr */ |
| char **pn; /* returned protocol name */ |
| { |
| struct l_dev *dp; |
| char *ep = Namech; |
| struct sth_s hd; |
| int i; |
| size_t len, ml; |
| char mn[32]; |
| KA_T ka, qa; |
| struct module_info mi; |
| struct queue q; |
| struct qinit qi; |
| size_t sz = Namechl; |
| |
| if (!sh |
| || kread(sh, (char *)&hd, sizeof(hd))) { |
| (void) snpf(Namech, Namechl, "can't read stream head: %s", |
| print_kptr(sh, (char *)NULL, 0)); |
| return(1); |
| } |
| if (!Lf->rdev_def) |
| dp = (struct l_dev *)NULL; |
| else |
| dp = lkupdev(&DevDev, &Lf->rdev, 1, 0); |
| if (dp) |
| (void) snpf(ep, sz, "%s", dp->name); |
| else |
| *ep = '\0'; |
| /* |
| * Follow the stream head to each of its queue structures, retrieving the |
| * module names for each queue's q_info->qi_minfo->mi_idname chain of |
| * structures. Separate each additional name from the previous one with |
| * "->". |
| * |
| * Ignore failures to read all but queue structure chain entries. |
| * |
| * Ignore module names that end in "head". |
| * |
| * Save the q_ptr value for "tcp" and "udp" modules. |
| */ |
| ml = sizeof(mn) - 1; |
| mn[ml] = '\0'; |
| *ip = *pcb = (KA_T)NULL; |
| qa = (KA_T)hd.sth_wq; |
| for (i = 0; i < 20; i++, qa = (KA_T)q.q_next) { |
| if (!qa || kread(qa, (char *)&q, sizeof(q))) |
| break; |
| if (!(ka = (KA_T)q.q_qinfo) || kread(ka, (char *)&qi, sizeof(qi))) |
| continue; |
| if (!(ka = (KA_T)qi.qi_minfo) || kread(ka, (char *)&mi, sizeof(mi))) |
| continue; |
| if (!(ka = (KA_T)mi.mi_idname) || kread(ka, mn, ml)) |
| continue; |
| if ((len = strlen(mn)) < 1) |
| continue; |
| if (len >= 3 && !strcmp(&mn[len - 3], "sth")) |
| continue; |
| ep = endnm(&sz); |
| (void) snpf(ep, sz, "%s%s", (ep == Namech) ? "" : "->", mn); |
| if (!q.q_ptr) |
| continue; |
| if (!*ip && !strcmp(mn, "ip")) { |
| *ip = (KA_T)q.q_ptr; |
| continue; |
| } |
| if (!*pcb && !strcmp(mn, "tcpm")) { |
| *pcb = (KA_T)q.q_ptr; |
| *pn = "TCP"; |
| continue; |
| } |
| if (!*pcb && !strcmp(mn, "udpm")) { |
| *pcb = (KA_T)q.q_ptr; |
| *pn = "UDP"; |
| } |
| } |
| return(0); |
| } |
| #endif /* HPUXV>=1030 */ |