tests/create-stat.c

   1 /*
   2  * Copyright (c) 1995, 1996, 1997, 1998, 1999, 2000 Kungliga Tekniska Högskolan
   3  * (Royal Institute of Technology, Stockholm, Sweden).
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  *
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  *
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * 3. Neither the name of the Institute nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #ifdef HAVE_CONFIG_H
  35 #include <config.h>
  36 #endif
  37
  38 #include <stdio.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #include <sys/types.h>
  42 #include <sys/stat.h>
  43 #include <fcntl.h>
  44 #include <unistd.h>
  45 #include <dirent.h>
  46
  47 #include <atypes.h>
  48
  49 #include <kafs.h>
  50
  51 #include <fs.h>
  52 #include <arlalib.h>
  53
  54 #include <err.h>
  55 #include <roken.h>
  56
  57 #ifdef RCSID
  58 RCSID("$Id$");
  59 #endif
  60
  61 #ifdef KERBEROS
  62
  63 static void
  64 usage (int ret)
  65 {
  66     fprintf (stderr, "%s file\n", getprogname());
  67     exit (ret);
  68 }
  69
  70 int
  71 main(int argc, char **argv)
  72 {
  73     char *file;
  74     int ret;
  75     struct stat sb;
  76     struct stat sb_new;
  77     struct stat sb_old;
  78     VenusFid fid;
  79     char *filename;
  80     ino_t afsfileid;
  81
  82     setprogname (argv[0]);
  83
  84     if (!k_hasafs())
  85         errx (1, "!k_hasafs");
  86
  87     if (argc != 2)
  88         usage (1);
  89
  90     file = argv[1];
  91
  92     asprintf (&filename, "%s.new", file);
  93
  94     ret = open (file, O_RDWR, 0600);
  95     if (ret < 0)
  96         err (1, "open");
  97     close (ret);
  98
  99     ret = open (filename, O_RDWR|O_CREAT|O_EXCL, 0600);
 100     if (ret < 0) {
 101         unlink(file);
 102         err (1, "open");
 103     }
 104     close (ret);
 105
 106     ret = stat (file, &sb);
 107     if (ret < 0) {
 108         unlink(filename);
 109         unlink(file);
 110         err (1, "stat");
 111     }
 112
 113     ret = lstat (filename, &sb_new);
 114     if (ret < 0) {
 115         unlink(filename);
 116         unlink(file);
 117         err (1, "stat");
 118     }
 119
 120     if (sb.st_ino == sb_new.st_ino)
 121         err (1, "sb.st_ino == sb_new.st_ino");
 122
 123     ret = lstat (file, &sb_old);
 124     if (ret < 0) {
 125         unlink(filename);
 126         unlink(file);
 127         err (1, "stat");
 128     }
 129
 130     if (sb_old.st_ino == sb_new.st_ino)
 131         err (1, "sb_old.st_ino == sb_new.st_ino");
 132     if (sb.st_ino == sb_new.st_ino)
 133         err (1, "sb.st_ino == sb_new.st_ino");
 134     if (sb_old.st_ino != sb.st_ino)
 135         err (1, "sb_old.st_ino != sb.st_ino");
 136
 137     ret = fs_getfid (file, &fid);
 138     if (ret) {
 139         unlink(file);
 140         unlink(filename);
 141         err (1, "fs_getfid: %d", ret);
 142     }
 143
 144     afsfileid = ((fid.fid.Volume & 0x7FFF) << 16 | (fid.fid.Vnode & 0xFFFFFFFF));
 145     if (sb.st_ino != afsfileid) {
 146         unlink(file);
 147         unlink(filename);
 148         errx (1, "sb.st_ino(%ld) != afsfileid(%ld) (%d.%d.%d.%d)",
 149               (long)sb.st_ino, (long)afsfileid,
 150               fid.Cell, fid.fid.Volume, fid.fid.Vnode, fid.fid.Unique);
 151     }
 152
 153     unlink(filename);
 154     unlink(file);
 155
 156     return 0;
 157 }
 158
 159 #else /* !KERBEROS */
 160
 161 int
 162 main (int argc, char **argv)
 163 {
 164     setprogname (argv[0]);
 165
 166     errx (1, "no kafs");
 167 }
 168
 169 #endif