mail.c revision 213760
1321936Shselasky/*- 2321936Shselasky * Copyright (c) 1991, 1993 3321936Shselasky * The Regents of the University of California. All rights reserved. 4321936Shselasky * 5321936Shselasky * This code is derived from software contributed to Berkeley by 6321936Shselasky * Kenneth Almquist. 7321936Shselasky * 8321936Shselasky * Redistribution and use in source and binary forms, with or without 9321936Shselasky * modification, are permitted provided that the following conditions 10321936Shselasky * are met: 11321936Shselasky * 1. Redistributions of source code must retain the above copyright 12321936Shselasky * notice, this list of conditions and the following disclaimer. 13321936Shselasky * 2. Redistributions in binary form must reproduce the above copyright 14321936Shselasky * notice, this list of conditions and the following disclaimer in the 15321936Shselasky * documentation and/or other materials provided with the distribution. 16321936Shselasky * 4. Neither the name of the University nor the names of its contributors 17321936Shselasky * may be used to endorse or promote products derived from this software 18321936Shselasky * without specific prior written permission. 19321936Shselasky * 20321936Shselasky * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 21321936Shselasky * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22321936Shselasky * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23321936Shselasky * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 24321936Shselasky * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25321936Shselasky * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26321936Shselasky * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27321936Shselasky * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28321936Shselasky * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29321936Shselasky * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30321936Shselasky * SUCH DAMAGE. 31321936Shselasky */ 32321936Shselasky 33321936Shselasky#ifndef lint 34321936Shselasky#if 0 35321936Shselaskystatic char sccsid[] = "@(#)mail.c 8.2 (Berkeley) 5/4/95"; 36321936Shselasky#endif 37321936Shselasky#endif /* not lint */ 38321936Shselasky#include <sys/cdefs.h> 39321936Shselasky__FBSDID("$FreeBSD: head/bin/sh/mail.c 213760 2010-10-13 04:01:01Z obrien $"); 40321936Shselasky 41321936Shselasky/* 42321936Shselasky * Routines to check for mail. (Perhaps make part of main.c?) 43321936Shselasky */ 44321936Shselasky 45321936Shselasky#include "shell.h" 46321936Shselasky#include "exec.h" /* defines padvance() */ 47321936Shselasky#include "mail.h" 48321936Shselasky#include "var.h" 49321936Shselasky#include "output.h" 50321936Shselasky#include "memalloc.h" 51321936Shselasky#include "error.h" 52321936Shselasky#include <sys/types.h> 53321936Shselasky#include <sys/stat.h> 54321936Shselasky#include <stdlib.h> 55321936Shselasky 56321936Shselasky 57321936Shselasky#define MAXMBOXES 10 58321936Shselasky 59321936Shselasky 60321936Shselaskystatic int nmboxes; /* number of mailboxes */ 61321936Shselaskystatic time_t mailtime[MAXMBOXES]; /* times of mailboxes */ 62321936Shselasky 63321936Shselasky 64321936Shselasky 65321936Shselasky/* 66321936Shselasky * Print appropriate message(s) if mail has arrived. If the argument is 67321936Shselasky * nozero, then the value of MAIL has changed, so we just update the 68321936Shselasky * values. 69321936Shselasky */ 70321936Shselasky 71321936Shselaskyvoid 72321936Shselaskychkmail(int silent) 73321936Shselasky{ 74 int i; 75 const char *mpath; 76 char *p; 77 char *q; 78 struct stackmark smark; 79 struct stat statb; 80 81 if (silent) 82 nmboxes = 10; 83 if (nmboxes == 0) 84 return; 85 setstackmark(&smark); 86 mpath = mpathset()? mpathval() : mailval(); 87 for (i = 0 ; i < nmboxes ; i++) { 88 p = padvance(&mpath, nullstr); 89 if (p == NULL) 90 break; 91 if (*p == '\0') 92 continue; 93 for (q = p ; *q ; q++); 94 if (q[-1] != '/') 95 abort(); 96 q[-1] = '\0'; /* delete trailing '/' */ 97#ifdef notdef /* this is what the System V shell claims to do (it lies) */ 98 if (stat(p, &statb) < 0) 99 statb.st_mtime = 0; 100 if (statb.st_mtime > mailtime[i] && ! silent) { 101 out2str(pathopt? pathopt : "you have mail"); 102 out2c('\n'); 103 } 104 mailtime[i] = statb.st_mtime; 105#else /* this is what it should do */ 106 if (stat(p, &statb) < 0) 107 statb.st_size = 0; 108 if (statb.st_size > mailtime[i] && ! silent) { 109 out2str(pathopt? pathopt : "you have mail"); 110 out2c('\n'); 111 } 112 mailtime[i] = statb.st_size; 113#endif 114 } 115 nmboxes = i; 116 popstackmark(&smark); 117} 118