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
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
/*
** 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 <internal.h>
#include <stdio.h>
#include <sys/param.h>
#include <pwd.h>
#include <grp.h>
#ifdef STDC_HEADERS
# include <string.h>
#endif
char *
safer_name_suffix (char const *file_name)
{
char const *p, *t;
p = t = file_name;
while (*p == '/') t = ++p;
while (*p)
{
while (p[0] == '.' && p[0] == p[1] && p[2] == '/')
{
p += 3;
t = p;
}
/* advance pointer past the next slash */
while (*p && (p++)[0] != '/');
}
if (!*t)
{
t = ".";
}
if (t != file_name)
{
/* TODO: warn somehow that the path was modified */
}
return (char*)t;
}
/* determine full path name */
char *
th_get_pathname(TAR *t)
{
char filename[MAXPATHLEN];
if (t->th_buf.gnu_longname)
return safer_name_suffix(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(safer_name_suffix(filename));
}
snprintf(filename, sizeof(filename), "%.100s", t->th_buf.name);
return strdup(safer_name_suffix(filename));
}
uid_t
th_get_uid(TAR *t)
{
int uid;
struct passwd *pw;
pw = getpwnam(t->th_buf.uname);
if (pw != NULL)
return pw->pw_uid;
/* if the password entry doesn't exist */
sscanf(t->th_buf.uid, "%o", &uid);
return uid;
}
gid_t
th_get_gid(TAR *t)
{
int gid;
struct group *gr;
gr = getgrnam(t->th_buf.gname);
if (gr != NULL)
return gr->gr_gid;
/* if the group entry doesn't exist */
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)
{
case SYMTYPE:
mode |= S_IFLNK;
break;
case CHRTYPE:
mode |= S_IFCHR;
break;
case BLKTYPE:
mode |= S_IFBLK;
break;
case DIRTYPE:
mode |= S_IFDIR;
break;
case FIFOTYPE:
mode |= S_IFIFO;
break;
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;
}
|
