19b50d902SRodney W. Grimes /* 29b50d902SRodney W. Grimes * Copyright (c) 1980, 1993 39b50d902SRodney W. Grimes * The Regents of the University of California. All rights reserved. 49b50d902SRodney W. Grimes * 59b50d902SRodney W. Grimes * Redistribution and use in source and binary forms, with or without 69b50d902SRodney W. Grimes * modification, are permitted provided that the following conditions 79b50d902SRodney W. Grimes * are met: 89b50d902SRodney W. Grimes * 1. Redistributions of source code must retain the above copyright 99b50d902SRodney W. Grimes * notice, this list of conditions and the following disclaimer. 109b50d902SRodney W. Grimes * 2. Redistributions in binary form must reproduce the above copyright 119b50d902SRodney W. Grimes * notice, this list of conditions and the following disclaimer in the 129b50d902SRodney W. Grimes * documentation and/or other materials provided with the distribution. 139b50d902SRodney W. Grimes * 3. All advertising materials mentioning features or use of this software 149b50d902SRodney W. Grimes * must display the following acknowledgement: 159b50d902SRodney W. Grimes * This product includes software developed by the University of 169b50d902SRodney W. Grimes * California, Berkeley and its contributors. 179b50d902SRodney W. Grimes * 4. Neither the name of the University nor the names of its contributors 189b50d902SRodney W. Grimes * may be used to endorse or promote products derived from this software 199b50d902SRodney W. Grimes * without specific prior written permission. 209b50d902SRodney W. Grimes * 219b50d902SRodney W. Grimes * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 229b50d902SRodney W. Grimes * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 239b50d902SRodney W. Grimes * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 249b50d902SRodney W. Grimes * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 259b50d902SRodney W. Grimes * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 269b50d902SRodney W. Grimes * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 279b50d902SRodney W. Grimes * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 289b50d902SRodney W. Grimes * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 299b50d902SRodney W. Grimes * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 309b50d902SRodney W. Grimes * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 319b50d902SRodney W. Grimes * SUCH DAMAGE. 329b50d902SRodney W. Grimes */ 339b50d902SRodney W. Grimes 349b50d902SRodney W. Grimes #ifndef lint 359b50d902SRodney W. Grimes static char sccsid[] = "@(#)v7.local.c 8.1 (Berkeley) 6/6/93"; 369b50d902SRodney W. Grimes #endif /* not lint */ 379b50d902SRodney W. Grimes 389b50d902SRodney W. Grimes /* 399b50d902SRodney W. Grimes * Mail -- a mail program 409b50d902SRodney W. Grimes * 419b50d902SRodney W. Grimes * Version 7 429b50d902SRodney W. Grimes * 439b50d902SRodney W. Grimes * Local routines that are installation dependent. 449b50d902SRodney W. Grimes */ 459b50d902SRodney W. Grimes 469b50d902SRodney W. Grimes #include "rcv.h" 479b50d902SRodney W. Grimes #include <fcntl.h> 489b50d902SRodney W. Grimes #include "extern.h" 499b50d902SRodney W. Grimes 509b50d902SRodney W. Grimes /* 519b50d902SRodney W. Grimes * Locate the user's mailbox file (ie, the place where new, unread 529b50d902SRodney W. Grimes * mail is queued). 539b50d902SRodney W. Grimes */ 549b50d902SRodney W. Grimes void 559b50d902SRodney W. Grimes findmail(user, buf) 569b50d902SRodney W. Grimes char *user, *buf; 579b50d902SRodney W. Grimes { 589b50d902SRodney W. Grimes (void)sprintf(buf, "%s/%s", _PATH_MAILDIR, user); 599b50d902SRodney W. Grimes } 609b50d902SRodney W. Grimes 619b50d902SRodney W. Grimes /* 629b50d902SRodney W. Grimes * Get rid of the queued mail. 639b50d902SRodney W. Grimes */ 649b50d902SRodney W. Grimes void 659b50d902SRodney W. Grimes demail() 669b50d902SRodney W. Grimes { 679b50d902SRodney W. Grimes 689b50d902SRodney W. Grimes if (value("keep") != NOSTR || rm(mailname) < 0) 699b50d902SRodney W. Grimes close(creat(mailname, 0600)); 709b50d902SRodney W. Grimes } 719b50d902SRodney W. Grimes 729b50d902SRodney W. Grimes /* 739b50d902SRodney W. Grimes * Discover user login name. 749b50d902SRodney W. Grimes */ 759b50d902SRodney W. Grimes char * 769b50d902SRodney W. Grimes username() 779b50d902SRodney W. Grimes { 789b50d902SRodney W. Grimes char *np; 799b50d902SRodney W. Grimes 809b50d902SRodney W. Grimes if ((np = getenv("USER")) != NOSTR) 819b50d902SRodney W. Grimes return np; 829b50d902SRodney W. Grimes return getname(getuid()); 839b50d902SRodney W. Grimes } 84