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