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.
tdelibs/kdeprint/lpdunix/kmlpdunixmanager.cpp

411 lines
11 KiB

/*
* This file is part of the KDE libraries
* Copyright (c) 2001 Michael Goffioul <kdeprint@swing.be>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library General Public
* License version 2 as published by the Free Software Foundation.
*
* This library 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
* Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public License
* along with this library; see the file COPYING.LIB. If not, write to
* the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
**/
#include "kmlpdunixmanager.h"
#include "kmfactory.h"
#include "kmprinter.h"
#include <tqfile.h>
#include <tqdir.h>
#include <tqfileinfo.h>
#include <tqtextstream.h>
#include <tqregexp.h>
#include <klocale.h>
#include <kstandarddirs.h>
#include <kdebug.h>
#include <stdlib.h>
/*****************
* Utility class *
*****************/
class KTextBuffer
{
public:
KTextBuffer(TQIODevice *dev) : m_stream(dev) {}
bool eof() const { return (m_stream.eof() && m_linebuf.isEmpty()); }
TQString readLine();
void unreadLine(const TQString& l) { m_linebuf = l; }
private:
TQTextStream m_stream;
TQString m_linebuf;
};
TQString KTextBuffer::readLine()
{
TQString line;
if (!m_linebuf.isEmpty())
{
line = m_linebuf;
m_linebuf = TQString::null;
}
else
line = m_stream.readLine();
return line;
}
/*****************************
* Various parsing functions *
*****************************/
// Extract a line from a KTextBuffer:
// '#' -> comments
// '\' -> line continue
// ':' or '|' -> line continue (LPRng)
//
// New entry is detected by a line which have first character different from
// '#', '|', ':'. The line is then put back in the IODevice.
TQString readLine(KTextBuffer& t)
{
TQString line, buffer;
bool lineContinue(false);
while (!t.eof())
{
buffer = t.readLine().stripWhiteSpace();
if (buffer.isEmpty() || buffer[0] == '#')
continue;
if (buffer[0] == '|' || buffer[0] == ':' || lineContinue || line.isEmpty())
{
line.append(buffer);
if (line.right(1) == "\\")
{
line.truncate(line.length()-1);
line = line.stripWhiteSpace();
lineContinue = true;
}
else
lineContinue = false;
}
else
{
t.unreadLine(buffer);
break;
}
}
return line;
}
// extact an entry (printcap-like)
TQMap<TQString,TQString> readEntry(KTextBuffer& t)
{
TQString line = readLine(t);
TQMap<TQString,TQString> entry;
if (!line.isEmpty())
{
TQStringList l = TQStringList::split(':',line,false);
if (l.count() > 0)
{
int p(-1);
if ((p=l[0].find('|')) != -1)
entry["printer-name"] = l[0].left(p); // only keep first name (discard aliases
else
entry["printer-name"] = l[0];
for (uint i=1; i<l.count(); i++)
if ((p=l[i].find('=')) != -1)
entry[l[i].left(p).stripWhiteSpace()] = l[i].right(l[i].length()-p-1).stripWhiteSpace();
else
entry[l[i].stripWhiteSpace()] = TQString::null;
}
}
return entry;
}
// create basic printer from entry
KMPrinter* createPrinter(const TQMap<TQString,TQString>& entry)
{
KMPrinter *printer = new KMPrinter();
printer->setName(entry["printer-name"]);
printer->setPrinterName(entry["printer-name"]);
printer->setType(KMPrinter::Printer);
printer->setState(KMPrinter::Idle);
return printer;
}
KMPrinter* createPrinter(const TQString& prname)
{
TQMap<TQString,TQString> map;
map["printer-name"] = prname;
return createPrinter(map);
}
// this function support LPRng piping feature, it defaults to
// /etc/printcap in any other cases (basic support)
TQString getPrintcapFileName()
{
// check if LPRng system
TQString printcap("/etc/printcap");
TQFile f("/etc/lpd.conf");
if (f.exists() && f.open(IO_ReadOnly))
{
kdDebug() << "/etc/lpd.conf found: probably LPRng system" << endl;
TQTextStream t(&f);
TQString line;
while (!t.eof())
{
line = t.readLine().stripWhiteSpace();
if (line.startsWith("printcap_path="))
{
kdDebug() << "printcap_path entry found: " << line << endl;
TQString pcentry = line.mid(14).stripWhiteSpace();
kdDebug() << "printcap_path value: " << pcentry << endl;
if (pcentry[0] == '|')
{ // printcap through pipe
printcap = locateLocal("tmp","printcap");
TQString cmd = TQString::tqfromLatin1("echo \"all\" | %1 > %2").arg(pcentry.mid(1)).arg(printcap);
kdDebug() << "printcap obtained through pipe" << endl << "executing: " << cmd << endl;
::system(cmd.local8Bit());
}
break;
}
}
}
kdDebug() << "printcap file returned: " << printcap << endl;
return printcap;
}
// "/etc/printcap" file parsing (Linux/LPR)
void KMLpdUnixManager::parseEtcPrintcap()
{
TQFile f(getPrintcapFileName());
if (f.exists() && f.open(IO_ReadOnly))
{
KTextBuffer t(TQT_TQIODEVICE(&f));
TQMap<TQString,TQString> entry;
while (!t.eof())
{
entry = readEntry(t);
if (entry.isEmpty() || !entry.contains("printer-name") || entry.contains("server"))
continue;
if (entry["printer-name"] == "all")
{
if (entry.contains("all"))
{
// find separator
int p = entry["all"].find(TQRegExp("[^a-zA-Z0-9_\\s-]"));
if (p != -1)
{
TQChar c = entry["all"][p];
TQStringList prs = TQStringList::split(c,entry["all"],false);
for (TQStringList::ConstIterator it=prs.begin(); it!=prs.end(); ++it)
{
KMPrinter *printer = ::createPrinter(*it);
printer->setDescription(i18n("Description unavailable"));
addPrinter(printer);
}
}
}
}
else
{
KMPrinter *printer = ::createPrinter(entry);
if (entry.contains("rm"))
printer->setDescription(i18n("Remote printer queue on %1").arg(entry["rm"]));
else
printer->setDescription(i18n("Local printer"));
addPrinter(printer);
}
}
}
}
// helper function for NIS support in Solaris-2.6 (use "ypcat printers.conf.byname")
TQString getEtcPrintersConfName()
{
TQString printersconf("/etc/printers.conf");
if (!TQFile::exists(printersconf) && !KStandardDirs::findExe( "ypcat" ).isEmpty())
{
// standard file not found, try NIS
printersconf = locateLocal("tmp","printers.conf");
TQString cmd = TQString::tqfromLatin1("ypcat printers.conf.byname > %1").arg(printersconf);
kdDebug() << "printers.conf obtained from NIS server: " << cmd << endl;
::system(TQFile::encodeName(cmd));
}
return printersconf;
}
// "/etc/printers.conf" file parsing (Solaris 2.6)
void KMLpdUnixManager::parseEtcPrintersConf()
{
TQFile f(getEtcPrintersConfName());
if (f.exists() && f.open(IO_ReadOnly))
{
KTextBuffer t(TQT_TQIODEVICE(&f));
TQMap<TQString,TQString> entry;
TQString default_printer;
while (!t.eof())
{
entry = readEntry(t);
if (entry.isEmpty() || !entry.contains("printer-name"))
continue;
TQString prname = entry["printer-name"];
if (prname == "_default")
{
if (entry.contains("use"))
default_printer = entry["use"];
}
else if (prname != "_all")
{
KMPrinter *printer = ::createPrinter(entry);
if (entry.contains("bsdaddr"))
{
TQStringList l = TQStringList::split(',',entry["bsdaddr"],false);
printer->setDescription(i18n("Remote printer queue on %1").arg(l[0]));
}
else
printer->setDescription(i18n("Local printer"));
addPrinter(printer);
}
}
if (!default_printer.isEmpty())
setSoftDefault(findPrinter(default_printer));
}
}
// "/etc/lp/printers/" directory parsing (Solaris non-2.6)
void KMLpdUnixManager::parseEtcLpPrinters()
{
TQDir d("/etc/lp/printers");
const TQFileInfoList *prlist = d.entryInfoList(TQDir::Dirs);
if (!prlist)
return;
TQFileInfoListIterator it(*prlist);
for (;it.current();++it)
{
if (it.current()->fileName() == "." || it.current()->fileName() == "..")
continue;
TQFile f(it.current()->absFilePath() + "/configuration");
if (f.exists() && f.open(IO_ReadOnly))
{
KTextBuffer t(TQT_TQIODEVICE(&f));
TQString line, remote;
while (!t.eof())
{
line = readLine(t);
if (line.isEmpty()) continue;
if (line.startsWith("Remote:"))
{
TQStringList l = TQStringList::split(':',line,false);
if (l.count() > 1) remote = l[1];
}
}
KMPrinter *printer = new KMPrinter;
printer->setName(it.current()->fileName());
printer->setPrinterName(it.current()->fileName());
printer->setType(KMPrinter::Printer);
printer->setState(KMPrinter::Idle);
if (!remote.isEmpty())
printer->setDescription(i18n("Remote printer queue on %1").arg(remote));
else
printer->setDescription(i18n("Local printer"));
addPrinter(printer);
}
}
}
// "/etc/lp/member/" directory parsing (HP-UX)
void KMLpdUnixManager::parseEtcLpMember()
{
TQDir d("/etc/lp/member");
const TQFileInfoList *prlist = d.entryInfoList(TQDir::Files);
if (!prlist)
return;
TQFileInfoListIterator it(*prlist);
for (;it.current();++it)
{
KMPrinter *printer = new KMPrinter;
printer->setName(it.current()->fileName());
printer->setPrinterName(it.current()->fileName());
printer->setType(KMPrinter::Printer);
printer->setState(KMPrinter::Idle);
printer->setDescription(i18n("Local printer"));
addPrinter(printer);
}
}
// "/usr/spool/lp/interfaces/" directory parsing (IRIX 6.x)
void KMLpdUnixManager::parseSpoolInterface()
{
TQDir d("/usr/spool/interfaces/lp");
const TQFileInfoList *prlist = d.entryInfoList(TQDir::Files);
if (!prlist)
return;
TQFileInfoListIterator it(*prlist);
for (;it.current();++it)
{
TQFile f(it.current()->absFilePath());
if (f.exists() && f.open(IO_ReadOnly))
{
KTextBuffer t(TQT_TQIODEVICE(&f));
TQString line, remote;
while (!t.eof())
{
line = t.readLine().stripWhiteSpace();
if (line.startsWith("HOSTNAME"))
{
TQStringList l = TQStringList::split('=',line,false);
if (l.count() > 1) remote = l[1];
}
}
KMPrinter *printer = new KMPrinter;
printer->setName(it.current()->fileName());
printer->setPrinterName(it.current()->fileName());
printer->setType(KMPrinter::Printer);
printer->setState(KMPrinter::Idle);
if (!remote.isEmpty())
printer->setDescription(i18n("Remote printer queue on %1").arg(remote));
else
printer->setDescription(i18n("Local printer"));
addPrinter(printer);
}
}
}
//*********************************************************************************************************
KMLpdUnixManager::KMLpdUnixManager(TQObject *parent, const char *name, const TQStringList & /*args*/)
: KMManager(parent,name)
{
m_loaded = false;
}
void KMLpdUnixManager::listPrinters()
{
// load only once, if already loaded, just keep them (remove discard flag)
if (!m_loaded)
{
parseEtcPrintcap();
parseEtcPrintersConf();
parseEtcLpPrinters();
parseEtcLpMember();
parseSpoolInterface();
m_loaded = true;
}
else
discardAllPrinters(false);
}