2 * libdpkg - Debian packaging suite library routines
3 * ar.c - primitives for ar handling
5 * Copyright © 2010 Guillem Jover <guillem@debian.org>
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.
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.
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/>.
24 #include <sys/types.h>
34 #include <dpkg/i18n.h>
35 #include <dpkg/dpkg.h>
36 #include <dpkg/fdio.h>
37 #include <dpkg/buffer.h>
41 dpkg_ar_fdopen(const char *filename
, int fd
)
46 if (fstat(fd
, &st
) != 0)
47 ohshite(_("failed to fstat archive"));
49 ar
= m_malloc(sizeof(*ar
));
51 ar
->mode
= st
.st_mode
;
52 ar
->size
= st
.st_size
;
53 ar
->time
= st
.st_mtime
;
60 dpkg_ar_open(const char *filename
)
64 if (strcmp(filename
, "-") == 0)
67 fd
= open(filename
, O_RDONLY
);
69 ohshite(_("failed to read archive '%.255s'"), filename
);
71 return dpkg_ar_fdopen(filename
, fd
);
75 dpkg_ar_create(const char *filename
, mode_t mode
)
79 fd
= creat(filename
, mode
);
81 ohshite(_("unable to create '%.255s'"), filename
);
83 return dpkg_ar_fdopen(filename
, fd
);
87 dpkg_ar_set_mtime(struct dpkg_ar
*ar
, time_t mtime
)
93 dpkg_ar_close(struct dpkg_ar
*ar
)
96 ohshite(_("unable to close file '%s'"), ar
->name
);
101 dpkg_ar_member_init(struct dpkg_ar
*ar
, struct dpkg_ar_member
*member
,
102 const char *name
, off_t size
)
106 member
->time
= ar
->time
;
107 member
->mode
= 0100644;
113 dpkg_ar_normalize_name(struct dpkg_ar_hdr
*arh
)
115 char *name
= arh
->ar_name
;
118 /* Remove trailing spaces from the member name. */
119 for (i
= sizeof(arh
->ar_name
) - 1; i
>= 0 && name
[i
] == ' '; i
--)
122 /* Remove optional slash terminator (on GNU-style archives). */
123 if (i
>= 0 && name
[i
] == '/')
128 dpkg_ar_member_get_size(struct dpkg_ar
*ar
, struct dpkg_ar_hdr
*arh
)
130 const char *str
= arh
->ar_size
;
131 int len
= sizeof(arh
->ar_size
);
134 while (len
&& *str
== ' ')
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
);
146 size
+= *str
++ - '0';
153 dpkg_ar_member_is_illegal(struct dpkg_ar_hdr
*arh
)
155 return memcmp(arh
->ar_fmag
, DPKG_AR_FMAG
, sizeof(arh
->ar_fmag
)) != 0;
159 dpkg_ar_put_magic(struct dpkg_ar
*ar
)
161 if (fd_write(ar
->fd
, DPKG_AR_MAGIC
, strlen(DPKG_AR_MAGIC
)) < 0)
162 ohshite(_("unable to write file '%s'"), ar
->name
);
166 dpkg_ar_member_put_header(struct dpkg_ar
*ar
, struct dpkg_ar_member
*member
)
168 char header
[sizeof(struct dpkg_ar_hdr
) + 1];
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
);
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
);
184 if (fd_write(ar
->fd
, header
, n
) < 0)
185 ohshite(_("unable to write file '%s'"), ar
->name
);
189 dpkg_ar_member_put_mem(struct dpkg_ar
*ar
,
190 const char *name
, const void *data
, size_t size
)
192 struct dpkg_ar_member member
;
194 dpkg_ar_member_init(ar
, &member
, name
, size
);
195 dpkg_ar_member_put_header(ar
, &member
);
197 /* Copy data contents. */
198 if (fd_write(ar
->fd
, data
, size
) < 0)
199 ohshite(_("unable to write file '%s'"), ar
->name
);
202 if (fd_write(ar
->fd
, "\n", 1) < 0)
203 ohshite(_("unable to write file '%s'"), ar
->name
);
207 dpkg_ar_member_put_file(struct dpkg_ar
*ar
,
208 const char *name
, int fd
, off_t size
)
210 struct dpkg_error err
;
211 struct dpkg_ar_member member
;
217 ohshite(_("failed to fstat ar member file (%s)"), name
);
221 dpkg_ar_member_init(ar
, &member
, name
, size
);
222 dpkg_ar_member_put_header(ar
, &member
);
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
);
230 if (fd_write(ar
->fd
, "\n", 1) < 0)
231 ohshite(_("unable to write file '%s'"), ar
->name
);