apt-pkg/deb/dpkgpm.cc

   1 // -*- mode: cpp; mode: fold -*-
   2 // Description                                                          /*{{{*/
   3 // $Id: dpkgpm.cc,v 1.28 2004/01/27 02:25:01 mdz Exp $
   4 /* ######################################################################
   5
   6    DPKG Package Manager - Provide an interface to dpkg
   7
   8    ##################################################################### */
   9                                                                         /*}}}*/
  10 // Includes                                                             /*{{{*/
  11 #include <apt-pkg/dpkgpm.h>
  12 #include <apt-pkg/error.h>
  13 #include <apt-pkg/configuration.h>
  14 #include <apt-pkg/depcache.h>
  15 #include <apt-pkg/pkgrecords.h>
  16 #include <apt-pkg/strutl.h>
  17 #include <apti18n.h>
  18 #include <apt-pkg/fileutl.h>
  19
  20 #include <unistd.h>
  21 #include <stdlib.h>
  22 #include <fcntl.h>
  23 #include <sys/select.h>
  24 #include <sys/stat.h>
  25 #include <sys/types.h>
  26 #include <sys/wait.h>
  27 #include <signal.h>
  28 #include <errno.h>
  29 #include <string.h>
  30 #include <stdio.h>
  31 #include <string.h>
  32 #include <algorithm>
  33 #include <sstream>
  34 #include <map>
  35
  36 #include <termios.h>
  37 #include <unistd.h>
  38 #include <sys/ioctl.h>
  39 #include <pty.h>
  40
  41 #include <config.h>
  42 #include <apti18n.h>
  43                                                                         /*}}}*/
  44
  45 using namespace std;
  46
  47 namespace
  48 {
  49   // Maps the dpkg "processing" info to human readable names.  Entry 0
  50   // of each array is the key, entry 1 is the value.
  51   const std::pair<const char *, const char *> PackageProcessingOps[] = {
  52     std::make_pair("install",   N_("Installing %s")),
  53     std::make_pair("configure", N_("Configuring %s")),
  54     std::make_pair("remove",    N_("Removing %s")),
  55     std::make_pair("purge",    N_("Completely removing %s")),
  56     std::make_pair("disappear", N_("Noting disappearance of %s")),
  57     std::make_pair("trigproc",  N_("Running post-installation trigger %s"))
  58   };
  59
  60   const std::pair<const char *, const char *> * const PackageProcessingOpsBegin = PackageProcessingOps;
  61   const std::pair<const char *, const char *> * const PackageProcessingOpsEnd   = PackageProcessingOps + sizeof(PackageProcessingOps) / sizeof(PackageProcessingOps[0]);
  62
  63   // Predicate to test whether an entry in the PackageProcessingOps
  64   // array matches a string.
  65   class MatchProcessingOp
  66   {
  67     const char *target;
  68
  69   public:
  70     MatchProcessingOp(const char *the_target)
  71       : target(the_target)
  72     {
  73     }
  74
  75     bool operator()(const std::pair<const char *, const char *> &pair) const
  76     {
  77       return strcmp(pair.first, target) == 0;
  78     }
  79   };
  80 }
  81
  82 /* helper function to ionice the given PID
  83
  84  there is no C header for ionice yet - just the syscall interface
  85  so we use the binary from util-linux
  86 */
  87 static bool
  88 ionice(int PID)
  89 {
  90    if (!FileExists("/usr/bin/ionice"))
  91       return false;
  92    pid_t Process = ExecFork();
  93    if (Process == 0)
  94    {
  95       char buf[32];
  96       snprintf(buf, sizeof(buf), "-p%d", PID);
  97       const char *Args[4];
  98       Args[0] = "/usr/bin/ionice";
  99       Args[1] = "-c3";
 100       Args[2] = buf;
 101       Args[3] = 0;
 102       execv(Args[0], (char **)Args);
 103    }
 104    return ExecWait(Process, "ionice");
 105 }
 106
 107 // DPkgPM::pkgDPkgPM - Constructor                                      /*{{{*/
 108 // ---------------------------------------------------------------------
 109 /* */
 110 pkgDPkgPM::pkgDPkgPM(pkgDepCache *Cache)
 111    : pkgPackageManager(Cache), dpkgbuf_pos(0),
 112      term_out(NULL), history_out(NULL), PackagesDone(0), PackagesTotal(0)
 113 {
 114 }
 115                                                                         /*}}}*/
 116 // DPkgPM::pkgDPkgPM - Destructor                                       /*{{{*/
 117 // ---------------------------------------------------------------------
 118 /* */
 119 pkgDPkgPM::~pkgDPkgPM()
 120 {
 121 }
 122                                                                         /*}}}*/
 123 // DPkgPM::Install - Install a package                                  /*{{{*/
 124 // ---------------------------------------------------------------------
 125 /* Add an install operation to the sequence list */
 126 bool pkgDPkgPM::Install(PkgIterator Pkg,string File)
 127 {
 128    if (File.empty() == true || Pkg.end() == true)
 129       return _error->Error("Internal Error, No file name for %s",Pkg.Name());
 130
 131    // If the filename string begins with DPkg::Chroot-Directory, return the
 132    // substr that is within the chroot so dpkg can access it.
 133    string const chrootdir = _config->FindDir("DPkg::Chroot-Directory","/");
 134    if (chrootdir != "/" && File.find(chrootdir) == 0)
 135    {
 136       size_t len = chrootdir.length();
 137       if (chrootdir.at(len - 1) == '/')
 138         len--;
 139       List.push_back(Item(Item::Install,Pkg,File.substr(len)));
 140    }
 141    else
 142       List.push_back(Item(Item::Install,Pkg,File));
 143
 144    return true;
 145 }
 146                                                                         /*}}}*/
 147 // DPkgPM::Configure - Configure a package                              /*{{{*/
 148 // ---------------------------------------------------------------------
 149 /* Add a configure operation to the sequence list */
 150 bool pkgDPkgPM::Configure(PkgIterator Pkg)
 151 {
 152    if (Pkg.end() == true)
 153       return false;
 154
 155    List.push_back(Item(Item::Configure, Pkg));
 156
 157    // Use triggers for config calls if we configure "smart"
 158    // as otherwise Pre-Depends will not be satisfied, see #526774
 159    if (_config->FindB("DPkg::TriggersPending", false) == true)
 160       List.push_back(Item(Item::TriggersPending, PkgIterator()));
 161
 162    return true;
 163 }
 164                                                                         /*}}}*/
 165 // DPkgPM::Remove - Remove a package                                    /*{{{*/
 166 // ---------------------------------------------------------------------
 167 /* Add a remove operation to the sequence list */
 168 bool pkgDPkgPM::Remove(PkgIterator Pkg,bool Purge)
 169 {
 170    if (Pkg.end() == true)
 171       return false;
 172
 173    if (Purge == true)
 174       List.push_back(Item(Item::Purge,Pkg));
 175    else
 176       List.push_back(Item(Item::Remove,Pkg));
 177    return true;
 178 }
 179                                                                         /*}}}*/
 180 // DPkgPM::SendV2Pkgs - Send version 2 package info                     /*{{{*/
 181 // ---------------------------------------------------------------------
 182 /* This is part of the helper script communication interface, it sends
 183    very complete information down to the other end of the pipe.*/
 184 bool pkgDPkgPM::SendV2Pkgs(FILE *F)
 185 {
 186    fprintf(F,"VERSION 2\n");
 187
 188    /* Write out all of the configuration directives by walking the
 189       configuration tree */
 190    const Configuration::Item *Top = _config->Tree(0);
 191    for (; Top != 0;)
 192    {
 193       if (Top->Value.empty() == false)
 194       {
 195          fprintf(F,"%s=%s\n",
 196                  QuoteString(Top->FullTag(),"=\"\n").c_str(),
 197                  QuoteString(Top->Value,"\n").c_str());
 198       }
 199
 200       if (Top->Child != 0)
 201       {
 202          Top = Top->Child;
 203          continue;
 204       }
 205
 206       while (Top != 0 && Top->Next == 0)
 207          Top = Top->Parent;
 208       if (Top != 0)
 209          Top = Top->Next;
 210    }
 211    fprintf(F,"\n");
 212
 213    // Write out the package actions in order.
 214    for (vector<Item>::iterator I = List.begin(); I != List.end(); I++)
 215    {
 216       if(I->Pkg.end() == true)
 217          continue;
 218
 219       pkgDepCache::StateCache &S = Cache[I->Pkg];
 220
 221       fprintf(F,"%s ",I->Pkg.Name());
 222       // Current version
 223       if (I->Pkg->CurrentVer == 0)
 224          fprintf(F,"- ");
 225       else
 226          fprintf(F,"%s ",I->Pkg.CurrentVer().VerStr());
 227
 228       // Show the compare operator
 229       // Target version
 230       if (S.InstallVer != 0)
 231       {
 232          int Comp = 2;
 233          if (I->Pkg->CurrentVer != 0)
 234             Comp = S.InstVerIter(Cache).CompareVer(I->Pkg.CurrentVer());
 235          if (Comp < 0)
 236             fprintf(F,"> ");
 237          if (Comp == 0)
 238             fprintf(F,"= ");
 239          if (Comp > 0)
 240             fprintf(F,"< ");
 241          fprintf(F,"%s ",S.InstVerIter(Cache).VerStr());
 242       }
 243       else
 244          fprintf(F,"> - ");
 245
 246       // Show the filename/operation
 247       if (I->Op == Item::Install)
 248       {
 249          // No errors here..
 250          if (I->File[0] != '/')
 251             fprintf(F,"**ERROR**\n");
 252          else
 253             fprintf(F,"%s\n",I->File.c_str());
 254       }
 255       if (I->Op == Item::Configure)
 256          fprintf(F,"**CONFIGURE**\n");
 257       if (I->Op == Item::Remove ||
 258           I->Op == Item::Purge)
 259          fprintf(F,"**REMOVE**\n");
 260
 261       if (ferror(F) != 0)
 262          return false;
 263    }
 264    return true;
 265 }
 266                                                                         /*}}}*/
 267 // DPkgPM::RunScriptsWithPkgs - Run scripts with package names on stdin /*{{{*/
 268 // ---------------------------------------------------------------------
 269 /* This looks for a list of scripts to run from the configuration file
 270    each one is run and is fed on standard input a list of all .deb files
 271    that are due to be installed. */
 272 bool pkgDPkgPM::RunScriptsWithPkgs(const char *Cnf)
 273 {
 274    Configuration::Item const *Opts = _config->Tree(Cnf);
 275    if (Opts == 0 || Opts->Child == 0)
 276       return true;
 277    Opts = Opts->Child;
 278
 279    unsigned int Count = 1;
 280    for (; Opts != 0; Opts = Opts->Next, Count++)
 281    {
 282       if (Opts->Value.empty() == true)
 283          continue;
 284
 285       // Determine the protocol version
 286       string OptSec = Opts->Value;
 287       string::size_type Pos;
 288       if ((Pos = OptSec.find(' ')) == string::npos || Pos == 0)
 289          Pos = OptSec.length();
 290       OptSec = "DPkg::Tools::Options::" + string(Opts->Value.c_str(),Pos);
 291
 292       unsigned int Version = _config->FindI(OptSec+"::Version",1);
 293
 294       // Create the pipes
 295       int Pipes[2];
 296       if (pipe(Pipes) != 0)
 297          return _error->Errno("pipe","Failed to create IPC pipe to subprocess");
 298       SetCloseExec(Pipes[0],true);
 299       SetCloseExec(Pipes[1],true);
 300
 301       // Purified Fork for running the script
 302       pid_t Process = ExecFork();
 303       if (Process == 0)
 304       {
 305          // Setup the FDs
 306          dup2(Pipes[0],STDIN_FILENO);
 307          SetCloseExec(STDOUT_FILENO,false);
 308          SetCloseExec(STDIN_FILENO,false);
 309          SetCloseExec(STDERR_FILENO,false);
 310
 311          const char *Args[4];
 312          Args[0] = "/bin/sh";
 313          Args[1] = "-c";
 314          Args[2] = Opts->Value.c_str();
 315          Args[3] = 0;
 316          execv(Args[0],(char **)Args);
 317          _exit(100);
 318       }
 319       close(Pipes[0]);
 320       FILE *F = fdopen(Pipes[1],"w");
 321       if (F == 0)
 322          return _error->Errno("fdopen","Faild to open new FD");
 323
 324       // Feed it the filenames.
 325       if (Version <= 1)
 326       {
 327          for (vector<Item>::iterator I = List.begin(); I != List.end(); I++)
 328          {
 329             // Only deal with packages to be installed from .deb
 330             if (I->Op != Item::Install)
 331                continue;
 332
 333             // No errors here..
 334             if (I->File[0] != '/')
 335                continue;
 336
 337             /* Feed the filename of each package that is pending install
 338                into the pipe. */
 339             fprintf(F,"%s\n",I->File.c_str());
 340             if (ferror(F) != 0)
 341                break;
 342          }
 343       }
 344       else
 345          SendV2Pkgs(F);
 346
 347       fclose(F);
 348
 349       // Clean up the sub process
 350       if (ExecWait(Process,Opts->Value.c_str()) == false)
 351          return _error->Error("Failure running script %s",Opts->Value.c_str());
 352    }
 353
 354    return true;
 355 }
 356                                                                         /*}}}*/
 357 // DPkgPM::DoStdin - Read stdin and pass to slave pty                   /*{{{*/
 358 // ---------------------------------------------------------------------
 359 /*
 360 */
 361 void pkgDPkgPM::DoStdin(int master)
 362 {
 363    unsigned char input_buf[256] = {0,};
 364    ssize_t len = read(0, input_buf, sizeof(input_buf));
 365    if (len)
 366       write(master, input_buf, len);
 367    else
 368       stdin_is_dev_null = true;
 369 }
 370                                                                         /*}}}*/
 371 // DPkgPM::DoTerminalPty - Read the terminal pty and write log          /*{{{*/
 372 // ---------------------------------------------------------------------
 373 /*
 374  * read the terminal pty and write log
 375  */
 376 void pkgDPkgPM::DoTerminalPty(int master)
 377 {
 378    unsigned char term_buf[1024] = {0,0, };
 379
 380    ssize_t len=read(master, term_buf, sizeof(term_buf));
 381    if(len == -1 && errno == EIO)
 382    {
 383       // this happens when the child is about to exit, we
 384       // give it time to actually exit, otherwise we run
 385       // into a race
 386       usleep(500000);
 387       return;
 388    }
 389    if(len <= 0)
 390       return;
 391    write(1, term_buf, len);
 392    if(term_out)
 393       fwrite(term_buf, len, sizeof(char), term_out);
 394 }
 395                                                                         /*}}}*/
 396 // DPkgPM::ProcessDpkgStatusBuf                                         /*{{{*/
 397 // ---------------------------------------------------------------------
 398 /*
 399  */
 400 void pkgDPkgPM::ProcessDpkgStatusLine(int OutStatusFd, char *line)
 401 {
 402    bool const Debug = _config->FindB("Debug::pkgDPkgProgressReporting",false);
 403    // the status we output
 404    ostringstream status;
 405
 406    if (Debug == true)
 407       std::clog << "got from dpkg '" << line << "'" << std::endl;
 408
 409
 410    /* dpkg sends strings like this:
 411       'status:   <pkg>:  <pkg  qstate>'
 412       errors look like this:
 413       'status: /var/cache/apt/archives/krecipes_0.8.1-0ubuntu1_i386.deb : error : trying to overwrite `/usr/share/doc/kde/HTML/en/krecipes/krectip.png', which is also in package krecipes-data
 414       and conffile-prompt like this
 415       'status: conffile-prompt: conffile : 'current-conffile' 'new-conffile' useredited distedited
 416
 417       Newer versions of dpkg sent also:
 418       'processing: install: pkg'
 419       'processing: configure: pkg'
 420       'processing: remove: pkg'
 421       'processing: purge: pkg'
 422       'processing: disappear: pkg'
 423       'processing: trigproc: trigger'
 424
 425    */
 426    char* list[6];
 427    //        dpkg sends multiline error messages sometimes (see
 428    //        #374195 for a example. we should support this by
 429    //        either patching dpkg to not send multiline over the
 430    //        statusfd or by rewriting the code here to deal with
 431    //        it. for now we just ignore it and not crash
 432    TokSplitString(':', line, list, sizeof(list)/sizeof(list[0]));
 433    if( list[0] == NULL || list[1] == NULL || list[2] == NULL)
 434    {
 435       if (Debug == true)
 436          std::clog << "ignoring line: not enough ':'" << std::endl;
 437       return;
 438    }
 439    const char* const pkg = list[1];
 440    const char* action = _strstrip(list[2]);
 441
 442    // 'processing' from dpkg looks like
 443    // 'processing: action: pkg'
 444    if(strncmp(list[0], "processing", strlen("processing")) == 0)
 445    {
 446       char s[200];
 447       const char* const pkg_or_trigger = _strstrip(list[2]);
 448       action = _strstrip( list[1]);
 449       const std::pair<const char *, const char *> * const iter =
 450         std::find_if(PackageProcessingOpsBegin,
 451                      PackageProcessingOpsEnd,
 452                      MatchProcessingOp(action));
 453       if(iter == PackageProcessingOpsEnd)
 454       {
 455          if (Debug == true)
 456             std::clog << "ignoring unknown action: " << action << std::endl;
 457          return;
 458       }
 459       snprintf(s, sizeof(s), _(iter->second), pkg_or_trigger);
 460
 461       status << "pmstatus:" << pkg_or_trigger
 462              << ":"  << (PackagesDone/float(PackagesTotal)*100.0)
 463              << ":" << s
 464              << endl;
 465       if(OutStatusFd > 0)
 466          write(OutStatusFd, status.str().c_str(), status.str().size());
 467       if (Debug == true)
 468          std::clog << "send: '" << status.str() << "'" << endl;
 469
 470       if (strncmp(action, "disappear", strlen("disappear")) == 0)
 471          handleDisappearAction(pkg_or_trigger);
 472       return;
 473    }
 474
 475    if(strncmp(action,"error",strlen("error")) == 0)
 476    {
 477       // urgs, sometime has ":" in its error string so that we
 478       // end up with the error message split between list[3]
 479       // and list[4], e.g. the message:
 480       // "failed in buffer_write(fd) (10, ret=-1): backend dpkg-deb ..."
 481       // concat them again
 482       if( list[4] != NULL )
 483          list[3][strlen(list[3])] = ':';
 484
 485       status << "pmerror:" << list[1]
 486              << ":"  << (PackagesDone/float(PackagesTotal)*100.0)
 487              << ":" << list[3]
 488              << endl;
 489       if(OutStatusFd > 0)
 490          write(OutStatusFd, status.str().c_str(), status.str().size());
 491       if (Debug == true)
 492          std::clog << "send: '" << status.str() << "'" << endl;
 493       pkgFailures++;
 494       WriteApportReport(list[1], list[3]);
 495       return;
 496    }
 497    else if(strncmp(action,"conffile",strlen("conffile")) == 0)
 498    {
 499       status << "pmconffile:" << list[1]
 500              << ":"  << (PackagesDone/float(PackagesTotal)*100.0)
 501              << ":" << list[3]
 502              << endl;
 503       if(OutStatusFd > 0)
 504          write(OutStatusFd, status.str().c_str(), status.str().size());
 505       if (Debug == true)
 506          std::clog << "send: '" << status.str() << "'" << endl;
 507       return;
 508    }
 509
 510    vector<struct DpkgState> const &states = PackageOps[pkg];
 511    const char *next_action = NULL;
 512    if(PackageOpsDone[pkg] < states.size())
 513       next_action = states[PackageOpsDone[pkg]].state;
 514    // check if the package moved to the next dpkg state
 515    if(next_action && (strcmp(action, next_action) == 0))
 516    {
 517       // only read the translation if there is actually a next
 518       // action
 519       const char *translation = _(states[PackageOpsDone[pkg]].str);
 520       char s[200];
 521       snprintf(s, sizeof(s), translation, pkg);
 522
 523       // we moved from one dpkg state to a new one, report that
 524       PackageOpsDone[pkg]++;
 525       PackagesDone++;
 526       // build the status str
 527       status << "pmstatus:" << pkg
 528              << ":"  << (PackagesDone/float(PackagesTotal)*100.0)
 529              << ":" << s
 530              << endl;
 531       if(OutStatusFd > 0)
 532          write(OutStatusFd, status.str().c_str(), status.str().size());
 533       if (Debug == true)
 534          std::clog << "send: '" << status.str() << "'" << endl;
 535    }
 536    if (Debug == true)
 537       std::clog << "(parsed from dpkg) pkg: " << pkg
 538                 << " action: " << action << endl;
 539 }
 540                                                                         /*}}}*/
 541 // DPkgPM::handleDisappearAction                                        /*{{{*/
 542 void pkgDPkgPM::handleDisappearAction(string const &pkgname)
 543 {
 544    // record the package name for display and stuff later
 545    disappearedPkgs.insert(pkgname);
 546
 547    pkgCache::PkgIterator Pkg = Cache.FindPkg(pkgname);
 548    if (unlikely(Pkg.end() == true))
 549       return;
 550    // the disappeared package was auto-installed - nothing to do
 551    if ((Cache[Pkg].Flags & pkgCache::Flag::Auto) == pkgCache::Flag::Auto)
 552       return;
 553    pkgCache::VerIterator PkgVer = Cache[Pkg].InstVerIter(Cache);
 554    if (unlikely(PkgVer.end() == true))
 555       return;
 556    /* search in the list of dependencies for (Pre)Depends,
 557       check if this dependency has a Replaces on our package
 558       and if so transfer the manual installed flag to it */
 559    for (pkgCache::DepIterator Dep = PkgVer.DependsList(); Dep.end() != true; ++Dep)
 560    {
 561       if (Dep->Type != pkgCache::Dep::Depends &&
 562           Dep->Type != pkgCache::Dep::PreDepends)
 563          continue;
 564       pkgCache::PkgIterator Tar = Dep.TargetPkg();
 565       if (unlikely(Tar.end() == true))
 566          continue;
 567       // the package is already marked as manual
 568       if ((Cache[Tar].Flags & pkgCache::Flag::Auto) != pkgCache::Flag::Auto)
 569          continue;
 570       pkgCache::VerIterator TarVer =  Cache[Tar].InstVerIter(Cache);
 571       if (TarVer.end() == true)
 572          continue;
 573       for (pkgCache::DepIterator Rep = TarVer.DependsList(); Rep.end() != true; ++Rep)
 574       {
 575          if (Rep->Type != pkgCache::Dep::Replaces)
 576             continue;
 577          if (Pkg != Rep.TargetPkg())
 578             continue;
 579          // okay, they are strongly connected - transfer manual-bit
 580          if (Debug == true)
 581             std::clog << "transfer manual-bit from disappeared »" << pkgname << "« to »" << Tar.FullName() << "«" << std::endl;
 582          Cache[Tar].Flags &= ~Flag::Auto;
 583          break;
 584       }
 585    }
 586 }
 587                                                                         /*}}}*/
 588 // DPkgPM::DoDpkgStatusFd                                               /*{{{*/
 589 // ---------------------------------------------------------------------
 590 /*
 591  */
 592 void pkgDPkgPM::DoDpkgStatusFd(int statusfd, int OutStatusFd)
 593 {
 594    char *p, *q;
 595    int len;
 596
 597    len=read(statusfd, &dpkgbuf[dpkgbuf_pos], sizeof(dpkgbuf)-dpkgbuf_pos);
 598    dpkgbuf_pos += len;
 599    if(len <= 0)
 600       return;
 601
 602    // process line by line if we have a buffer
 603    p = q = dpkgbuf;
 604    while((q=(char*)memchr(p, '\n', dpkgbuf+dpkgbuf_pos-p)) != NULL)
 605    {
 606       *q = 0;
 607       ProcessDpkgStatusLine(OutStatusFd, p);
 608       p=q+1; // continue with next line
 609    }
 610
 611    // now move the unprocessed bits (after the final \n that is now a 0x0)
 612    // to the start and update dpkgbuf_pos
 613    p = (char*)memrchr(dpkgbuf, 0, dpkgbuf_pos);
 614    if(p == NULL)
 615       return;
 616
 617    // we are interessted in the first char *after* 0x0
 618    p++;
 619
 620    // move the unprocessed tail to the start and update pos
 621    memmove(dpkgbuf, p, p-dpkgbuf);
 622    dpkgbuf_pos = dpkgbuf+dpkgbuf_pos-p;
 623 }
 624                                                                         /*}}}*/
 625 // DPkgPM::WriteHistoryTag                                              /*{{{*/
 626 void pkgDPkgPM::WriteHistoryTag(string const &tag, string value)
 627 {
 628    size_t const length = value.length();
 629    if (length == 0)
 630       return;
 631    // poor mans rstrip(", ")
 632    if (value[length-2] == ',' && value[length-1] == ' ')
 633       value.erase(length - 2, 2);
 634    fprintf(history_out, "%s: %s\n", tag.c_str(), value.c_str());
 635 }                                                                       /*}}}*/
 636 // DPkgPM::OpenLog                                                      /*{{{*/
 637 bool pkgDPkgPM::OpenLog()
 638 {
 639    string const logdir = _config->FindDir("Dir::Log");
 640    if(CreateAPTDirectoryIfNeeded(logdir, logdir) == false)
 641       // FIXME: use a better string after freeze
 642       return _error->Error(_("Directory '%s' missing"), logdir.c_str());
 643
 644    // get current time
 645    char timestr[200];
 646    time_t const t = time(NULL);
 647    struct tm const * const tmp = localtime(&t);
 648    strftime(timestr, sizeof(timestr), "%F  %T", tmp);
 649
 650    // open terminal log
 651    string const logfile_name = flCombine(logdir,
 652                                    _config->Find("Dir::Log::Terminal"));
 653    if (!logfile_name.empty())
 654    {
 655       term_out = fopen(logfile_name.c_str(),"a");
 656       if (term_out == NULL)
 657          return _error->WarningE("OpenLog", _("Could not open file '%s'"), logfile_name.c_str());
 658       setvbuf(term_out, NULL, _IONBF, 0);
 659       SetCloseExec(fileno(term_out), true);
 660       chmod(logfile_name.c_str(), 0600);
 661       fprintf(term_out, "\nLog started: %s\n", timestr);
 662    }
 663
 664    // write your history
 665    string const history_name = flCombine(logdir,
 666                                    _config->Find("Dir::Log::History"));
 667    if (!history_name.empty())
 668    {
 669       history_out = fopen(history_name.c_str(),"a");
 670       if (history_out == NULL)
 671          return _error->WarningE("OpenLog", _("Could not open file '%s'"), history_name.c_str());
 672       chmod(history_name.c_str(), 0644);
 673       fprintf(history_out, "\nStart-Date: %s\n", timestr);
 674       string remove, purge, install, upgrade, downgrade;
 675       for (pkgCache::PkgIterator I = Cache.PkgBegin(); I.end() == false; I++)
 676       {
 677          if (Cache[I].NewInstall())
 678          {
 679             install += I.FullName(false) + string(" (") + Cache[I].CandVersion;
 680             if (Cache[I].Flags & pkgCache::Flag::Auto)
 681                install+= ", automatic";
 682             install += string("), ");
 683          }
 684          else if (Cache[I].Upgrade())
 685             upgrade += I.FullName(false) + string(" (") + Cache[I].CurVersion + string(", ") + Cache[I].CandVersion + string("), ");
 686          else if (Cache[I].Downgrade())
 687             downgrade += I.FullName(false) + string(" (") + Cache[I].CurVersion + string(", ") + Cache[I].CandVersion + string("), ");
 688          else if (Cache[I].Delete())
 689          {
 690             if ((Cache[I].iFlags & pkgDepCache::Purge) == pkgDepCache::Purge)
 691                purge += I.FullName(false) + string(" (") + Cache[I].CurVersion + string("), ");
 692             else
 693                remove += I.FullName(false) + string(" (") + Cache[I].CurVersion + string("), ");
 694          }
 695       }
 696       if (_config->Exists("Commandline::AsString") == true)
 697          WriteHistoryTag("Commandline", _config->Find("Commandline::AsString"));
 698       WriteHistoryTag("Install", install);
 699       WriteHistoryTag("Upgrade", upgrade);
 700       WriteHistoryTag("Downgrade",downgrade);
 701       WriteHistoryTag("Remove",remove);
 702       WriteHistoryTag("Purge",purge);
 703       fflush(history_out);
 704    }
 705
 706    return true;
 707 }
 708                                                                         /*}}}*/
 709 // DPkg::CloseLog                                                       /*{{{*/
 710 bool pkgDPkgPM::CloseLog()
 711 {
 712    char timestr[200];
 713    time_t t = time(NULL);
 714    struct tm *tmp = localtime(&t);
 715    strftime(timestr, sizeof(timestr), "%F  %T", tmp);
 716
 717    if(term_out)
 718    {
 719       fprintf(term_out, "Log ended: ");
 720       fprintf(term_out, "%s", timestr);
 721       fprintf(term_out, "\n");
 722       fclose(term_out);
 723    }
 724    term_out = NULL;
 725
 726    if(history_out)
 727    {
 728       if (disappearedPkgs.empty() == false)
 729       {
 730          string disappear;
 731          for (std::set<std::string>::const_iterator d = disappearedPkgs.begin();
 732               d != disappearedPkgs.end(); ++d)
 733          {
 734             pkgCache::PkgIterator P = Cache.FindPkg(*d);
 735             disappear.append(*d);
 736             if (P.end() == true)
 737                disappear.append(", ");
 738             else
 739                disappear.append(" (").append(Cache[P].CurVersion).append("), ");
 740          }
 741          WriteHistoryTag("Disappeared", disappear);
 742       }
 743       if (dpkg_error.empty() == false)
 744          fprintf(history_out, "Error: %s\n", dpkg_error.c_str());
 745       fprintf(history_out, "End-Date: %s\n", timestr);
 746       fclose(history_out);
 747    }
 748    history_out = NULL;
 749
 750    return true;
 751 }
 752                                                                         /*}}}*/
 753 /*{{{*/
 754 // This implements a racy version of pselect for those architectures
 755 // that don't have a working implementation.
 756 // FIXME: Probably can be removed on Lenny+1
 757 static int racy_pselect(int nfds, fd_set *readfds, fd_set *writefds,
 758    fd_set *exceptfds, const struct timespec *timeout,
 759    const sigset_t *sigmask)
 760 {
 761    sigset_t origmask;
 762    struct timeval tv;
 763    int retval;
 764
 765    tv.tv_sec = timeout->tv_sec;
 766    tv.tv_usec = timeout->tv_nsec/1000;
 767
 768    sigprocmask(SIG_SETMASK, sigmask, &origmask);
 769    retval = select(nfds, readfds, writefds, exceptfds, &tv);
 770    sigprocmask(SIG_SETMASK, &origmask, 0);
 771    return retval;
 772 }
 773 /*}}}*/
 774 // DPkgPM::Go - Run the sequence                                        /*{{{*/
 775 // ---------------------------------------------------------------------
 776 /* This globs the operations and calls dpkg
 777  *
 778  * If it is called with "OutStatusFd" set to a valid file descriptor
 779  * apt will report the install progress over this fd. It maps the
 780  * dpkg states a package goes through to human readable (and i10n-able)
 781  * names and calculates a percentage for each step.
 782 */
 783 bool pkgDPkgPM::Go(int OutStatusFd)
 784 {
 785    fd_set rfds;
 786    struct timespec tv;
 787    sigset_t sigmask;
 788    sigset_t original_sigmask;
 789
 790    unsigned int const MaxArgs = _config->FindI("Dpkg::MaxArgs",8*1024);
 791    unsigned int const MaxArgBytes = _config->FindI("Dpkg::MaxArgBytes",32*1024);
 792    bool const NoTriggers = _config->FindB("DPkg::NoTriggers", false);
 793
 794    if (RunScripts("DPkg::Pre-Invoke") == false)
 795       return false;
 796
 797    if (RunScriptsWithPkgs("DPkg::Pre-Install-Pkgs") == false)
 798       return false;
 799
 800    // support subpressing of triggers processing for special
 801    // cases like d-i that runs the triggers handling manually
 802    bool const SmartConf = (_config->Find("PackageManager::Configure", "all") != "all");
 803    bool const TriggersPending = _config->FindB("DPkg::TriggersPending", false);
 804    if (_config->FindB("DPkg::ConfigurePending", SmartConf) == true)
 805       List.push_back(Item(Item::ConfigurePending, PkgIterator()));
 806
 807    // map the dpkg states to the operations that are performed
 808    // (this is sorted in the same way as Item::Ops)
 809    static const struct DpkgState DpkgStatesOpMap[][7] = {
 810       // Install operation
 811       {
 812          {"half-installed", N_("Preparing %s")},
 813          {"unpacked", N_("Unpacking %s") },
 814          {NULL, NULL}
 815       },
 816       // Configure operation
 817       {
 818          {"unpacked",N_("Preparing to configure %s") },
 819          {"half-configured", N_("Configuring %s") },
 820          { "installed", N_("Installed %s")},
 821          {NULL, NULL}
 822       },
 823       // Remove operation
 824       {
 825          {"half-configured", N_("Preparing for removal of %s")},
 826          {"half-installed", N_("Removing %s")},
 827          {"config-files",  N_("Removed %s")},
 828          {NULL, NULL}
 829       },
 830       // Purge operation
 831       {
 832          {"config-files", N_("Preparing to completely remove %s")},
 833          {"not-installed", N_("Completely removed %s")},
 834          {NULL, NULL}
 835       },
 836    };
 837
 838    // init the PackageOps map, go over the list of packages that
 839    // that will be [installed|configured|removed|purged] and add
 840    // them to the PackageOps map (the dpkg states it goes through)
 841    // and the PackageOpsTranslations (human readable strings)
 842    for (vector<Item>::const_iterator I = List.begin(); I != List.end();I++)
 843    {
 844       if((*I).Pkg.end() == true)
 845          continue;
 846
 847       string const name = (*I).Pkg.Name();
 848       PackageOpsDone[name] = 0;
 849       for(int i=0; (DpkgStatesOpMap[(*I).Op][i]).state != NULL;  i++)
 850       {
 851          PackageOps[name].push_back(DpkgStatesOpMap[(*I).Op][i]);
 852          PackagesTotal++;
 853       }
 854    }
 855
 856    stdin_is_dev_null = false;
 857
 858    // create log
 859    OpenLog();
 860
 861    // this loop is runs once per operation
 862    for (vector<Item>::const_iterator I = List.begin(); I != List.end();)
 863    {
 864       // Do all actions with the same Op in one run
 865       vector<Item>::const_iterator J = I;
 866       if (TriggersPending == true)
 867          for (; J != List.end(); J++)
 868          {
 869             if (J->Op == I->Op)
 870                continue;
 871             if (J->Op != Item::TriggersPending)
 872                break;
 873             vector<Item>::const_iterator T = J + 1;
 874             if (T != List.end() && T->Op == I->Op)
 875                continue;
 876             break;
 877          }
 878       else
 879          for (; J != List.end() && J->Op == I->Op; J++)
 880             /* nothing */;
 881
 882       // Generate the argument list
 883       const char *Args[MaxArgs + 50];
 884       // keep track of allocated strings for multiarch package names
 885       char *Packages[MaxArgs + 50];
 886       unsigned int pkgcount = 0;
 887
 888       // Now check if we are within the MaxArgs limit
 889       //
 890       // this code below is problematic, because it may happen that
 891       // the argument list is split in a way that A depends on B
 892       // and they are in the same "--configure A B" run
 893       // - with the split they may now be configured in different
 894       //   runs
 895       if (J - I > (signed)MaxArgs)
 896          J = I + MaxArgs;
 897
 898       unsigned int n = 0;
 899       unsigned long Size = 0;
 900       string const Tmp = _config->Find("Dir::Bin::dpkg","dpkg");
 901       Args[n++] = Tmp.c_str();
 902       Size += strlen(Args[n-1]);
 903
 904       // Stick in any custom dpkg options
 905       Configuration::Item const *Opts = _config->Tree("DPkg::Options");
 906       if (Opts != 0)
 907       {
 908          Opts = Opts->Child;
 909          for (; Opts != 0; Opts = Opts->Next)
 910          {
 911             if (Opts->Value.empty() == true)
 912                continue;
 913             Args[n++] = Opts->Value.c_str();
 914             Size += Opts->Value.length();
 915          }
 916       }
 917
 918       char status_fd_buf[20];
 919       int fd[2];
 920       pipe(fd);
 921
 922       Args[n++] = "--status-fd";
 923       Size += strlen(Args[n-1]);
 924       snprintf(status_fd_buf,sizeof(status_fd_buf),"%i", fd[1]);
 925       Args[n++] = status_fd_buf;
 926       Size += strlen(Args[n-1]);
 927
 928       switch (I->Op)
 929       {
 930          case Item::Remove:
 931          Args[n++] = "--force-depends";
 932          Size += strlen(Args[n-1]);
 933          Args[n++] = "--force-remove-essential";
 934          Size += strlen(Args[n-1]);
 935          Args[n++] = "--remove";
 936          Size += strlen(Args[n-1]);
 937          break;
 938
 939          case Item::Purge:
 940          Args[n++] = "--force-depends";
 941          Size += strlen(Args[n-1]);
 942          Args[n++] = "--force-remove-essential";
 943          Size += strlen(Args[n-1]);
 944          Args[n++] = "--purge";
 945          Size += strlen(Args[n-1]);
 946          break;
 947
 948          case Item::Configure:
 949          Args[n++] = "--configure";
 950          Size += strlen(Args[n-1]);
 951          break;
 952
 953          case Item::ConfigurePending:
 954          Args[n++] = "--configure";
 955          Size += strlen(Args[n-1]);
 956          Args[n++] = "--pending";
 957          Size += strlen(Args[n-1]);
 958          break;
 959
 960          case Item::TriggersPending:
 961          Args[n++] = "--triggers-only";
 962          Size += strlen(Args[n-1]);
 963          Args[n++] = "--pending";
 964          Size += strlen(Args[n-1]);
 965          break;
 966
 967          case Item::Install:
 968          Args[n++] = "--unpack";
 969          Size += strlen(Args[n-1]);
 970          Args[n++] = "--auto-deconfigure";
 971          Size += strlen(Args[n-1]);
 972          break;
 973       }
 974
 975       if (NoTriggers == true && I->Op != Item::TriggersPending &&
 976           I->Op != Item::ConfigurePending)
 977       {
 978          Args[n++] = "--no-triggers";
 979          Size += strlen(Args[n-1]);
 980       }
 981
 982       // Write in the file or package names
 983       if (I->Op == Item::Install)
 984       {
 985          for (;I != J && Size < MaxArgBytes; I++)
 986          {
 987             if (I->File[0] != '/')
 988                return _error->Error("Internal Error, Pathname to install is not absolute '%s'",I->File.c_str());
 989             Args[n++] = I->File.c_str();
 990             Size += strlen(Args[n-1]);
 991          }
 992       }
 993       else
 994       {
 995          string const nativeArch = _config->Find("APT::Architecture");
 996          for (;I != J && Size < MaxArgBytes; I++)
 997          {
 998             if((*I).Pkg.end() == true)
 999                continue;
1000             if (I->Op == Item::Configure && disappearedPkgs.find(I->Pkg.Name()) != disappearedPkgs.end())
1001                continue;
1002             if (I->Pkg.Arch() == nativeArch || !strcmp(I->Pkg.Arch(), "all"))
1003                Args[n++] = I->Pkg.Name();
1004             else
1005             {
1006                Packages[pkgcount] = strdup(I->Pkg.FullName(false).c_str());
1007                Args[n++] = Packages[pkgcount++];
1008             }
1009             Size += strlen(Args[n-1]);
1010          }
1011       }
1012       Args[n] = 0;
1013       J = I;
1014
1015       if (_config->FindB("Debug::pkgDPkgPM",false) == true)
1016       {
1017          for (unsigned int k = 0; k != n; k++)
1018             clog << Args[k] << ' ';
1019          clog << endl;
1020          continue;
1021       }
1022
1023       cout << flush;
1024       clog << flush;
1025       cerr << flush;
1026
1027       /* Mask off sig int/quit. We do this because dpkg also does when
1028          it forks scripts. What happens is that when you hit ctrl-c it sends
1029          it to all processes in the group. Since dpkg ignores the signal
1030          it doesn't die but we do! So we must also ignore it */
1031       sighandler_t old_SIGQUIT = signal(SIGQUIT,SIG_IGN);
1032       sighandler_t old_SIGINT = signal(SIGINT,SIG_IGN);
1033
1034       // ignore SIGHUP as well (debian #463030)
1035       sighandler_t old_SIGHUP = signal(SIGHUP,SIG_IGN);
1036
1037       struct    termios tt;
1038       struct    winsize win;
1039       int       master = -1;
1040       int       slave = -1;
1041
1042       // if tcgetattr does not return zero there was a error
1043       // and we do not do any pty magic
1044       if (tcgetattr(0, &tt) == 0)
1045       {
1046          ioctl(0, TIOCGWINSZ, (char *)&win);
1047          if (openpty(&master, &slave, NULL, &tt, &win) < 0)
1048          {
1049             const char *s = _("Can not write log, openpty() "
1050                               "failed (/dev/pts not mounted?)\n");
1051             fprintf(stderr, "%s",s);
1052             if(term_out)
1053               fprintf(term_out, "%s",s);
1054             master = slave = -1;
1055          }  else {
1056             struct termios rtt;
1057             rtt = tt;
1058             cfmakeraw(&rtt);
1059             rtt.c_lflag &= ~ECHO;
1060             rtt.c_lflag |= ISIG;
1061             // block SIGTTOU during tcsetattr to prevent a hang if
1062             // the process is a member of the background process group
1063             // http://www.opengroup.org/onlinepubs/000095399/functions/tcsetattr.html
1064             sigemptyset(&sigmask);
1065             sigaddset(&sigmask, SIGTTOU);
1066             sigprocmask(SIG_BLOCK,&sigmask, &original_sigmask);
1067             tcsetattr(0, TCSAFLUSH, &rtt);
1068             sigprocmask(SIG_SETMASK, &original_sigmask, 0);
1069          }
1070       }
1071
1072        // Fork dpkg
1073       pid_t Child;
1074       _config->Set("APT::Keep-Fds::",fd[1]);
1075       // send status information that we are about to fork dpkg
1076       if(OutStatusFd > 0) {
1077          ostringstream status;
1078          status << "pmstatus:dpkg-exec:"
1079                 << (PackagesDone/float(PackagesTotal)*100.0)
1080                 << ":" << _("Running dpkg")
1081                 << endl;
1082          write(OutStatusFd, status.str().c_str(), status.str().size());
1083       }
1084       Child = ExecFork();
1085
1086       // This is the child
1087       if (Child == 0)
1088       {
1089          if(slave >= 0 && master >= 0)
1090          {
1091             setsid();
1092             ioctl(slave, TIOCSCTTY, 0);
1093             close(master);
1094             dup2(slave, 0);
1095             dup2(slave, 1);
1096             dup2(slave, 2);
1097             close(slave);
1098          }
1099          close(fd[0]); // close the read end of the pipe
1100
1101          if (_config->FindDir("DPkg::Chroot-Directory","/") != "/")
1102          {
1103             std::cerr << "Chrooting into "
1104                       << _config->FindDir("DPkg::Chroot-Directory")
1105                       << std::endl;
1106             if (chroot(_config->FindDir("DPkg::Chroot-Directory","/").c_str()) != 0)
1107                _exit(100);
1108          }
1109
1110          if (chdir(_config->FindDir("DPkg::Run-Directory","/").c_str()) != 0)
1111             _exit(100);
1112
1113          if (_config->FindB("DPkg::FlushSTDIN",true) == true && isatty(STDIN_FILENO))
1114          {
1115             int Flags,dummy;
1116             if ((Flags = fcntl(STDIN_FILENO,F_GETFL,dummy)) < 0)
1117                _exit(100);
1118
1119             // Discard everything in stdin before forking dpkg
1120             if (fcntl(STDIN_FILENO,F_SETFL,Flags | O_NONBLOCK) < 0)
1121                _exit(100);
1122
1123             while (read(STDIN_FILENO,&dummy,1) == 1);
1124
1125             if (fcntl(STDIN_FILENO,F_SETFL,Flags & (~(long)O_NONBLOCK)) < 0)
1126                _exit(100);
1127          }
1128
1129          /* No Job Control Stop Env is a magic dpkg var that prevents it
1130             from using sigstop */
1131          putenv((char *)"DPKG_NO_TSTP=yes");
1132          execvp(Args[0],(char **)Args);
1133          cerr << "Could not exec dpkg!" << endl;
1134          _exit(100);
1135       }
1136
1137       // apply ionice
1138       if (_config->FindB("DPkg::UseIoNice", false) == true)
1139          ionice(Child);
1140
1141       // clear the Keep-Fd again
1142       _config->Clear("APT::Keep-Fds",fd[1]);
1143
1144       // Wait for dpkg
1145       int Status = 0;
1146
1147       // we read from dpkg here
1148       int const _dpkgin = fd[0];
1149       close(fd[1]);                        // close the write end of the pipe
1150
1151       if(slave > 0)
1152          close(slave);
1153
1154       // setups fds
1155       sigemptyset(&sigmask);
1156       sigprocmask(SIG_BLOCK,&sigmask,&original_sigmask);
1157
1158       /* clean up the temporary allocation for multiarch package names in
1159          the parent, so we don't leak memory when we return. */
1160       for (unsigned int i = 0; i < pkgcount; i++)
1161          free(Packages[i]);
1162
1163       // the result of the waitpid call
1164       int res;
1165       int select_ret;
1166       while ((res=waitpid(Child,&Status, WNOHANG)) != Child) {
1167          if(res < 0) {
1168             // FIXME: move this to a function or something, looks ugly here
1169             // error handling, waitpid returned -1
1170             if (errno == EINTR)
1171                continue;
1172             RunScripts("DPkg::Post-Invoke");
1173
1174             // Restore sig int/quit
1175             signal(SIGQUIT,old_SIGQUIT);
1176             signal(SIGINT,old_SIGINT);
1177             signal(SIGHUP,old_SIGHUP);
1178             return _error->Errno("waitpid","Couldn't wait for subprocess");
1179          }
1180
1181          // wait for input or output here
1182          FD_ZERO(&rfds);
1183          if (master >= 0 && !stdin_is_dev_null)
1184             FD_SET(0, &rfds);
1185          FD_SET(_dpkgin, &rfds);
1186          if(master >= 0)
1187             FD_SET(master, &rfds);
1188          tv.tv_sec = 1;
1189          tv.tv_nsec = 0;
1190          select_ret = pselect(max(master, _dpkgin)+1, &rfds, NULL, NULL,
1191                               &tv, &original_sigmask);
1192          if (select_ret < 0 && (errno == EINVAL || errno == ENOSYS))
1193             select_ret = racy_pselect(max(master, _dpkgin)+1, &rfds, NULL,
1194                                       NULL, &tv, &original_sigmask);
1195          if (select_ret == 0)
1196             continue;
1197          else if (select_ret < 0 && errno == EINTR)
1198             continue;
1199          else if (select_ret < 0)
1200          {
1201             perror("select() returned error");
1202             continue;
1203          }
1204
1205          if(master >= 0 && FD_ISSET(master, &rfds))
1206             DoTerminalPty(master);
1207          if(master >= 0 && FD_ISSET(0, &rfds))
1208             DoStdin(master);
1209          if(FD_ISSET(_dpkgin, &rfds))
1210             DoDpkgStatusFd(_dpkgin, OutStatusFd);
1211       }
1212       close(_dpkgin);
1213
1214       // Restore sig int/quit
1215       signal(SIGQUIT,old_SIGQUIT);
1216       signal(SIGINT,old_SIGINT);
1217       signal(SIGHUP,old_SIGHUP);
1218
1219       if(master >= 0)
1220       {
1221          tcsetattr(0, TCSAFLUSH, &tt);
1222          close(master);
1223       }
1224
1225       // Check for an error code.
1226       if (WIFEXITED(Status) == 0 || WEXITSTATUS(Status) != 0)
1227       {
1228          // if it was set to "keep-dpkg-runing" then we won't return
1229          // here but keep the loop going and just report it as a error
1230          // for later
1231          bool const stopOnError = _config->FindB("Dpkg::StopOnError",true);
1232
1233          if(stopOnError)
1234             RunScripts("DPkg::Post-Invoke");
1235
1236          if (WIFSIGNALED(Status) != 0 && WTERMSIG(Status) == SIGSEGV)
1237             strprintf(dpkg_error, "Sub-process %s received a segmentation fault.",Args[0]);
1238          else if (WIFEXITED(Status) != 0)
1239             strprintf(dpkg_error, "Sub-process %s returned an error code (%u)",Args[0],WEXITSTATUS(Status));
1240          else
1241             strprintf(dpkg_error, "Sub-process %s exited unexpectedly",Args[0]);
1242
1243          if(dpkg_error.size() > 0)
1244             _error->Error("%s", dpkg_error.c_str());
1245
1246          if(stopOnError)
1247          {
1248             CloseLog();
1249             return false;
1250          }
1251       }
1252    }
1253    CloseLog();
1254
1255    if (RunScripts("DPkg::Post-Invoke") == false)
1256       return false;
1257
1258    Cache.writeStateFile(NULL);
1259    return true;
1260 }
1261                                                                         /*}}}*/
1262 // pkgDpkgPM::Reset - Dump the contents of the command list             /*{{{*/
1263 // ---------------------------------------------------------------------
1264 /* */
1265 void pkgDPkgPM::Reset()
1266 {
1267    List.erase(List.begin(),List.end());
1268 }
1269                                                                         /*}}}*/
1270 // pkgDpkgPM::WriteApportReport - write out error report pkg failure    /*{{{*/
1271 // ---------------------------------------------------------------------
1272 /* */
1273 void pkgDPkgPM::WriteApportReport(const char *pkgpath, const char *errormsg)
1274 {
1275    string pkgname, reportfile, srcpkgname, pkgver, arch;
1276    string::size_type pos;
1277    FILE *report;
1278
1279    if (_config->FindB("Dpkg::ApportFailureReport", false) == false)
1280    {
1281       std::clog << "configured to not write apport reports" << std::endl;
1282       return;
1283    }
1284
1285    // only report the first errors
1286    if(pkgFailures > _config->FindI("APT::Apport::MaxReports", 3))
1287    {
1288       std::clog << _("No apport report written because MaxReports is reached already") << std::endl;
1289       return;
1290    }
1291
1292    // check if its not a follow up error
1293    const char *needle = dgettext("dpkg", "dependency problems - leaving unconfigured");
1294    if(strstr(errormsg, needle) != NULL) {
1295       std::clog << _("No apport report written because the error message indicates its a followup error from a previous failure.") << std::endl;
1296       return;
1297    }
1298
1299    // do not report disk-full failures
1300    if(strstr(errormsg, strerror(ENOSPC)) != NULL) {
1301       std::clog << _("No apport report written because the error message indicates a disk full error") << std::endl;
1302       return;
1303    }
1304
1305    // do not report out-of-memory failures
1306    if(strstr(errormsg, strerror(ENOMEM)) != NULL) {
1307       std::clog << _("No apport report written because the error message indicates a out of memory error") << std::endl;
1308       return;
1309    }
1310
1311    // do not report dpkg I/O errors
1312    // XXX - this message is localized, but this only matches the English version.  This is better than nothing.
1313    if(strstr(errormsg, "short read in buffer_copy (")) {
1314       std::clog << _("No apport report written because the error message indicates a dpkg I/O error") << std::endl;
1315       return;
1316    }
1317
1318    // get the pkgname and reportfile
1319    pkgname = flNotDir(pkgpath);
1320    pos = pkgname.find('_');
1321    if(pos != string::npos)
1322       pkgname = pkgname.substr(0, pos);
1323
1324    // find the package versin and source package name
1325    pkgCache::PkgIterator Pkg = Cache.FindPkg(pkgname);
1326    if (Pkg.end() == true)
1327       return;
1328    pkgCache::VerIterator Ver = Cache.GetCandidateVer(Pkg);
1329    if (Ver.end() == true)
1330       return;
1331    pkgver = Ver.VerStr() == NULL ? "unknown" : Ver.VerStr();
1332    pkgRecords Recs(Cache);
1333    pkgRecords::Parser &Parse = Recs.Lookup(Ver.FileList());
1334    srcpkgname = Parse.SourcePkg();
1335    if(srcpkgname.empty())
1336       srcpkgname = pkgname;
1337
1338    // if the file exists already, we check:
1339    // - if it was reported already (touched by apport).
1340    //   If not, we do nothing, otherwise
1341    //    we overwrite it. This is the same behaviour as apport
1342    // - if we have a report with the same pkgversion already
1343    //   then we skip it
1344    reportfile = flCombine("/var/crash",pkgname+".0.crash");
1345    if(FileExists(reportfile))
1346    {
1347       struct stat buf;
1348       char strbuf[255];
1349
1350       // check atime/mtime
1351       stat(reportfile.c_str(), &buf);
1352       if(buf.st_mtime > buf.st_atime)
1353          return;
1354
1355       // check if the existing report is the same version
1356       report = fopen(reportfile.c_str(),"r");
1357       while(fgets(strbuf, sizeof(strbuf), report) != NULL)
1358       {
1359          if(strstr(strbuf,"Package:") == strbuf)
1360          {
1361             char pkgname[255], version[255];
1362             if(sscanf(strbuf, "Package: %s %s", pkgname, version) == 2)
1363                if(strcmp(pkgver.c_str(), version) == 0)
1364                {
1365                   fclose(report);
1366                   return;
1367                }
1368          }
1369       }
1370       fclose(report);
1371    }
1372
1373    // now write the report
1374    arch = _config->Find("APT::Architecture");
1375    report = fopen(reportfile.c_str(),"w");
1376    if(report == NULL)
1377       return;
1378    if(_config->FindB("DPkgPM::InitialReportOnly",false) == true)
1379       chmod(reportfile.c_str(), 0);
1380    else
1381       chmod(reportfile.c_str(), 0600);
1382    fprintf(report, "ProblemType: Package\n");
1383    fprintf(report, "Architecture: %s\n", arch.c_str());
1384    time_t now = time(NULL);
1385    fprintf(report, "Date: %s" , ctime(&now));
1386    fprintf(report, "Package: %s %s\n", pkgname.c_str(), pkgver.c_str());
1387    fprintf(report, "SourcePackage: %s\n", srcpkgname.c_str());
1388    fprintf(report, "ErrorMessage:\n %s\n", errormsg);
1389
1390    // ensure that the log is flushed
1391    if(term_out)
1392       fflush(term_out);
1393
1394    // attach terminal log it if we have it
1395    string logfile_name = _config->FindFile("Dir::Log::Terminal");
1396    if (!logfile_name.empty())
1397    {
1398       FILE *log = NULL;
1399       char buf[1024];
1400
1401       fprintf(report, "DpkgTerminalLog:\n");
1402       log = fopen(logfile_name.c_str(),"r");
1403       if(log != NULL)
1404       {
1405          while( fgets(buf, sizeof(buf), log) != NULL)
1406             fprintf(report, " %s", buf);
1407          fclose(log);
1408       }
1409    }
1410
1411    // log the ordering
1412    const char *ops_str[] = {"Install", "Configure","Remove","Purge"};
1413    fprintf(report, "AptOrdering:\n");
1414    for (vector<Item>::iterator I = List.begin(); I != List.end(); I++)
1415       fprintf(report, " %s: %s\n", (*I).Pkg.Name(), ops_str[(*I).Op]);
1416
1417    // attach dmesg log (to learn about segfaults)
1418    if (FileExists("/bin/dmesg"))
1419    {
1420       FILE *log = NULL;
1421       char buf[1024];
1422
1423       fprintf(report, "Dmesg:\n");
1424       log = popen("/bin/dmesg","r");
1425       if(log != NULL)
1426       {
1427          while( fgets(buf, sizeof(buf), log) != NULL)
1428             fprintf(report, " %s", buf);
1429          pclose(log);
1430       }
1431    }
1432
1433    // attach df -l log (to learn about filesystem status)
1434    if (FileExists("/bin/df"))
1435    {
1436       FILE *log = NULL;
1437       char buf[1024];
1438
1439       fprintf(report, "Df:\n");
1440       log = popen("/bin/df -l","r");
1441       if(log != NULL)
1442       {
1443          while( fgets(buf, sizeof(buf), log) != NULL)
1444             fprintf(report, " %s", buf);
1445          pclose(log);
1446       }
1447    }
1448
1449    fclose(report);
1450
1451 }
1452                                                                         /*}}}*/