Commit | Line | Data |
---|---|---|
1479465f GJ |
1 | /* |
2 | * libdpkg - Debian packaging suite library routines | |
3 | * ar.c - primitives for ar handling | |
4 | * | |
5 | * Copyright © 2010 Guillem Jover <guillem@debian.org> | |
6 | * | |
7 | * This is free software; you can redistribute it and/or modify | |
8 | * it under the terms of the GNU General Public License as published by | |
9 | * the Free Software Foundation; either version 2 of the License, or | |
10 | * (at your option) any later version. | |
11 | * | |
12 | * This is distributed in the hope that it will be useful, | |
13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | * GNU General Public License for more details. | |
16 | * | |
17 | * You should have received a copy of the GNU General Public License | |
18 | * along with this program. If not, see <https://www.gnu.org/licenses/>. | |
19 | */ | |
20 | ||
21 | #include <config.h> | |
22 | #include <compat.h> | |
23 | ||
24 | #include <sys/types.h> | |
25 | #include <sys/stat.h> | |
26 | ||
27 | #include <time.h> | |
28 | #include <fcntl.h> | |
29 | #include <stdint.h> | |
30 | #include <stdlib.h> | |
31 | #include <string.h> | |
32 | #include <unistd.h> | |
33 | ||
34 | #include <dpkg/i18n.h> | |
35 | #include <dpkg/dpkg.h> | |
36 | #include <dpkg/fdio.h> | |
37 | #include <dpkg/buffer.h> | |
38 | #include <dpkg/ar.h> | |
39 | ||
40 | struct dpkg_ar * | |
41 | dpkg_ar_fdopen(const char *filename, int fd) | |
42 | { | |
43 | struct dpkg_ar *ar; | |
44 | struct stat st; | |
45 | ||
46 | if (fstat(fd, &st) != 0) | |
47 | ohshite(_("failed to fstat archive")); | |
48 | ||
49 | ar = m_malloc(sizeof(*ar)); | |
50 | ar->name = filename; | |
51 | ar->mode = st.st_mode; | |
52 | ar->size = st.st_size; | |
53 | ar->time = st.st_mtime; | |
54 | ar->fd = fd; | |
55 | ||
56 | return ar; | |
57 | } | |
58 | ||
59 | struct dpkg_ar * | |
60 | dpkg_ar_open(const char *filename) | |
61 | { | |
62 | int fd; | |
63 | ||
64 | if (strcmp(filename, "-") == 0) | |
65 | fd = STDIN_FILENO; | |
66 | else | |
67 | fd = open(filename, O_RDONLY); | |
68 | if (fd < 0) | |
69 | ohshite(_("failed to read archive '%.255s'"), filename); | |
70 | ||
71 | return dpkg_ar_fdopen(filename, fd); | |
72 | } | |
73 | ||
74 | struct dpkg_ar * | |
75 | dpkg_ar_create(const char *filename, mode_t mode) | |
76 | { | |
77 | int fd; | |
78 | ||
79 | fd = creat(filename, mode); | |
80 | if (fd < 0) | |
81 | ohshite(_("unable to create '%.255s'"), filename); | |
82 | ||
83 | return dpkg_ar_fdopen(filename, fd); | |
84 | } | |
85 | ||
86 | void | |
87 | dpkg_ar_set_mtime(struct dpkg_ar *ar, time_t mtime) | |
88 | { | |
89 | ar->time = mtime; | |
90 | } | |
91 | ||
92 | void | |
93 | dpkg_ar_close(struct dpkg_ar *ar) | |
94 | { | |
95 | if (close(ar->fd)) | |
96 | ohshite(_("unable to close file '%s'"), ar->name); | |
97 | free(ar); | |
98 | } | |
99 | ||
100 | static void | |
101 | dpkg_ar_member_init(struct dpkg_ar *ar, struct dpkg_ar_member *member, | |
102 | const char *name, off_t size) | |
103 | { | |
104 | member->name = name; | |
105 | member->size = size; | |
106 | member->time = ar->time; | |
107 | member->mode = 0100644; | |
108 | member->uid = 0; | |
109 | member->gid = 0; | |
110 | } | |
111 | ||
112 | void | |
113 | dpkg_ar_normalize_name(struct dpkg_ar_hdr *arh) | |
114 | { | |
115 | char *name = arh->ar_name; | |
116 | int i; | |
117 | ||
118 | /* Remove trailing spaces from the member name. */ | |
119 | for (i = sizeof(arh->ar_name) - 1; i >= 0 && name[i] == ' '; i--) | |
120 | name[i] = '\0'; | |
121 | ||
122 | /* Remove optional slash terminator (on GNU-style archives). */ | |
123 | if (i >= 0 && name[i] == '/') | |
124 | name[i] = '\0'; | |
125 | } | |
126 | ||
127 | off_t | |
128 | dpkg_ar_member_get_size(struct dpkg_ar *ar, struct dpkg_ar_hdr *arh) | |
129 | { | |
130 | const char *str = arh->ar_size; | |
131 | int len = sizeof(arh->ar_size); | |
132 | off_t size = 0; | |
133 | ||
134 | while (len && *str == ' ') | |
135 | str++, len--; | |
136 | ||
137 | while (len--) { | |
138 | if (*str == ' ') | |
139 | break; | |
140 | if (*str < '0' || *str > '9') | |
141 | ohshit(_("invalid character '%c' in archive '%.250s' " | |
142 | "member '%.16s' size"), | |
143 | *str, ar->name, arh->ar_name); | |
144 | ||
145 | size *= 10; | |
146 | size += *str++ - '0'; | |
147 | } | |
148 | ||
149 | return size; | |
150 | } | |
151 | ||
152 | bool | |
153 | dpkg_ar_member_is_illegal(struct dpkg_ar_hdr *arh) | |
154 | { | |
155 | return memcmp(arh->ar_fmag, DPKG_AR_FMAG, sizeof(arh->ar_fmag)) != 0; | |
156 | } | |
157 | ||
158 | void | |
159 | dpkg_ar_put_magic(struct dpkg_ar *ar) | |
160 | { | |
161 | if (fd_write(ar->fd, DPKG_AR_MAGIC, strlen(DPKG_AR_MAGIC)) < 0) | |
162 | ohshite(_("unable to write file '%s'"), ar->name); | |
163 | } | |
164 | ||
165 | void | |
166 | dpkg_ar_member_put_header(struct dpkg_ar *ar, struct dpkg_ar_member *member) | |
167 | { | |
168 | char header[sizeof(struct dpkg_ar_hdr) + 1]; | |
169 | int n; | |
170 | ||
171 | if (strlen(member->name) > 15) | |
172 | ohshit(_("ar member name '%s' length too long"), member->name); | |
173 | if (member->size > 9999999999L) | |
174 | ohshit(_("ar member size %jd too large"), (intmax_t)member->size); | |
175 | ||
176 | n = snprintf(header, sizeof(struct dpkg_ar_hdr) + 1, | |
177 | "%-16s%-12lu%-6lu%-6lu%-8lo%-10jd`\n", | |
178 | member->name, (unsigned long)member->time, | |
179 | (unsigned long)member->uid, (unsigned long)member->gid, | |
180 | (unsigned long)member->mode, (intmax_t)member->size); | |
181 | if (n != sizeof(struct dpkg_ar_hdr)) | |
182 | ohshit(_("generated corrupt ar header for '%s'"), ar->name); | |
183 | ||
184 | if (fd_write(ar->fd, header, n) < 0) | |
185 | ohshite(_("unable to write file '%s'"), ar->name); | |
186 | } | |
187 | ||
188 | void | |
189 | dpkg_ar_member_put_mem(struct dpkg_ar *ar, | |
190 | const char *name, const void *data, size_t size) | |
191 | { | |
192 | struct dpkg_ar_member member; | |
193 | ||
194 | dpkg_ar_member_init(ar, &member, name, size); | |
195 | dpkg_ar_member_put_header(ar, &member); | |
196 | ||
197 | /* Copy data contents. */ | |
198 | if (fd_write(ar->fd, data, size) < 0) | |
199 | ohshite(_("unable to write file '%s'"), ar->name); | |
200 | ||
201 | if (size & 1) | |
202 | if (fd_write(ar->fd, "\n", 1) < 0) | |
203 | ohshite(_("unable to write file '%s'"), ar->name); | |
204 | } | |
205 | ||
206 | void | |
207 | dpkg_ar_member_put_file(struct dpkg_ar *ar, | |
208 | const char *name, int fd, off_t size) | |
209 | { | |
210 | struct dpkg_error err; | |
211 | struct dpkg_ar_member member; | |
212 | ||
213 | if (size <= 0) { | |
214 | struct stat st; | |
215 | ||
216 | if (fstat(fd, &st)) | |
217 | ohshite(_("failed to fstat ar member file (%s)"), name); | |
218 | size = st.st_size; | |
219 | } | |
220 | ||
221 | dpkg_ar_member_init(ar, &member, name, size); | |
222 | dpkg_ar_member_put_header(ar, &member); | |
223 | ||
224 | /* Copy data contents. */ | |
225 | if (fd_fd_copy(fd, ar->fd, size, &err) < 0) | |
226 | ohshit(_("cannot append ar member file (%s) to '%s': %s"), | |
227 | name, ar->name, err.str); | |
228 | ||
229 | if (size & 1) | |
230 | if (fd_write(ar->fd, "\n", 1) < 0) | |
231 | ohshite(_("unable to write file '%s'"), ar->name); | |
232 | } |