lib/decode.c

   1 /*
   2 **  Copyright 1998-2003 University of Illinois Board of Trustees
   3 **  Copyright 1998-2003 Mark D. Roth
   4 **  All rights reserved.
   5 **
   6 **  decode.c - libtar code to decode tar header blocks
   7 **
   8 **  Mark D. Roth <roth@uiuc.edu>
   9 **  Campus Information Technologies and Educational Services
  10 **  University of Illinois at Urbana-Champaign
  11 */
  12
  13 #include <internal.h>
  14
  15 #include <stdio.h>
  16 #include <sys/param.h>
  17 #include <pwd.h>
  18 #include <grp.h>
  19
  20 #ifdef STDC_HEADERS
  21 # include <string.h>
  22 #endif
  23
  24
  25 /* determine full path name */
  26 char *
  27 th_get_pathname(TAR *t)
  28 {
  29         static char filename[MAXPATHLEN];
  30
  31         if (t->th_buf.gnu_longname)
  32                 return t->th_buf.gnu_longname;
  33
  34         if (t->th_buf.prefix[0] != '\0')
  35         {
  36                 snprintf(filename, sizeof(filename), "%.155s/%.100s",
  37                          t->th_buf.prefix, t->th_buf.name);
  38                 return filename;
  39         }
  40
  41         snprintf(filename, sizeof(filename), "%.100s", t->th_buf.name);
  42         return filename;
  43 }
  44
  45
  46 uid_t
  47 th_get_uid(TAR *t)
  48 {
  49         int uid;
  50         struct passwd *pw;
  51
  52         pw = getpwnam(t->th_buf.uname);
  53         if (pw != NULL)
  54                 return pw->pw_uid;
  55
  56         /* if the password entry doesn't exist */
  57         sscanf(t->th_buf.uid, "%o", &uid);
  58         return uid;
  59 }
  60
  61
  62 gid_t
  63 th_get_gid(TAR *t)
  64 {
  65         int gid;
  66         struct group *gr;
  67
  68         gr = getgrnam(t->th_buf.gname);
  69         if (gr != NULL)
  70                 return gr->gr_gid;
  71
  72         /* if the group entry doesn't exist */
  73         sscanf(t->th_buf.gid, "%o", &gid);
  74         return gid;
  75 }
  76
  77
  78 mode_t
  79 th_get_mode(TAR *t)
  80 {
  81         mode_t mode;
  82
  83         mode = (mode_t)oct_to_int(t->th_buf.mode);
  84         if (! (mode & S_IFMT))
  85         {
  86                 switch (t->th_buf.typeflag)
  87                 {
  88                 case SYMTYPE:
  89                         mode |= S_IFLNK;
  90                         break;
  91                 case CHRTYPE:
  92                         mode |= S_IFCHR;
  93                         break;
  94                 case BLKTYPE:
  95                         mode |= S_IFBLK;
  96                         break;
  97                 case DIRTYPE:
  98                         mode |= S_IFDIR;
  99                         break;
 100                 case FIFOTYPE:
 101                         mode |= S_IFIFO;
 102                         break;
 103                 case AREGTYPE:
 104                         if (t->th_buf.name[strlen(t->th_buf.name) - 1] == '/')
 105                         {
 106                                 mode |= S_IFDIR;
 107                                 break;
 108                         }
 109                         /* FALLTHROUGH */
 110                 case LNKTYPE:
 111                 case REGTYPE:
 112                 default:
 113                         mode |= S_IFREG;
 114                 }
 115         }
 116
 117         return mode;
 118 }
 119
 120