2 * Copyright (c) 2019 Stefan Sperling <stsp@openbsd.org>
4 * Permission to use, copy, modify, and distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 #include <sys/types.h>
19 #include <sys/queue.h>
31 #include "got_error.h"
32 #include "got_object.h"
33 #include "got_repository.h"
34 #include "got_opentemp.h"
36 #include "got_lib_sha1.h"
37 #include "got_lib_deflate.h"
38 #include "got_lib_delta.h"
39 #include "got_lib_object.h"
40 #include "got_lib_lockfile.h"
41 #include "got_lib_path.h"
44 #define nitems(_a) (sizeof(_a) / sizeof((_a)[0]))
47 static const struct got_error *
48 create_object_file(struct got_object_id *id, FILE *content,
49 struct got_repository *repo)
51 const struct got_error *err = NULL, *unlock_err = NULL;
52 char *objpath = NULL, *tmppath = NULL;
54 struct got_lockfile *lf = NULL;
57 err = got_object_get_path(&objpath, id, repo);
61 err = got_opentemp_named(&tmppath, &tmpfile, objpath);
64 if (!(err->code == GOT_ERR_ERRNO && errno == ENOENT))
66 err = got_path_dirname(&parent_path, objpath);
69 err = got_path_mkdir(parent_path);
73 err = got_opentemp_named(&tmppath, &tmpfile, objpath);
78 err = got_deflate_to_file(&tmplen, content, tmpfile);
82 err = got_lockfile_lock(&lf, objpath);
86 if (rename(tmppath, objpath) != 0) {
87 err = got_error_from_errno();
93 if (chmod(objpath, GOT_DEFAULT_FILE_MODE) != 0) {
94 err = got_error_from_errno();
100 if (unlink(tmppath) != 0 && err == NULL)
101 err = got_error_from_errno();
104 if (tmpfile && fclose(tmpfile) != 0 && err == NULL)
105 err = got_error_from_errno();
107 unlock_err = got_lockfile_unlock(lf);
108 return err ? err : unlock_err;
111 const struct got_error *
112 got_object_blob_create(struct got_object_id **id, const char *ondisk_path,
113 struct got_repository *repo)
115 const struct got_error *err = NULL;
117 FILE *blobfile = NULL;
121 size_t headerlen = 0, n;
127 fd = open(ondisk_path, O_RDONLY | O_NOFOLLOW);
129 return got_error_from_errno();
131 if (fstat(fd, &sb) == -1) {
132 err = got_error_from_errno();
136 if (asprintf(&header, "%s %lld", GOT_OBJ_LABEL_BLOB,
138 err = got_error_from_errno();
141 headerlen = strlen(header) + 1;
142 SHA1Update(&sha1_ctx, header, headerlen);
144 blobfile = got_opentemp();
145 if (blobfile == NULL) {
146 err = got_error_from_errno();
150 n = fwrite(header, 1, headerlen, blobfile);
151 if (n != headerlen) {
152 err = got_ferror(blobfile, GOT_ERR_IO);
159 inlen = read(fd, buf, sizeof(buf));
161 err = got_error_from_errno();
166 SHA1Update(&sha1_ctx, buf, inlen);
167 n = fwrite(buf, 1, inlen, blobfile);
169 err = got_ferror(blobfile, GOT_ERR_IO);
174 *id = malloc(sizeof(**id));
176 err = got_error_from_errno();
179 SHA1Final((*id)->sha1, &sha1_ctx);
181 if (fflush(blobfile) != 0) {
182 err = got_error_from_errno();
187 err = create_object_file(*id, blobfile, repo);
190 if (fd != -1 && close(fd) != 0 && err == NULL)
191 err = got_error_from_errno();
192 if (blobfile && fclose(blobfile) != 0 && err == NULL)
193 err = got_error_from_errno();
201 static const struct got_error *
202 mode2str(char *buf, size_t len, mode_t mode)
205 ret = snprintf(buf, len, "%o ", mode);
206 if (ret == -1 || ret >= len)
207 return got_error(GOT_ERR_NO_SPACE);
211 const struct got_error *
212 got_object_tree_create(struct got_object_id **id,
213 struct got_tree_entries *entries, struct got_repository *repo)
215 const struct got_error *err = NULL;
216 char modebuf[sizeof("100644 ")];
219 size_t headerlen, len = 0, n;
220 FILE *treefile = NULL;
221 struct got_tree_entry *te;
227 SIMPLEQ_FOREACH(te, &entries->head, entry) {
228 err = mode2str(modebuf, sizeof(modebuf), te->mode);
231 len += strlen(modebuf) + strlen(te->name) + 1 +
235 if (asprintf(&header, "%s %zd", GOT_OBJ_LABEL_TREE, len) == -1) {
236 err = got_error_from_errno();
239 headerlen = strlen(header) + 1;
240 SHA1Update(&sha1_ctx, header, headerlen);
242 treefile = got_opentemp();
243 if (treefile == NULL) {
244 err = got_error_from_errno();
248 n = fwrite(header, 1, headerlen, treefile);
249 if (n != headerlen) {
250 err = got_ferror(treefile, GOT_ERR_IO);
254 SIMPLEQ_FOREACH(te, &entries->head, entry) {
255 err = mode2str(modebuf, sizeof(modebuf), te->mode);
258 len = strlen(modebuf);
259 n = fwrite(modebuf, 1, len, treefile);
261 err = got_ferror(treefile, GOT_ERR_IO);
264 SHA1Update(&sha1_ctx, modebuf, len);
266 len = strlen(te->name) + 1; /* must include NUL */
267 n = fwrite(te->name, 1, len, treefile);
269 err = got_ferror(treefile, GOT_ERR_IO);
272 SHA1Update(&sha1_ctx, te->name, len);
274 len = SHA1_DIGEST_LENGTH;
275 n = fwrite(te->id->sha1, 1, len, treefile);
277 err = got_ferror(treefile, GOT_ERR_IO);
280 SHA1Update(&sha1_ctx, te->id->sha1, len);
283 *id = malloc(sizeof(**id));
285 err = got_error_from_errno();
288 SHA1Final((*id)->sha1, &sha1_ctx);
290 if (fflush(treefile) != 0) {
291 err = got_error_from_errno();
296 err = create_object_file(*id, treefile, repo);
299 if (treefile && fclose(treefile) != 0 && err == NULL)
300 err = got_error_from_errno();