You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdeadmin/kpackage/debDpkgInterface.cpp

165 lines
5.0 KiB

/*
** Copyright (C) 1999,2000 Toivo Pedaste <toivo@ucs.uwa.edu.au>
**
*/
/*
** This program is free software; you can redistribute it and/or modify
** it under the terms of the GNU General Public License as published by
** the Free Software Foundation; either version 2 of the License, or
** (at your option) any later version.
**
** This program is distributed in the hope that it will be useful,
** but WITHOUT ANY WARRANTY; without even the implied warranty of
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
** GNU General Public License for more details.
**
** You should have received a copy of the GNU General Public License
** along with this program in a file called COPYING; if not, write to
** the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
** MA 02110-1301, USA.
*/
/*
** Bug reports and questions can be sent to kde-devel@kde.org
*/
#include "../config.h"
#include <unistd.h>
#include <stdlib.h> // for getenv
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h> // for O_RDONLY
#include <setjmp.h>
#include <iostream>
#include <kurl.h>
#include <tdeglobal.h>
#include <kiconloader.h>
#include <kdebug.h>
#include "packageInfo.h"
#include "debDpkgInterface.h"
#include "updateLoc.h"
#include "kpackage.h"
#include "managementWidget.h"
#include "utils.h"
#include "options.h"
#include "cache.h"
#include <tdelocale.h>
extern TDEApplication *app;
extern Opts *params;
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
DEBDPKG::DEBDPKG():DEB()
{
head = "DEBDPKG";
name = i18n("DPKG: Debian");
defaultHandle = 0;
queryMsg = i18n("Querying DEB package list: ");
procMsg = i18n("Kpackage: Waiting on DPKG");
locatedialog = new Locations(i18n("Location of Debian Package Archives"));
locatedialog->cLocations(3, 2, this, i18n("Location", "L"),
"Deb",
i18n("Version\nArchitecture"),
i18n("Location of Base Folder of Debian Distribution"),
"stable frozen unstable\ni386 alpha sparc powerpc arm m68k");
locatedialog->pLocations(3, 6, this, i18n("Packages", "P"),
"Deb", "*.deb Packages Packages.gz status available",
i18n("Location of 'Packages' Files for Sections of Debian Distributions"),
i18n("Location of Base Folder of Debian Distribution"));
locatedialog->dLocations(2, 6, this, i18n("Folders", "F"),
"Deb", "*.deb",
i18n("Location of Folders Containing Debian Packages"));
connect(locatedialog,TQT_SIGNAL(returnVal(LcacheObj *)),
this,TQT_SLOT(setAvail(LcacheObj *)));
locatedialog->apply_slot();
paramsInst.append(new param(i18n("Allow Downgrade"),TRUE,TRUE,"--refuse-downgrade"));
paramsInst.append(new param(i18n("Check Conflicts"),TRUE,TRUE,"--force-conflicts"));
paramsInst.append(new param(i18n("Check Dependencies"),TRUE,TRUE,"--force-depends"));
paramsInst.append(new param(i18n("Test (do not install)"),FALSE,FALSE,"--no-act"));
paramsUninst.append(new param(i18n("Purge Config Files"),TRUE,FALSE,
"--purge","--remove"));
paramsUninst.append(new param(i18n("Check Dependencies"),TRUE,TRUE,"--force-depends"));
paramsUninst.append(new param(i18n("Test (do not uninstall)"),FALSE,FALSE,"--no-act"));
hasProgram = ifExe("dpkg");
}
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
DEBDPKG::~DEBDPKG()
{
}
//////////////////////////////////////////////////////////////////////////////
void DEBDPKG::distPackages(TQPtrList<packageInfo> *pki, cacheObj *cp)
{
LcacheObj *cList = new LcacheObj();
TQString loc = cp->base;
TQStringList opt = TQStringList::split('\n',cp->option);
TQStringList::Iterator ocIt = opt.begin();
TQString rel = *ocIt;
TQString arch = *(++ocIt);
TQString parts[3] = {"main", "contrib", "non-free"};
for (int i = 0; i < 3; i++) {
TQString file = loc + "/dists/";
file += rel;
file += "/";
file += parts[i];
file += "/binary-";
file += arch;
file += "/Packages";
TQString s;
TQString tmp = cp->cacheFile;
tmp += s.setNum(i);
cacheObj *cp = new cacheObj(loc,file,tmp);
cList->append(cp);
}
listUnIPackages(pki, cList);
}
void DEBDPKG::listPackages(TQPtrList<packageInfo> *pki)
{
listInstalledPackages(pki);
if (packageLoc) {
listUnIPackages(pki, packageLoc);
}
}
//////////////////////////////////////////////////////////////////////////////
// Call the script to uninstall packages setting parameters
// to dpkg dependent on flags, returning whether everyting worked
//////////////////////////////////////////////////////////////////////////////
TQString DEBDPKG::doUninstall(int uninstallFlags, const TQString &packs, bool &test)
{
TQString s = "dpkg ";
// The -r or -p flag is set by setOptions
s += setOptions(uninstallFlags, paramsUninst);
s += packs;
if (uninstallFlags>>3 & 1)
test = 1;
kdDebug() << "uCMD=" << s << "\n";
return s;
}
#include "debDpkgInterface.moc"