summaryrefslogtreecommitdiffstats
path: root/Utilities/cmtar/decode.c
blob: 39077de39397de15dd4c005875c556dd5cd65185 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
/*
**  Copyright 1998-2003 University of Illinois Board of Trustees
**  Copyright 1998-2003 Mark D. Roth
**  All rights reserved.
**
**  decode.c - libtar code to decode tar header blocks
**
**  Mark D. Roth <roth@uiuc.edu>
**  Campus Information Technologies and Educational Services
**  University of Illinois at Urbana-Champaign
*/

#include <libtarint/internal.h>

#include <stdio.h>

#ifndef _MSC_VER
#include <sys/param.h>
#else
#include <compat.h>
#endif

#ifndef WIN32
#include <pwd.h>
#include <grp.h>
#endif

#ifdef STDC_HEADERS
# include <string.h>
#endif


/* determine full path name */
char *
th_get_pathname(TAR *t)
{
  char filename[MAXPATHLEN];

  if (t->th_buf.gnu_longname)
    return t->th_buf.gnu_longname;

  if (t->th_buf.prefix[0] != '\0')
  {
    snprintf(filename, sizeof(filename), "%.155s/%.100s",
       t->th_buf.prefix, t->th_buf.name);
    return strdup(filename);
  }

  snprintf(filename, sizeof(filename), "%.100s", t->th_buf.name);
  return strdup(filename);
}


uid_t
th_get_uid(TAR *t)
{
  int uid;
#ifndef WIN32
  struct passwd *pw;

  pw = getpwnam(t->th_buf.uname);
  if (pw != NULL)
    return pw->pw_uid;

  /* if the password entry doesn't exist */
#endif
  sscanf(t->th_buf.uid, "%o", &uid);
  return uid;
}


gid_t
th_get_gid(TAR *t)
{
  int gid;
#ifndef WIN32
  struct group *gr;

  gr = getgrnam(t->th_buf.gname);
  if (gr != NULL)
    return gr->gr_gid;

  /* if the group entry doesn't exist */
#endif
  sscanf(t->th_buf.gid, "%o", &gid);
  return gid;
}


mode_t
th_get_mode(TAR *t)
{
  mode_t mode;

  mode = (mode_t)oct_to_int(t->th_buf.mode);
  if (! (mode & S_IFMT))
  {
    switch (t->th_buf.typeflag)
    {
#ifndef WIN32
    case SYMTYPE:
      mode |= S_IFLNK;
      break;
#endif
    case CHRTYPE:
      mode |= S_IFCHR;
      break;
    case BLKTYPE:
      mode |= S_IFBLK;
      break;
    case DIRTYPE:
      mode |= S_IFDIR;
      break;
#ifndef WIN32
    case FIFOTYPE:
      mode |= S_IFIFO;
      break;
#endif
    case AREGTYPE:
      if (t->th_buf.name[strlen(t->th_buf.name) - 1] == '/')
      {
        mode |= S_IFDIR;
        break;
      }
      /* FALLTHROUGH */
    case LNKTYPE:
    case REGTYPE:
    default:
      mode |= S_IFREG;
    }
  }

  return mode;
}