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.
292 lines
7.5 KiB
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.tqfind('/', 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.tqfind('/', 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");
|
|
}
|