* configure.c - configure packages
*
* Copyright 1995 Ian Jackson <ian@chiark.greenend.org.uk>
- * Copyright 1999 Wichert Akkerman <wichert@deephackmode.org>
+ * Copyright 1999,2002 Wichert Akkerman <wichert@deephackmode.org>
*
* This is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as
int conffoptcells[2][2]= { CONFFOPTCELLS };
static void md5hash(struct pkginfo *pkg, char **hashbuf, const char *fn);
+static void copyfileperm(const char* source, const char* target);
+static void showdiff(const char* old, const char* new);
+static void suspend();
+static enum conffopt promptconfaction(const char* cfgfile, const char* realold,
+ const char* realnew, int useredited, int distedited,
+ enum conffopt what);
void deferred_configure(struct pkginfo *pkg) {
- /* The algorithm for deciding what to configure first is as follows:
- * Loop through all packages doing a `try 1' until we've been round
- * and nothing has been done, then do `try 2' and `try 3' likewise.
- * The incrementing of `dependtry' is done by process_queue().
- * Try 1:
- * Are all dependencies of this package done ? If so, do it.
- * Are any of the dependencies missing or the wrong version ?
- * If so, abort (unless --force-depends, in which case defer)
- * Will we need to configure a package we weren't given as an
- * argument ? If so, abort - except if --force-configure-any,
- * in which case we add the package to the argument list.
- * If none of the above, defer the package.
- * Try 2:
- * Find a cycle and break it (see above).
- * Do as for try 1.
- * Try 3 (only if --force-depends-version).
- * Same as for try 2, but don't mind version number in dependencies.
- * Try 4 (only if --force-depends).
- * Do anyway.
- */
- struct varbuf aemsgs, cdr, cdr2;
- char *cdr2rest;
- int ok, r, useredited, distedited, c, cc, status, c1;
- struct conffile *conff;
- char *currenthash= 0, *newdisthash= 0;
- struct stat stab;
- enum conffopt what;
- const char *s;
-
- if (pkg->status == stat_notinstalled)
- ohshit(_("no package named `%s' is installed, cannot configure"),pkg->name);
- if (pkg->status == stat_installed)
- ohshit(_("package %.250s is already installed and configured"), pkg->name);
- if (pkg->status != stat_unpacked && pkg->status != stat_halfconfigured)
- ohshit(_("package %.250s is not ready for configuration\n"
- " cannot configure (current status `%.250s')"),
- pkg->name, statusinfos[pkg->status].name);
-
- if (dependtry > 1) { if (findbreakcycle(pkg,0)) sincenothing= 0; }
-
- varbufinit(&aemsgs);
- ok= dependencies_ok(pkg,0,&aemsgs);
- if (ok == 1) {
- varbuffree(&aemsgs);
- pkg->clientdata->istobe= itb_installnew;
- add_to_queue(pkg);
- return;
- } else if (ok == 0) {
- sincenothing= 0;
- varbufaddc(&aemsgs,0);
- fprintf(stderr,
- _("dpkg: dependency problems prevent configuration of %s:\n%s"),
- pkg->name, aemsgs.buf);
- varbuffree(&aemsgs);
- ohshit(_("dependency problems - leaving unconfigured"));
- } else if (aemsgs.used) {
- varbufaddc(&aemsgs,0);
- fprintf(stderr,
- _("dpkg: %s: dependency problems, but configuring anyway as you request:\n%s"),
- pkg->name, aemsgs.buf);
- }
- varbuffree(&aemsgs);
- sincenothing= 0;
-
- if (pkg->eflag & eflagf_reinstreq)
- forcibleerr(fc_removereinstreq,
- _("Package is in a very bad inconsistent state - you should\n"
- " reinstall it before attempting configuration."));
-
- printf(_("Setting up %s (%s) ...\n"),pkg->name,
- versiondescribe(&pkg->installed.version,vdew_never));
-
- if (f_noact) {
- pkg->status= stat_installed;
- pkg->clientdata->istobe= itb_normal;
- return;
- }
-
- if (pkg->status == stat_unpacked) {
- debug(dbg_general,"deferred_configure updating conffiles");
-
- /* This will not do at all the right thing with overridden conffiles
- * or conffiles that are the `target' of an override; all the references
- * here would be to the `contested' filename, and in any case there'd
- * only be one hash for both `versions' of the conffile.
- *
- * Overriding conffiles is a silly thing to do anyway :-).
- */
-
- modstatdb_note(pkg);
-
- /* On entry, the `new' version of each conffile has been
- * unpacked as *.dpkg-new, and the `installed' version is
- * as-yet untouched in `*'. The hash of the `old distributed'
- * version is in the conffiles data for the package.
- * If `*.dpkg-new' no longer exists we assume that we've already
- * processed this one.
- */
- varbufinit(&cdr);
- varbufinit(&cdr2);
- for (conff= pkg->installed.conffiles; conff; conff= conff->next) {
- r= conffderef(pkg, &cdr, conff->name);
- if (r == -1) {
- conff->hash= nfstrsave("-");
- continue;
- }
- md5hash(pkg,¤thash,cdr.buf);
-
- varbufreset(&cdr2);
- varbufaddstr(&cdr2,cdr.buf);
- cdr2.used+=50; varbufaddc(&cdr2,0); cdr2rest= cdr2.buf+strlen(cdr.buf);
- /* From now on we can just strcpy(cdr2rest,extension); */
-
- strcpy(cdr2rest,DPKGNEWEXT);
- /* If the .dpkg-new file is no longer there, ignore this one. */
- if (lstat(cdr2.buf,&stab)) {
- if (errno == ENOENT) continue;
- ohshite(_("unable to stat new dist conffile `%.250s'"),cdr2.buf);
- }
- md5hash(pkg,&newdisthash,cdr2.buf);
-
- /* Copy the permissions from the installed version to the new
- * distributed version.
- */
- if (!stat(cdr.buf,&stab)) {
- if (chown(cdr2.buf,stab.st_uid,stab.st_gid))
- ohshite(_("unable to change ownership of new dist conffile `%.250s'"),cdr2.buf);
- if (chmod(cdr2.buf,stab.st_mode & 07777))
- if (errno != ENOENT)
- ohshite(_("unable to set mode of new dist conffile `%.250s'"),cdr2.buf);
- } else {
- if (errno != ENOENT)
- ohshite(_("unable to stat current installed conffile `%.250s'"),cdr.buf);
- }
-
- if (!strcmp(currenthash,newdisthash)) {
- /* They're both the same so there's no point asking silly questions. */
- useredited= -1;
- distedited= -1;
- what= cfo_identical;
- } else if (!strcmp(currenthash,NONEXISTENTFLAG) && fc_conff_miss) {
- fprintf(stderr, _("\nConfiguration file `%s', does not exist on system.\n"
- "Installing new config file as you request.\n"), conff->name);
- what= cfo_newconff;
- useredited= -1;
- distedited= -1;
- } else if (!strcmp(conff->hash,NEWCONFFILEFLAG)) {
- if (!strcmp(currenthash,NONEXISTENTFLAG)) {
- what= cfo_newconff;
- useredited= -1;
- distedited= -1;
- } else {
- useredited= 1;
- distedited= 1;
- what= conffoptcells[useredited][distedited] | cfof_isnew;
- }
- } else {
- useredited= strcmp(conff->hash,currenthash) != 0;
- distedited= strcmp(conff->hash,newdisthash) != 0;
- what= conffoptcells[useredited][distedited];
- }
-
- debug(dbg_conff,
- "deferred_configure `%s' (= `%s') useredited=%d distedited=%d what=%o",
- conff->name, cdr.buf, useredited, distedited, what);
-
- /* When prompting we check for some of the force options. There are
- * several cases in which these occur.
- * - We have --force-confnew, in which we always use the new config file
- * - We have --force-confold, in which we always use the old config file
- * - We have --force-confdef, in which we always use the default action
- * if there is one. Note, there are cases where we will still prompt
- * - If we have --force-confdef and one of the others (new/old) then we
- * always use the default where we can. If there is no default, then we
- * use the new or old, depending on which --force-conf{old,new} was used.
- */
- if (what & cfof_prompt) {
-
- do {
-
- fprintf(stderr, _("\nConfiguration file `%s'"), conff->name);
- if (strcmp(conff->name,cdr.buf))
- fprintf(stderr,_(" (actually `%s')"),cdr.buf);
-
- if (cfof_isnew) {
-
- fprintf(stderr,
- _("\n"
- " ==> File on system created by you or by a script.\n"
- " ==> File also in package provided by package maintainer.\n"));
-
- } else {
-
- fprintf(stderr, useredited ?
- _("\n ==> Modified (by you or by a script) since installation.\n") :
- _("\n Not modified since installation.\n"));
-
- fprintf(stderr, distedited ?
- _(" ==> Package distributor has shipped an updated version.\n") :
- _(" Version in package is the same as at last installation.\n"));
-
- }
-
- if (!(fc_conff_def && (what & (cfof_install|cfof_keep)))) {
- if (fc_conff_new) {
- fprintf(stderr, _(" ==> Using new file as you requested.\n"));
- cc = 'y';
- break;
- } else if (fc_conff_old) {
- fprintf(stderr, _(" ==> Using current old file as you requested.\n"));
- cc = 'n';
- break;
- }
- }
-
- if (what & cfof_keep && fc_conff_def) {
- fprintf(stderr, _(" ==> Keeping old config file as default.\n"));
- cc = 'n';
- break;
- } else if (what & cfof_install && fc_conff_def) {
- fprintf(stderr, _(" ==> Using new config file as default.\n"));
- cc = 'y';
- break;
- }
-
- fprintf(stderr,
- _(" What would you like to do about it ? Your options are:\n"
- " Y or I : install the package maintainer's version\n"
- " N or O : keep your currently-installed version\n"
- " D : show the differences between the versions\n"
- " Z : background this process to examine the situation\n"));
-
- if (what & cfof_keep)
- fprintf(stderr, _(" The default action is to keep your current version.\n"));
- else if (what & cfof_install)
- fprintf(stderr, _(" The default action is to install the new version.\n"));
-
- s= strrchr(conff->name,'/');
- if (!s || !*++s) s= conff->name;
- fprintf(stderr, "*** %s (Y/I/N/O/D/Z) %s ? ",
- s,
- (what & cfof_keep) ? _("[default=N]") :
- (what & cfof_install) ? _("[default=Y]") : _("[no default]"));
-
- if (ferror(stderr))
- ohshite(_("error writing to stderr, discovered before conffile prompt"));
-
- cc= 0;
- while ((c= getchar()) != EOF && c != '\n')
- if (!isspace(c) && !cc) cc= tolower(c);
-
- if (c == EOF) {
- if (ferror(stdin)) ohshite(_("read error on stdin at conffile prompt"));
- ohshit(_("EOF on stdin at conffile prompt"));
- }
-
- if (!cc) {
- if (what & cfof_keep) { cc= 'n'; break; }
- else if (what & cfof_install) { cc= 'y'; break; }
- }
-
- /* fixme: say something if silently not install */
-
- if (cc == 'd') {
- if (!(c1= m_fork())) {
- const char* p;
- char cmdbuf[1024];
- p= getenv(PAGERENV);
- if (!p || !*p) p= DEFAULTPAGER;
- sprintf(cmdbuf, DIFF " -Nu %.250s %.250s | %.250s", cdr.buf, cdr2.buf, p);
- s= getenv(SHELLENV);
- if (!s || !*s) s= DEFAULTSHELL;
- execlp(s,s,"-c", cmdbuf, NULL);
- ohshite(_("failed to run %s (%.250s)"), DIFF, cmdbuf);
- }
- while ((r= waitpid(c1,&status,0)) == -1 && errno == EINTR);
- if (r != c1) { onerr_abort++; ohshite(_("wait for shell failed")); }
- }
-
- if (cc == 'z') {
-
- strcpy(cdr2rest, DPKGNEWEXT);
-
- fprintf(stderr,
- _("Your currently installed version of the file is in:\n"
- " %s\n"
- "The version contained in the new version of the package is in:\n"
- " %s\n"
- "If you decide to take care of the update yourself, perhaps by editing\n"
- " the installed version, you should choose `N' when you return, so that\n"
- " I do not mess up your careful work.\n"),
- cdr.buf, cdr2.buf);
-
- s= getenv(NOJOBCTRLSTOPENV);
- if (s && *s) {
- fputs(_("Type `exit' when you're done.\n"),stderr);
- if (!(c1= m_fork())) {
- s= getenv(SHELLENV);
- if (!s || !*s) s= DEFAULTSHELL;
- execlp(s,s,"-i",(char*)0);
- ohshite(_("failed to exec shell (%.250s)"),s);
- }
- while ((r= waitpid(c1,&status,0)) == -1 && errno == EINTR);
- if (r != c1) { onerr_abort++; ohshite(_("wait for shell failed")); }
- } else {
- fputs(_("Don't forget to foreground (`fg') this "
- "process when you're done !\n"),stderr);
- kill(-getpgid(0),SIGTSTP);
- }
- }
-
- } while (!strchr("yino",cc));
-
- switch (cc) {
- case 'i': case 'y': what= cfof_install | cfof_backup; break;
- case 'n': case 'o': what= cfof_keep | cfof_backup; break;
- default: internerr("unknown response");
- }
-
- }
-
- switch (what & ~cfof_isnew) {
- case cfo_keep | cfof_backup:
- strcpy(cdr2rest,DPKGOLDEXT);
- if (unlink(cdr2.buf) && errno != ENOENT)
- fprintf(stderr,
- _("dpkg: %s: warning - failed to remove old backup `%.250s': %s\n"),
- pkg->name, cdr2.buf, strerror(errno));
- cdr.used--;
- varbufaddstr(&cdr,DPKGDISTEXT);
- varbufaddc(&cdr,0);
- strcpy(cdr2rest,DPKGNEWEXT);
- if (rename(cdr2.buf,cdr.buf))
- fprintf(stderr,
- _("dpkg: %s: warning - failed to rename `%.250s' to `%.250s': %s\n"),
- pkg->name, cdr2.buf, cdr.buf, strerror(errno));
- break;
-
- case cfo_keep:
- strcpy(cdr2rest,DPKGNEWEXT);
- if (unlink(cdr2.buf))
- fprintf(stderr,
- _("dpkg: %s: warning - failed to remove `%.250s': %s\n"),
- pkg->name, cdr2.buf, strerror(errno));
- break;
-
- case cfo_install | cfof_backup:
- strcpy(cdr2rest,DPKGDISTEXT);
- if (unlink(cdr2.buf) && errno != ENOENT)
- fprintf(stderr,
- _("dpkg: %s: warning - failed to remove old distrib version `%.250s': %s\n"),
- pkg->name, cdr2.buf, strerror(errno));
- strcpy(cdr2rest,DPKGOLDEXT);
- if (unlink(cdr2.buf) && errno != ENOENT)
- fprintf(stderr,
- _("dpkg: %s: warning - failed to remove `%.250s' (before overwrite): %s\n"),
- pkg->name, cdr2.buf, strerror(errno));
- if (link(cdr.buf,cdr2.buf))
- fprintf(stderr,
- _("dpkg: %s: warning - failed to link `%.250s' to `%.250s': %s\n"),
- pkg->name, cdr.buf, cdr2.buf, strerror(errno));
- /* fall through */
- case cfo_install:
- printf(_("Installing new version of config file %s ...\n"),conff->name);
- case cfo_newconff:
- strcpy(cdr2rest,DPKGNEWEXT);
- if (rename(cdr2.buf,cdr.buf))
- ohshite(_("unable to install `%.250s' as `%.250s'"),cdr2.buf,cdr.buf);
- break;
-
- default:
- internerr("unknown what");
- }
-
- conff->hash= nfstrsave(newdisthash);
- modstatdb_note(pkg);
- free(newdisthash);
- free(currenthash);
-
- } /* for (conff= ... */
- varbuffree(&cdr);
- varbuffree(&cdr2);
-
- pkg->status= stat_halfconfigured;
- }
-
- assert(pkg->status == stat_halfconfigured);
-
- modstatdb_note(pkg);
-
- if (maintainer_script_installed(pkg, POSTINSTFILE, "post-installation",
- "configure",
- informativeversion(&pkg->configversion)
- ? versiondescribe(&pkg->configversion,
- vdew_nonambig)
- : "",
- (char*)0))
- putchar('\n');
-
- pkg->status= stat_installed;
- pkg->eflag= eflagv_ok;
- modstatdb_note(pkg);
-
+ /* The algorithm for deciding what to configure first is as follows:
+ * Loop through all packages doing a `try 1' until we've been round
+ * and nothing has been done, then do `try 2' and `try 3' likewise.
+ * The incrementing of `dependtry' is done by process_queue().
+ * Try 1:
+ * Are all dependencies of this package done ? If so, do it.
+ * Are any of the dependencies missing or the wrong version ?
+ * If so, abort (unless --force-depends, in which case defer)
+ * Will we need to configure a package we weren't given as an
+ * argument ? If so, abort - except if --force-configure-any,
+ * in which case we add the package to the argument list.
+ * If none of the above, defer the package.
+ * Try 2:
+ * Find a cycle and break it (see above).
+ * Do as for try 1.
+ * Try 3 (only if --force-depends-version).
+ * Same as for try 2, but don't mind version number in dependencies.
+ * Try 4 (only if --force-depends).
+ * Do anyway.
+ */
+ struct varbuf aemsgs, cdr, cdr2;
+ char *cdr2rest;
+ int ok, r, useredited, distedited;
+ struct conffile *conff;
+ char *currenthash= 0, *newdisthash= 0;
+ struct stat stab;
+ enum conffopt what;
+
+ if (pkg->status == stat_notinstalled)
+ ohshit(_("no package named `%s' is installed, cannot configure"),pkg->name);
+ if (pkg->status == stat_installed)
+ ohshit(_("package %.250s is already installed and configured"), pkg->name);
+ if (pkg->status != stat_unpacked && pkg->status != stat_halfconfigured)
+ ohshit(_("package %.250s is not ready for configuration\n"
+ " cannot configure (current status `%.250s')"),
+ pkg->name, statusinfos[pkg->status].name);
+
+ if (dependtry > 1)
+ if (findbreakcycle(pkg,0))
+ sincenothing= 0;
+
+ varbufinit(&aemsgs);
+ ok= dependencies_ok(pkg,0,&aemsgs);
+ if (ok == 1) {
+ varbuffree(&aemsgs);
+ pkg->clientdata->istobe= itb_installnew;
+ add_to_queue(pkg);
+ return;
+ } else if (ok == 0) {
+ sincenothing= 0;
+ varbufaddc(&aemsgs,0);
+ fprintf(stderr,
+ _("dpkg: dependency problems prevent configuration of %s:\n%s"),
+ pkg->name, aemsgs.buf);
+ varbuffree(&aemsgs);
+ ohshit(_("dependency problems - leaving unconfigured"));
+ } else if (aemsgs.used) {
+ varbufaddc(&aemsgs,0);
+ fprintf(stderr,
+ _("dpkg: %s: dependency problems, but configuring anyway as you request:\n%s"),
+ pkg->name, aemsgs.buf);
+ }
+ varbuffree(&aemsgs);
+ sincenothing= 0;
+
+ if (pkg->eflag & eflagf_reinstreq)
+ forcibleerr(fc_removereinstreq,
+ _("Package is in a very bad inconsistent state - you should\n"
+ " reinstall it before attempting configuration."));
+
+ printf(_("Setting up %s (%s) ...\n"),pkg->name,
+ versiondescribe(&pkg->installed.version,vdew_never));
+
+ if (f_noact) {
+ pkg->status= stat_installed;
+ pkg->clientdata->istobe= itb_normal;
+ return;
+ }
+
+ if (pkg->status == stat_unpacked) {
+ debug(dbg_general,"deferred_configure updating conffiles");
+ /* This will not do at all the right thing with overridden conffiles
+ * or conffiles that are the `target' of an override; all the references
+ * here would be to the `contested' filename, and in any case there'd
+ * only be one hash for both `versions' of the conffile.
+ *
+ * Overriding conffiles is a silly thing to do anyway :-).
+ */
+
+ modstatdb_note(pkg);
+
+ /* On entry, the `new' version of each conffile has been
+ * unpacked as *.dpkg-new, and the `installed' version is
+ * as-yet untouched in `*'. The hash of the `old distributed'
+ * version is in the conffiles data for the package.
+ * If `*.dpkg-new' no longer exists we assume that we've already
+ * processed this one.
+ */
+ varbufinit(&cdr);
+ varbufinit(&cdr2);
+ for (conff= pkg->installed.conffiles; conff; conff= conff->next) {
+ r= conffderef(pkg, &cdr, conff->name);
+ if (r == -1) {
+ conff->hash= nfstrsave("-");
+ continue;
+ }
+ md5hash(pkg,¤thash,cdr.buf);
+
+ varbufreset(&cdr2);
+ varbufaddstr(&cdr2,cdr.buf);
+ cdr2.used+=50; varbufaddc(&cdr2,0); cdr2rest= cdr2.buf+strlen(cdr.buf);
+ /* From now on we can just strcpy(cdr2rest,extension); */
+
+ strcpy(cdr2rest,DPKGNEWEXT);
+ /* If the .dpkg-new file is no longer there, ignore this one. */
+ if (lstat(cdr2.buf,&stab)) {
+ if (errno == ENOENT) continue;
+ ohshite(_("unable to stat new dist conffile `%.250s'"),cdr2.buf);
+ }
+ md5hash(pkg,&newdisthash,cdr2.buf);
+
+ /* Copy the permissions from the installed version to the new
+ * distributed version.
+ */
+ if (!stat(cdr.buf,&stab))
+ copyfileperm(cdr.buf, cdr2.buf);
+ else if (errno != ENOENT)
+ ohshite(_("unable to stat current installed conffile `%.250s'"),cdr.buf);
+
+ /* Select what the do */
+ if (!strcmp(currenthash,newdisthash)) {
+ /* They're both the same so there's no point asking silly questions. */
+ useredited= -1;
+ distedited= -1;
+ what= cfo_identical;
+ } else if (!strcmp(currenthash,NONEXISTENTFLAG) && fc_conff_miss) {
+ fprintf(stderr, _("\nConfiguration file `%s', does not exist on system.\n"
+ "Installing new config file as you request.\n"), conff->name);
+ what= cfo_newconff;
+ useredited= -1;
+ distedited= -1;
+ } else if (!strcmp(conff->hash,NEWCONFFILEFLAG)) {
+ if (!strcmp(currenthash,NONEXISTENTFLAG)) {
+ what= cfo_newconff;
+ useredited= -1;
+ distedited= -1;
+ } else {
+ useredited= 1;
+ distedited= 1;
+ what= conffoptcells[useredited][distedited] | cfof_isnew;
+ }
+ } else {
+ useredited= strcmp(conff->hash,currenthash) != 0;
+ distedited= strcmp(conff->hash,newdisthash) != 0;
+ what= conffoptcells[useredited][distedited];
+ }
+
+ debug(dbg_conff,
+ "deferred_configure `%s' (= `%s') useredited=%d distedited=%d what=%o",
+ conff->name, cdr.buf, useredited, distedited, what);
+
+ what=promptconfaction(conff->name, cdr.buf, cdr2.buf, useredited, distedited, what);
+
+ switch (what & ~cfof_isnew) {
+ case cfo_keep | cfof_backup:
+ strcpy(cdr2rest,DPKGOLDEXT);
+ if (unlink(cdr2.buf) && errno != ENOENT)
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to remove old backup `%.250s': %s\n"),
+ pkg->name, cdr2.buf, strerror(errno));
+ cdr.used--;
+ varbufaddstr(&cdr,DPKGDISTEXT);
+ varbufaddc(&cdr,0);
+ strcpy(cdr2rest,DPKGNEWEXT);
+ if (rename(cdr2.buf,cdr.buf))
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to rename `%.250s' to `%.250s': %s\n"),
+ pkg->name, cdr2.buf, cdr.buf, strerror(errno));
+ break;
+
+ case cfo_keep:
+ strcpy(cdr2rest,DPKGNEWEXT);
+ if (unlink(cdr2.buf))
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to remove `%.250s': %s\n"),
+ pkg->name, cdr2.buf, strerror(errno));
+ break;
+
+ case cfo_install | cfof_backup:
+ strcpy(cdr2rest,DPKGDISTEXT);
+ if (unlink(cdr2.buf) && errno != ENOENT)
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to remove old distrib version `%.250s': %s\n"),
+ pkg->name, cdr2.buf, strerror(errno));
+ strcpy(cdr2rest,DPKGOLDEXT);
+ if (unlink(cdr2.buf) && errno != ENOENT)
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to remove `%.250s' (before overwrite): %s\n"),
+ pkg->name, cdr2.buf, strerror(errno));
+ if (link(cdr.buf,cdr2.buf))
+ fprintf(stderr,
+ _("dpkg: %s: warning - failed to link `%.250s' to `%.250s': %s\n"),
+ pkg->name, cdr.buf, cdr2.buf, strerror(errno));
+ /* fall through */
+ case cfo_install:
+ printf(_("Installing new version of config file %s ...\n"),conff->name);
+ case cfo_newconff:
+ strcpy(cdr2rest,DPKGNEWEXT);
+ if (rename(cdr2.buf,cdr.buf))
+ ohshite(_("unable to install `%.250s' as `%.250s'"),cdr2.buf,cdr.buf);
+ break;
+
+ default:
+ internerr("unknown what");
+ }
+
+ conff->hash= nfstrsave(newdisthash);
+ modstatdb_note(pkg);
+ free(newdisthash);
+ free(currenthash);
+
+ } /* for (conff= ... */
+ varbuffree(&cdr);
+ varbuffree(&cdr2);
+
+ pkg->status= stat_halfconfigured;
+ }
+
+ assert(pkg->status == stat_halfconfigured);
+
+ modstatdb_note(pkg);
+
+ if (maintainer_script_installed(pkg, POSTINSTFILE, "post-installation",
+ "configure",
+ informativeversion(&pkg->configversion)
+ ? versiondescribe(&pkg->configversion,
+ vdew_nonambig)
+ : "",
+ (char*)0))
+ putchar('\n');
+
+ pkg->status= stat_installed;
+ pkg->eflag= eflagv_ok;
+ modstatdb_note(pkg);
}
+
+
+/* Dereference a file by following all possibly used symlinks.
+ * Returns 0 if everything went ok, -1 otherwise.
+ */
int conffderef(struct pkginfo *pkg, struct varbuf *result, const char *in) {
- /* returns 0 if all OK, -1 if some kind of error. */
- static char *linkreadbuf= 0;
- static int linkreadbufsize= 0;
- struct stat stab;
- int r, need;
- int loopprotect;
-
- varbufreset(result);
- varbufaddstr(result,instdir);
- if (*in != '/') varbufaddc(result,'/');
- varbufaddstr(result,in);
- varbufaddc(result,0);
-
- loopprotect= 0;
-
- for (;;) {
- debug(dbg_conffdetail,"conffderef in=`%s' current working=`%s'", in, result->buf);
- if (lstat(result->buf,&stab)) {
- if (errno != ENOENT)
- fprintf(stderr, _("dpkg: %s: warning - unable to stat config file `%s'\n"
- " (= `%s'): %s\n"),
- pkg->name, in, result->buf, strerror(errno));
- debug(dbg_conffdetail,"conffderef nonexistent");
- return 0;
- } else if (S_ISREG(stab.st_mode)) {
- debug(dbg_conff,"conffderef in=`%s' result=`%s'", in, result->buf);
- return 0;
- } else if (S_ISLNK(stab.st_mode)) {
- debug(dbg_conffdetail,"conffderef symlink loopprotect=%d",loopprotect);
- if (loopprotect++ >= 25) {
- fprintf(stderr, _("dpkg: %s: warning - config file `%s' is a circular link\n"
- " (= `%s')\n"), pkg->name, in, result->buf);
- return -1;
- }
- need= 255;
- for (;;) {
- if (need > linkreadbufsize) {
- linkreadbuf= m_realloc(linkreadbuf,need);
- linkreadbufsize= need;
- debug(dbg_conffdetail,"conffderef readlink realloc(%d)=%p",need,linkreadbuf);
- }
- r= readlink(result->buf,linkreadbuf,linkreadbufsize-1);
- if (r < 0) {
- fprintf(stderr, _("dpkg: %s: warning - unable to readlink conffile `%s'\n"
- " (= `%s'): %s\n"),
- pkg->name, in, result->buf, strerror(errno));
- return -1;
- }
- debug(dbg_conffdetail,"conffderef readlink gave %d, `%.*s'",
- r, r>0 ? r : 0, linkreadbuf);
- if (r < linkreadbufsize-1) break;
- need= r<<2;
- }
- linkreadbuf[r]= 0;
- if (linkreadbuf[0] == '/') {
- varbufreset(result);
- varbufaddstr(result,instdir);
- debug(dbg_conffdetail,"conffderef readlink absolute");
- } else {
- for (r=result->used-2; r>0 && result->buf[r] != '/'; r--);
- if (r < 0) {
- fprintf(stderr,
- _("dpkg: %s: warning - conffile `%.250s' resolves to degenerate filename\n"
- " (`%s' is a symlink to `%s')\n"),
- pkg->name, in, result->buf, linkreadbuf);
- return -1;
- }
- if (result->buf[r] == '/') r++;
- result->used= r;
- debug(dbg_conffdetail,"conffderef readlink relative to `%.*s'",
- (int)result->used, result->buf);
- }
- varbufaddstr(result,linkreadbuf);
- varbufaddc(result,0);
- } else {
- fprintf(stderr, _("dpkg: %s: warning - conffile `%.250s' is not a plain"
- " file or symlink (= `%s')\n"),
- pkg->name, in, result->buf);
- return -1;
- }
- }
+ static char* linkreadbuf = 0;
+ static int linkreadbufsize = 0;
+ struct stat stab;
+ int r, need;
+ int loopprotect;
+
+ varbufreset(result);
+ varbufaddstr(result,instdir);
+ if (*in != '/') varbufaddc(result,'/');
+ varbufaddstr(result,in);
+ varbufaddc(result,0);
+
+ loopprotect= 0;
+
+ for (;;) {
+ debug(dbg_conffdetail,"conffderef in=`%s' current working=`%s'", in, result->buf);
+ if (lstat(result->buf,&stab)) {
+ if (errno != ENOENT)
+ fprintf(stderr, _("dpkg: %s: warning - unable to stat config file `%s'\n"
+ " (= `%s'): %s\n"),
+ pkg->name, in, result->buf, strerror(errno));
+ debug(dbg_conffdetail,"conffderef nonexistent");
+ return 0;
+ } else if (S_ISREG(stab.st_mode)) {
+ debug(dbg_conff,"conffderef in=`%s' result=`%s'", in, result->buf);
+ return 0;
+ } else if (S_ISLNK(stab.st_mode)) {
+ debug(dbg_conffdetail,"conffderef symlink loopprotect=%d",loopprotect);
+ if (loopprotect++ >= 25) {
+ fprintf(stderr, _("dpkg: %s: warning - config file `%s' is a circular link\n"
+ " (= `%s')\n"), pkg->name, in, result->buf);
+ return -1;
+ }
+ need= 255;
+ for (;;) {
+ if (need > linkreadbufsize) {
+ linkreadbuf= m_realloc(linkreadbuf,need);
+ linkreadbufsize= need;
+ debug(dbg_conffdetail,"conffderef readlink realloc(%d)=%p",need,linkreadbuf);
+ }
+ r= readlink(result->buf,linkreadbuf,linkreadbufsize-1);
+ if (r < 0) {
+ fprintf(stderr, _("dpkg: %s: warning - unable to readlink conffile `%s'\n"
+ " (= `%s'): %s\n"),
+ pkg->name, in, result->buf, strerror(errno));
+ return -1;
+ }
+ debug(dbg_conffdetail,"conffderef readlink gave %d, `%.*s'",
+ r, r>0 ? r : 0, linkreadbuf);
+ if (r < linkreadbufsize-1) break;
+ need= r<<2;
+ }
+ linkreadbuf[r]= 0;
+ if (linkreadbuf[0] == '/') {
+ varbufreset(result);
+ varbufaddstr(result,instdir);
+ debug(dbg_conffdetail,"conffderef readlink absolute");
+ } else {
+ for (r=result->used-2; r>0 && result->buf[r] != '/'; r--)
+ ;
+ if (r < 0) {
+ fprintf(stderr,
+ _("dpkg: %s: warning - conffile `%.250s' resolves to degenerate filename\n"
+ " (`%s' is a symlink to `%s')\n"),
+ pkg->name, in, result->buf, linkreadbuf);
+ return -1;
+ }
+ if (result->buf[r] == '/') r++;
+ result->used= r;
+ debug(dbg_conffdetail,"conffderef readlink relative to `%.*s'",
+ (int)result->used, result->buf);
+ }
+ varbufaddstr(result,linkreadbuf);
+ varbufaddc(result,0);
+ } else {
+ fprintf(stderr, _("dpkg: %s: warning - conffile `%.250s' is not a plain"
+ " file or symlink (= `%s')\n"),
+ pkg->name, in, result->buf);
+ return -1;
+ }
+ }
}
+/* Generate a MD5 hash for fn and store it in *hashbuf. Memory is allocated
+ * by this function and should be freed manually.
+ */
static void md5hash(struct pkginfo *pkg, char **hashbuf, const char *fn) {
- static int fd;
-
- fd= open(fn,O_RDONLY);
- if (fd >= 0) {
- push_cleanup(cu_closefd,ehflag_bombout, 0,0, 1,&fd);
- fd_md5(fd, hashbuf, -1, _("md5hash"));
- pop_cleanup(ehflag_normaltidy); /* fd= open(cdr.buf) */
- close(fd);
- } else if (errno == ENOENT) {
- *hashbuf= strdup(NONEXISTENTFLAG);
- } else {
- fprintf(stderr, _("dpkg: %s: warning - unable to open conffile %s for hash: %s\n"),
- pkg->name, fn, strerror(errno));
- *hashbuf= strdup("-");
- }
-}
+ static int fd;
+
+ fd=open(fn,O_RDONLY);
+
+ if (fd>=0) {
+ push_cleanup(cu_closefd,ehflag_bombout, 0,0, 1,&fd);
+ fd_md5(fd, hashbuf, -1, _("md5hash"));
+ pop_cleanup(ehflag_normaltidy); /* fd= open(cdr.buf) */
+ close(fd);
+ } else if (errno==ENOENT) {
+ *hashbuf= strdup(NONEXISTENTFLAG);
+ } else {
+ fprintf(stderr, _("dpkg: %s: warning - unable to open conffile %s for hash: %s\n"),
+ pkg->name, fn, strerror(errno));
+ *hashbuf= strdup("-");
+ }
+}
+
+/* Copy file ownership and permissions from one file to another
+ */
+static void copyfileperm(const char* source, const char* target) {
+ struct stat stab;
+
+ if (stat(source, &stab)==-1) {
+ if (errno==ENOENT)
+ return;
+ ohshite(_("unable to stat current installed conffile `%.250s'"), source);
+ }
+
+ if (chown(target, stab.st_uid, stab.st_gid)==-1)
+ ohshite(_("unable to change ownership of new dist conffile `%.250s'"), target);
+
+ if (chmod(target, (stab.st_mode & 07777))==-1)
+ ohshite(_("unable to set mode of new dist conffile `%.250s'"), target);
+}
+
+
+
+
+/* Show a diff between two files
+ */
+static void showdiff(const char* old, const char* new) {
+ int pid;
+ int r;
+ int status;
+
+ if (!(pid=m_fork())) {
+ /* Child process */
+ const char* p; /* pager */
+ const char* s; /* shell */
+ char cmdbuf[1024]; /* command to run */
+
+ p=getenv(PAGERENV);
+ if (!p || !*p)
+ p=DEFAULTPAGER;
+
+ sprintf(cmdbuf, DIFF " -Nu %.250s %.250s | %.250s", old, new, p);
+
+ s=getenv(SHELLENV);
+ if (!s || !*s)
+ s=DEFAULTSHELL;
+
+ execlp(s,s,"-c", cmdbuf, NULL);
+ ohshite(_("failed to run %s (%.250s)"), DIFF, cmdbuf);
+ }
+
+ /* Parent process */
+ while (((r=waitpid(pid,&status,0))==-1) && (errno==EINTR))
+ ;
+
+ if (r!=pid) {
+ onerr_abort++;
+ ohshite(_("wait for shell failed"));
+ }
+}
+
+
+/* Suspend dpkg temporarily
+ */
+static void suspend() {
+ const char* s;
+ int pid;
+
+ s= getenv(NOJOBCTRLSTOPENV);
+ if (s && *s) {
+ /* Do not job control to suspend but fork and start a new shell
+ * instead.
+ */
+
+ int status; /* waitpid status */
+ int r; /* waitpid result */
+
+ fputs(_("Type `exit' when you're done.\n"), stderr);
+
+ if (!(pid= m_fork())) {
+ /* Child process */
+ s= getenv(SHELLENV);
+ if (!s || !*s)
+ s=DEFAULTSHELL;
+
+ execlp(s,s,"-i",(char*)0);
+ ohshite(_("failed to exec shell (%.250s)"),s);
+ }
+
+ /* Parent process */
+ while (((r=waitpid(pid,&status,0))==-1) && (errno==EINTR))
+ ;
+
+ if (r!=pid) {
+ onerr_abort++;
+ ohshite(_("wait for shell failed"));
+ }
+ } else {
+ fputs(_("Don't forget to foreground (`fg') this "
+ "process when you're done !\n"), stderr);
+ kill(-getpgid(0),SIGTSTP);
+ }
+}
+
+
+/* Select what to do with a configuration file.
+ */
+static enum conffopt promptconfaction(const char* cfgfile, const char* realold,
+ const char* realnew, int useredited, int distedited,
+ enum conffopt what) {
+ const char *s;
+ int c, cc;
+
+ if (!(what&cfof_prompt))
+ return what;
+
+ do {
+ fprintf(stderr, _("\nConfiguration file `%s'"), cfgfile);
+ if (strcmp(cfgfile, realold))
+ fprintf(stderr,_(" (actually `%s')"), realold);
+
+ if (what & cfof_isnew) {
+ fprintf(stderr,
+ _("\n"
+ " ==> File on system created by you or by a script.\n"
+ " ==> File also in package provided by package maintainer.\n"));
+ } else {
+ fprintf(stderr, useredited ?
+ _("\n ==> Modified (by you or by a script) since installation.\n") :
+ _("\n Not modified since installation.\n"));
+
+ fprintf(stderr, distedited ?
+ _(" ==> Package distributor has shipped an updated version.\n") :
+ _(" Version in package is the same as at last installation.\n"));
+ }
+
+ /* No --force-confdef but a forcible situtation */
+ /* TODO: check if this condition can not be simplified to just !fc_conff_def */
+ if (!(fc_conff_def && (what&(cfof_install|cfof_keep)))) {
+ if (fc_conff_new) {
+ fprintf(stderr, _(" ==> Using new file as you requested.\n"));
+ cc = 'y';
+ break;
+ } else if (fc_conff_old) {
+ fprintf(stderr, _(" ==> Using current old file as you requested.\n"));
+ cc = 'n';
+ break;
+ }
+ }
+
+
+ /* Force the default action (if there is one */
+ if (fc_conff_def) {
+ if (what&cfof_keep) {
+ fprintf(stderr, _(" ==> Keeping old config file as default.\n"));
+ cc = 'n';
+ break;
+ } else if (what&cfof_install) {
+ fprintf(stderr, _(" ==> Using new config file as default.\n"));
+ cc = 'y';
+ break;
+ }
+ }
+
+
+ fprintf(stderr,
+ _(" What would you like to do about it ? Your options are:\n"
+ " Y or I : install the package maintainer's version\n"
+ " N or O : keep your currently-installed version\n"
+ " D : show the differences between the versions\n"
+ " Z : background this process to examine the situation\n"));
+
+ if (what & cfof_keep)
+ fprintf(stderr, _(" The default action is to keep your current version.\n"));
+ else if (what & cfof_install)
+ fprintf(stderr, _(" The default action is to install the new version.\n"));
+
+ s= strrchr(cfgfile,'/');
+ if (!s || !*++s) s= cfgfile;
+ fprintf(stderr, "*** %s (Y/I/N/O/D/Z) %s ? ",
+ s,
+ (what & cfof_keep) ? _("[default=N]") :
+ (what & cfof_install) ? _("[default=Y]") : _("[no default]"));
+
+ if (ferror(stderr))
+ ohshite(_("error writing to stderr, discovered before conffile prompt"));
+
+ cc= 0;
+ while ((c= getchar()) != EOF && c != '\n')
+ if (!isspace(c) && !cc) cc= tolower(c);
+
+ if (c == EOF) {
+ if (ferror(stdin)) ohshite(_("read error on stdin at conffile prompt"));
+ ohshit(_("EOF on stdin at conffile prompt"));
+ }
+
+ if (!cc) {
+ if (what & cfof_keep) { cc= 'n'; break; }
+ else if (what & cfof_install) { cc= 'y'; break; }
+ }
+
+ /* fixme: say something if silently not install */
+ if (cc == 'd')
+ showdiff(realold, realnew);
+
+ if (cc == 'z')
+ suspend();
+
+ } while (!strchr("yino",cc));
+
+
+ switch (cc) {
+ case 'i':
+ case 'y':
+ what=cfof_install|cfof_backup;
+ break;
+
+ case 'n':
+ case 'o':
+ what=cfof_keep|cfof_backup;
+ break;
+
+ default:
+ internerr("unknown response");
+ }
+
+ return what;
+}
projects / dpkg / commitdiff