Commit | Line | Data |
---|---|---|
1479465f GJ |
1 | /* |
2 | * dpkg-divert - override a package's version of a file | |
3 | * | |
4 | * Copyright © 1995 Ian Jackson | |
5 | * Copyright © 2000, 2001 Wichert Akkerman | |
6 | * Copyright © 2006-2014 Guillem Jover <guillem@debian.org> | |
7 | * Copyright © 2011 Linaro Limited | |
8 | * Copyright © 2011 Raphaël Hertzog <hertzog@debian.org> | |
9 | * | |
10 | * This program is free software; you can redistribute it and/or modify | |
11 | * it under the terms of the GNU General Public License as published by | |
12 | * the Free Software Foundation; either version 2 of the License, or | |
13 | * (at your option) any later version. | |
14 | * | |
15 | * This program is distributed in the hope that it will be useful, | |
16 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | * GNU General Public License for more details. | |
19 | * | |
20 | * You should have received a copy of the GNU General Public License | |
21 | * along with this program. If not, see <https://www.gnu.org/licenses/>. | |
22 | */ | |
23 | ||
24 | #include <config.h> | |
25 | #include <compat.h> | |
26 | ||
27 | #include <sys/types.h> | |
28 | #include <sys/stat.h> | |
29 | ||
30 | #include <errno.h> | |
31 | #if HAVE_LOCALE_H | |
32 | #include <locale.h> | |
33 | #endif | |
34 | #include <fcntl.h> | |
35 | #include <fnmatch.h> | |
36 | #include <string.h> | |
37 | #include <stdlib.h> | |
38 | #include <unistd.h> | |
39 | ||
40 | #include <dpkg/i18n.h> | |
41 | #include <dpkg/dpkg.h> | |
42 | #include <dpkg/dpkg-db.h> | |
43 | #include <dpkg/arch.h> | |
44 | #include <dpkg/file.h> | |
45 | #include <dpkg/glob.h> | |
46 | #include <dpkg/buffer.h> | |
47 | #include <dpkg/options.h> | |
48 | ||
49 | #include "filesdb.h" | |
50 | ||
51 | ||
52 | static const char printforhelp[] = N_( | |
53 | "Use --help for help about diverting files."); | |
54 | ||
55 | static const char *admindir; | |
56 | ||
57 | static bool opt_pkgname_match_any = true; | |
58 | static const char *opt_pkgname = NULL; | |
59 | static const char *opt_divertto = NULL; | |
60 | ||
61 | static int opt_verbose = 1; | |
62 | static int opt_test = 0; | |
63 | static int opt_rename = 0; | |
64 | ||
65 | ||
66 | static void | |
67 | printversion(const struct cmdinfo *cip, const char *value) | |
68 | { | |
69 | printf(_("Debian %s version %s.\n"), dpkg_get_progname(), | |
70 | PACKAGE_RELEASE); | |
71 | ||
72 | printf(_( | |
73 | "This is free software; see the GNU General Public License version 2 or\n" | |
74 | "later for copying conditions. There is NO warranty.\n")); | |
75 | ||
76 | m_output(stdout, _("<standard output>")); | |
77 | ||
78 | exit(0); | |
79 | } | |
80 | ||
81 | static void | |
82 | usage(const struct cmdinfo *cip, const char *value) | |
83 | { | |
84 | printf(_( | |
85 | "Usage: %s [<option> ...] <command>\n" | |
86 | "\n"), dpkg_get_progname()); | |
87 | ||
88 | printf(_( | |
89 | "Commands:\n" | |
90 | " [--add] <file> add a diversion.\n" | |
91 | " --remove <file> remove the diversion.\n" | |
92 | " --list [<glob-pattern>] show file diversions.\n" | |
93 | " --listpackage <file> show what package diverts the file.\n" | |
94 | " --truename <file> return the diverted file.\n" | |
95 | "\n")); | |
96 | ||
97 | printf(_( | |
98 | "Options:\n" | |
99 | " --package <package> name of the package whose copy of <file> will not\n" | |
100 | " be diverted.\n" | |
101 | " --local all packages' versions are diverted.\n" | |
102 | " --divert <divert-to> the name used by other packages' versions.\n" | |
103 | " --rename actually move the file aside (or back).\n" | |
104 | " --admindir <directory> set the directory with the diversions file.\n" | |
105 | " --test don't do anything, just demonstrate.\n" | |
106 | " --quiet quiet operation, minimal output.\n" | |
107 | " --help show this help message.\n" | |
108 | " --version show the version.\n" | |
109 | "\n")); | |
110 | ||
111 | printf(_( | |
112 | "When adding, default is --local and --divert <original>.distrib.\n" | |
113 | "When removing, --package or --local and --divert must match if specified.\n" | |
114 | "Package preinst/postrm scripts should always specify --package and --divert.\n")); | |
115 | ||
116 | m_output(stdout, _("<standard output>")); | |
117 | ||
118 | exit(0); | |
119 | } | |
120 | ||
121 | struct file { | |
122 | const char *name; | |
123 | enum { | |
124 | FILE_STAT_INVALID, | |
125 | FILE_STAT_VALID, | |
126 | FILE_STAT_NOFILE, | |
127 | } stat_state; | |
128 | struct stat stat; | |
129 | }; | |
130 | ||
131 | static void | |
132 | file_init(struct file *f, const char *filename) | |
133 | { | |
134 | f->name = filename; | |
135 | f->stat_state = FILE_STAT_INVALID; | |
136 | } | |
137 | ||
138 | static void | |
139 | file_stat(struct file *f) | |
140 | { | |
141 | int ret; | |
142 | ||
143 | if (f->stat_state != FILE_STAT_INVALID) | |
144 | return; | |
145 | ||
146 | ret = lstat(f->name, &f->stat); | |
147 | if (ret && errno != ENOENT) | |
148 | ohshite(_("cannot stat file '%s'"), f->name); | |
149 | ||
150 | if (ret == 0) | |
151 | f->stat_state = FILE_STAT_VALID; | |
152 | else | |
153 | f->stat_state = FILE_STAT_NOFILE; | |
154 | } | |
155 | ||
156 | static void | |
157 | check_writable_dir(struct file *f) | |
158 | { | |
159 | char *tmpname; | |
160 | int tmpfd; | |
161 | ||
162 | tmpname = str_fmt("%s%s", f->name, ".dpkg-divert.tmp"); | |
163 | ||
164 | tmpfd = creat(tmpname, 0600); | |
165 | if (tmpfd < 0) | |
166 | ohshite(_("error checking '%s'"), f->name); | |
167 | close(tmpfd); | |
168 | (void)unlink(tmpname); | |
169 | ||
170 | free(tmpname); | |
171 | } | |
172 | ||
173 | static bool | |
174 | check_rename(struct file *src, struct file *dst) | |
175 | { | |
176 | file_stat(src); | |
177 | ||
178 | /* If the source file is not present and we are not going to do | |
179 | * the rename anyway there's no point in checking any further. */ | |
180 | if (src->stat_state == FILE_STAT_NOFILE) | |
181 | return false; | |
182 | ||
183 | file_stat(dst); | |
184 | ||
185 | /* | |
186 | * Unfortunately we have to check for write access in both places, | |
187 | * just having +w is not enough, since people do mount things RO, | |
188 | * and we need to fail before we start mucking around with things. | |
189 | * So we open a file with the same name as the diversions but with | |
190 | * an extension that (hopefully) won't overwrite anything. If it | |
191 | * succeeds, we assume a writable filesystem. | |
192 | */ | |
193 | ||
194 | check_writable_dir(src); | |
195 | check_writable_dir(dst); | |
196 | ||
197 | if (src->stat_state == FILE_STAT_VALID && | |
198 | dst->stat_state == FILE_STAT_VALID && | |
199 | !(src->stat.st_dev == dst->stat.st_dev && | |
200 | src->stat.st_ino == dst->stat.st_ino)) | |
201 | ohshit(_("rename involves overwriting '%s' with\n" | |
202 | " different file '%s', not allowed"), | |
203 | dst->name, src->name); | |
204 | ||
205 | return true; | |
206 | } | |
207 | ||
208 | static void | |
209 | file_copy(const char *src, const char *dst) | |
210 | { | |
211 | struct dpkg_error err; | |
212 | char *tmp; | |
213 | int srcfd, dstfd; | |
214 | ||
215 | srcfd = open(src, O_RDONLY); | |
216 | if (srcfd < 0) | |
217 | ohshite(_("unable to open file '%s'"), src); | |
218 | ||
219 | tmp = str_fmt("%s%s", dst, ".dpkg-divert.tmp"); | |
220 | dstfd = creat(tmp, 0600); | |
221 | if (dstfd < 0) | |
222 | ohshite(_("unable to create file '%s'"), tmp); | |
223 | ||
224 | push_cleanup(cu_filename, ~ehflag_normaltidy, NULL, 0, 1, tmp); | |
225 | ||
226 | if (fd_fd_copy(srcfd, dstfd, -1, &err) < 0) | |
227 | ohshit(_("cannot copy '%s' to '%s': %s"), src, tmp, err.str); | |
228 | ||
229 | close(srcfd); | |
230 | ||
231 | if (fsync(dstfd)) | |
232 | ohshite(_("unable to sync file '%s'"), tmp); | |
233 | if (close(dstfd)) | |
234 | ohshite(_("unable to close file '%s'"), tmp); | |
235 | ||
236 | file_copy_perms(src, tmp); | |
237 | ||
238 | if (rename(tmp, dst) != 0) | |
239 | ohshite(_("cannot rename '%s' to '%s'"), tmp, dst); | |
240 | ||
241 | free(tmp); | |
242 | ||
243 | pop_cleanup(ehflag_normaltidy); | |
244 | } | |
245 | ||
246 | static void | |
247 | file_rename(struct file *src, struct file *dst) | |
248 | { | |
249 | if (src->stat_state == FILE_STAT_NOFILE) | |
250 | return; | |
251 | ||
252 | if (dst->stat_state == FILE_STAT_VALID) { | |
253 | if (unlink(src->name)) | |
254 | ohshite(_("rename: remove duplicate old link '%s'"), | |
255 | src->name); | |
256 | } else { | |
257 | if (rename(src->name, dst->name) == 0) | |
258 | return; | |
259 | ||
260 | /* If a rename didn't work try moving the file instead. */ | |
261 | file_copy(src->name, dst->name); | |
262 | ||
263 | if (unlink(src->name)) | |
264 | ohshite(_("unable to remove copied source file '%s'"), | |
265 | src->name); | |
266 | } | |
267 | } | |
268 | ||
269 | static void | |
270 | diversion_check_filename(const char *filename) | |
271 | { | |
272 | if (filename[0] != '/') | |
273 | badusage(_("filename \"%s\" is not absolute"), filename); | |
274 | if (strchr(filename, '\n') != NULL) | |
275 | badusage(_("file may not contain newlines")); | |
276 | } | |
277 | ||
278 | static const char * | |
279 | diversion_pkg_name(struct diversion *d) | |
280 | { | |
281 | if (d->pkgset == NULL) | |
282 | return ":"; | |
283 | else | |
284 | return d->pkgset->name; | |
285 | } | |
286 | ||
287 | static const char * | |
288 | varbuf_diversion(struct varbuf *str, const char *pkgname, | |
289 | const char *filename, const char *divertto) | |
290 | { | |
291 | varbuf_reset(str); | |
292 | ||
293 | if (pkgname == NULL) { | |
294 | if (divertto == NULL) | |
295 | varbuf_printf(str, _("local diversion of %s"), filename); | |
296 | else | |
297 | varbuf_printf(str, _("local diversion of %s to %s"), | |
298 | filename, divertto); | |
299 | } else { | |
300 | if (divertto == NULL) | |
301 | varbuf_printf(str, _("diversion of %s by %s"), | |
302 | filename, pkgname); | |
303 | else | |
304 | varbuf_printf(str, _("diversion of %s to %s by %s"), | |
305 | filename, divertto, pkgname); | |
306 | } | |
307 | ||
308 | return str->buf; | |
309 | } | |
310 | ||
311 | static const char * | |
312 | diversion_current(const char *filename) | |
313 | { | |
314 | static struct varbuf str = VARBUF_INIT; | |
315 | ||
316 | if (opt_pkgname_match_any) { | |
317 | varbuf_reset(&str); | |
318 | ||
319 | if (opt_divertto == NULL) | |
320 | varbuf_printf(&str, _("any diversion of %s"), filename); | |
321 | else | |
322 | varbuf_printf(&str, _("any diversion of %s to %s"), | |
323 | filename, opt_divertto); | |
324 | } else { | |
325 | return varbuf_diversion(&str, opt_pkgname, filename, opt_divertto); | |
326 | } | |
327 | ||
328 | return str.buf; | |
329 | } | |
330 | ||
331 | static const char * | |
332 | diversion_describe(struct diversion *d) | |
333 | { | |
334 | static struct varbuf str = VARBUF_INIT; | |
335 | const char *pkgname; | |
336 | const char *name_from, *name_to; | |
337 | ||
338 | if (d->camefrom) { | |
339 | name_from = d->camefrom->name; | |
340 | name_to = d->camefrom->divert->useinstead->name; | |
341 | } else { | |
342 | name_from = d->useinstead->divert->camefrom->name; | |
343 | name_to = d->useinstead->name; | |
344 | } | |
345 | ||
346 | if (d->pkgset == NULL) | |
347 | pkgname = NULL; | |
348 | else | |
349 | pkgname = d->pkgset->name; | |
350 | ||
351 | return varbuf_diversion(&str, pkgname, name_from, name_to); | |
352 | } | |
353 | ||
354 | static void | |
355 | divertdb_write(void) | |
356 | { | |
357 | char *dbname; | |
358 | struct atomic_file *file; | |
359 | struct fileiterator *iter; | |
360 | struct filenamenode *namenode; | |
361 | ||
362 | dbname = dpkg_db_get_path(DIVERSIONSFILE); | |
363 | ||
364 | file = atomic_file_new(dbname, ATOMIC_FILE_BACKUP); | |
365 | atomic_file_open(file); | |
366 | ||
367 | iter = files_db_iter_new(); | |
368 | while ((namenode = files_db_iter_next(iter))) { | |
369 | struct diversion *d = namenode->divert; | |
370 | ||
371 | if (d == NULL || d->useinstead == NULL) | |
372 | continue; | |
373 | ||
374 | fprintf(file->fp, "%s\n%s\n%s\n", | |
375 | d->useinstead->divert->camefrom->name, | |
376 | d->useinstead->name, | |
377 | diversion_pkg_name(d)); | |
378 | } | |
379 | files_db_iter_free(iter); | |
380 | ||
381 | atomic_file_sync(file); | |
382 | atomic_file_close(file); | |
383 | atomic_file_commit(file); | |
384 | atomic_file_free(file); | |
385 | ||
386 | free(dbname); | |
387 | } | |
388 | ||
389 | static bool | |
390 | diversion_is_owned_by_self(struct pkgset *set, struct filenamenode *namenode) | |
391 | { | |
392 | struct pkginfo *pkg; | |
393 | struct filepackages_iterator *iter; | |
394 | bool owned = false; | |
395 | ||
396 | if (set == NULL) | |
397 | return false; | |
398 | ||
399 | for (pkg = &set->pkg; pkg; pkg = pkg->arch_next) | |
400 | ensure_packagefiles_available(pkg); | |
401 | ||
402 | iter = filepackages_iter_new(namenode); | |
403 | while ((pkg = filepackages_iter_next(iter))) { | |
404 | if (pkg->set == set) { | |
405 | owned = true; | |
406 | break; | |
407 | } | |
408 | } | |
409 | filepackages_iter_free(iter); | |
410 | ||
411 | return owned; | |
412 | } | |
413 | ||
414 | static int | |
415 | diversion_add(const char *const *argv) | |
416 | { | |
417 | const char *filename = argv[0]; | |
418 | struct file file_from, file_to; | |
419 | struct diversion *contest, *altname; | |
420 | struct filenamenode *fnn_from, *fnn_to; | |
421 | struct pkgset *pkgset; | |
422 | ||
423 | opt_pkgname_match_any = false; | |
424 | ||
425 | /* Handle filename. */ | |
426 | if (!filename || argv[1]) | |
427 | badusage(_("--%s needs a single argument"), cipaction->olong); | |
428 | ||
429 | diversion_check_filename(filename); | |
430 | ||
431 | file_init(&file_from, filename); | |
432 | file_stat(&file_from); | |
433 | ||
434 | if (file_from.stat_state == FILE_STAT_VALID && | |
435 | S_ISDIR(file_from.stat.st_mode)) | |
436 | badusage(_("cannot divert directories")); | |
437 | ||
438 | fnn_from = findnamenode(filename, 0); | |
439 | ||
440 | /* Handle divertto. */ | |
441 | if (opt_divertto == NULL) | |
442 | opt_divertto = str_fmt("%s.distrib", filename); | |
443 | ||
444 | if (strcmp(filename, opt_divertto) == 0) | |
445 | badusage(_("cannot divert file '%s' to itself"), filename); | |
446 | ||
447 | file_init(&file_to, opt_divertto); | |
448 | ||
449 | fnn_to = findnamenode(opt_divertto, 0); | |
450 | ||
451 | /* Handle package name. */ | |
452 | if (opt_pkgname == NULL) | |
453 | pkgset = NULL; | |
454 | else | |
455 | pkgset = pkg_db_find_set(opt_pkgname); | |
456 | ||
457 | /* Check we are not stomping over an existing diversion. */ | |
458 | if (fnn_from->divert || fnn_to->divert) { | |
459 | if (fnn_to->divert && fnn_to->divert->camefrom && | |
460 | strcmp(fnn_to->divert->camefrom->name, filename) == 0 && | |
461 | fnn_from->divert && fnn_from->divert->useinstead && | |
462 | strcmp(fnn_from->divert->useinstead->name, opt_divertto) == 0 && | |
463 | fnn_from->divert->pkgset == pkgset) { | |
464 | if (opt_verbose > 0) | |
465 | printf(_("Leaving '%s'\n"), | |
466 | diversion_describe(fnn_from->divert)); | |
467 | return 0; | |
468 | } | |
469 | ||
470 | ohshit(_("'%s' clashes with '%s'"), | |
471 | diversion_current(filename), | |
472 | fnn_from->divert ? | |
473 | diversion_describe(fnn_from->divert) : | |
474 | diversion_describe(fnn_to->divert)); | |
475 | } | |
476 | ||
477 | /* Create new diversion. */ | |
478 | contest = nfmalloc(sizeof(*contest)); | |
479 | altname = nfmalloc(sizeof(*altname)); | |
480 | ||
481 | altname->camefrom = fnn_from; | |
482 | altname->camefrom->divert = contest; | |
483 | altname->useinstead = NULL; | |
484 | altname->pkgset = pkgset; | |
485 | ||
486 | contest->useinstead = fnn_to; | |
487 | contest->useinstead->divert = altname; | |
488 | contest->camefrom = NULL; | |
489 | contest->pkgset = pkgset; | |
490 | ||
491 | /* Update database and file system if needed. */ | |
492 | if (opt_verbose > 0) | |
493 | printf(_("Adding '%s'\n"), diversion_describe(contest)); | |
494 | if (opt_rename) | |
495 | opt_rename = check_rename(&file_from, &file_to); | |
496 | /* Check we are not renaming a file owned by the diverting pkgset. */ | |
497 | if (opt_rename && diversion_is_owned_by_self(pkgset, fnn_from)) { | |
498 | if (opt_verbose > 0) | |
499 | printf(_("Ignoring request to rename file '%s' " | |
500 | "owned by diverting package '%s'\n"), | |
501 | filename, pkgset->name); | |
502 | opt_rename = false; | |
503 | } | |
504 | if (!opt_test) { | |
505 | divertdb_write(); | |
506 | if (opt_rename) | |
507 | file_rename(&file_from, &file_to); | |
508 | } | |
509 | ||
510 | return 0; | |
511 | } | |
512 | ||
513 | static bool | |
514 | diversion_is_shared(struct pkgset *set, struct filenamenode *namenode) | |
515 | { | |
516 | const char *archname; | |
517 | struct pkginfo *pkg; | |
518 | struct dpkg_arch *arch; | |
519 | struct filepackages_iterator *iter; | |
520 | bool shared = false; | |
521 | ||
522 | if (set == NULL) | |
523 | return false; | |
524 | ||
525 | archname = getenv("DPKG_MAINTSCRIPT_ARCH"); | |
526 | arch = dpkg_arch_find(archname); | |
527 | if (arch->type == DPKG_ARCH_NONE || arch->type == DPKG_ARCH_EMPTY) | |
528 | return false; | |
529 | ||
530 | for (pkg = &set->pkg; pkg; pkg = pkg->arch_next) | |
531 | ensure_packagefiles_available(pkg); | |
532 | ||
533 | iter = filepackages_iter_new(namenode); | |
534 | while ((pkg = filepackages_iter_next(iter))) { | |
535 | if (pkg->set == set && pkg->installed.arch != arch) { | |
536 | shared = true; | |
537 | break; | |
538 | } | |
539 | } | |
540 | filepackages_iter_free(iter); | |
541 | ||
542 | return shared; | |
543 | } | |
544 | ||
545 | static int | |
546 | diversion_remove(const char *const *argv) | |
547 | { | |
548 | const char *filename = argv[0]; | |
549 | struct filenamenode *namenode; | |
550 | struct diversion *contest, *altname; | |
551 | struct file file_from, file_to; | |
552 | struct pkgset *pkgset; | |
553 | ||
554 | if (!filename || argv[1]) | |
555 | badusage(_("--%s needs a single argument"), cipaction->olong); | |
556 | ||
557 | diversion_check_filename(filename); | |
558 | ||
559 | namenode = findnamenode(filename, fnn_nonew); | |
560 | ||
561 | if (namenode == NULL || namenode->divert == NULL || | |
562 | namenode->divert->useinstead == NULL) { | |
563 | if (opt_verbose > 0) | |
564 | printf(_("No diversion '%s', none removed.\n"), | |
565 | diversion_current(filename)); | |
566 | return 0; | |
567 | } | |
568 | ||
569 | if (opt_pkgname == NULL) | |
570 | pkgset = NULL; | |
571 | else | |
572 | pkgset = pkg_db_find_set(opt_pkgname); | |
573 | ||
574 | contest = namenode->divert; | |
575 | altname = contest->useinstead->divert; | |
576 | ||
577 | if (opt_divertto != NULL && | |
578 | strcmp(opt_divertto, contest->useinstead->name) != 0) | |
579 | ohshit(_("mismatch on divert-to\n" | |
580 | " when removing '%s'\n" | |
581 | " found '%s'"), | |
582 | diversion_current(filename), | |
583 | diversion_describe(contest)); | |
584 | ||
585 | if (!opt_pkgname_match_any && pkgset != contest->pkgset) | |
586 | ohshit(_("mismatch on package\n" | |
587 | " when removing '%s'\n" | |
588 | " found '%s'"), | |
589 | diversion_current(filename), | |
590 | diversion_describe(contest)); | |
591 | ||
592 | /* Ignore removal request if the diverted file is still owned | |
593 | * by another package in the same set. */ | |
594 | if (diversion_is_shared(pkgset, namenode)) { | |
595 | if (opt_verbose > 0) | |
596 | printf(_("Ignoring request to remove shared diversion '%s'.\n"), | |
597 | diversion_describe(contest)); | |
598 | return 0; | |
599 | } | |
600 | ||
601 | if (opt_verbose > 0) | |
602 | printf(_("Removing '%s'\n"), diversion_describe(contest)); | |
603 | ||
604 | file_init(&file_from, altname->camefrom->name); | |
605 | file_init(&file_to, contest->useinstead->name); | |
606 | ||
607 | /* Remove entries from database. */ | |
608 | contest->useinstead->divert = NULL; | |
609 | altname->camefrom->divert = NULL; | |
610 | ||
611 | if (opt_rename) | |
612 | opt_rename = check_rename(&file_to, &file_from); | |
613 | if (opt_rename && !opt_test) | |
614 | file_rename(&file_to, &file_from); | |
615 | ||
616 | if (!opt_test) | |
617 | divertdb_write(); | |
618 | ||
619 | return 0; | |
620 | } | |
621 | ||
622 | static int | |
623 | diversion_list(const char *const *argv) | |
624 | { | |
625 | struct fileiterator *iter; | |
626 | struct filenamenode *namenode; | |
627 | struct glob_node *glob_list = NULL; | |
628 | const char *pattern; | |
629 | ||
630 | while ((pattern = *argv++)) | |
631 | glob_list_prepend(&glob_list, m_strdup(pattern)); | |
632 | ||
633 | if (glob_list == NULL) | |
634 | glob_list_prepend(&glob_list, m_strdup("*")); | |
635 | ||
636 | iter = files_db_iter_new(); | |
637 | while ((namenode = files_db_iter_next(iter))) { | |
638 | struct glob_node *g; | |
639 | struct diversion *contest = namenode->divert; | |
640 | struct diversion *altname; | |
641 | const char *pkgname; | |
642 | ||
643 | if (contest->useinstead == NULL) | |
644 | continue; | |
645 | ||
646 | altname = contest->useinstead->divert; | |
647 | ||
648 | pkgname = diversion_pkg_name(contest); | |
649 | ||
650 | for (g = glob_list; g; g = g->next) { | |
651 | if (fnmatch(g->pattern, pkgname, 0) == 0 || | |
652 | fnmatch(g->pattern, contest->useinstead->name, 0) == 0 || | |
653 | fnmatch(g->pattern, altname->camefrom->name, 0) == 0) { | |
654 | printf("%s\n", diversion_describe(contest)); | |
655 | break; | |
656 | } | |
657 | } | |
658 | } | |
659 | files_db_iter_free(iter); | |
660 | ||
661 | glob_list_free(glob_list); | |
662 | ||
663 | return 0; | |
664 | } | |
665 | ||
666 | static int | |
667 | diversion_truename(const char *const *argv) | |
668 | { | |
669 | const char *filename = argv[0]; | |
670 | struct filenamenode *namenode; | |
671 | ||
672 | if (!filename || argv[1]) | |
673 | badusage(_("--%s needs a single argument"), cipaction->olong); | |
674 | ||
675 | diversion_check_filename(filename); | |
676 | ||
677 | namenode = findnamenode(filename, fnn_nonew); | |
678 | ||
679 | /* Print the given name if file is not diverted. */ | |
680 | if (namenode && namenode->divert->useinstead) | |
681 | printf("%s\n", namenode->divert->useinstead->name); | |
682 | else | |
683 | printf("%s\n", filename); | |
684 | ||
685 | return 0; | |
686 | } | |
687 | ||
688 | static int | |
689 | diversion_listpackage(const char *const *argv) | |
690 | { | |
691 | const char *filename = argv[0]; | |
692 | struct filenamenode *namenode; | |
693 | ||
694 | if (!filename || argv[1]) | |
695 | badusage(_("--%s needs a single argument"), cipaction->olong); | |
696 | ||
697 | diversion_check_filename(filename); | |
698 | ||
699 | namenode = findnamenode(filename, fnn_nonew); | |
700 | ||
701 | /* Print nothing if file is not diverted. */ | |
702 | if (namenode == NULL) | |
703 | return 0; | |
704 | ||
705 | if (namenode->divert->pkgset == NULL) | |
706 | /* Indicate package is local using something not in package | |
707 | * namespace. */ | |
708 | printf("LOCAL\n"); | |
709 | else | |
710 | printf("%s\n", namenode->divert->pkgset->name); | |
711 | ||
712 | return 0; | |
713 | } | |
714 | ||
715 | static void | |
716 | set_package(const struct cmdinfo *cip, const char *value) | |
717 | { | |
718 | opt_pkgname_match_any = false; | |
719 | ||
720 | /* If value is NULL we are being called from --local. */ | |
721 | opt_pkgname = value; | |
722 | ||
723 | if (opt_pkgname && strchr(opt_pkgname, '\n') != NULL) | |
724 | badusage(_("package may not contain newlines")); | |
725 | } | |
726 | ||
727 | static void | |
728 | set_divertto(const struct cmdinfo *cip, const char *value) | |
729 | { | |
730 | opt_divertto = value; | |
731 | ||
732 | if (opt_divertto[0] != '/') | |
733 | badusage(_("filename \"%s\" is not absolute"), opt_divertto); | |
734 | if (strchr(opt_divertto, '\n') != NULL) | |
735 | badusage(_("divert-to may not contain newlines")); | |
736 | } | |
737 | ||
738 | static const struct cmdinfo cmdinfo_add = | |
739 | ACTION("add", 0, 0, diversion_add); | |
740 | ||
741 | static const struct cmdinfo cmdinfos[] = { | |
742 | ACTION("add", 0, 0, diversion_add), | |
743 | ACTION("remove", 0, 0, diversion_remove), | |
744 | ACTION("list", 0, 0, diversion_list), | |
745 | ACTION("listpackage", 0, 0, diversion_listpackage), | |
746 | ACTION("truename", 0, 0, diversion_truename), | |
747 | ||
748 | { "admindir", 0, 1, NULL, &admindir, NULL }, | |
749 | { "divert", 0, 1, NULL, NULL, set_divertto }, | |
750 | { "package", 0, 1, NULL, NULL, set_package }, | |
751 | { "local", 0, 0, NULL, NULL, set_package }, | |
752 | { "quiet", 0, 0, &opt_verbose, NULL, NULL, 0 }, | |
753 | { "rename", 0, 0, &opt_rename, NULL, NULL, 1 }, | |
754 | { "test", 0, 0, &opt_test, NULL, NULL, 1 }, | |
755 | { "help", '?', 0, NULL, NULL, usage }, | |
756 | { "version", 0, 0, NULL, NULL, printversion }, | |
757 | { NULL, 0 } | |
758 | }; | |
759 | ||
760 | int | |
761 | main(int argc, const char * const *argv) | |
762 | { | |
763 | const char *env_pkgname; | |
764 | int ret; | |
765 | ||
766 | dpkg_locales_init(PACKAGE); | |
767 | dpkg_program_init("dpkg-divert"); | |
768 | dpkg_options_parse(&argv, cmdinfos, printforhelp); | |
769 | ||
770 | admindir = dpkg_db_set_dir(admindir); | |
771 | ||
772 | env_pkgname = getenv("DPKG_MAINTSCRIPT_PACKAGE"); | |
773 | if (opt_pkgname_match_any && env_pkgname) | |
774 | set_package(NULL, env_pkgname); | |
775 | ||
776 | if (!cipaction) | |
777 | setaction(&cmdinfo_add, NULL); | |
778 | ||
779 | modstatdb_open(msdbrw_readonly); | |
780 | filesdbinit(); | |
781 | ensure_diversions(); | |
782 | ||
783 | ret = cipaction->action(argv); | |
784 | ||
785 | modstatdb_shutdown(); | |
786 | ||
787 | dpkg_program_done(); | |
788 | ||
789 | return ret; | |
790 | } |