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.
tdegraphics/kdvi/TeXFontDefinition.cpp

251 lines
6.3 KiB

// $Id$
#include <config.h>
#include <kdebug.h>
#include <klocale.h>
#include <tqfile.h>
#include "dviRenderer.h"
#include "fontpool.h"
#include "kdvi.h"
#ifdef HAVE_FREETYPE
#include "TeXFont_PFB.h"
#endif
#include "TeXFont_PK.h"
#include "TeXFont_TFM.h"
#include "TeXFontDefinition.h"
#include "xdvi.h"
extern const int MFResolutions[];
#define PK_PRE 247
#define PK_ID 89
#define PK_MAGIC (PK_PRE << 8) + PK_ID
#define GF_PRE 247
#define GF_ID 131
#define GF_MAGIC (GF_PRE << 8) + GF_ID
#define VF_PRE 247
#define VF_ID_BYTE 202
#define VF_MAGIC (VF_PRE << 8) + VF_ID_BYTE
// #define DEBUG_FONT
TeXFontDefinition::TeXFontDefinition(TQString nfontname, double _displayResolution_in_dpi, Q_UINT32 chk, Q_INT32 _scaled_size_in_DVI_units,
class fontPool *pool, double _enlargement)
{
#ifdef DEBUG_FONT
kdDebug(4300) << "TeXFontDefinition::TeXFontDefinition(...); fontname=" << nfontname << ", enlargement=" << _enlargement << endl;
#endif
enlargement = _enlargement;
font_pool = pool;
fontname = nfontname;
font = 0;
displayResolution_in_dpi = _displayResolution_in_dpi;
checksum = chk;
flags = TeXFontDefinition::FONT_IN_USE;
file = 0;
filename = TQString::null;
scaled_size_in_DVI_units = _scaled_size_in_DVI_units;
macrotable = 0;
// By default, this font contains only empty characters. After the
// font has been loaded, this function pointer will be replaced by
// another one.
set_char_p = &dviRenderer::set_empty_char;
}
TeXFontDefinition::~TeXFontDefinition()
{
#ifdef DEBUG_FONT
kdDebug(4300) << "discarding font " << fontname << " at " << (int)(enlargement * MFResolutions[font_pool->getMetafontMode()] + 0.5) << " dpi" << endl;
#endif
if (font != 0) {
delete font;
font = 0;
}
if (macrotable != 0) {
delete [] macrotable;
macrotable = 0;
}
if (flags & FONT_LOADED) {
if (file != 0) {
fclose(file);
file = 0;
}
if (flags & FONT_VIRTUAL)
vf_table.clear();
}
}
void TeXFontDefinition::fontNameReceiver(const TQString& fname)
{
#ifdef DEBUG_FONT
kdDebug(4300) << "void TeXFontDefinition::fontNameReceiver( " << fname << " )" << endl;
#endif
flags |= TeXFontDefinition::FONT_LOADED;
filename = fname;
#ifdef HAVE_FREETYPE
fullFontName = TQString::null;
fullEncodingName = TQString::null;
#endif
file = fopen(TQFile::encodeName(filename), "r");
// Check if the file could be opened. If not, try to find the file
// in the DVI file's directory. If that works, modify the filename
// accordingly and go on.
if (file == 0) {
TQString filename_test(font_pool->getExtraSearchPath() + "/" + filename);
file = fopen( TQFile::encodeName(filename_test), "r");
if (file == 0) {
kdError(4300) << i18n("Cannot find font %1, file %2.").arg(fontname).arg(filename) << endl;
return;
} else
filename = filename_test;
}
set_char_p = &dviRenderer::set_char;
int magic = two(file);
if (fname.endsWith("pk"))
if (magic == PK_MAGIC) {
fclose(file);
file = 0;
font = new TeXFont_PK(this);
set_char_p = &dviRenderer::set_char;
if ((checksum != 0) && (checksum != font->checksum))
kdWarning(4300) << i18n("Checksum mismatch for font file %1").arg(filename) << endl;
fontTypeName = "TeX PK";
return;
}
if (fname.endsWith(".vf"))
if (magic == VF_MAGIC) {
read_VF_index();
set_char_p = &dviRenderer::set_vf_char;
fontTypeName = i18n("TeX virtual");
return;
}
if (fname.endsWith(".tfm")) {
fclose(file);
file = 0;
font = new TeXFont_TFM(this);
set_char_p = &dviRenderer::set_char;
fontTypeName = i18n("TeX Font Metric");
return;
}
// None of these known types? Then it should be one of the font
// formats that are handled by the FreeType library
fclose(file);
file = 0;
#ifdef HAVE_FREETYPE
// Find the encoding for that font
const TQString &enc = font_pool->fontsByTeXName.findEncoding(fontname);
if (enc.isEmpty() == false) {
#ifdef DEBUG_FONT
kdDebug(4300) << "Font " << fontname << " uses encoding " << enc << endl;
#endif
font = new TeXFont_PFB(this, font_pool->encodingPool.findByName(enc), font_pool->fontsByTeXName.findSlant(fontname) );
} else {
#ifdef DEBUG_FONT
kdDebug(4300) << "Font " << fontname << " does not have an encoding." << endl;
#endif
font = new TeXFont_PFB(this);
}
set_char_p = &dviRenderer::set_char;
fontTypeName = i18n("FreeType");
return;
#else
// If we don't have the FreeType library, we should never have
// reached this point. Complain, and leave this font blank
kdError(4300) << i18n("Cannot recognize format for font file %1").arg(filename) << endl;
#endif
}
void TeXFontDefinition::reset()
{
if (font != 0) {
delete font;
font = 0;
}
if (macrotable != 0) {
delete [] macrotable;
macrotable = 0;
}
if (flags & FONT_LOADED) {
if (file != 0) {
fclose(file);
file = 0;
}
if (flags & FONT_VIRTUAL)
vf_table.clear();
}
filename = TQString::null;
flags = TeXFontDefinition::FONT_IN_USE;
set_char_p = &dviRenderer::set_empty_char;
}
void TeXFontDefinition::setDisplayResolution(double _displayResolution_in_dpi)
{
displayResolution_in_dpi = _displayResolution_in_dpi;
if (font != 0)
font->setDisplayResolution();
}
/** mark_as_used marks the font, and all the fonts it referrs to, as
used, i.e. their FONT_IN_USE-flag is set. */
void TeXFontDefinition::mark_as_used()
{
#ifdef DEBUG_FONT
kdDebug(4300) << "TeXFontDefinition::mark_as_used()" << endl;
#endif
if (flags & TeXFontDefinition::FONT_IN_USE)
return;
flags |= TeXFontDefinition::FONT_IN_USE;
// For virtual fonts, also go through the list of referred fonts
if (flags & TeXFontDefinition::FONT_VIRTUAL) {
TQIntDictIterator<TeXFontDefinition> it(vf_table);
while( it.current() ) {
it.current()->mark_as_used();
++it;
}
}
}
macro::macro()
{
pos = 0; /* address of first byte of macro */
end = 0; /* address of last+1 byte */
dvi_advance_in_units_of_design_size_by_2e20 = 0; /* DVI units to move reference point */
free_me = false;
}
macro::~macro()
{
if ((pos != 0L) && (free_me == true))
delete [] pos;
}