| 1 | /* |
| 2 | * Copyright (c) 2005, Junio C Hamano |
| 3 | */ |
| 4 | #include "cache.h" |
| 5 | |
| 6 | static struct lock_file *lock_file_list; |
| 7 | static const char *alternate_index_output; |
| 8 | |
| 9 | static void remove_lock_file(void) |
| 10 | { |
| 11 | pid_t me = getpid(); |
| 12 | |
| 13 | while (lock_file_list) { |
| 14 | if (lock_file_list->owner == me && |
| 15 | lock_file_list->filename[0]) { |
| 16 | if (lock_file_list->fd >= 0) |
| 17 | close(lock_file_list->fd); |
| 18 | unlink(lock_file_list->filename); |
| 19 | } |
| 20 | lock_file_list = lock_file_list->next; |
| 21 | } |
| 22 | } |
| 23 | |
| 24 | static void remove_lock_file_on_signal(int signo) |
| 25 | { |
| 26 | remove_lock_file(); |
| 27 | signal(signo, SIG_DFL); |
| 28 | raise(signo); |
| 29 | } |
| 30 | |
| 31 | /* |
| 32 | * p = absolute or relative path name |
| 33 | * |
| 34 | * Return a pointer into p showing the beginning of the last path name |
| 35 | * element. If p is empty or the root directory ("/"), just return p. |
| 36 | */ |
| 37 | static char *last_path_elm(char *p) |
| 38 | { |
| 39 | /* r starts pointing to null at the end of the string */ |
| 40 | char *r = strchr(p, '\0'); |
| 41 | |
| 42 | if (r == p) |
| 43 | return p; /* just return empty string */ |
| 44 | |
| 45 | r--; /* back up to last non-null character */ |
| 46 | |
| 47 | /* back up past trailing slashes, if any */ |
| 48 | while (r > p && *r == '/') |
| 49 | r--; |
| 50 | |
| 51 | /* |
| 52 | * then go backwards until I hit a slash, or the beginning of |
| 53 | * the string |
| 54 | */ |
| 55 | while (r > p && *(r-1) != '/') |
| 56 | r--; |
| 57 | return r; |
| 58 | } |
| 59 | |
| 60 | |
| 61 | /* We allow "recursive" symbolic links. Only within reason, though */ |
| 62 | #define MAXDEPTH 5 |
| 63 | |
| 64 | /* |
| 65 | * p = path that may be a symlink |
| 66 | * s = full size of p |
| 67 | * |
| 68 | * If p is a symlink, attempt to overwrite p with a path to the real |
| 69 | * file or directory (which may or may not exist), following a chain of |
| 70 | * symlinks if necessary. Otherwise, leave p unmodified. |
| 71 | * |
| 72 | * This is a best-effort routine. If an error occurs, p will either be |
| 73 | * left unmodified or will name a different symlink in a symlink chain |
| 74 | * that started with p's initial contents. |
| 75 | * |
| 76 | * Always returns p. |
| 77 | */ |
| 78 | |
| 79 | static char *resolve_symlink(char *p, size_t s) |
| 80 | { |
| 81 | int depth = MAXDEPTH; |
| 82 | |
| 83 | while (depth--) { |
| 84 | char link[PATH_MAX]; |
| 85 | int link_len = readlink(p, link, sizeof(link)); |
| 86 | if (link_len < 0) { |
| 87 | /* not a symlink anymore */ |
| 88 | return p; |
| 89 | } |
| 90 | else if (link_len < sizeof(link)) |
| 91 | /* readlink() never null-terminates */ |
| 92 | link[link_len] = '\0'; |
| 93 | else { |
| 94 | warning("%s: symlink too long", p); |
| 95 | return p; |
| 96 | } |
| 97 | |
| 98 | if (is_absolute_path(link)) { |
| 99 | /* absolute path simply replaces p */ |
| 100 | if (link_len < s) |
| 101 | strcpy(p, link); |
| 102 | else { |
| 103 | warning("%s: symlink too long", p); |
| 104 | return p; |
| 105 | } |
| 106 | } else { |
| 107 | /* |
| 108 | * link is a relative path, so I must replace the |
| 109 | * last element of p with it. |
| 110 | */ |
| 111 | char *r = (char*)last_path_elm(p); |
| 112 | if (r - p + link_len < s) |
| 113 | strcpy(r, link); |
| 114 | else { |
| 115 | warning("%s: symlink too long", p); |
| 116 | return p; |
| 117 | } |
| 118 | } |
| 119 | } |
| 120 | return p; |
| 121 | } |
| 122 | |
| 123 | |
| 124 | static int lock_file(struct lock_file *lk, const char *path, int flags) |
| 125 | { |
| 126 | if (strlen(path) >= sizeof(lk->filename)) |
| 127 | return -1; |
| 128 | strcpy(lk->filename, path); |
| 129 | /* |
| 130 | * subtract 5 from size to make sure there's room for adding |
| 131 | * ".lock" for the lock file name |
| 132 | */ |
| 133 | if (!(flags & LOCK_NODEREF)) |
| 134 | resolve_symlink(lk->filename, sizeof(lk->filename)-5); |
| 135 | strcat(lk->filename, ".lock"); |
| 136 | lk->fd = open(lk->filename, O_RDWR | O_CREAT | O_EXCL, 0666); |
| 137 | if (0 <= lk->fd) { |
| 138 | if (!lock_file_list) { |
| 139 | signal(SIGINT, remove_lock_file_on_signal); |
| 140 | signal(SIGHUP, remove_lock_file_on_signal); |
| 141 | signal(SIGTERM, remove_lock_file_on_signal); |
| 142 | signal(SIGQUIT, remove_lock_file_on_signal); |
| 143 | signal(SIGPIPE, remove_lock_file_on_signal); |
| 144 | atexit(remove_lock_file); |
| 145 | } |
| 146 | lk->owner = getpid(); |
| 147 | if (!lk->on_list) { |
| 148 | lk->next = lock_file_list; |
| 149 | lock_file_list = lk; |
| 150 | lk->on_list = 1; |
| 151 | } |
| 152 | if (adjust_shared_perm(lk->filename)) |
| 153 | return error("cannot fix permission bits on %s", |
| 154 | lk->filename); |
| 155 | } |
| 156 | else |
| 157 | lk->filename[0] = 0; |
| 158 | return lk->fd; |
| 159 | } |
| 160 | |
| 161 | int hold_lock_file_for_update(struct lock_file *lk, const char *path, int flags) |
| 162 | { |
| 163 | int fd = lock_file(lk, path, flags); |
| 164 | if (fd < 0 && (flags & LOCK_DIE_ON_ERROR)) |
| 165 | die("unable to create '%s.lock': %s", path, strerror(errno)); |
| 166 | return fd; |
| 167 | } |
| 168 | |
| 169 | int hold_lock_file_for_append(struct lock_file *lk, const char *path, int flags) |
| 170 | { |
| 171 | int fd, orig_fd; |
| 172 | |
| 173 | fd = lock_file(lk, path, flags); |
| 174 | if (fd < 0) { |
| 175 | if (flags & LOCK_DIE_ON_ERROR) |
| 176 | die("unable to create '%s.lock': %s", path, strerror(errno)); |
| 177 | return fd; |
| 178 | } |
| 179 | |
| 180 | orig_fd = open(path, O_RDONLY); |
| 181 | if (orig_fd < 0) { |
| 182 | if (errno != ENOENT) { |
| 183 | if (flags & LOCK_DIE_ON_ERROR) |
| 184 | die("cannot open '%s' for copying", path); |
| 185 | close(fd); |
| 186 | return error("cannot open '%s' for copying", path); |
| 187 | } |
| 188 | } else if (copy_fd(orig_fd, fd)) { |
| 189 | if (flags & LOCK_DIE_ON_ERROR) |
| 190 | exit(128); |
| 191 | close(fd); |
| 192 | return -1; |
| 193 | } |
| 194 | return fd; |
| 195 | } |
| 196 | |
| 197 | int close_lock_file(struct lock_file *lk) |
| 198 | { |
| 199 | int fd = lk->fd; |
| 200 | lk->fd = -1; |
| 201 | return close(fd); |
| 202 | } |
| 203 | |
| 204 | int commit_lock_file(struct lock_file *lk) |
| 205 | { |
| 206 | char result_file[PATH_MAX]; |
| 207 | size_t i; |
| 208 | if (lk->fd >= 0 && close_lock_file(lk)) |
| 209 | return -1; |
| 210 | strcpy(result_file, lk->filename); |
| 211 | i = strlen(result_file) - 5; /* .lock */ |
| 212 | result_file[i] = 0; |
| 213 | if (rename(lk->filename, result_file)) |
| 214 | return -1; |
| 215 | lk->filename[0] = 0; |
| 216 | return 0; |
| 217 | } |
| 218 | |
| 219 | int hold_locked_index(struct lock_file *lk, int die_on_error) |
| 220 | { |
| 221 | return hold_lock_file_for_update(lk, get_index_file(), |
| 222 | die_on_error |
| 223 | ? LOCK_DIE_ON_ERROR |
| 224 | : 0); |
| 225 | } |
| 226 | |
| 227 | void set_alternate_index_output(const char *name) |
| 228 | { |
| 229 | alternate_index_output = name; |
| 230 | } |
| 231 | |
| 232 | int commit_locked_index(struct lock_file *lk) |
| 233 | { |
| 234 | if (alternate_index_output) { |
| 235 | if (lk->fd >= 0 && close_lock_file(lk)) |
| 236 | return -1; |
| 237 | if (rename(lk->filename, alternate_index_output)) |
| 238 | return -1; |
| 239 | lk->filename[0] = 0; |
| 240 | return 0; |
| 241 | } |
| 242 | else |
| 243 | return commit_lock_file(lk); |
| 244 | } |
| 245 | |
| 246 | void rollback_lock_file(struct lock_file *lk) |
| 247 | { |
| 248 | if (lk->filename[0]) { |
| 249 | if (lk->fd >= 0) |
| 250 | close(lk->fd); |
| 251 | unlink(lk->filename); |
| 252 | } |
| 253 | lk->filename[0] = 0; |
| 254 | } |