mirror of
https://invent.kde.org/graphics/okular
synced 2024-08-25 02:45:38 +00:00
533 lines
16 KiB
C++
533 lines
16 KiB
C++
|
|
// special.cpp
|
|
|
|
// Methods for dviwin which deal with "\special" commands found in the
|
|
// DVI file
|
|
|
|
// Copyright 2000--2003, Stefan Kebekus (kebekus@kde.org).
|
|
|
|
|
|
#include <kdebug.h>
|
|
#include <klocale.h>
|
|
#include <kprocio.h>
|
|
#include <kstringhandler.h>
|
|
#include <qdir.h>
|
|
#include <qfile.h>
|
|
#include <qfileinfo.h>
|
|
#include <qstringlist.h>
|
|
|
|
#include "dviwin.h"
|
|
#include "kdvi.h"
|
|
#include "xdvi.h"
|
|
|
|
|
|
extern QPainter foreGroundPaint;
|
|
|
|
void dviWindow::printErrorMsgForSpecials(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.
|
|
|
|
static QColor parseColorSpecification(QString colorSpec)
|
|
{
|
|
QString specType = KStringHandler::word(colorSpec, (unsigned int)0);
|
|
|
|
if (specType.find("rgb", false) == 0) {
|
|
bool ok;
|
|
|
|
double r = KStringHandler::word(colorSpec, (unsigned int)1).toDouble(&ok);
|
|
if ((ok == false) || (r < 0.0) || (r > 1.0))
|
|
return QColor();
|
|
|
|
double g = KStringHandler::word(colorSpec, (unsigned int)2).toDouble(&ok);
|
|
if ((ok == false) || (g < 0.0) || (g > 1.0))
|
|
return QColor();
|
|
|
|
double b = KStringHandler::word(colorSpec, (unsigned int)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 = KStringHandler::word(colorSpec, (unsigned int)1).toDouble(&ok);
|
|
if ((ok == false) || (h < 0.0) || (h > 1.0))
|
|
return QColor();
|
|
|
|
double s = KStringHandler::word(colorSpec, (unsigned int)2).toDouble(&ok);
|
|
if ((ok == false) || (s < 0.0) || (s > 1.0))
|
|
return QColor();
|
|
|
|
double b = KStringHandler::word(colorSpec, (unsigned int)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 = KStringHandler::word(colorSpec, (unsigned int)1).toDouble(&ok);
|
|
if ((ok == false) || (c < 0.0) || (c > 1.0))
|
|
return QColor();
|
|
|
|
double m = KStringHandler::word(colorSpec, (unsigned int)2).toDouble(&ok);
|
|
if ((ok == false) || (m < 0.0) || (m > 1.0))
|
|
return QColor();
|
|
|
|
double y = KStringHandler::word(colorSpec, (unsigned int)3).toDouble(&ok);
|
|
if ((ok == false) || (y < 0.0) || (y > 1.0))
|
|
return QColor();
|
|
|
|
double k = KStringHandler::word(colorSpec, (unsigned int)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 = KStringHandler::word(colorSpec, (unsigned int)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));
|
|
}
|
|
|
|
return QColor(specType);
|
|
}
|
|
|
|
|
|
void dviWindow::color_special(QString cp)
|
|
{
|
|
cp = cp.stripWhiteSpace();
|
|
|
|
QString command = KStringHandler::word(cp, (unsigned int)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 col = parseColorSpecification(KStringHandler::word(cp, "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 dviWindow::background_special(QString cp)
|
|
{
|
|
QColor col = parseColorSpecification(cp.stripWhiteSpace());
|
|
if (col.isValid())
|
|
PS_interface->setColor(current_page, col);
|
|
return;
|
|
}
|
|
|
|
|
|
void dviWindow::html_anchor_special(QString cp)
|
|
{
|
|
cp.truncate(cp.find('"'));
|
|
#ifdef DEBUG_SPECIAL
|
|
kdDebug(4300) << "HTML-special, anchor " << cp.latin1() << endl;
|
|
kdDebug(4300) << "page " << current_page << endl;
|
|
#endif
|
|
anchorList[cp] = DVI_Anchor(current_page, currinf.data.dvi_v);
|
|
}
|
|
|
|
|
|
void dviWindow::html_href_special(QString cp)
|
|
{
|
|
cp.truncate(cp.find('"'));
|
|
|
|
#ifdef DEBUG_SPECIAL
|
|
kdDebug(4300) << "HTML-special, href " << cp.latin1() << endl;
|
|
#endif
|
|
HTML_href = new QString(cp);
|
|
}
|
|
|
|
void dviWindow::html_anchor_end(void)
|
|
{
|
|
#ifdef DEBUG_SPECIAL
|
|
kdDebug(4300) << "HTML-special, anchor-end" << endl;
|
|
#endif
|
|
|
|
if (HTML_href != NULL) {
|
|
delete HTML_href;
|
|
HTML_href = NULL;
|
|
}
|
|
}
|
|
|
|
void dviWindow::header_special(QString cp)
|
|
{
|
|
#ifdef DEBUG_SPECIAL
|
|
kdDebug(4300) << "PostScript-special, header " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
if (QFile::exists(cp))
|
|
PS_interface->PostScriptHeaderString->append( QString(" (%1) run\n").arg(cp) );
|
|
}
|
|
|
|
void dviWindow::source_special(QString cp)
|
|
{
|
|
if (PostScriptOutPutString == NULL) {
|
|
// 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);
|
|
} else {
|
|
// if no rendering takes place, i.e. when the DVI file is first
|
|
// loaded, generate a DVI_SourceFileAnchor. These anchors are used
|
|
// in forward search, i.e. to relate references line
|
|
// "src:123file.tex" to positions in the DVI file
|
|
|
|
// extract the file name and the numeral part from the string
|
|
Q_UINT32 j;
|
|
for(j=0;j<cp.length();j++)
|
|
if (!cp.at(j).isNumber())
|
|
break;
|
|
Q_UINT32 sourceLineNumber = cp.left(j).toUInt();
|
|
QString sourceFileName = QFileInfo(cp.mid(j).stripWhiteSpace()).absFilePath();
|
|
DVI_SourceFileAnchor sfa(sourceFileName, sourceLineNumber, current_page, currinf.data.dvi_v);
|
|
sourceHyperLinkAnchors.push_back(sfa);
|
|
}
|
|
}
|
|
|
|
static void parse_special_argument(QString strg, const char *argument_name, int *variable)
|
|
{
|
|
bool OK;
|
|
|
|
int index = strg.find(argument_name);
|
|
if (index >= 0) {
|
|
QString tmp = strg.mid(index + strlen(argument_name));
|
|
tmp.truncate(tmp.find(' '));
|
|
float 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.") << endl;
|
|
}
|
|
}
|
|
|
|
void dviWindow::epsf_special(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 = include_command;
|
|
EPSfilename.truncate(EPSfilename.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.at(0) == '\"') && (EPSfilename.at(EPSfilename.length()-1) == '\"')) {
|
|
EPSfilename = EPSfilename.mid(1,EPSfilename.length()-2);
|
|
}
|
|
|
|
// Now see if the Gfx file exists... try to find it in the current
|
|
// directory, in the DVI file's directory, and finally, if all else
|
|
// fails, use kpsewhich to find the file. Later on, we should
|
|
// probably use the DVI file's baseURL, once this is implemented.
|
|
if (! QFile::exists(EPSfilename)) {
|
|
QFileInfo fi1(dviFile->filename);
|
|
QFileInfo fi2(fi1.dir(),EPSfilename);
|
|
if (fi2.exists())
|
|
EPSfilename = fi2.absFilePath();
|
|
else {
|
|
// Use kpsewhich to find the eps file.
|
|
KProcIO proc;
|
|
proc << "kpsewhich" << EPSfilename;
|
|
proc.start(KProcess::Block);
|
|
proc.readln(EPSfilename);
|
|
EPSfilename = EPSfilename.stripWhiteSpace();
|
|
}
|
|
}
|
|
|
|
// 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 (PostScriptOutPutString) {
|
|
if (QFile::exists(EPSfilename)) {
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*MFResolutions[font_pool->getMetafontMode()])-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/MFResolutions[font_pool->getMetafontMode()] - 300;
|
|
PostScriptOutPutString->append( QString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( "@beginspecial " );
|
|
PostScriptOutPutString->append( QString(" %1 @llx").arg(llx) );
|
|
PostScriptOutPutString->append( QString(" %1 @lly").arg(lly) );
|
|
PostScriptOutPutString->append( QString(" %1 @urx").arg(urx) );
|
|
PostScriptOutPutString->append( QString(" %1 @ury").arg(ury) );
|
|
if (rwi != 0)
|
|
PostScriptOutPutString->append( QString(" %1 @rwi").arg(rwi) );
|
|
if (rhi != 0)
|
|
PostScriptOutPutString->append( QString(" %1 @rhi").arg(rhi) );
|
|
if (angle != 0)
|
|
PostScriptOutPutString->append( QString(" %1 @angle").arg(angle) );
|
|
PostScriptOutPutString->append( " @setspecial \n" );
|
|
PostScriptOutPutString->append( QString(" (%1) run\n").arg(EPSfilename) );
|
|
PostScriptOutPutString->append( "@endspecial \n" );
|
|
}
|
|
} else {
|
|
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;
|
|
}
|
|
|
|
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);
|
|
foreGroundPaint.save();
|
|
if (QFile::exists(EPSfilename))
|
|
foreGroundPaint.setBrush(Qt::lightGray);
|
|
else
|
|
foreGroundPaint.setBrush(Qt::red);
|
|
foreGroundPaint.setPen(Qt::black);
|
|
foreGroundPaint.drawRoundRect(bbox, 2, 2);
|
|
if (QFile::exists(EPSfilename))
|
|
foreGroundPaint.drawText (bbox, (int)(Qt::AlignCenter), EPSfilename, -1);
|
|
else
|
|
foreGroundPaint.drawText (bbox, (int)(Qt::AlignCenter),
|
|
i18n("File not found: \n %1").arg(EPSfilename), -1);
|
|
foreGroundPaint.restore();
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
|
|
|
|
void dviWindow::bang_special(QString cp)
|
|
{
|
|
#ifdef DEBUG_SPECIAL
|
|
kdDebug(4300) << "PostScript-special, literal header " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
PS_interface->PostScriptHeaderString->append( " @defspecial \n" );
|
|
PS_interface->PostScriptHeaderString->append( cp );
|
|
PS_interface->PostScriptHeaderString->append( " @fedspecial \n" );
|
|
}
|
|
|
|
|
|
void dviWindow::quote_special(QString cp)
|
|
{
|
|
#ifdef DEBUG_SPECIAL
|
|
kdError(4300) << "PostScript-special, literal PostScript " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*MFResolutions[font_pool->getMetafontMode()])-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/MFResolutions[font_pool->getMetafontMode()] - 300;
|
|
PostScriptOutPutString->append( QString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( " @beginspecial @setspecial \n" );
|
|
PostScriptOutPutString->append( cp );
|
|
PostScriptOutPutString->append( " @endspecial \n" );
|
|
}
|
|
|
|
|
|
void dviWindow::ps_special(QString cp)
|
|
{
|
|
#ifdef DEBUG_SPECIAL
|
|
kdError(4300) << "PostScript-special, direct PostScript " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
if (PostScriptOutPutString) {
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*MFResolutions[font_pool->getMetafontMode()])-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/MFResolutions[font_pool->getMetafontMode()] - 300;
|
|
|
|
if (cp.find("ps::[begin]", 0, false) == 0) {
|
|
PostScriptOutPutString->append( QString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( QString(" %1\n").arg(cp.mid(11)) );
|
|
} else {
|
|
if (cp.find("ps::[end]", 0, false) == 0) {
|
|
PostScriptOutPutString->append( QString(" %1\n").arg(cp.mid(9)) );
|
|
} else {
|
|
if (cp.find("ps::", 0, false) == 0) {
|
|
PostScriptOutPutString->append( QString(" %1\n").arg(cp.mid(4)) );
|
|
} else {
|
|
PostScriptOutPutString->append( QString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( QString(" %1\n").arg(cp.mid(3)) );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void dviWindow::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) {
|
|
if (PostScriptOutPutString == NULL)
|
|
color_special(special_command.mid(5));
|
|
return;
|
|
}
|
|
|
|
// HTML reference
|
|
if (strncasecmp(cp, "html:<A href=", 13) == 0) {
|
|
if (PostScriptOutPutString == NULL)
|
|
html_href_special(special_command.mid(14));
|
|
return;
|
|
}
|
|
|
|
|
|
// Now to those specials which are only interpreted during the
|
|
// prescan phase, and NOT during rendering.
|
|
|
|
// color special for background color
|
|
if (strncasecmp(cp, "background", 10) == 0) {
|
|
if (PostScriptOutPutString != NULL)
|
|
background_special(special_command.mid(10));
|
|
return;
|
|
}
|
|
|
|
// HTML anchor special
|
|
if (strncasecmp(cp, "html:<A name=", 13) == 0) {
|
|
if (PostScriptOutPutString != NULL)
|
|
html_anchor_special(special_command.mid(14));
|
|
return;
|
|
}
|
|
|
|
// Postscript Header File
|
|
if (strncasecmp(cp, "header=", 7) == 0) {
|
|
if (PostScriptOutPutString != NULL)
|
|
header_special(special_command.mid(7));
|
|
return;
|
|
}
|
|
|
|
// Literal Postscript Header
|
|
if (cp[0] == '!') {
|
|
if (PostScriptOutPutString != NULL)
|
|
bang_special(special_command.mid(1));
|
|
return;
|
|
}
|
|
|
|
// Literal Postscript inclusion
|
|
if (cp[0] == '"') {
|
|
if (PostScriptOutPutString != NULL)
|
|
quote_special(special_command.mid(1));
|
|
return;
|
|
}
|
|
|
|
|
|
// Finally there are those special commands which must be considered
|
|
// both during rendering and during the pre-scan phase
|
|
|
|
// source special
|
|
if (strncasecmp(cp, "src:", 4) == 0) {
|
|
source_special(special_command.mid(4));
|
|
return;
|
|
}
|
|
|
|
// PS-Postscript inclusion
|
|
if (strncasecmp(cp, "ps:", 3) == 0) {
|
|
ps_special(special_command);
|
|
return;
|
|
}
|
|
|
|
// Encapsulated Postscript File
|
|
if (strncasecmp(cp, "PSfile=", 7) == 0) {
|
|
epsf_special(special_command.mid(7));
|
|
return;
|
|
}
|
|
|
|
// HTML anchor end
|
|
if (strncasecmp(cp, "html:</A>", 9) == 0) {
|
|
html_anchor_end();
|
|
return;
|
|
}
|
|
|
|
printErrorMsgForSpecials(i18n("The special command '%1' is not implemented.").arg(special_command));
|
|
return;
|
|
}
|