BSD 4_3_Reno development

[unix-history] / usr / src / kerberosIV / krb / dest_tkt.c

/*
* $Source: /usr/src/kerberosIV/krb/RCS/dest_tkt.c,v $
* $Author: kfall $
*
* Copyright 1985, 1986, 1987, 1988 by the Massachusetts Institute
* of Technology.
*
* For copying and distribution information, please see the file
* <mit-copyright.h>.
*/

#ifndef lint
static char *rcsid_dest_tkt_c =
"$Id: dest_tkt.c,v 4.10 90/06/25 20:55:34 kfall Exp $";
#endif /* lint */

#include <mit-copyright.h>
#include <stdio.h>
#include <des.h>
#include <krb.h>
#include <sys/file.h>
#include <sys/types.h>
#include <sys/stat.h>
#ifdef TKT_SHMEM
#include <sys/param.h>
#endif
#include <errno.h>

/*
* dest_tkt() is used to destroy the ticket store upon logout.
* If the ticket file does not exist, dest_tkt() returns RET_TKFIL.
* Otherwise the function returns RET_OK on success, KFAILURE on
* failure.
*
* The ticket file (TKT_FILE) is defined in "krb.h".
*/

dest_tkt()
{
   char *file = TKT_FILE;
   int i,fd;
   extern int errno;
   struct stat statb;
   char buf[BUFSIZ];
#ifdef TKT_SHMEM
   char shmidname[MAXPATHLEN];
#endif /* TKT_SHMEM */

   errno = 0;
   if (lstat(file,&statb) < 0)
       goto out;

   if (!(statb.st_mode & S_IFREG)
#ifdef notdef
       || statb.st_mode & 077
#endif
       )
       goto out;

   if ((fd = open(file, O_RDWR, 0)) < 0)
       goto out;

   bzero(buf, BUFSIZ);

   for (i = 0; i < statb.st_size; i += BUFSIZ)
       if (write(fd, buf, BUFSIZ) != BUFSIZ) {
           (void) fsync(fd);
           (void) close(fd);
           goto out;
       }

   (void) fsync(fd);
   (void) close(fd);

   (void) unlink(file);

out:
   if (errno == ENOENT) return RET_TKFIL;
   else if (errno != 0) return KFAILURE;
#ifdef TKT_SHMEM
   /* 
    * handle the shared memory case 
    */
   (void) strcpy(shmidname, file);
   (void) strcat(shmidname, ".shm");
   if ((i = krb_shm_dest(shmidname)) != KSUCCESS)
       return(i);
#endif /* TKT_SHMEM */
   return(KSUCCESS);
}