![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to msgchk.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip|
Return to msgchk.c CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip |
1.1 ! root 1: /* msgchk.c - check for mail */ ! 2: ! 3: #include "../h/mh.h" ! 4: #include <stdio.h> ! 5: #include "../zotnet/mts.h" ! 6: #include <sys/types.h> ! 7: #include <sys/stat.h> ! 8: #include <pwd.h> ! 9: ! 10: /* */ ! 11: ! 12: static struct swit switches[] = { ! 13: #define HELPSW 0 ! 14: "help", 4, ! 15: ! 16: #ifdef POP ! 17: #define HOSTSW 1 ! 18: "host host", 0, ! 19: #define USERSW 2 ! 20: "user user", 0, ! 21: ! 22: #define RPOPSW 3 ! 23: "rpop", 0, ! 24: #define NRPOPSW 4 ! 25: "norpop", 0, ! 26: #endif POP ! 27: ! 28: ! 29: NULL, NULL ! 30: }; ! 31: ! 32: /* */ ! 33: ! 34: #define NONEOK 0x0 ! 35: #define UUCPOLD 0x1 ! 36: #define UUCPNEW 0x2 ! 37: #define UUCPOK (UUCPOLD | UUCPNEW) ! 38: #define MMDFOLD 0x4 ! 39: #define MMDFNEW 0x8 ! 40: #define MMDFOK (MMDFOLD | MMDFNEW) ! 41: ! 42: ! 43: #ifdef POP ! 44: int snoop = 0; ! 45: #endif POP ! 46: ! 47: ! 48: #ifdef SYS5 ! 49: struct passwd *getpwuid(), *getpwnam(); ! 50: #endif SYS5 ! 51: ! 52: /* */ ! 53: ! 54: /* ARGSUSED */ ! 55: ! 56: main (argc, argv) ! 57: int argc; ! 58: char *argv[]; ! 59: { ! 60: int vecp = 0; ! 61: #ifdef POP ! 62: int rpop = 1; ! 63: #endif POP ! 64: char *cp, ! 65: #ifdef POP ! 66: *host = NULL, ! 67: #endif POP ! 68: buf[80], ! 69: **ap, ! 70: **argp, ! 71: *arguments[MAXARGS], ! 72: *vec[50]; ! 73: struct passwd *pw; ! 74: ! 75: invo_name = r1bindex (argv[0], '/'); ! 76: mts_init (invo_name); ! 77: #ifdef POP ! 78: if (pophost && *pophost) ! 79: host = pophost; ! 80: if ((cp = getenv ("MHPOPDEBUG")) && *cp) ! 81: snoop++; ! 82: #endif POP ! 83: if ((cp = m_find (invo_name)) != NULL) { ! 84: ap = brkstring (cp = getcpy (cp), " ", "\n"); ! 85: ap = copyip (ap, arguments); ! 86: } ! 87: else ! 88: ap = arguments; ! 89: (void) copyip (argv + 1, ap); ! 90: argp = arguments; ! 91: ! 92: /* */ ! 93: ! 94: while (cp = *argp++) { ! 95: if (*cp == '-') ! 96: switch (smatch (++cp, switches)) { ! 97: case AMBIGSW: ! 98: ambigsw (cp, switches); ! 99: done (1); ! 100: case UNKWNSW: ! 101: adios (NULLCP, "-%s unknown", cp); ! 102: case HELPSW: ! 103: (void) sprintf (buf, "%s [switches] [users ...]", ! 104: invo_name); ! 105: help (buf, switches); ! 106: done (1); ! 107: ! 108: #ifdef POP ! 109: case HOSTSW: ! 110: if (!(host = *argp++) || *host == '-') ! 111: adios (NULLCP, "missing argument to %s", argp[-2]); ! 112: continue; ! 113: case USERSW: ! 114: if (!(cp = *argp++) || *cp == '-') ! 115: adios (NULLCP, "missing argument to %s", argp[-2]); ! 116: vec[vecp++] = cp; ! 117: continue; ! 118: case RPOPSW: ! 119: rpop++; ! 120: continue; ! 121: case NRPOPSW: ! 122: rpop = 0; ! 123: continue; ! 124: #endif POP ! 125: } ! 126: vec[vecp++] = cp; ! 127: } ! 128: ! 129: /* */ ! 130: ! 131: #ifdef POP ! 132: if (!*host) ! 133: host = NULL; ! 134: if (!host || !rpop) ! 135: (void) setuid (getuid ()); ! 136: #endif POP ! 137: if (vecp == 0) { ! 138: #ifdef POP ! 139: if (host) ! 140: remotemail (host, NULLCP, rpop, 1); ! 141: else ! 142: #endif POP ! 143: if ((pw = getpwuid (getuid ())) == NULL) ! 144: adios (NULLCP, "you lose"); ! 145: else ! 146: checkmail (pw, 1); ! 147: } ! 148: else { ! 149: vec[vecp] = NULL; ! 150: ! 151: for (vecp = 0; cp = vec[vecp]; vecp++) ! 152: #ifdef POP ! 153: if (host) ! 154: remotemail (host, cp, rpop, 0); ! 155: else ! 156: #endif POP ! 157: if (pw = getpwnam (cp)) ! 158: checkmail (pw, 0); ! 159: else ! 160: advise (NULLCP, "no such user as %s", cp); ! 161: } ! 162: ! 163: done (0); ! 164: } ! 165: ! 166: /* */ ! 167: ! 168: checkmail (pw, personal) ! 169: register struct passwd *pw; ! 170: int personal; ! 171: { ! 172: int mf; ! 173: char buffer[BUFSIZ]; ! 174: struct stat st; ! 175: ! 176: (void) sprintf (buffer, "%s/%s", ! 177: mmdfldir[0] ? mmdfldir : pw -> pw_dir, ! 178: mmdflfil[0] ? mmdflfil : pw -> pw_name); ! 179: mf = (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK ! 180: : st.st_atime <= st.st_mtime ? MMDFNEW : MMDFOLD; ! 181: ! 182: #ifdef MF ! 183: if (umincproc != NULL && *umincproc != NULL) { ! 184: (void) sprintf (buffer, "%s/%s", ! 185: uucpldir[0] ? uucpldir : pw -> pw_dir, ! 186: uucplfil[0] ? uucplfil : pw -> pw_name); ! 187: mf |= (stat (buffer, &st) == NOTOK || st.st_size == 0) ? NONEOK ! 188: : st.st_atime <= st.st_mtime ? UUCPNEW : UUCPOLD; ! 189: } ! 190: #endif MF ! 191: ! 192: if ((mf & UUCPOK) || (mf & MMDFOK)) { ! 193: printf (personal ? "You have " : "%s has ", pw -> pw_name); ! 194: if (mf & UUCPOK) ! 195: printf ("%s old-style bell", ! 196: mf & UUCPOLD ? "old" : "new"); ! 197: if ((mf & UUCPOK) && (mf & MMDFOK)) ! 198: printf (" and "); ! 199: if (mf & MMDFOK) ! 200: printf ("%s Internet", ! 201: mf & MMDFOLD ? "old" : "new"); ! 202: printf (" mail waiting\n"); ! 203: } ! 204: else ! 205: printf (personal ? "You don't %s%s" : "%s doesn't %s", ! 206: personal ? "" : pw -> pw_name, "have any mail waiting\n"); ! 207: } ! 208: ! 209: /* */ ! 210: ! 211: #ifdef POP ! 212: extern char response[]; ! 213: ! 214: ! 215: remotemail (host, user, rpop, personal) ! 216: register char *host; ! 217: char *user; ! 218: int rpop, ! 219: personal; ! 220: { ! 221: int nmsgs, ! 222: nbytes; ! 223: char *pass; ! 224: ! 225: if (rpop) { ! 226: if (user == NULL) ! 227: user = getusr (); ! 228: pass = getusr (); ! 229: } ! 230: else ! 231: ruserpass (host, &user, &pass); ! 232: ! 233: if (pop_init (host, user, pass, snoop, rpop) == NOTOK ! 234: || pop_stat (&nmsgs, &nbytes) == NOTOK ! 235: || pop_quit () == NOTOK) { ! 236: advise (NULLCP, "%s", response); ! 237: return; ! 238: } ! 239: ! 240: if (nmsgs) { ! 241: printf (personal ? "You have " : "%s has ", user); ! 242: printf ("%d message%s (%d bytes)", ! 243: nmsgs, nmsgs != 1 ? "s" : "", nbytes); ! 244: } ! 245: else ! 246: printf (personal ? "You don't %s%s" : "%s doesn't %s", ! 247: personal ? "" : user, "have any mail waiting"); ! 248: printf (" on %s\n", host); ! 249: } ! 250: #endif POP
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.