summaryrefslogtreecommitdiffstats
path: root/kdoctools/tdeio_help.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'kdoctools/tdeio_help.cpp')
-rw-r--r--kdoctools/tdeio_help.cpp404
1 files changed, 404 insertions, 0 deletions
diff --git a/kdoctools/tdeio_help.cpp b/kdoctools/tdeio_help.cpp
new file mode 100644
index 000000000..d6d5f285a
--- /dev/null
+++ b/kdoctools/tdeio_help.cpp
@@ -0,0 +1,404 @@
+#include <config.h>
+
+#ifdef HAVE_SYS_TYPES_H
+# include <sys/types.h>
+#endif
+#ifdef HAVE_SYS_STAT_H
+# include <sys/stat.h>
+#endif
+
+#include <errno.h>
+#include <fcntl.h>
+#ifdef HAVE_STDIO_H
+# include <stdio.h>
+#endif
+#ifdef HAVE_STDLIB_H
+# include <stdlib.h>
+#endif
+
+#include <tqvaluelist.h>
+#include <tqfileinfo.h>
+#include <tqfile.h>
+#include <tqtextstream.h>
+#include <tqregexp.h>
+#include <tqtextcodec.h>
+
+#include <kdebug.h>
+#include <kurl.h>
+#include <kglobal.h>
+#include <klocale.h>
+#include <kstandarddirs.h>
+#include <kinstance.h>
+
+#include "tdeio_help.h"
+#include <libxslt/xsltutils.h>
+#include <libxslt/transform.h>
+#include "xslt.h"
+
+using namespace TDEIO;
+
+TQString HelpProtocol::langLookup(const TQString& fname)
+{
+ TQStringList search;
+
+ // assemble the local search paths
+ const TQStringList localDoc = TDEGlobal::dirs()->resourceDirs("html") + TDEGlobal::dirs()->resourceDirs("html-bundle");
+
+ TQStringList langs = TDEGlobal::locale()->languageList();
+ langs.append( "en" );
+ langs.remove( "C" );
+
+ // this is kind of compat hack as we install our docs in en/ but the
+ // default language is en_US
+ for (TQStringList::Iterator it = langs.begin(); it != langs.end(); ++it)
+ if ( *it == "en_US" )
+ *it = "en";
+
+ // look up the different languages
+ int ldCount = localDoc.count();
+ for (int id=0; id < ldCount; id++)
+ {
+ TQStringList::ConstIterator lang;
+ for (lang = langs.begin(); lang != langs.end(); ++lang)
+ search.append(TQString("%1%2/%3").arg(localDoc[id], *lang, fname));
+ }
+
+ // try to locate the file
+ TQStringList::Iterator it;
+ for (it = search.begin(); it != search.end(); ++it)
+ {
+ kdDebug( 7119 ) << "Looking for help in: " << *it << endl;
+
+ TQFileInfo info(*it);
+ if (info.exists() && info.isFile() && info.isReadable())
+ return *it;
+
+ if ( ( *it ).right( 5 ) == ".html" )
+ {
+ TQString file = (*it).left((*it).findRev('/')) + "/index.docbook";
+ kdDebug( 7119 ) << "Looking for help in: " << file << endl;
+ info.setFile(file);
+ if (info.exists() && info.isFile() && info.isReadable())
+ return *it;
+ }
+ }
+
+
+ return TQString::null;
+}
+
+
+TQString HelpProtocol::lookupFile(const TQString &fname,
+ const TQString &query, bool &redirect)
+{
+ redirect = false;
+
+ TQString path, result;
+
+ path = fname;
+
+ result = langLookup(path);
+ if (result.isEmpty())
+ {
+ result = langLookup(path+"/index.html");
+ if (!result.isEmpty())
+ {
+ KURL red( "help:/" );
+ red.setPath( path + "/index.html" );
+ red.setQuery( query );
+ redirection(red);
+ kdDebug( 7119 ) << "redirect to " << red.url() << endl;
+ redirect = true;
+ }
+ else
+ {
+ unicodeError( i18n("There is no documentation available for %1." ).arg(path) );
+ finished();
+ return TQString::null;
+ }
+ } else
+ kdDebug( 7119 ) << "result " << result << endl;
+
+ return result;
+}
+
+
+void HelpProtocol::unicodeError( const TQString &t )
+{
+ data(fromUnicode( TQString(
+ "<html><head><meta http-equiv=\"Content-Type\" content=\"text/html; charset=%1\"></head>\n"
+ "%2</html>" ).arg( TQTextCodec::codecForLocale()->name() ).arg( t ) ) );
+}
+
+HelpProtocol *slave = 0;
+
+HelpProtocol::HelpProtocol( bool ghelp, const TQCString &pool, const TQCString &app )
+ : SlaveBase( ghelp ? "ghelp" : "help", pool, app ), mGhelp( ghelp )
+{
+ slave = this;
+}
+
+void HelpProtocol::get( const KURL& url )
+{
+ kdDebug( 7119 ) << "get: path=" << url.path()
+ << " query=" << url.query() << endl;
+
+ bool redirect;
+ TQString doc;
+ doc = url.path();
+
+ if ( !mGhelp ) {
+ if (doc.at(0) != '/')
+ doc = doc.prepend('/');
+
+ if (doc.at(doc.length() - 1) == '/')
+ doc += "index.html";
+ }
+
+ infoMessage(i18n("Looking up correct file"));
+
+ if ( !mGhelp ) {
+ doc = lookupFile(doc, url.query(), redirect);
+
+ if (redirect)
+ {
+ finished();
+ return;
+ }
+ }
+
+ if (doc.isEmpty())
+ {
+ error( TDEIO::ERR_DOES_NOT_EXIST, url.url() );
+ return;
+ }
+
+ mimeType("text/html");
+ KURL target;
+ target.setPath(doc);
+ if (url.hasHTMLRef())
+ target.setHTMLRef(url.htmlRef());
+
+ kdDebug( 7119 ) << "target " << target.url() << endl;
+
+ TQString file = target.path();
+
+ if ( mGhelp ) {
+ if ( file.right( 4 ) != ".xml" ) {
+ get_file( target );
+ return;
+ }
+ } else {
+ TQString docbook_file = file.left(file.findRev('/')) + "/index.docbook";
+ if (!KStandardDirs::exists(file)) {
+ file = docbook_file;
+ } else {
+ TQFileInfo fi(file);
+ if (fi.isDir()) {
+ file = file + "/index.docbook";
+ } else {
+ if ( file.right( 5 ) != ".html" || !compareTimeStamps( file, docbook_file ) ) {
+ get_file( target );
+ return;
+ } else
+ file = docbook_file;
+ }
+ }
+ }
+
+ infoMessage(i18n("Preparing document"));
+
+ if ( mGhelp ) {
+ TQString xsl = "customization/kde-nochunk.xsl";
+ mParsed = transform(file, locate("dtd", xsl));
+
+ kdDebug( 7119 ) << "parsed " << mParsed.length() << endl;
+
+ if (mParsed.isEmpty()) {
+ unicodeError( i18n( "The requested help file could not be parsed:<br>%1" ).arg( file ) );
+ } else {
+ int pos1 = mParsed.find( "charset=" );
+ if ( pos1 > 0 ) {
+ int pos2 = mParsed.find( '"', pos1 );
+ if ( pos2 > 0 ) {
+ mParsed.replace( pos1, pos2 - pos1, "charset=UTF-8" );
+ }
+ }
+ data( mParsed.utf8() );
+ }
+ } else {
+
+ kdDebug( 7119 ) << "look for cache for " << file << endl;
+
+ mParsed = lookForCache( file );
+
+ kdDebug( 7119 ) << "cached parsed " << mParsed.length() << endl;
+
+ if ( mParsed.isEmpty() ) {
+ mParsed = transform(file, locate("dtd", "customization/kde-chunk.xsl"));
+ if ( !mParsed.isEmpty() ) {
+ infoMessage( i18n( "Saving to cache" ) );
+ TQString cache = file.left( file.length() - 7 );
+ saveToCache( mParsed, locateLocal( "cache",
+ "tdeio_help" + cache +
+ "cache.bz2" ) );
+ }
+ } else infoMessage( i18n( "Using cached version" ) );
+
+ kdDebug( 7119 ) << "parsed " << mParsed.length() << endl;
+
+ if (mParsed.isEmpty()) {
+ unicodeError( i18n( "The requested help file could not be parsed:<br>%1" ).arg( file ) );
+ } else {
+ TQString query = url.query(), anchor;
+
+ // if we have a query, look if it contains an anchor
+ if (!query.isEmpty())
+ if (query.left(8) == "?anchor=") {
+ anchor = query.mid(8).lower();
+
+ KURL redirURL(url);
+
+ redirURL.setQuery(TQString::null);
+ redirURL.setHTMLRef(anchor);
+ redirection(redirURL);
+ finished();
+ return;
+ }
+ if (anchor.isEmpty() && url.hasHTMLRef())
+ anchor = url.htmlRef();
+
+ kdDebug( 7119 ) << "anchor: " << anchor << endl;
+
+ if ( !anchor.isEmpty() )
+ {
+ int index = 0;
+ while ( true ) {
+ index = mParsed.find( TQRegExp( "<a name=" ), index);
+ if ( index == -1 ) {
+ kdDebug( 7119 ) << "no anchor\n";
+ break; // use whatever is the target, most likely index.html
+ }
+
+ if ( mParsed.mid( index, 11 + anchor.length() ).lower() ==
+ TQString( "<a name=\"%1\">" ).arg( anchor ) )
+ {
+ index = mParsed.findRev( "<FILENAME filename=", index ) +
+ strlen( "<FILENAME filename=\"" );
+ TQString filename=mParsed.mid( index, 2000 );
+ filename = filename.left( filename.find( '\"' ) );
+ TQString path = target.path();
+ path = path.left( path.findRev( '/' ) + 1) + filename;
+ kdDebug( 7119 ) << "anchor found in " << path <<endl;
+ target.setPath( path );
+ break;
+ }
+ index++;
+ }
+ }
+ emitFile( target );
+ }
+ }
+
+ finished();
+}
+
+void HelpProtocol::emitFile( const KURL& url )
+{
+ infoMessage(i18n("Looking up section"));
+
+ TQString filename = url.path().mid(url.path().findRev('/') + 1);
+
+ int index = mParsed.find(TQString("<FILENAME filename=\"%1\"").arg(filename));
+ if (index == -1) {
+ if ( filename == "index.html" ) {
+ data( fromUnicode( mParsed ) );
+ return;
+ }
+
+ unicodeError( i18n("Could not find filename %1 in %2.").arg(filename).arg( url.url() ) );
+ return;
+ }
+
+ TQString filedata = splitOut(mParsed, index);
+ replaceCharsetHeader( filedata );
+
+ data( fromUnicode( filedata ) );
+ data( TQByteArray() );
+}
+
+void HelpProtocol::mimetype( const KURL &)
+{
+ mimeType("text/html");
+ finished();
+}
+
+// Copied from tdeio_file to avoid redirects
+
+#define MAX_IPC_SIZE (1024*32)
+
+void HelpProtocol::get_file( const KURL& url )
+{
+ kdDebug( 7119 ) << "get_file " << url.url() << endl;
+
+ TQCString _path( TQFile::encodeName(url.path()));
+ struct stat buff;
+ if ( ::stat( _path.data(), &buff ) == -1 ) {
+ if ( errno == EACCES )
+ error( TDEIO::ERR_ACCESS_DENIED, url.path() );
+ else
+ error( TDEIO::ERR_DOES_NOT_EXIST, url.path() );
+ return;
+ }
+
+ if ( S_ISDIR( buff.st_mode ) ) {
+ error( TDEIO::ERR_IS_DIRECTORY, url.path() );
+ return;
+ }
+ if ( S_ISFIFO( buff.st_mode ) || S_ISSOCK ( buff.st_mode ) ) {
+ error( TDEIO::ERR_CANNOT_OPEN_FOR_READING, url.path() );
+ return;
+ }
+
+ int fd = open( _path.data(), O_RDONLY);
+ if ( fd < 0 ) {
+ error( TDEIO::ERR_CANNOT_OPEN_FOR_READING, url.path() );
+ return;
+ }
+
+ totalSize( buff.st_size );
+ int processed_size = 0;
+
+ char buffer[ MAX_IPC_SIZE ];
+ TQByteArray array;
+
+ while( 1 )
+ {
+ int n = ::read( fd, buffer, MAX_IPC_SIZE );
+ if (n == -1)
+ {
+ if (errno == EINTR)
+ continue;
+ error( TDEIO::ERR_COULD_NOT_READ, url.path());
+ close(fd);
+ return;
+ }
+ if (n == 0)
+ break; // Finished
+
+ array.setRawData(buffer, n);
+ data( array );
+ array.resetRawData(buffer, n);
+
+ processed_size += n;
+ processedSize( processed_size );
+ }
+
+ data( TQByteArray() );
+
+ close( fd );
+
+ processedSize( buff.st_size );
+
+ finished();
+}