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/ksysv/IOCore.cpp

292 lines
7.5 KiB

/***************************************************************************
ksv::IO.cpp - description
-------------------
begin : Sun Oct 3 1999
copyright : (C) 1997-2000 by Peter Putzer
email : putzer@kde.org
***************************************************************************/
/***************************************************************************
* *
* 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; version 2. *
* *
***************************************************************************/
#include <errno.h>
#include <unistd.h>
#include <tqfileinfo.h>
#include <tqptrlist.h>
#include <tqvaluelist.h>
#include <tqstringlist.h>
#include <kdebug.h>
#include <kapplication.h>
#include <klocale.h>
#include <kmimemagic.h>
#include <kservice.h>
#include <kuserprofile.h>
#include "Data.h"
#include "IOCore.h"
#include "ksvdraglist.h"
#include "ksv_core.h"
#include "ksv_conf.h"
TQString ksv::IO::relToAbs (const TQString& dir, const TQString& rel)
{
if (rel.left(1) != "/")
return TQDir::cleanDirPath (dir + "/" + rel);
else
return TQDir::cleanDirPath (rel);
}
void ksv::IO::removeFile (const TQFileInfo& info, TQDir& dir, TQString& rich, TQString& plain)
{
if (!dir.remove(info.fileName(), FALSE))
{
rich = (i18n ("<error>FAILED</error> to remove <cmd>%1</cmd> from <cmd>%2</cmd>: \"%3\"<br/>")
.tqarg(info.fileName())
.tqarg(dir.path())
.tqarg(strerror(errno)));
plain = (i18n ("FAILED to remove %1 from %2: \"%3\"\n")
.tqarg(info.fileName())
.tqarg(dir.path())
.tqarg(strerror(errno)));
}
else
{
rich = i18n("removed <cmd>%1</cmd> from <cmd>%2</cmd><br/>")
.tqarg(info.fileName())
.tqarg(dir.path());
plain = i18n("removed %1 from %2\n")
.tqarg(info.fileName())
.tqarg(dir.path());
}
}
void ksv::IO::dissectFilename (const TQString& file, TQString& base, int& nr)
{
TQString tmp = file.mid(1, file.length());
nr = tmp.left(2).toInt();
base = tmp.mid(2, tmp.length());
}
void ksv::IO::makeSymlink (const KSVData& data, int runlevel, bool start,
TQString& rich, TQString& plain)
{
const TQString symName = TQString("%1%2%3").tqarg(start ? "S" : "K").tqarg(data.numberString()).tqarg(data.label());
const TQString symPath = TQString("%1/rc%2.d/").tqarg(KSVConfig::self()->runlevelPath()).tqarg(runlevel);
const TQString symbol = symPath + symName;
TQString target = data.filename();
if (TQDir::isRelativePath(target))
target = ksv::IO::makeRelativePath(TQDir::cleanDirPath(symPath),
TQDir::cleanDirPath(data.path())) + data.filename();
if (symlink(target.local8Bit(), symbol.local8Bit()) == 0)
{
rich = i18n("created <cmd>%1</cmd> in <cmd>%2</cmd><br/>").tqarg(symName).tqarg(symPath);
plain = i18n("created %1 in %2\n").tqarg(symName).tqarg(symPath);
}
else
{
rich = i18n("<error>FAILED</error> to create <cmd>%1</cmd> in <cmd>%2</cmd>: \"%3\"<br/>")
.tqarg(symName)
.tqarg(symPath)
.tqarg(strerror(errno));
plain = i18n("FAILED to create %1 in %2: \"%3\"\n")
.tqarg(symName)
.tqarg(symPath)
.tqarg(strerror(errno));
}
}
TQString ksv::IO::makeRelativePath (const TQString& from, const TQString& to)
{
if (TQDir::isRelativePath(from) || TQDir::isRelativePath(to))
return TQString();
int pos = 0;
const int f_length = from.length();
TQStringList from_list;
while (pos > -1)
{
const int old = pos + 1;
const int res = from.find('/', old);
int length = 0;
if (res > -1)
length = res - old + 1;
else
length = f_length - old;
from_list.append (from.mid(old, length));
pos = res;
}
const int t_length = to.length();
TQStringList to_list;
pos = 0;
while (pos > -1)
{
const int old = pos + 1;
const int res = to.find('/', old);
int length = 0;
if (res > -1)
length = res - old + 1;
else
length = t_length - old;
to_list.append (to.mid(old, length));
pos = res;
}
int lcp = 0; // longest common prefix
const int f_c = from_list.count();
const int t_c = to_list.count();
while (lcp < f_c && lcp < t_c
&& *from_list.at(lcp) == *to_list.at(lcp))
lcp++;
TQString result;
for (int i = f_c - lcp; i > 0; --i)
result += "../";
for (int i = lcp; i < t_c; ++i)
result += *to_list.at(i) + "/";
return result;
}
bool ksv::IO::loadSavedConfiguration (TQDataStream& s,
TQValueList<KSVData>* start,
TQValueList<KSVData>* stop)
{
TQCString magic;
s >> magic;
if (magic != "KSysV")
return false;
TQ_INT32 version = 0;
s >> version;
if (version != 3)
return false; // too old
TQDateTime saveTime;
s >> saveTime;
for (int i = 0; i < ksv::runlevelNumber; ++i)
{
TQString rlMagic;
TQString section;
s >> rlMagic;
s >> section;
if (rlMagic != TQString::tqfromLatin1("RUNLEVEL %1").tqarg(i))
return false;
if (section != "START")
return false;
TQ_INT32 numberOfItems;
s >> numberOfItems;
KSVData data;
for (int j = 0; j < numberOfItems; ++j)
{
s >> data;
start[i].append (data);
}
s >> section;
if (section != "STOP")
return false;
s >> numberOfItems;
for (int j = 0; j < numberOfItems; ++j)
{
s >> data;
stop[i].append(data);
}
}
return true;
}
bool ksv::IO::saveConfiguration (TQDataStream& s,
KSVDragList** start,
KSVDragList** stop)
{
TQ_INT32 version = 3;
s << TQCString("KSysV")
<< version
<< TQDateTime::tqcurrentDateTime(); // save date
for (int i = 0; i < ksv::runlevelNumber; ++i)
{
TQ_INT32 numberOfItems = start[i]->childCount();
s << TQString::tqfromLatin1 ("RUNLEVEL %1").arg (i)
<< TQString::tqfromLatin1 ("START")
<< numberOfItems;
for (TQListViewItemIterator it (start[i]);
it.current();
++it)
{
s << *static_cast<KSVItem*> (it.current())->data();
}
numberOfItems = stop[i]->childCount();
s << TQString::tqfromLatin1 ("STOP")
<< numberOfItems;
for (TQListViewItemIterator it (stop[i]);
it.current();
++it)
{
s << *static_cast<KSVItem*> (it.current())->data();
}
}
return true;
}
KTrader::OfferList ksv::IO::servicesForFile (const TQString& filename)
{
static KTrader* trader = KTrader::self();
static KMimeMagic* magic = KMimeMagic::self();
const TQString mimetype = magic->findFileType(filename)->mimeType();
return trader->query (mimetype, "Type == 'Application'");
}
KService::Ptr ksv::IO::preferredServiceForFile (const TQString& filename)
{
static KMimeMagic* magic = KMimeMagic::self();
const TQString mimetype = magic->findFileType(filename)->mimeType();
return KServiceTypeProfile::preferredService (mimetype, "Application");
}