diff options
Diffstat (limited to 'dialects/hpux/kmem/dfile.c')
| -rw-r--r-- | dialects/hpux/kmem/dfile.c | 266 |
1 files changed, 266 insertions, 0 deletions
diff --git a/dialects/hpux/kmem/dfile.c b/dialects/hpux/kmem/dfile.c new file mode 100644 index 0000000..f6c866b --- /dev/null +++ b/dialects/hpux/kmem/dfile.c @@ -0,0 +1,266 @@ +/* + * 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 */ |