diff options
Diffstat (limited to 'kdvi/special.cpp')
-rw-r--r-- | kdvi/special.cpp | 727 |
1 files changed, 727 insertions, 0 deletions
diff --git a/kdvi/special.cpp b/kdvi/special.cpp new file mode 100644 index 00000000..23e58441 --- /dev/null +++ b/kdvi/special.cpp @@ -0,0 +1,727 @@ + +// special.cpp + +// Methods for dviRenderer which deal with "\special" commands found in the +// DVI file + +// Copyright 2000--2004, Stefan Kebekus ([email protected]). + +#include <config.h> + +#include <kdebug.h> +#include <klocale.h> +#include <kmimetype.h> +#include <kprocio.h> +#include <qdir.h> +#include <qfile.h> +#include <qfileinfo.h> +#include <qimage.h> +#include <qstringlist.h> + +#include "dviFile.h" +#include "dviRenderer.h" +#include "hyperlink.h" +#include "kdvi.h" +#include "kdvi_multipage.h" +#include "psgs.h" +#include "xdvi.h" + +//#define DEBUG_SPECIAL + +extern QPainter *foreGroundPainter; + +void dviRenderer::printErrorMsgForSpecials(const QString& msg) +{ + if (dviFile->errorCounter < 25) { + kdError(4300) << msg << endl; + dviFile->errorCounter++; + if (dviFile->errorCounter == 25) + kdError(4300) << i18n("That makes 25 errors. Further error messages will not be printed.") << endl; + } +} + +// Parses a color specification, as explained in the manual to +// dvips. If the spec could not be parsed, an invalid color will be +// returned. + +QColor dviRenderer::parseColorSpecification(const QString& colorSpec) +{ + // Initialize the map of known colors, if that is not done yet. + if (namedColors.isEmpty()) { + namedColors["Red"] = QColor( (int)(255.0*1), (int)(255.0*0), (int)(255.0*0)); + namedColors["Tan"] = QColor( (int)(255.0*0.86), (int)(255.0*0.58), (int)(255.0*0.44)); + namedColors["Blue"] = QColor( (int)(255.0*0), (int)(255.0*0), (int)(255.0*1)); + namedColors["Cyan"] = QColor( (int)(255.0*0), (int)(255.0*1), (int)(255.0*1)); + namedColors["Gray"] = QColor( (int)(255.0*0.5), (int)(255.0*0.5), (int)(255.0*0.5)); + namedColors["Plum"] = QColor( (int)(255.0*0.5), (int)(255.0*0), (int)(255.0*1)); + namedColors["Black"] = QColor( (int)(255.0*0), (int)(255.0*0), (int)(255.0*0)); + namedColors["Brown"] = QColor( (int)(255.0*0.4), (int)(255.0*0), (int)(255.0*0)); + namedColors["Green"] = QColor( (int)(255.0*0), (int)(255.0*1), (int)(255.0*0)); + namedColors["Melon"] = QColor( (int)(255.0*1), (int)(255.0*0.54), (int)(255.0*0.5)); + namedColors["Peach"] = QColor( (int)(255.0*1), (int)(255.0*0.5), (int)(255.0*0.3)); + namedColors["Sepia"] = QColor( (int)(255.0*0.3), (int)(255.0*0), (int)(255.0*0)); + namedColors["White"] = QColor( (int)(255.0*1), (int)(255.0*1), (int)(255.0*1)); + namedColors["Maroon"] = QColor( (int)(255.0*0.68), (int)(255.0*0), (int)(255.0*0)); + namedColors["Orange"] = QColor( (int)(255.0*1), (int)(255.0*0.39), (int)(255.0*0.13)); + namedColors["Orchid"] = QColor( (int)(255.0*0.68), (int)(255.0*0.36), (int)(255.0*1)); + namedColors["Purple"] = QColor( (int)(255.0*0.55), (int)(255.0*0.14), (int)(255.0*1)); + namedColors["Salmon"] = QColor( (int)(255.0*1), (int)(255.0*0.47), (int)(255.0*0.62)); + namedColors["Violet"] = QColor( (int)(255.0*0.21), (int)(255.0*0.12), (int)(255.0*1)); + namedColors["Yellow"] = QColor( (int)(255.0*1), (int)(255.0*1), (int)(255.0*0)); + namedColors["Apricot"] = QColor( (int)(255.0*1), (int)(255.0*0.68), (int)(255.0*0.48)); + namedColors["Emerald"] = QColor( (int)(255.0*0), (int)(255.0*1), (int)(255.0*0.5)); + namedColors["Fuchsia"] = QColor( (int)(255.0*0.45), (int)(255.0*0.01), (int)(255.0*0.92)); + namedColors["Magenta"] = QColor( (int)(255.0*1), (int)(255.0*0), (int)(255.0*1)); + namedColors["SkyBlue"] = QColor( (int)(255.0*0.38), (int)(255.0*1), (int)(255.0*0.88)); + namedColors["Thistle"] = QColor( (int)(255.0*0.88), (int)(255.0*0.41), (int)(255.0*1)); + namedColors["BrickRed"] = QColor( (int)(255.0*0.72), (int)(255.0*0), (int)(255.0*0)); + namedColors["Cerulean"] = QColor( (int)(255.0*0.06), (int)(255.0*0.89), (int)(255.0*1)); + namedColors["Lavender"] = QColor( (int)(255.0*1), (int)(255.0*0.52), (int)(255.0*1)); + namedColors["Mahogany"] = QColor( (int)(255.0*0.65), (int)(255.0*0), (int)(255.0*0)); + namedColors["Mulberry"] = QColor( (int)(255.0*0.64), (int)(255.0*0.08), (int)(255.0*0.98)); + namedColors["NavyBlue"] = QColor( (int)(255.0*0.06), (int)(255.0*0.46), (int)(255.0*1)); + namedColors["SeaGreen"] = QColor( (int)(255.0*0.31), (int)(255.0*1), (int)(255.0*0.5)); + namedColors["TealBlue"] = QColor( (int)(255.0*0.12), (int)(255.0*0.98), (int)(255.0*0.64)); + namedColors["BlueGreen"] = QColor( (int)(255.0*0.15), (int)(255.0*1), (int)(255.0*0.67)); + namedColors["CadetBlue"] = QColor( (int)(255.0*0.38), (int)(255.0*0.43), (int)(255.0*0.77)); + namedColors["Dandelion"] = QColor( (int)(255.0*1), (int)(255.0*0.71), (int)(255.0*0.16)); + namedColors["Goldenrod"] = QColor( (int)(255.0*1), (int)(255.0*0.9), (int)(255.0*0.16)); + namedColors["LimeGreen"] = QColor( (int)(255.0*0.5), (int)(255.0*1), (int)(255.0*0)); + namedColors["OrangeRed"] = QColor( (int)(255.0*1), (int)(255.0*0), (int)(255.0*0.5)); + namedColors["PineGreen"] = QColor( (int)(255.0*0), (int)(255.0*0.75), (int)(255.0*0.16)); + namedColors["RawSienna"] = QColor( (int)(255.0*0.55), (int)(255.0*0), (int)(255.0*0)); + namedColors["RedOrange"] = QColor( (int)(255.0*1), (int)(255.0*0.23), (int)(255.0*0.13)); + namedColors["RedViolet"] = QColor( (int)(255.0*0.59), (int)(255.0*0), (int)(255.0*0.66)); + namedColors["Rhodamine"] = QColor( (int)(255.0*1), (int)(255.0*0.18), (int)(255.0*1)); + namedColors["RoyalBlue"] = QColor( (int)(255.0*0), (int)(255.0*0.5), (int)(255.0*1)); + namedColors["RubineRed"] = QColor( (int)(255.0*1), (int)(255.0*0), (int)(255.0*0.87)); + namedColors["Turquoise"] = QColor( (int)(255.0*0.15), (int)(255.0*1), (int)(255.0*0.8)); + namedColors["VioletRed"] = QColor( (int)(255.0*1), (int)(255.0*0.19), (int)(255.0*1)); + namedColors["Aquamarine"] = QColor( (int)(255.0*0.18), (int)(255.0*1), (int)(255.0*0.7)); + namedColors["BlueViolet"] = QColor( (int)(255.0*0.1), (int)(255.0*0.05), (int)(255.0*0.96)); + namedColors["DarkOrchid"] = QColor( (int)(255.0*0.6), (int)(255.0*0.2), (int)(255.0*0.8)); + namedColors["OliveGreen"] = QColor( (int)(255.0*0), (int)(255.0*0.6), (int)(255.0*0)); + namedColors["Periwinkle"] = QColor( (int)(255.0*0.43), (int)(255.0*0.45), (int)(255.0*1)); + namedColors["Bittersweet"] = QColor( (int)(255.0*0.76), (int)(255.0*0.01), (int)(255.0*0)); + namedColors["BurntOrange"] = QColor( (int)(255.0*1), (int)(255.0*0.49), (int)(255.0*0)); + namedColors["ForestGreen"] = QColor( (int)(255.0*0), (int)(255.0*0.88), (int)(255.0*0)); + namedColors["GreenYellow"] = QColor( (int)(255.0*0.85), (int)(255.0*1), (int)(255.0*0.31)); + namedColors["JungleGreen"] = QColor( (int)(255.0*0.01), (int)(255.0*1), (int)(255.0*0.48)); + namedColors["ProcessBlue"] = QColor( (int)(255.0*0.04), (int)(255.0*1), (int)(255.0*1)); + namedColors["RoyalPurple"] = QColor( (int)(255.0*0.25), (int)(255.0*0.1), (int)(255.0*1)); + namedColors["SpringGreen"] = QColor( (int)(255.0*0.74), (int)(255.0*1), (int)(255.0*0.24)); + namedColors["YellowGreen"] = QColor( (int)(255.0*0.56), (int)(255.0*1), (int)(255.0*0.26)); + namedColors["MidnightBlue"] = QColor( (int)(255.0*0), (int)(255.0*0.44), (int)(255.0*0.57)); + namedColors["YellowOrange"] = QColor( (int)(255.0*1), (int)(255.0*0.58), (int)(255.0*0)); + namedColors["CarnationPink"] = QColor( (int)(255.0*1), (int)(255.0*0.37), (int)(255.0*1)); + namedColors["CornflowerBlue"] = QColor( (int)(255.0*0.35), (int)(255.0*0.87), (int)(255.0*1)); + namedColors["WildStrawberry"] = QColor( (int)(255.0*1), (int)(255.0*0.04), (int)(255.0*0.61)); + } + + QString specType = colorSpec.section(' ', 0, 0); + + if (specType.find("rgb", false) == 0) { + bool ok; + + double r = colorSpec.section(' ', 1, 1).toDouble(&ok); + if ((ok == false) || (r < 0.0) || (r > 1.0)) + return QColor(); + + double g = colorSpec.section(' ', 2, 2).toDouble(&ok); + if ((ok == false) || (g < 0.0) || (g > 1.0)) + return QColor(); + + double b = colorSpec.section(' ', 3, 3).toDouble(&ok); + if ((ok == false) || (b < 0.0) || (b > 1.0)) + return QColor(); + + return QColor((int)(r*255.0+0.5), (int)(g*255.0+0.5), (int)(b*255.0+0.5)); + } + + if (specType.find("hsb", false) == 0) { + bool ok; + + double h = colorSpec.section(' ', 1, 1).toDouble(&ok); + if ((ok == false) || (h < 0.0) || (h > 1.0)) + return QColor(); + + double s = colorSpec.section(' ', 2, 2).toDouble(&ok); + if ((ok == false) || (s < 0.0) || (s > 1.0)) + return QColor(); + + double b = colorSpec.section(' ', 3, 3).toDouble(&ok); + if ((ok == false) || (b < 0.0) || (b > 1.0)) + return QColor(); + + return QColor((int)(h*359.0+0.5), (int)(s*255.0+0.5), (int)(b*255.0+0.5), QColor::Hsv); + } + + if (specType.find("cmyk", false) == 0) { + bool ok; + + double c = colorSpec.section(' ', 1, 1).toDouble(&ok); + if ((ok == false) || (c < 0.0) || (c > 1.0)) + return QColor(); + + double m = colorSpec.section(' ', 2, 2).toDouble(&ok); + if ((ok == false) || (m < 0.0) || (m > 1.0)) + return QColor(); + + double y = colorSpec.section(' ', 3, 3).toDouble(&ok); + if ((ok == false) || (y < 0.0) || (y > 1.0)) + return QColor(); + + double k = colorSpec.section(' ', 3, 3).toDouble(&ok); + if ((ok == false) || (k < 0.0) || (k > 1.0)) + return QColor(); + + // Convert cmyk coordinates to rgb. + double r = 1.0 - c - k; + if (r < 0.0) + r = 0.0; + double g = 1.0 - m - k; + if (g < 0.0) + g = 0.0; + double b = 1.0 - y - k; + if (b < 0.0) + b = 0.0; + + return QColor((int)(r*255.0+0.5), (int)(g*255.0+0.5), (int)(b*255.0+0.5)); + } + + if (specType.find("gray", false) == 0) { + bool ok; + + double g = colorSpec.section(' ', 1, 1).toDouble(&ok); + if ((ok == false) || (g < 0.0) || (g > 1.0)) + return QColor(); + + return QColor((int)(g*255.0+0.5), (int)(g*255.0+0.5), (int)(g*255.0+0.5)); + } + + // Check if the color is one of the known named colors. + QMap<QString, QColor>::Iterator f = namedColors.find(specType); + if (f != namedColors.end()) + return *f; + + return QColor(specType); +} + + + + + + +void dviRenderer::color_special(const QString& _cp) +{ + QString const cp = _cp.stripWhiteSpace(); + + QString command = cp.section(' ', 0, 0); + + if (command == "pop") { + // Take color off the stack + if (colorStack.isEmpty()) + printErrorMsgForSpecials( i18n("Error in DVIfile '%1', page %2. Color pop command issued when the color stack is empty." ). + arg(dviFile->filename).arg(current_page)); + else + colorStack.pop(); + return; + } + + if (command == "push") { + // Get color specification + QColor const col = parseColorSpecification(cp.section(' ', 1)); + // Set color + if (col.isValid()) + colorStack.push(col); + else + colorStack.push(Qt::black); + return; + } + + // Get color specification and set the color for the rest of this + // page + QColor col = parseColorSpecification(cp); + // Set color + if (col.isValid()) + globalColor = col; + else + globalColor = Qt::black; + return; +} + + +void dviRenderer::html_href_special(const QString& _cp) +{ + QString cp = _cp; + cp.truncate(cp.find('"')); + +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "HTML-special, href " << cp.latin1() << endl; +#endif + HTML_href = new QString(cp); +} + + +void dviRenderer::html_anchor_end() +{ +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "HTML-special, anchor-end" << endl; +#endif + + if (HTML_href != NULL) { + delete HTML_href; + HTML_href = NULL; + } +} + + +void dviRenderer::source_special(const QString& cp) +{ + // only when rendering really takes place: set source_href to the + // current special string. When characters are rendered, the + // rendering routine will then generate a DVI_HyperLink and add it + // to the proper list. This DVI_HyperLink is used to match mouse + // positions with the hyperlinks for inverse search. + if (source_href) + *source_href = cp; + else + source_href = new QString(cp); +} + + +void parse_special_argument(const QString& strg, const char* argument_name, int* variable) +{ + int index = strg.find(argument_name); + if (index >= 0) { + QString tmp = strg.mid(index + strlen(argument_name)); + index = tmp.find(' '); + if (index >= 0) + tmp.truncate(index); + + bool OK; + float const tmp_float = tmp.toFloat(&OK); + + if (OK) + *variable = int(tmp_float+0.5); + else + // Maybe we should open a dialog here. + kdError(4300) << i18n("Malformed parameter in the epsf special command.\n" + "Expected a float to follow %1 in %2") + .arg(argument_name).arg(strg) << endl; + } +} + + +void dviRenderer::epsf_special(const QString& cp) +{ +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "epsf-special: psfile=" << cp <<endl; +#endif + + QString include_command = cp.simplifyWhiteSpace(); + + // The line is supposed to start with "..ile=", and then comes the + // filename. Figure out what the filename is and stow it away. Of + // course, this does not work if the filename contains spaces + // (already the simplifyWhiteSpace() above is wrong). If you have + // files like this, go away. + QString EPSfilename_orig = include_command; + EPSfilename_orig.truncate(EPSfilename_orig.find(' ')); + + // Strip enclosing quotation marks which are included by some LaTeX + // macro packages (but not by others). This probably means that + // graphic files are no longer found if the filename really does + // contain quotes, but we don't really care that much. + if ((EPSfilename_orig.at(0) == '\"') && (EPSfilename_orig.at(EPSfilename_orig.length()-1) == '\"')) { + EPSfilename_orig = EPSfilename_orig.mid(1,EPSfilename_orig.length()-2); + } + QString EPSfilename = ghostscript_interface::locateEPSfile(EPSfilename_orig, baseURL); + + // Now parse the arguments. + int llx = 0; + int lly = 0; + int urx = 0; + int ury = 0; + int rwi = 0; + int rhi = 0; + int angle = 0; + + // just to avoid ambiguities; the filename could contain keywords + include_command = include_command.mid(include_command.find(' ')); + + parse_special_argument(include_command, "llx=", &llx); + parse_special_argument(include_command, "lly=", &lly); + parse_special_argument(include_command, "urx=", &urx); + parse_special_argument(include_command, "ury=", &ury); + parse_special_argument(include_command, "rwi=", &rwi); + parse_special_argument(include_command, "rhi=", &rhi); + parse_special_argument(include_command, "angle=", &angle); + + // If we have a png, gif, jpeg or mng file, we need to draw it here. + KMimeType::Ptr const mime_type = KMimeType::findByFileContent(EPSfilename); + QString const & mime_type_name = mime_type->name(); + bool const isGFX = (mime_type_name == "image/png" || + mime_type_name == "image/gif" || + mime_type_name == "image/jpeg" || + mime_type_name == "video/x-mng"); + + // So, if we do not have a PostScript file, but a graphics file, and + // if that file exists, we draw it here. + if (isGFX && QFile::exists(EPSfilename)) { + // Don't show PostScript, just draw the bounding box. For this, + // calculate the size of the bounding box in Pixels. + double bbox_width = urx - llx; + double bbox_height = ury - lly; + + if ((rwi != 0)&&(bbox_width != 0)) { + bbox_height *= rwi/bbox_width; + bbox_width = rwi; + } + if ((rhi != 0)&&(bbox_height != 0)) { + bbox_width *= rhi/bbox_height; + bbox_height = rhi; + } + + double fontPixelPerDVIunit = dviFile->getCmPerDVIunit() * 1200.0/2.54; + + bbox_width *= 0.1 * 65536.0*fontPixelPerDVIunit / shrinkfactor; + bbox_height *= 0.1 * 65536.0*fontPixelPerDVIunit / shrinkfactor; + + QImage image(EPSfilename); + image = image.smoothScale((int)(bbox_width), (int)(bbox_height)); + foreGroundPainter->drawImage( ((int) ((currinf.data.dvi_h) / (shrinkfactor * 65536))), currinf.data.pxl_v - (int)bbox_height, image); + return; + } + + if (!_postscript || !QFile::exists(EPSfilename)) { + // Don't show PostScript, just draw the bounding box. For this, + // calculate the size of the bounding box in Pixels. + double bbox_width = urx - llx; + double bbox_height = ury - lly; + + if ((rwi != 0)&&(bbox_width != 0)) { + bbox_height *= rwi/bbox_width; + bbox_width = rwi; + } + if ((rhi != 0)&&(bbox_height != 0)) { + bbox_width *= rhi/bbox_height; + bbox_height = rhi; + } + + double fontPixelPerDVIunit = dviFile->getCmPerDVIunit() * 1200.0/2.54; + + bbox_width *= 0.1 * 65536.0*fontPixelPerDVIunit / shrinkfactor; + bbox_height *= 0.1 * 65536.0*fontPixelPerDVIunit / shrinkfactor; + + QRect bbox(((int) ((currinf.data.dvi_h) / (shrinkfactor * 65536))), currinf.data.pxl_v - (int)bbox_height, + (int)bbox_width, (int)bbox_height); + + foreGroundPainter->save(); + + if (QFile::exists(EPSfilename)) + foreGroundPainter->setBrush(Qt::lightGray); + else + foreGroundPainter->setBrush(Qt::red); + foreGroundPainter->setPen(Qt::black); + foreGroundPainter->drawRoundRect(bbox, 2, 2); + QFont f = foreGroundPainter->font(); + f.setPointSize(8); + foreGroundPainter->setFont(f); + if (QFile::exists(EPSfilename)) + foreGroundPainter->drawText (bbox, (int)(Qt::AlignCenter), EPSfilename_orig, -1); + else + foreGroundPainter->drawText (bbox, (int)(Qt::AlignCenter), + i18n("File not found: \n %1").arg(EPSfilename_orig), -1); + foreGroundPainter->restore(); + } + + return; +} + + +void dviRenderer::TPIC_flushPath_special() +{ +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "TPIC special flushPath" << endl; +#endif + + if (number_of_elements_in_path == 0) { + printErrorMsgForSpecials("TPIC special flushPath called when path was empty."); + return; + } + + QPen pen(Qt::black, (int)(penWidth_in_mInch*resolutionInDPI/1000.0 + 0.5)); // Sets the pen size in milli-inches + foreGroundPainter->setPen(pen); + foreGroundPainter->drawPolyline(TPIC_path, 0, number_of_elements_in_path); + number_of_elements_in_path = 0; +} + + +void dviRenderer::TPIC_addPath_special(const QString& cp) +{ +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "TPIC special addPath: " << cp << endl; +#endif + + // Adds a point to the path list + QString cp_noWhiteSpace = cp.stripWhiteSpace(); + bool ok; + float xKoord = cp_noWhiteSpace.section(' ', 0, 0).toFloat(&ok); + if (ok == false) { + printErrorMsgForSpecials( QString("TPIC special; cannot parse first argument in 'pn %1'.").arg(cp) ); + return; + } + float yKoord = cp_noWhiteSpace.section(' ', 1, 1).toFloat(&ok); + if (ok == false) { + printErrorMsgForSpecials( QString("TPIC special; cannot parse second argument in 'pn %1'.").arg(cp) ); + return; + } + + float mag = dviFile->getMagnification()/1000.0; + + int x = (int)( currinf.data.dvi_h/(shrinkfactor*65536.0) + mag*xKoord*resolutionInDPI/1000.0 + 0.5 ); + int y = (int)( currinf.data.pxl_v + mag*yKoord*resolutionInDPI/1000.0 + 0.5 ); + + // Initialize the point array used to store the path + if (TPIC_path.size() == 0) + number_of_elements_in_path = 0; + if (TPIC_path.size() == number_of_elements_in_path) + TPIC_path.resize(number_of_elements_in_path+100); + TPIC_path.setPoint(number_of_elements_in_path++, x, y); +} + + +void dviRenderer::TPIC_setPen_special(const QString& cp) +{ +#ifdef DEBUG_SPECIAL + kdDebug(4300) << "TPIC special setPen: " << cp << endl; +#endif + + // Sets the pen size in milli-inches + bool ok; + penWidth_in_mInch = cp.stripWhiteSpace().toFloat(&ok); + if (ok == false) { + printErrorMsgForSpecials( QString("TPIC special; cannot parse argument in 'pn %1'.").arg(cp) ); + penWidth_in_mInch = 0.0; + return; + } +} + + +void dviRenderer::applicationDoSpecial(char *cp) +{ + QString special_command(cp); + + // First come specials which is only interpreted during rendering, + // and NOT during the prescan phase + + // font color specials + if (strncasecmp(cp, "color", 5) == 0) { + color_special(special_command.mid(5)); + return; + } + + // HTML reference + if (strncasecmp(cp, "html:<A href=", 13) == 0) { + html_href_special(special_command.mid(14)); + return; + } + + // HTML anchor end + if (strncasecmp(cp, "html:</A>", 9) == 0) { + html_anchor_end(); + return; + } + + // TPIC specials + if (strncasecmp(cp, "pn", 2) == 0) { + TPIC_setPen_special(special_command.mid(2)); + return; + } + if (strncasecmp(cp, "pa ", 3) == 0) { + TPIC_addPath_special(special_command.mid(3)); + return; + } + if (strncasecmp(cp, "fp", 2) == 0) { + TPIC_flushPath_special(); + return; + } + + // Encapsulated Postscript File + if (strncasecmp(cp, "PSfile=", 7) == 0) { + epsf_special(special_command.mid(7)); + return; + } + + // source special + if (strncasecmp(cp, "src:", 4) == 0) { + source_special(special_command.mid(4)); + return; + } + + // Unfortunately, in some TeX distribution the hyperref package uses + // the dvips driver by default, rather than the hypertex driver. As + // a result, the DVI files produced are full of PostScript that + // specifies links and anchors, and KDVI would call the ghostscript + // interpreter for every page which makes it really slow. This is a + // major nuisance, so that we try to filter and interpret the + // hypertex generated PostScript here. + if (special_command.startsWith("ps:SDict begin")) { + + // Hyperref: start of hyperref rectangle. At this stage it is not + // yet clear if the rectangle will conain a hyperlink, an anchor, + // or another type of object. We suspect that this rectangle will + // define a hyperlink, allocate a QString and set HTML_href to + // point to this string. The string contains the name of the + // destination which ---due to the nature of the PostScript + // language--- will be defined only after characters are drawn and + // the hyperref rectangle has been closed. We use "glopglyph" as a + // temporary name. Since the pointer HTML_href is not NULL, the + // chracter drawing routines will now underline all characters in + // blue to point out that they correspond to a hyperlink. Also, as + // soon as characters are drawn, the drawing routines will + // allocate a Hyperlink and add it to the top of the vector + // currentlyDrawnPage->hyperLinkList. + if (special_command == "ps:SDict begin H.S end") { + // At this stage, the vector 'hyperLinkList' should not contain + // links with unspecified destinations (i.e. destination set to + // 'glopglyph'). As a protection against bad DVI files, we make + // sure to remove all link rectangles which point to + // 'glopglyph'. + while (!currentlyDrawnPage->hyperLinkList.isEmpty()) + if (currentlyDrawnPage->hyperLinkList.last().linkText == "glopglyph") + currentlyDrawnPage->hyperLinkList.pop_back(); + else + break; + + HTML_href = new QString("glopglyph"); + return; + } + + // Hyperref: end of hyperref rectangle of unknown type or hyperref + // link rectangle. In these cases we set HTML_href to NULL, which + // causes the character drawing routines to stop drawing + // characters underlined in blue. Note that the name of the + // destination is still set to "glopglyph". In a well-formed DVI + // file, this special command is immediately followed by another + // special, where the destination is specified. This special is + // treated below. + if ((special_command == "ps:SDict begin H.R end") || special_command.endsWith("H.L end")) { + if (HTML_href != NULL) { + delete HTML_href; + HTML_href = NULL; + } + return; // end of hyperref rectangle + } + + // Hyperref: end of anchor rectangle. If this special is + // encountered, the rectangle, which was started with "ps:SDict + // begin H.S end" does not contain a link, but an anchor for a + // link. Anchors, however, have already been dealt with in the + // prescan phase and will not be considered here. Thus, we set + // HTML_href to NULL so that character drawing routines will no + // longer underline hyperlinks in blue, and remove the link from + // the hyperLinkList. NOTE: in a well-formed DVI file, the "H.A" + // special comes directly after the "H.S" special. A + // hyperlink-anchor rectangle therefore never contains characters, + // so no character will by accidentally underlined in blue. + if (special_command.endsWith("H.A end")) { + if (HTML_href != NULL) { + delete HTML_href; + HTML_href = NULL; + } + while (!currentlyDrawnPage->hyperLinkList.isEmpty()) + if (currentlyDrawnPage->hyperLinkList.last().linkText == "glopglyph") + currentlyDrawnPage->hyperLinkList.pop_back(); + else + break; + return; // end of hyperref anchor + } + + // Hyperref: specification of a hyperref link rectangle's + // destination. As mentioned above, the destination of a hyperlink + // is specified only AFTER the rectangle has been specified. We + // will therefore go through the list of rectangles stored in + // currentlyDrawnPage->hyperLinkList, find those whose destination + // is open and fill in the value found here. NOTE: the character + // drawing routines sometimes split a single hyperlink rectangle + // into several rectangles (e.g. if the font changes, or when a + // line break is encountered) + if (special_command.startsWith("ps:SDict begin [") && special_command.endsWith(" pdfmark end")) { + if (!currentlyDrawnPage->hyperLinkList.isEmpty()) { + // Parse the PostScript literal text string inside parentheses + // and store it into 'targetName'. The scanner works + // according to "PostScript language reference, third edition" + // - Sec. 3.2.2. The specification is implemented completely: + // balanced parentheses and all escape sequences are + // considered. + QString tmpTargetName = special_command.section('(', 1); + QString targetName; + int parencount = 1; + for(int i=0; i<tmpTargetName.length(); i++) { + if (tmpTargetName[i] == '(') + if ((i == 0) || (tmpTargetName[i-1] != '\\')) + parencount++; + if (tmpTargetName[i] == ')') + if ((i == 0) || (tmpTargetName[i-1] != '\\')) + parencount--; + if (parencount == 0) + break; + targetName += tmpTargetName[i]; + } + targetName = PDFencodingToQString(targetName); + + QValueVector<Hyperlink>::iterator it; + for( it = currentlyDrawnPage->hyperLinkList.begin(); it != currentlyDrawnPage->hyperLinkList.end(); ++it ) + if (it->linkText == "glopglyph") + it->linkText = targetName; + } + return; // hyperref definition of link/anchor/bookmark/etc + } + } + + // Detect text rotation specials that are included by the graphicx + // package. If one of these specials is found, the state of the + // painter is saved, and the coordinate system is rotated + // accordingly + if (special_command.startsWith("ps: gsave currentpoint currentpoint translate ") && + special_command.endsWith(" neg rotate neg exch neg exch translate") ) { + bool ok; + double angle = special_command.section(' ', 5, 5).toDouble(&ok); + if (ok == true) { + int x = ((int) ((currinf.data.dvi_h) / (shrinkfactor * 65536))); + int y = currinf.data.pxl_v; + + foreGroundPainter->save(); + // Rotate about the current point + foreGroundPainter->translate(x,y); + foreGroundPainter->rotate(-angle); + foreGroundPainter->translate(-x,-y); + } else + printErrorMsgForSpecials( i18n("Error in DVIfile '%1', page %2. Could not interpret angle in text rotation special." ). + arg(dviFile->filename).arg(current_page)); + } + + // The graphicx package marks the end of rotated text with this + // special. The state of the painter is restored. + if (special_command == "ps: currentpoint grestore moveto") { + foreGroundPainter->restore(); + } + + // The following special commands are not used here; they are of + // interest only during the prescan phase. We recognize them here + // anyway, to make sure that KDVI doesn't complain about + // unrecognized special commands. + if ((cp[0] == '!') || + (cp[0] == '"') || + (strncasecmp(cp, "html:<A name=", 13) == 0) || + (strncasecmp(cp, "ps:", 3) == 0) || + (strncasecmp(cp, "papersize", 9) == 0) || + (strncasecmp(cp, "header", 6) == 0) || + (strncasecmp(cp, "background", 10) == 0) ) + return; + + printErrorMsgForSpecials(i18n("The special command '%1' is not implemented.").arg(special_command)); + return; +} |