Return to doselect.c CVS log

Up to [Research Unix] / researchv9 / cmd / ps

Annotation of researchv9/cmd/ps/doselect.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: #include "ps.h"
                      3: #include <sys/text.h>
                      4: #include <sys/inode.h>
                      5: #include <sys/file.h>
                      6: 
                      7: #define Error(msg)     return (fprintf(stderr, "%s %s: %s\n", progname, s, msg), \
                      8:                                close(fd), -1)
                      9: #define Reject         return (close(fd), -1)
                     10: #define Accept         return fd
                     11: 
                     12: doselect(s, pp, up)
                     13: char *s; register struct proc *pp; register struct user *up;
                     14: {
                     15:        char sstr[32], *error, *getuarea(); register Select *sp;
                     16:        register fd;
                     17: 
                     18:        up->u_procp = 0;
                     19: 
                     20:        if ((fd = open(strcat(strcpy(sstr, "/proc/"), s), 0)) < 0)
                     21:                return -1;
                     22:        if (!Ioctl(fd, PIOCGETPR, pp))
                     23:                Error("/proc ioctl error");
                     24: 
                     25:        if (!Nflag && !tflag && !Fflag) {
                     26:                if (!aflag && !rflag && pp->p_uid != myuid && pp->p_pid != mypid)
                     27:                        Reject;
                     28:                if (error = getuarea(fd, pp, up))
                     29:                        Error(error);
                     30:                if (!aflag && rflag && up->u_uid != myuid && up->u_ruid != myuid)
                     31:                        Reject;
                     32:                if (!xflag && xreject(pp, up))
                     33:                        Reject;
                     34:                Accept;
                     35:        }
                     36:        for (sp=selbeg; sp<selend; sp++) {
                     37:                if (sp->flag & SELTTY) {
                     38:                        if (error = getuarea(fd, pp, up))
                     39:                                Error(error);
                     40:                        if (strncmp(sp->id, gettty(up->u_ttyino), 5))
                     41:                                continue;
                     42:                        if (!(sp->flag & SELXFL) && xreject(pp, up))
                     43:                                continue;
                     44:                        Accept;
                     45:                } else if (sp->flag & SELFIL) {
                     46:                        if (error = getuarea(fd, pp, up))
                     47:                                Error(error);
                     48:                        if (fdselect(sp->dev, sp->ino, pp, up))
                     49:                                Accept;
                     50:                } else if (atoi(sp->id) == pp->p_pid) {
                     51:                        if (error = getuarea(fd, pp, up))
                     52:                                Error(error);
                     53:                        Accept;
                     54:                }
                     55:        }
                     56:        Reject;
                     57: }
                     58: 
                     59: char *
                     60: getuarea(fd, pp, up)
                     61: register struct proc *pp; register struct user *up;
                     62: {
                     63:        extern errno;
                     64:        struct { char block[ctob(btoc(sizeof(struct user)))];} block, *bp;
                     65: 
                     66:        if (up->u_procp)
                     67:                return 0;
                     68:        if (pp->p_flag & SLOAD) {
                     69:                register ntry = 4;
                     70:                do
                     71:                        if (Sread(fd, UBASE, up))
                     72:                                return 0;
                     73:                while (errno == EBUSY && --ntry > 0);
                     74:                return "/proc read error";
                     75:        }
                     76:        bp = &block;
                     77:        if (Sread(drum, pp->p_swaddr*NBPG/ctod(1), bp)) {
                     78:                *up = *(struct user *)&block;
                     79:                return 0;
                     80:        }
                     81:        return "drum read error";
                     82: }
                     83: 
                     84: xreject(pp, up)
                     85: register struct proc *pp; register struct user *up;
                     86: {
                     87:        return (pp->p_stat != SSTOP &&
                     88:                (strcmp(up->u_comm, "sh") == 0 ||
                     89:                 strcmp(up->u_comm, "csh") == 0 ||
                     90:                 strcmp(up->u_comm, "init") == 0 ||
                     91:                 up->u_comm[0] == 0));
                     92: }
                     93: 
                     94: fdselect(dev, ino, pp, up)
                     95: register struct proc *pp; register struct user *up;
                     96: {
                     97:        register k;
                     98:        struct text x; struct file f; struct inode i;
                     99: 
                    100:        if (Kread(pp->p_textp, &x) && Kread(x.x_iptr, &i) &&
                    101:            dev == i.i_dev && ino == i.i_number)
                    102:                return 1;
                    103:        if (Kread(up->u_cdir, &i) && dev == i.i_dev && ino == i.i_number)
                    104:                return 1;
                    105:        if (Kread(up->u_rdir, &i) && dev == i.i_dev && ino == i.i_number)
                    106:                return 1;
                    107: 
                    108:        for (k = 0; k < NOFILE; k++) {
                    109:                if (!Kread(up->u_ofile[k], &f) || !Kread(f.f_inode, &i))
                    110:                        continue;
                    111:                if (dev == i.i_dev && ino == i.i_number)
                    112:                        return 1;
                    113:        }
                    114:        return 0;
                    115: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.