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.
790 lines
25 KiB
790 lines
25 KiB
// dviRenderer_prescan.cpp
|
|
//
|
|
// Part of KDVI - A DVI previewer for the KDE desktop environemt
|
|
//
|
|
// (C) 2003--2004 Stefan Kebekus
|
|
// Distributed under the GPL
|
|
|
|
#include <config.h>
|
|
|
|
#include "dviRenderer.h"
|
|
#include "dvi.h"
|
|
#include "dviFile.h"
|
|
#include "fontpool.h"
|
|
#include "kdvi_multipage.h"
|
|
#include "performanceMeasurement.h"
|
|
#include "prebookmark.h"
|
|
#include "psgs.h"
|
|
#include "TeXFont.h"
|
|
#include "xdvi.h"
|
|
|
|
#include <kdebug.h>
|
|
#include <klocale.h>
|
|
#include <kmimetype.h>
|
|
#include <kprocess.h>
|
|
#include <kprocio.h>
|
|
#include <kprogress.h>
|
|
#include <tqapplication.h>
|
|
#include <tqbitmap.h>
|
|
#include <tqdir.h>
|
|
#include <tqfileinfo.h>
|
|
#include <tqimage.h>
|
|
#include <tqpainter.h>
|
|
#include <tqpaintdevice.h>
|
|
|
|
|
|
extern TQPainter foreGroundPaint;
|
|
extern void parse_special_argument(const TQString& strg, const char* argument_name, int* variable);
|
|
|
|
|
|
//#define DEBUG_PRESCAN
|
|
|
|
|
|
void dviRenderer::prescan_embedPS(char *cp, Q_UINT8 *beginningOfSpecialCommand)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "dviRenderer::prescan_embedPS( cp = " << cp << " ) " << endl;
|
|
#endif
|
|
|
|
// Encapsulated Postscript File
|
|
if (strncasecmp(cp, "PSfile=", 7) != 0)
|
|
return;
|
|
|
|
TQString command(cp+7);
|
|
|
|
TQString include_command = command.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.
|
|
TQString 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);
|
|
|
|
// If the file is neither a PostScript not a PDF file, we exit here.
|
|
// The graphic file is later read when the page is rendered.
|
|
KMimeType::Ptr const mime_type =
|
|
KMimeType::findByFileContent(EPSfilename);
|
|
TQString const & mime_type_name = mime_type->name();
|
|
|
|
bool const is_ps_file = (mime_type_name == "application/postscript" ||
|
|
mime_type_name == "image/x-eps");
|
|
bool const is_pdf_file = (!is_ps_file &&
|
|
mime_type_name == "application/pdf");
|
|
if (!(is_ps_file || is_pdf_file))
|
|
return;
|
|
|
|
TQString originalFName = EPSfilename;
|
|
|
|
embedPS_progress->setLabel(i18n("Embedding %1").arg(EPSfilename));
|
|
qApp->processEvents();
|
|
|
|
|
|
// Now locate the Gfx file on the hard disk...
|
|
EPSfilename = ghostscript_interface::locateEPSfile(EPSfilename, baseURL);
|
|
|
|
// If the EPSfilename really points to a PDF file, convert that file now.
|
|
if (is_pdf_file)
|
|
EPSfilename = dviFile->convertPDFtoPS(EPSfilename);
|
|
|
|
if (!TQFile::exists(EPSfilename)) {
|
|
// Find the number of the page
|
|
Q_UINT32 currentOffset = beginningOfSpecialCommand - dviFile->dvi_Data();
|
|
Q_UINT16 page;
|
|
for(page=0; page < dviFile->total_pages; page++)
|
|
if ((dviFile->page_offset[page] <= currentOffset) && (currentOffset <= dviFile->page_offset[page+1]))
|
|
break;
|
|
errorMsg += i18n("Page %1: The PostScript file <strong>%2</strong> could not be found.<br>").arg(page+1).arg(originalFName);
|
|
embedPS_progress->progressBar()->advance(1);
|
|
qApp->processEvents();
|
|
return;
|
|
}
|
|
|
|
// 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);
|
|
|
|
int clip=include_command.find(" clip"); // -1 if clip keyword is not present, >= 0 otherwise
|
|
|
|
// Generate the PostScript commands to be included
|
|
TQString PS = TQString("ps: @beginspecial %1 @llx %2 @lly %3 @urx %4 @ury").arg(llx).arg(lly).arg(urx).arg(ury);
|
|
if (rwi != 0)
|
|
PS.append( TQString(" %1 @rwi").arg(rwi) );
|
|
if (rhi != 0)
|
|
PS.append( TQString(" %1 @rhi").arg(rhi) );
|
|
if (angle != 0)
|
|
PS.append( TQString(" %1 @angle").arg(angle) );
|
|
if (clip != -1)
|
|
PS.append(" @clip");
|
|
PS.append( " @setspecial\n" );
|
|
|
|
TQFile file( EPSfilename );
|
|
if ( file.open( IO_ReadOnly ) ) {
|
|
TQTextStream stream( &file );
|
|
while ( !stream.atEnd() ) {
|
|
PS += stream.readLine().section( '%', 0, 0);
|
|
PS += "\n";
|
|
}
|
|
file.close();
|
|
}
|
|
PS.append( "@endspecial" );
|
|
PS = PS.simplifyWhiteSpace();
|
|
|
|
|
|
_isModified = true;
|
|
Q_UINT32 lengthOfOldSpecial = command_pointer - beginningOfSpecialCommand;
|
|
Q_UINT32 lengthOfNewSpecial = PS.length()+5;
|
|
|
|
TQMemArray<Q_UINT8> newDVI(dviFile->size_of_file + lengthOfNewSpecial-lengthOfOldSpecial);
|
|
|
|
Q_UINT8 *commandPtrSav = command_pointer;
|
|
Q_UINT8 *endPtrSav = end_pointer;
|
|
end_pointer = newDVI.data() + dviFile->size_of_file + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
memcpy(newDVI.data(), dviFile->dvi_Data(), beginningOfSpecialCommand-dviFile->dvi_Data());
|
|
command_pointer = newDVI.data()+(beginningOfSpecialCommand-dviFile->dvi_Data());
|
|
command_pointer[0] = XXX4;
|
|
command_pointer++;
|
|
writeUINT32(PS.length());
|
|
memcpy(newDVI.data()+(beginningOfSpecialCommand-dviFile->dvi_Data())+5, PS.latin1(), PS.length() );
|
|
memcpy(newDVI.data()+(beginningOfSpecialCommand-dviFile->dvi_Data())+lengthOfNewSpecial, beginningOfSpecialCommand+lengthOfOldSpecial,
|
|
dviFile->size_of_file-(beginningOfSpecialCommand-dviFile->dvi_Data())-lengthOfOldSpecial );
|
|
|
|
// Adjust page pointers in the DVI file
|
|
dviFile->size_of_file = dviFile->size_of_file + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
end_pointer = newDVI.data() + dviFile->size_of_file;
|
|
Q_UINT32 currentOffset = beginningOfSpecialCommand-dviFile->dvi_Data();
|
|
for(Q_UINT16 i=0; i < dviFile->total_pages; i++) {
|
|
if (dviFile->page_offset[i] > currentOffset) {
|
|
dviFile->page_offset[i] = dviFile->page_offset[i] + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
command_pointer = dviFile->page_offset[i] + newDVI.data() + 4*10 + 1;
|
|
Q_UINT32 a = readUINT32();
|
|
if (a > currentOffset) {
|
|
a = a + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
command_pointer = dviFile->page_offset[i] + newDVI.data() + 4*10 + 1;
|
|
writeUINT32(a);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
dviFile->beginning_of_postamble = dviFile->beginning_of_postamble + lengthOfNewSpecial - lengthOfOldSpecial;
|
|
dviFile->page_offset[dviFile->total_pages] = dviFile->beginning_of_postamble;
|
|
|
|
command_pointer = newDVI.data() + dviFile->beginning_of_postamble + 1;
|
|
Q_UINT32 a = readUINT32();
|
|
if (a > currentOffset) {
|
|
a = a + lengthOfNewSpecial - lengthOfOldSpecial;
|
|
command_pointer = newDVI.data() + dviFile->beginning_of_postamble + 1;
|
|
writeUINT32(a);
|
|
}
|
|
|
|
command_pointer = newDVI.data() + dviFile->size_of_file - 1;
|
|
while((*command_pointer == TRAILER) && (command_pointer > newDVI.data()))
|
|
command_pointer--;
|
|
command_pointer -= 4;
|
|
writeUINT32(dviFile->beginning_of_postamble);
|
|
command_pointer -= 4;
|
|
|
|
command_pointer = commandPtrSav;
|
|
end_pointer = endPtrSav;
|
|
|
|
// Modify all pointers to point to the newly allocated memory
|
|
command_pointer = newDVI.data() + (command_pointer - dviFile->dvi_Data()) + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
end_pointer = newDVI.data() + (end_pointer - dviFile->dvi_Data()) + lengthOfNewSpecial-lengthOfOldSpecial;
|
|
|
|
dviFile->setNewData(newDVI);
|
|
|
|
embedPS_progress->progressBar()->advance(1);
|
|
qApp->processEvents();
|
|
return;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_removePageSizeInfo(char *cp, Q_UINT8 *beginningOfSpecialCommand)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "dviRenderer::prescan_embedPS( cp = " << cp << " ) " << endl;
|
|
#endif
|
|
|
|
// Encapsulated Postscript File
|
|
if (strncasecmp(cp, "papersize=", 10) != 0)
|
|
return;
|
|
|
|
for (Q_UINT8 *ptr=beginningOfSpecialCommand; ptr<command_pointer; ptr++)
|
|
*ptr = NOP;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParsePapersizeSpecial(const TQString& _cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "Papersize-Special : papersize" << cp << endl;
|
|
#endif
|
|
|
|
TQString cp = _cp.simplifyWhiteSpace();
|
|
|
|
if (cp[0] == '=') {
|
|
cp = cp.mid(1);
|
|
dviFile->suggestedPageSize = new pageSize;
|
|
dviFile->suggestedPageSize->setPageSize(cp);
|
|
} else
|
|
printErrorMsgForSpecials(i18n("The papersize data '%1' could not be parsed.").arg(cp));
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParseBackgroundSpecial(const TQString& cp)
|
|
{
|
|
TQColor col = parseColorSpecification(cp.stripWhiteSpace());
|
|
if (col.isValid())
|
|
for(Q_UINT16 page=current_page; page < dviFile->total_pages; page++)
|
|
PS_interface->setBackgroundColor(page, col);
|
|
return;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParseHTMLAnchorSpecial(const TQString& _cp)
|
|
{
|
|
TQString cp = _cp;
|
|
cp.truncate(cp.find('"'));
|
|
Length l;
|
|
l.setLength_in_inch(currinf.data.dvi_v/(resolutionInDPI*shrinkfactor));
|
|
anchorList[cp] = Anchor(current_page+1, l);
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParsePSHeaderSpecial(const TQString& cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "PostScript-special, header " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
TQString _file = cp;
|
|
|
|
// If the file is not found in the current directory, use kpsewhich
|
|
// to find it.
|
|
if (!TQFile::exists(_file)) {
|
|
// Otherwise, use kpsewhich to find the eps file.
|
|
KProcIO proc;
|
|
proc << "kpsewhich" << cp;
|
|
proc.start(KProcess::Block);
|
|
proc.readln(_file);
|
|
}
|
|
|
|
if (TQFile::exists(_file))
|
|
PS_interface->PostScriptHeaderString->append( TQString(" (%1) run\n").arg(_file) );
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParsePSBangSpecial(const TQString& cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
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 dviRenderer::prescan_ParsePSQuoteSpecial(const TQString& cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdError(4300) << "PostScript-special, literal PostScript " << cp.latin1() << endl;
|
|
#endif
|
|
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*1200)-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/1200 - 300;
|
|
PostScriptOutPutString->append( TQString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( " @beginspecial @setspecial \n" );
|
|
PostScriptOutPutString->append( cp );
|
|
PostScriptOutPutString->append( " @endspecial \n" );
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParsePSSpecial(const TQString& cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "PostScript-special, direct PostScript " << cp << endl;
|
|
#endif
|
|
|
|
// 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 (cp.startsWith("ps:SDict begin")) {
|
|
// We suspect this may be hyperref generated nonsense. Let's check
|
|
// for some known code that hyperref generates.
|
|
if (cp == "ps:SDict begin H.S end")
|
|
return; // start of hyperref rectangle
|
|
if (cp == "ps:SDict begin H.R end")
|
|
return; // end of hyperref rectangle
|
|
if (cp.endsWith("H.A end"))
|
|
return; // end of hyperref anchor
|
|
if (cp.endsWith("H.L end"))
|
|
return; // end of hyperref link
|
|
if (cp.startsWith("ps:SDict begin /product where{pop product(Distiller)"))
|
|
return; // hyperref tries to work around Distiller bug
|
|
if (cp.startsWith("ps:SDict begin [") && cp.endsWith(" pdfmark end")) { // hyperref definition of link/anchor/bookmark/etc
|
|
if (cp.contains("/DEST")) { // The PostScript code defines an anchor
|
|
TQString anchorName = cp.section('(', 1, 1).section(')', 0, 0);
|
|
Length l;
|
|
l.setLength_in_inch(currinf.data.dvi_v/(resolutionInDPI*shrinkfactor));
|
|
anchorList[anchorName] = Anchor(current_page+1, l);
|
|
}
|
|
// The PostScript code defines a bookmark
|
|
if (cp.contains("/Dest") && cp.contains("/Title"))
|
|
prebookmarks.append(PreBookmark(PDFencodingToQString(cp.section('(', 2, 2).section(')', 0, 0)),
|
|
cp.section('(', 1, 1).section(')', 0, 0),
|
|
cp.section('-', 1, 1).section(' ', 0, 0).toUInt()
|
|
));
|
|
return;
|
|
}
|
|
}
|
|
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*1200)-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/1200 - 300;
|
|
|
|
if (cp.find("ps::[begin]", 0, false) == 0) {
|
|
PostScriptOutPutString->append( TQString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( TQString(" %1\n").arg(cp.mid(11)) );
|
|
} else {
|
|
if (cp.find("ps::[end]", 0, false) == 0) {
|
|
PostScriptOutPutString->append( TQString(" %1\n").arg(cp.mid(9)) );
|
|
} else {
|
|
if (cp.find("ps::", 0, false) == 0) {
|
|
PostScriptOutPutString->append( TQString(" %1\n").arg(cp.mid(4)) );
|
|
} else {
|
|
PostScriptOutPutString->append( TQString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( TQString(" %1\n").arg(cp.mid(3)) );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParsePSFileSpecial(const TQString& cp)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "epsf-special: psfile=" << cp <<endl;
|
|
#endif
|
|
|
|
TQString 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.
|
|
TQString 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);
|
|
}
|
|
|
|
// If the file name ends in 'png', 'gif', 'jpg' or 'jpeg', we assume
|
|
// that this is NOT a PostScript file, and we exit here.
|
|
TQString ending = EPSfilename.section('.', -1).lower();
|
|
if ((ending == "png") || (ending == "gif") || (ending == "jpg") || (ending == "jpeg")) {
|
|
dviFile->numberOfExternalNONPSFiles++;
|
|
return;
|
|
}
|
|
|
|
// Now assume that the graphics file *is* a PostScript file
|
|
dviFile->numberOfExternalPSFiles++;
|
|
|
|
// Now locate the Gfx file on the hard disk...
|
|
EPSfilename = ghostscript_interface::locateEPSfile(EPSfilename, baseURL);
|
|
|
|
// If the EPSfilename really points to a PDF file, convert that file now.
|
|
if (ending == "pdf")
|
|
EPSfilename = dviFile->convertPDFtoPS(EPSfilename);
|
|
|
|
// 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);
|
|
|
|
int clip=include_command.find(" clip"); // -1 if clip keyword is not present, >= 0 otherwise
|
|
|
|
if (TQFile::exists(EPSfilename)) {
|
|
double PS_H = (currinf.data.dvi_h*300.0)/(65536*1200)-300;
|
|
double PS_V = (currinf.data.dvi_v*300.0)/1200 - 300;
|
|
PostScriptOutPutString->append( TQString(" %1 %2 moveto\n").arg(PS_H).arg(PS_V) );
|
|
PostScriptOutPutString->append( "@beginspecial " );
|
|
PostScriptOutPutString->append( TQString(" %1 @llx").arg(llx) );
|
|
PostScriptOutPutString->append( TQString(" %1 @lly").arg(lly) );
|
|
PostScriptOutPutString->append( TQString(" %1 @urx").arg(urx) );
|
|
PostScriptOutPutString->append( TQString(" %1 @ury").arg(ury) );
|
|
if (rwi != 0)
|
|
PostScriptOutPutString->append( TQString(" %1 @rwi").arg(rwi) );
|
|
if (rhi != 0)
|
|
PostScriptOutPutString->append( TQString(" %1 @rhi").arg(rhi) );
|
|
if (angle != 0)
|
|
PostScriptOutPutString->append( TQString(" %1 @angle").arg(angle) );
|
|
if (clip != -1)
|
|
PostScriptOutPutString->append(" @clip");
|
|
PostScriptOutPutString->append( " @setspecial \n" );
|
|
PostScriptOutPutString->append( TQString(" (%1) run\n").arg(EPSfilename) );
|
|
PostScriptOutPutString->append( "@endspecial \n" );
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_ParseSourceSpecial(const TQString& cp)
|
|
{
|
|
// 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();
|
|
TQFileInfo fi1(dviFile->filename);
|
|
TQString sourceFileName = TQFileInfo(fi1.dir(), cp.mid(j).stripWhiteSpace()).absFilePath();
|
|
Length l;
|
|
l.setLength_in_inch(currinf.data.dvi_v/(resolutionInDPI*shrinkfactor));
|
|
DVI_SourceFileAnchor sfa(sourceFileName, sourceLineNumber, current_page+1, l);
|
|
sourceHyperLinkAnchors.push_back(sfa);
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_parseSpecials(char *cp, Q_UINT8 *)
|
|
{
|
|
TQString special_command(cp);
|
|
|
|
// Now to those specials which are only interpreted during the
|
|
// prescan phase, and NOT during rendering.
|
|
|
|
// PaperSize special
|
|
if (strncasecmp(cp, "papersize", 9) == 0) {
|
|
prescan_ParsePapersizeSpecial(special_command.mid(9));
|
|
return;
|
|
}
|
|
|
|
// color special for background color
|
|
if (strncasecmp(cp, "background", 10) == 0) {
|
|
prescan_ParseBackgroundSpecial(special_command.mid(10));
|
|
return;
|
|
}
|
|
|
|
// HTML anchor special
|
|
if (strncasecmp(cp, "html:<A name=", 13) == 0) {
|
|
prescan_ParseHTMLAnchorSpecial(special_command.mid(14));
|
|
return;
|
|
}
|
|
|
|
// Postscript Header File
|
|
if (strncasecmp(cp, "header=", 7) == 0) {
|
|
prescan_ParsePSHeaderSpecial(special_command.mid(7));
|
|
return;
|
|
}
|
|
|
|
// Literal Postscript Header
|
|
if (cp[0] == '!') {
|
|
prescan_ParsePSBangSpecial(special_command.mid(1));
|
|
return;
|
|
}
|
|
|
|
// Literal Postscript inclusion
|
|
if (cp[0] == '"') {
|
|
prescan_ParsePSQuoteSpecial(special_command.mid(1));
|
|
return;
|
|
}
|
|
|
|
// PS-Postscript inclusion
|
|
if (strncasecmp(cp, "ps:", 3) == 0) {
|
|
prescan_ParsePSSpecial(special_command);
|
|
return;
|
|
}
|
|
|
|
// Encapsulated Postscript File
|
|
if (strncasecmp(cp, "PSfile=", 7) == 0) {
|
|
prescan_ParsePSFileSpecial(special_command.mid(7));
|
|
return;
|
|
}
|
|
|
|
// source special
|
|
if (strncasecmp(cp, "src:", 4) == 0) {
|
|
prescan_ParseSourceSpecial(special_command.mid(4));
|
|
return;
|
|
}
|
|
|
|
// Finally there are those special commands which must be considered
|
|
// both during rendering and during the pre-scan phase
|
|
|
|
// HTML anchor end
|
|
if (strncasecmp(cp, "html:</A>", 9) == 0) {
|
|
html_anchor_end();
|
|
return;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan_setChar(unsigned int ch)
|
|
{
|
|
TeXFontDefinition *fontp = currinf.fontp;
|
|
if (fontp == NULL)
|
|
return;
|
|
|
|
if (currinf.set_char_p == &dviRenderer::set_char) {
|
|
glyph *g = ((TeXFont *)(currinf.fontp->font))->getGlyph(ch, true, globalColor);
|
|
if (g == NULL)
|
|
return;
|
|
currinf.data.dvi_h += (int)(currinf.fontp->scaled_size_in_DVI_units * dviFile->getCmPerDVIunit() *
|
|
(1200.0 / 2.54)/16.0 * g->dvi_advance_in_units_of_design_size_by_2e20 + 0.5);
|
|
return;
|
|
}
|
|
|
|
if (currinf.set_char_p == &dviRenderer::set_vf_char) {
|
|
macro *m = &currinf.fontp->macrotable[ch];
|
|
if (m->pos == NULL)
|
|
return;
|
|
currinf.data.dvi_h += (int)(currinf.fontp->scaled_size_in_DVI_units * dviFile->getCmPerDVIunit() *
|
|
(1200.0 / 2.54)/16.0 * m->dvi_advance_in_units_of_design_size_by_2e20 + 0.5);
|
|
return;
|
|
}
|
|
}
|
|
|
|
|
|
void dviRenderer::prescan(parseSpecials specialParser)
|
|
{
|
|
#ifdef DEBUG_PRESCAN
|
|
kdDebug(4300) << "dviRenderer::prescan( ... )" << endl;
|
|
#endif
|
|
|
|
if (resolutionInDPI == 0.0)
|
|
setResolution(100);
|
|
|
|
Q_INT32 RRtmp=0, WWtmp=0, XXtmp=0, YYtmp=0, ZZtmp=0;
|
|
Q_UINT8 ch;
|
|
double fontPixelPerDVIunit = dviFile->getCmPerDVIunit() * 1200.0/2.54;
|
|
|
|
stack.clear();
|
|
|
|
currinf.fontp = NULL;
|
|
currinf.set_char_p = &dviRenderer::set_no_char;
|
|
|
|
for (;;) {
|
|
ch = readUINT8();
|
|
|
|
if (ch <= (unsigned char) (SETCHAR0 + 127)) {
|
|
prescan_setChar(ch);
|
|
continue;
|
|
}
|
|
|
|
if (FNTNUM0 <= ch && ch <= (unsigned char) (FNTNUM0 + 63)) {
|
|
currinf.fontp = currinf.fonttable->find(ch - FNTNUM0);
|
|
if (currinf.fontp == NULL) {
|
|
errorMsg = i18n("The DVI code referred to font #%1, which was not previously defined.").arg(ch - FNTNUM0);
|
|
return;
|
|
}
|
|
currinf.set_char_p = currinf.fontp->set_char_p;
|
|
continue;
|
|
}
|
|
|
|
|
|
Q_INT32 a, b;
|
|
|
|
switch (ch) {
|
|
case SET1:
|
|
prescan_setChar(readUINT8());
|
|
break;
|
|
|
|
case SETRULE:
|
|
/* Be careful, dvicopy outputs rules with height =
|
|
0x80000000. We don't want any SIGFPE here. */
|
|
a = readUINT32();
|
|
b = readUINT32();
|
|
b = ((long) (b * 65536.0*fontPixelPerDVIunit));
|
|
currinf.data.dvi_h += b;
|
|
break;
|
|
|
|
case PUTRULE:
|
|
a = readUINT32();
|
|
b = readUINT32();
|
|
break;
|
|
|
|
case PUT1:
|
|
case NOP:
|
|
break;
|
|
|
|
case BOP:
|
|
command_pointer += 11 * 4;
|
|
currinf.data.dvi_h = 1200 << 16; // Reminder: DVI-coordinates start at (1",1") from top of page
|
|
currinf.data.dvi_v = 1200;
|
|
currinf.data.pxl_v = int(currinf.data.dvi_v/shrinkfactor);
|
|
currinf.data.w = currinf.data.x = currinf.data.y = currinf.data.z = 0;
|
|
break;
|
|
|
|
case PUSH:
|
|
stack.push(currinf.data);
|
|
break;
|
|
|
|
case POP:
|
|
if (stack.isEmpty())
|
|
return;
|
|
else
|
|
currinf.data = stack.pop();
|
|
break;
|
|
|
|
case RIGHT1:
|
|
case RIGHT2:
|
|
case RIGHT3:
|
|
case RIGHT4:
|
|
RRtmp = readINT(ch - RIGHT1 + 1);
|
|
currinf.data.dvi_h += ((long) (RRtmp * 65536.0*fontPixelPerDVIunit));
|
|
break;
|
|
|
|
case W1:
|
|
case W2:
|
|
case W3:
|
|
case W4:
|
|
WWtmp = readINT(ch - W0);
|
|
currinf.data.w = ((long) (WWtmp * 65536.0*fontPixelPerDVIunit));
|
|
case W0:
|
|
currinf.data.dvi_h += currinf.data.w;
|
|
break;
|
|
|
|
case X1:
|
|
case X2:
|
|
case X3:
|
|
case X4:
|
|
XXtmp = readINT(ch - X0);
|
|
currinf.data.x = ((long) (XXtmp * 65536.0*fontPixelPerDVIunit));
|
|
case X0:
|
|
currinf.data.dvi_h += currinf.data.x;
|
|
break;
|
|
|
|
case DOWN1:
|
|
case DOWN2:
|
|
case DOWN3:
|
|
case DOWN4:
|
|
{
|
|
Q_INT32 DDtmp = readINT(ch - DOWN1 + 1);
|
|
currinf.data.dvi_v += ((long) (DDtmp * 65536.0*fontPixelPerDVIunit))/65536;
|
|
currinf.data.pxl_v = int(currinf.data.dvi_v/shrinkfactor);
|
|
}
|
|
break;
|
|
|
|
case Y1:
|
|
case Y2:
|
|
case Y3:
|
|
case Y4:
|
|
YYtmp = readINT(ch - Y0);
|
|
currinf.data.y = ((long) (YYtmp * 65536.0*fontPixelPerDVIunit));
|
|
case Y0:
|
|
currinf.data.dvi_v += currinf.data.y/65536;
|
|
currinf.data.pxl_v = int(currinf.data.dvi_v/shrinkfactor);
|
|
break;
|
|
|
|
case Z1:
|
|
case Z2:
|
|
case Z3:
|
|
case Z4:
|
|
ZZtmp = readINT(ch - Z0);
|
|
currinf.data.z = ((long) (ZZtmp * 65536.0*fontPixelPerDVIunit));
|
|
case Z0:
|
|
currinf.data.dvi_v += currinf.data.z/65536;
|
|
currinf.data.pxl_v = int(currinf.data.dvi_v/shrinkfactor);
|
|
break;
|
|
|
|
case FNT1:
|
|
case FNT2:
|
|
case FNT3:
|
|
case FNT4:
|
|
currinf.fontp = currinf.fonttable->find(readUINT(ch - FNT1 + 1));
|
|
if (currinf.fontp == NULL)
|
|
return;
|
|
currinf.set_char_p = currinf.fontp->set_char_p;
|
|
break;
|
|
|
|
case XXX1:
|
|
case XXX2:
|
|
case XXX3:
|
|
case XXX4:
|
|
{
|
|
Q_UINT8 *beginningOfSpecialCommand = command_pointer-1;
|
|
a = readUINT(ch - XXX1 + 1);
|
|
if (a > 0) {
|
|
char *cmd = new char[a+1];
|
|
strncpy(cmd, (char *)command_pointer, a);
|
|
command_pointer += a;
|
|
cmd[a] = '\0';
|
|
(this->*specialParser)(cmd, beginningOfSpecialCommand);
|
|
delete [] cmd;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case FNTDEF1:
|
|
case FNTDEF2:
|
|
case FNTDEF3:
|
|
case FNTDEF4:
|
|
command_pointer += 12 + ch - FNTDEF1 + 1;
|
|
command_pointer += readUINT8() + readUINT8();
|
|
break;
|
|
|
|
default:
|
|
return;
|
|
} /* end switch */
|
|
} /* end for */
|
|
}
|