From 9e66104d04893f20d2257e483347e5f20efefdd9 Mon Sep 17 00:00:00 2001
From: Stefan Kebekus <kebekus@kde.org>
Date: Tue, 22 Jul 2003 07:02:42 +0000
Subject: [PATCH] implemented some basic TPIC specials

svn path=/trunk/kdegraphics/kdvi/; revision=238483
---
 dviwin.h        | 22 +++++++++----
 dviwin_draw.cpp |  5 +--
 special.cpp     | 85 +++++++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 104 insertions(+), 8 deletions(-)

diff --git a/dviwin.h b/dviwin.h
index 0b96d04fa..901b16c9a 100644
--- a/dviwin.h
+++ b/dviwin.h
@@ -250,12 +250,17 @@ private:
  QString       errorMsg;
 
  /** Methods which handle certain special commands. */
- void          bang_special(QString cp);
- void          quote_special(QString cp);
- void          ps_special(QString cp);
- void          epsf_special(QString cp);
- void          header_special(QString cp);
- void          source_special(QString cp);
+ void bang_special(QString cp);
+ void quote_special(QString cp);
+ void ps_special(QString cp);
+ void epsf_special(QString cp);
+ void header_special(QString cp);
+ void source_special(QString cp);
+
+ /** TPIC specials */
+ void TPIC_setPen_special(QString cp);
+ void TPIC_addPath_special(QString cp);
+ void TPIC_flushPath_special(void);
 
  /* This timer is used to delay clearing of the statusbar. Clearing
     the statusbar is delayed to avoid awful flickering when the mouse
@@ -352,6 +357,11 @@ private:
  QString             export_tmpFileName;
  QString             export_errorString;
 
+ /** Data required for handling TPIC specials */ 
+ float       penWidth_in_mInch;
+ QPointArray TPIC_path;
+ Q_UINT16    number_of_elements_in_path;
+
  struct drawinf	currinf;
 };
 
diff --git a/dviwin_draw.cpp b/dviwin_draw.cpp
index cbda806cd..2e6a1bb50 100644
--- a/dviwin_draw.cpp
+++ b/dviwin_draw.cpp
@@ -558,8 +558,9 @@ void dviWindow::draw_part(double current_dimconv, bool is_vfmacro)
 void dviWindow::draw_page(void)
 {
   // Reset a couple of variables
-  HTML_href              = 0;
-  source_href            = 0;
+  HTML_href         = 0;
+  source_href       = 0;
+  penWidth_in_mInch = 0.0;
   currentlyDrawnPage.hyperLinkList.clear();
 
 
diff --git a/special.cpp b/special.cpp
index 958c84694..9379c38e8 100644
--- a/special.cpp
+++ b/special.cpp
@@ -463,6 +463,74 @@ void dviWindow::ps_special(QString cp)
   }
 }
 
+
+void dviWindow::TPIC_flushPath_special(void)
+{
+#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*xres*_zoom/1000.0 + 0.5));  // Sets the pen size in milli-inches
+  foreGroundPaint.setPen(pen);
+  foreGroundPaint.drawPolyline(TPIC_path, 0, number_of_elements_in_path);
+  number_of_elements_in_path = 0;
+}
+
+
+void dviWindow::TPIC_addPath_special(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 = KStringHandler::word(cp_noWhiteSpace, (uint)0).toFloat(&ok);
+  if (ok == false) {
+    printErrorMsgForSpecials( QString("TPIC special; cannot parse first argument in 'pn %1'.").arg(cp) );
+    return;
+  }
+  float yKoord = KStringHandler::word(cp_noWhiteSpace, (uint)1).toFloat(&ok);
+  if (ok == false) {
+    printErrorMsgForSpecials( QString("TPIC special; cannot parse second argument in 'pn %1'.").arg(cp) );
+    return;
+  }
+  
+  int x = (int)( currinf.data.dvi_h/(shrinkfactor*65536.0) + xKoord*xres*_zoom/1000.0 + 0.5 );
+  int y = (int)( currinf.data.pxl_v + yKoord*xres*_zoom/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 dviWindow::TPIC_setPen_special(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 dviWindow::applicationDoSpecial(char *cp)
 {
   QString special_command(cp);
@@ -483,6 +551,23 @@ void dviWindow::applicationDoSpecial(char *cp)
       html_href_special(special_command.mid(14));
     return;
   }
+  
+  // TPIC specials
+  if (strncasecmp(cp, "pn", 2) == 0) {
+    if (PostScriptOutPutString == NULL)
+      TPIC_setPen_special(special_command.mid(2));
+    return;
+  }
+  if (strncasecmp(cp, "pa", 2) == 0) {
+    if (PostScriptOutPutString == NULL)
+      TPIC_addPath_special(special_command.mid(3));
+    return;
+  }
+  if (strncasecmp(cp, "fp", 2) == 0) {
+    if (PostScriptOutPutString == NULL)
+      TPIC_flushPath_special();
+    return;
+  }
 
 
   // Now to those specials which are only interpreted during the