Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/pdf_8c_source.html
changeset 10 d4524d6a4472
parent 9 59758314f811
child 11 5072524fcc79
--- a/Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/pdf_8c_source.html	Fri Jun 11 15:24:34 2010 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,1164 +0,0 @@
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml">
-<head>
-<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
-<title>TB9.2 Example Applications: examples/PIPS/antiword/src/pdf.c Source File</title>
-<link href="tabs.css" rel="stylesheet" type="text/css"/>
-<link href="doxygen.css" rel="stylesheet" type="text/css"/>
-</head>
-<body>
-<!-- Generated by Doxygen 1.6.2 -->
-<h1>examples/PIPS/antiword/src/pdf.c</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*</span>
-<a name="l00002"></a>00002 <span class="comment"> * pdf.c</span>
-<a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 2003-2005 A.J. van Os; Released under GNU GPL</span>
-<a name="l00004"></a>00004 <span class="comment"> *</span>
-<a name="l00005"></a>00005 <span class="comment"> * Description:</span>
-<a name="l00006"></a>00006 <span class="comment"> * Functions to deal with the Adobe Portable Document Format (pdf)</span>
-<a name="l00007"></a>00007 <span class="comment"> *</span>
-<a name="l00008"></a>00008 <span class="comment"> */</span>
-<a name="l00009"></a>00009 
-<a name="l00010"></a>00010 <span class="preprocessor">#include &lt;stdarg.h&gt;</span>
-<a name="l00011"></a>00011 <span class="preprocessor">#include &lt;string.h&gt;</span>
-<a name="l00012"></a>00012 <span class="preprocessor">#include &quot;version.h&quot;</span>
-<a name="l00013"></a>00013 <span class="preprocessor">#include &quot;antiword.h&quot;</span>
-<a name="l00014"></a>00014 
-<a name="l00015"></a>00015 
-<a name="l00016"></a>00016 <span class="comment">/* Constants for the file positions */</span>
-<a name="l00017"></a>00017 <span class="preprocessor">#define INITIAL_LOCATION_SIZE   20</span>
-<a name="l00018"></a>00018 <span class="preprocessor"></span><span class="preprocessor">#define INITIAL_PAGEOBJECT_SIZE  5</span>
-<a name="l00019"></a>00019 <span class="preprocessor"></span><span class="preprocessor">#if defined(DEBUG)</span>
-<a name="l00020"></a>00020 <span class="preprocessor"></span><span class="preprocessor">#define EXTENSION_ARRAY_SIZE    10</span>
-<a name="l00021"></a>00021 <span class="preprocessor"></span><span class="preprocessor">#else</span>
-<a name="l00022"></a>00022 <span class="preprocessor"></span><span class="preprocessor">#define EXTENSION_ARRAY_SIZE    30</span>
-<a name="l00023"></a>00023 <span class="preprocessor"></span><span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
-<a name="l00024"></a>00024 
-<a name="l00025"></a>00025 <span class="comment">/* The character set */</span>
-<a name="l00026"></a>00026 <span class="keyword">static</span> encoding_type    eEncoding = encoding_neutral;
-<a name="l00027"></a>00027 <span class="comment">/* Current creator for a PDF header */</span>
-<a name="l00028"></a>00028 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span>       *szProducer = NULL;
-<a name="l00029"></a>00029 <span class="comment">/* The height and width of a PDF page (in DrawUnits) */</span>
-<a name="l00030"></a>00030 <span class="keyword">static</span> <span class="keywordtype">long</span>             lPageHeight = LONG_MAX;
-<a name="l00031"></a>00031 <span class="keyword">static</span> <span class="keywordtype">long</span>             lPageWidth = LONG_MAX;
-<a name="l00032"></a>00032 <span class="comment">/* The height of the footer on the current page (in DrawUnits) */</span>
-<a name="l00033"></a>00033 <span class="keyword">static</span> <span class="keywordtype">long</span>             lFooterHeight = 0;
-<a name="l00034"></a>00034 <span class="comment">/* Inside a footer (to prevent an infinite loop when the footer is too big) */</span>
-<a name="l00035"></a>00035 <span class="keyword">static</span> BOOL             bInFtrSpace = FALSE;
-<a name="l00036"></a>00036 <span class="comment">/* Current font information */</span>
-<a name="l00037"></a>00037 <span class="keyword">static</span> drawfile_fontref tFontRefCurr = (drawfile_fontref)-1;
-<a name="l00038"></a>00038 <span class="keyword">static</span> USHORT           usFontSizeCurr = 0;
-<a name="l00039"></a>00039 <span class="keyword">static</span> <span class="keywordtype">int</span>              iFontColorCurr = -1;
-<a name="l00040"></a>00040 <span class="comment">/* Current vertical position information */</span>
-<a name="l00041"></a>00041 <span class="keyword">static</span> <span class="keywordtype">long</span>             lYtopCurr = -1;
-<a name="l00042"></a>00042 <span class="comment">/* Image counter */</span>
-<a name="l00043"></a>00043 <span class="keyword">static</span> <span class="keywordtype">int</span>              iImageCount = 0;
-<a name="l00044"></a>00044 <span class="comment">/* Section index */</span>
-<a name="l00045"></a>00045 <span class="keyword">static</span> <span class="keywordtype">int</span>              iSectionIndex = 0;
-<a name="l00046"></a>00046 <span class="comment">/* Are we on the first page of the section? */</span>
-<a name="l00047"></a>00047 <span class="keyword">static</span> BOOL             bFirstInSection = TRUE;
-<a name="l00048"></a>00048 <span class="comment">/* File positions */</span>
-<a name="l00049"></a>00049 <span class="keyword">static</span> <span class="keywordtype">long</span>             lFilePosition = 0;
-<a name="l00050"></a>00050 <span class="keyword">static</span> <span class="keywordtype">long</span>             *alLocation = NULL;
-<a name="l00051"></a>00051 <span class="keyword">static</span> <span class="keywordtype">size_t</span>           tLocations = 0;
-<a name="l00052"></a>00052 <span class="keyword">static</span> <span class="keywordtype">int</span>              iMaxLocationNumber = 0;
-<a name="l00053"></a>00053 <span class="comment">/* File position at the start of a page */</span>
-<a name="l00054"></a>00054 <span class="keyword">static</span> <span class="keywordtype">long</span>             lStreamStart = -1;
-<a name="l00055"></a>00055 <span class="comment">/* Page objects */</span>
-<a name="l00056"></a>00056 <span class="keyword">static</span> <span class="keywordtype">int</span>              *aiPageObject = NULL;
-<a name="l00057"></a>00057 <span class="keyword">static</span> <span class="keywordtype">int</span>              iPageCount = 0;
-<a name="l00058"></a>00058 <span class="keyword">static</span> <span class="keywordtype">size_t</span>           tMaxPageObjects = 0;
-<a name="l00059"></a>00059 <span class="comment">/* Current object number */</span>
-<a name="l00060"></a>00060 <span class="comment">/* 1 = root; 2 = info; 3 = pages; 4 = encoding; 5-16 = fonts; 17 = resources */</span>
-<a name="l00061"></a>00061 <span class="keyword">static</span> <span class="keywordtype">int</span>              iObjectNumberCurr = 17;
-<a name="l00062"></a>00062 
-<a name="l00063"></a>00063 <span class="keyword">static</span> <span class="keywordtype">void</span>             vMoveTo(diagram_type *, <span class="keywordtype">long</span>);
-<a name="l00064"></a>00064 
-<a name="l00065"></a>00065 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keyword">struct </span>{
-<a name="l00066"></a>00066         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szPDFname;
-<a name="l00067"></a>00067         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szPSname;
-<a name="l00068"></a>00068 } atFontname[] = {
-<a name="l00069"></a>00069         { <span class="stringliteral">&quot;Courier&quot;</span>,                    FONT_MONOSPACED_PLAIN },
-<a name="l00070"></a>00070         { <span class="stringliteral">&quot;Courier-Bold&quot;</span>,               FONT_MONOSPACED_BOLD },
-<a name="l00071"></a>00071         { <span class="stringliteral">&quot;Courier-Oblique&quot;</span>,            FONT_MONOSPACED_ITALIC },
-<a name="l00072"></a>00072         { <span class="stringliteral">&quot;Courier-BoldOblique&quot;</span>,        FONT_MONOSPACED_BOLDITALIC },
-<a name="l00073"></a>00073         { <span class="stringliteral">&quot;Helvetica&quot;</span>,                  FONT_SANS_SERIF_PLAIN },
-<a name="l00074"></a>00074         { <span class="stringliteral">&quot;Helvetica-Bold&quot;</span>,             FONT_SANS_SERIF_BOLD },
-<a name="l00075"></a>00075         { <span class="stringliteral">&quot;Helvetica-Oblique&quot;</span>,          FONT_SANS_SERIF_ITALIC },
-<a name="l00076"></a>00076         { <span class="stringliteral">&quot;Helvetica-BoldOblique&quot;</span>,      FONT_SANS_SERIF_BOLDITALIC },
-<a name="l00077"></a>00077         { <span class="stringliteral">&quot;Times-Roman&quot;</span>,                FONT_SERIF_PLAIN },
-<a name="l00078"></a>00078         { <span class="stringliteral">&quot;Times-Bold&quot;</span>,                 FONT_SERIF_BOLD },
-<a name="l00079"></a>00079         { <span class="stringliteral">&quot;Times-Italic&quot;</span>,               FONT_SERIF_ITALIC },
-<a name="l00080"></a>00080         { <span class="stringliteral">&quot;Times-BoldItalic&quot;</span>,           FONT_SERIF_BOLDITALIC },
-<a name="l00081"></a>00081 };
-<a name="l00082"></a>00082 
-<a name="l00083"></a>00083 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *iso_8859_1[] = {
-<a name="l00084"></a>00084 <span class="stringliteral">&quot;128 /Euro&quot;</span>,
-<a name="l00085"></a>00085 <span class="stringliteral">&quot;140 /ellipsis /trademark /perthousand /bullet&quot;</span>,
-<a name="l00086"></a>00086 <span class="stringliteral">&quot;    /quoteleft /quoteright /guilsinglleft /guilsinglright&quot;</span>,
-<a name="l00087"></a>00087 <span class="stringliteral">&quot;    /quotedblleft /quotedblright /quotedblbase /endash /emdash&quot;</span>,
-<a name="l00088"></a>00088 <span class="stringliteral">&quot;    /minus /OE /oe /dagger /daggerdbl /fi /fl&quot;</span>,
-<a name="l00089"></a>00089 <span class="stringliteral">&quot;160 /space /exclamdown /cent /sterling /currency&quot;</span>,
-<a name="l00090"></a>00090 <span class="stringliteral">&quot;    /yen /brokenbar /section /dieresis /copyright&quot;</span>,
-<a name="l00091"></a>00091 <span class="stringliteral">&quot;    /ordfeminine /guillemotleft /logicalnot /hyphen /registered&quot;</span>,
-<a name="l00092"></a>00092 <span class="stringliteral">&quot;    /macron /degree /plusminus /twosuperior /threesuperior&quot;</span>,
-<a name="l00093"></a>00093 <span class="stringliteral">&quot;    /acute /mu /paragraph /periodcentered /cedilla&quot;</span>,
-<a name="l00094"></a>00094 <span class="stringliteral">&quot;    /onesuperior /ordmasculine /guillemotright /onequarter&quot;</span>,
-<a name="l00095"></a>00095 <span class="stringliteral">&quot;    /onehalf /threequarters /questiondown /Agrave /Aacute&quot;</span>,
-<a name="l00096"></a>00096 <span class="stringliteral">&quot;    /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla&quot;</span>,
-<a name="l00097"></a>00097 <span class="stringliteral">&quot;    /Egrave /Eacute /Ecircumflex /Edieresis /Igrave /Iacute&quot;</span>,
-<a name="l00098"></a>00098 <span class="stringliteral">&quot;    /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute&quot;</span>,
-<a name="l00099"></a>00099 <span class="stringliteral">&quot;    /Ocircumflex /Otilde /Odieresis /multiply /Oslash&quot;</span>,
-<a name="l00100"></a>00100 <span class="stringliteral">&quot;    /Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn&quot;</span>,
-<a name="l00101"></a>00101 <span class="stringliteral">&quot;    /germandbls /agrave /aacute /acircumflex /atilde&quot;</span>,
-<a name="l00102"></a>00102 <span class="stringliteral">&quot;    /adieresis /aring /ae /ccedilla /egrave /eacute&quot;</span>,
-<a name="l00103"></a>00103 <span class="stringliteral">&quot;    /ecircumflex /edieresis /igrave /iacute /icircumflex&quot;</span>,
-<a name="l00104"></a>00104 <span class="stringliteral">&quot;    /idieresis /eth /ntilde /ograve /oacute /ocircumflex&quot;</span>,
-<a name="l00105"></a>00105 <span class="stringliteral">&quot;    /otilde /odieresis /divide /oslash /ugrave /uacute&quot;</span>,
-<a name="l00106"></a>00106 <span class="stringliteral">&quot;    /ucircumflex /udieresis /yacute /thorn /ydieresis&quot;</span>,
-<a name="l00107"></a>00107 };
-<a name="l00108"></a>00108 
-<a name="l00109"></a>00109 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *iso_8859_2[] = {
-<a name="l00110"></a>00110 <span class="stringliteral">&quot;160 /space /Aogonek /breve /Lslash /currency /Lcaron&quot;</span>,
-<a name="l00111"></a>00111 <span class="stringliteral">&quot;    /Sacute /section /dieresis /Scaron /Scommaaccent&quot;</span>,
-<a name="l00112"></a>00112 <span class="stringliteral">&quot;    /Tcaron /Zacute /hyphen /Zcaron /Zdotaccent /degree&quot;</span>,
-<a name="l00113"></a>00113 <span class="stringliteral">&quot;    /aogonek /ogonek /lslash /acute /lcaron /sacute&quot;</span>,
-<a name="l00114"></a>00114 <span class="stringliteral">&quot;    /caron /cedilla /scaron /scommaaccent /tcaron&quot;</span>,
-<a name="l00115"></a>00115 <span class="stringliteral">&quot;    /zacute /hungarumlaut /zcaron /zdotaccent /Racute&quot;</span>,
-<a name="l00116"></a>00116 <span class="stringliteral">&quot;    /Aacute /Acircumflex /Abreve /Adieresis /Lacute&quot;</span>,
-<a name="l00117"></a>00117 <span class="stringliteral">&quot;    /Cacute /Ccedilla /Ccaron /Eacute /Eogonek&quot;</span>,
-<a name="l00118"></a>00118 <span class="stringliteral">&quot;    /Edieresis /Ecaron /Iacute /Icircumflex /Dcaron&quot;</span>,
-<a name="l00119"></a>00119 <span class="stringliteral">&quot;    /.notdef /Nacute /Ncaron /Oacute /Ocircumflex&quot;</span>,
-<a name="l00120"></a>00120 <span class="stringliteral">&quot;    /Ohungarumlaut /Odieresis /multiply /Rcaron /Uring&quot;</span>,
-<a name="l00121"></a>00121 <span class="stringliteral">&quot;    /Uacute /Uhungarumlaut /Udieresis /Yacute /Tcommaaccent&quot;</span>,
-<a name="l00122"></a>00122 <span class="stringliteral">&quot;    /germandbls /racute /aacute /acircumflex /abreve&quot;</span>,
-<a name="l00123"></a>00123 <span class="stringliteral">&quot;    /adieresis /lacute /cacute /ccedilla /ccaron /eacute&quot;</span>,
-<a name="l00124"></a>00124 <span class="stringliteral">&quot;    /eogonek /edieresis /ecaron /iacute /icircumflex&quot;</span>,
-<a name="l00125"></a>00125 <span class="stringliteral">&quot;    /dcaron /.notdef /nacute /ncaron /oacute /ocircumflex&quot;</span>,
-<a name="l00126"></a>00126 <span class="stringliteral">&quot;    /ohungarumlaut /odieresis /divide /rcaron /uring&quot;</span>,
-<a name="l00127"></a>00127 <span class="stringliteral">&quot;    /uacute /uhungarumlaut /udieresis /yacute /tcommaaccent&quot;</span>,
-<a name="l00128"></a>00128 <span class="stringliteral">&quot;    /dotaccent&quot;</span>,
-<a name="l00129"></a>00129 };
-<a name="l00130"></a>00130 
-<a name="l00131"></a>00131 
-<a name="l00132"></a>00132 <span class="comment">/*</span>
-<a name="l00133"></a>00133 <span class="comment"> * tGetFontIndex - get the font index</span>
-<a name="l00134"></a>00134 <span class="comment"> */</span>
-<a name="l00135"></a>00135 <span class="keyword">static</span> <span class="keywordtype">size_t</span>
-<a name="l00136"></a>00136 tGetFontIndex(drawfile_fontref tFontRef)
-<a name="l00137"></a>00137 {
-<a name="l00138"></a>00138         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szFontname;
-<a name="l00139"></a>00139         <span class="keywordtype">size_t</span>          tIndex;
-<a name="l00140"></a>00140 
-<a name="l00141"></a>00141         <span class="comment">/* Get the font name */</span>
-<a name="l00142"></a>00142         szFontname = szGetFontname(tFontRef);
-<a name="l00143"></a>00143         fail(szFontname == NULL);
-<a name="l00144"></a>00144         <span class="keywordflow">if</span> (szFontname == NULL) {
-<a name="l00145"></a>00145                 <span class="keywordflow">return</span> 0;
-<a name="l00146"></a>00146         }
-<a name="l00147"></a>00147 
-<a name="l00148"></a>00148         <span class="comment">/* Find the name in the table */</span>
-<a name="l00149"></a>00149         <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; elementsof(atFontname); tIndex++) {
-<a name="l00150"></a>00150                 <span class="keywordflow">if</span> (STRCEQ(atFontname[tIndex].szPSname, szFontname)) {
-<a name="l00151"></a>00151                         <span class="keywordflow">return</span> tIndex;
-<a name="l00152"></a>00152                 }
-<a name="l00153"></a>00153         }
-<a name="l00154"></a>00154         <span class="comment">/* Not found */</span>
-<a name="l00155"></a>00155         DBG_DEC(tFontRef);
-<a name="l00156"></a>00156         DBG_MSG(szFontname);
-<a name="l00157"></a>00157         <span class="keywordflow">return</span> 0;
-<a name="l00158"></a>00158 } <span class="comment">/* end of tGetFontIndex */</span>
-<a name="l00159"></a>00159 
-<a name="l00160"></a>00160 <span class="comment">/*</span>
-<a name="l00161"></a>00161 <span class="comment"> * vSetLocation - store the location of objects</span>
-<a name="l00162"></a>00162 <span class="comment"> */</span>
-<a name="l00163"></a>00163 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00164"></a>00164 vSetLocation(<span class="keywordtype">int</span> iLocationNumber)
-<a name="l00165"></a>00165 {
-<a name="l00166"></a>00166         fail(iLocationNumber &lt;= 0);
-<a name="l00167"></a>00167 
-<a name="l00168"></a>00168         <span class="keywordflow">if</span> ((<span class="keywordtype">size_t</span>)iLocationNumber &gt;= tLocations) {
-<a name="l00169"></a>00169                 <span class="comment">/* Extend and set to zero */</span>
-<a name="l00170"></a>00170                 tLocations += EXTENSION_ARRAY_SIZE;
-<a name="l00171"></a>00171                 alLocation = xrealloc(alLocation, tLocations * <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>));
-<a name="l00172"></a>00172                 memset(alLocation + tLocations - EXTENSION_ARRAY_SIZE,
-<a name="l00173"></a>00173                         0,
-<a name="l00174"></a>00174                         EXTENSION_ARRAY_SIZE * <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>));
-<a name="l00175"></a>00175                 DBG_DEC(tLocations);
-<a name="l00176"></a>00176         }
-<a name="l00177"></a>00177         <span class="keywordflow">if</span> (iLocationNumber &gt; iMaxLocationNumber) {
-<a name="l00178"></a>00178                 iMaxLocationNumber = iLocationNumber;
-<a name="l00179"></a>00179         }
-<a name="l00180"></a>00180 
-<a name="l00181"></a>00181         DBG_DEC_C((<span class="keywordtype">size_t</span>)iLocationNumber &gt;= tLocations, iLocationNumber);
-<a name="l00182"></a>00182         DBG_DEC_C((<span class="keywordtype">size_t</span>)iLocationNumber &gt;= tLocations, tLocations);
-<a name="l00183"></a>00183         fail((<span class="keywordtype">size_t</span>)iLocationNumber &gt;= tLocations);
-<a name="l00184"></a>00184 
-<a name="l00185"></a>00185         alLocation[iLocationNumber] = lFilePosition;
-<a name="l00186"></a>00186 } <span class="comment">/* end of vSetLocation */</span>
-<a name="l00187"></a>00187 
-<a name="l00188"></a>00188 <span class="comment">/*</span>
-<a name="l00189"></a>00189 <span class="comment"> * vFillNextPageObject - fil the next page object with the current object number</span>
-<a name="l00190"></a>00190 <span class="comment"> */</span>
-<a name="l00191"></a>00191 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00192"></a>00192 vFillNextPageObject(<span class="keywordtype">void</span>)
-<a name="l00193"></a>00193 {
-<a name="l00194"></a>00194         iPageCount++;
-<a name="l00195"></a>00195         <span class="keywordflow">if</span> ((<span class="keywordtype">size_t</span>)iPageCount &gt;= tMaxPageObjects) {
-<a name="l00196"></a>00196                 <span class="comment">/* Extend the array */</span>
-<a name="l00197"></a>00197                 tMaxPageObjects += EXTENSION_ARRAY_SIZE;
-<a name="l00198"></a>00198                 aiPageObject = xrealloc(aiPageObject,
-<a name="l00199"></a>00199                                         tMaxPageObjects * <span class="keyword">sizeof</span>(<span class="keywordtype">int</span>));
-<a name="l00200"></a>00200                 DBG_DEC(tMaxPageObjects);
-<a name="l00201"></a>00201         }
-<a name="l00202"></a>00202         aiPageObject[iPageCount] = iObjectNumberCurr;
-<a name="l00203"></a>00203 } <span class="comment">/* end of vFillNextPageObject */</span>
-<a name="l00204"></a>00204 
-<a name="l00205"></a>00205 <span class="comment">/*</span>
-<a name="l00206"></a>00206 <span class="comment"> * vFPprintf - printf and update the fileposition</span>
-<a name="l00207"></a>00207 <span class="comment"> *</span>
-<a name="l00208"></a>00208 <span class="comment"> * called with arguments like fprintf(3)</span>
-<a name="l00209"></a>00209 <span class="comment"> */</span>
-<a name="l00210"></a>00210 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00211"></a>00211 vFPprintf(FILE *pOutFile, <span class="keyword">const</span> <span class="keywordtype">char</span> *szFormat, ...)
-<a name="l00212"></a>00212 {
-<a name="l00213"></a>00213         va_list tArg;
-<a name="l00214"></a>00214 
-<a name="l00215"></a>00215         va_start(tArg, szFormat);
-<a name="l00216"></a>00216         lFilePosition += vfprintf(pOutFile, szFormat, tArg);
-<a name="l00217"></a>00217         va_end(tArg);
-<a name="l00218"></a>00218 } <span class="comment">/* end of vFPprintf */</span>
-<a name="l00219"></a>00219 
-<a name="l00220"></a>00220 <span class="comment">/*</span>
-<a name="l00221"></a>00221 <span class="comment"> * vCreateInfoDictionary - create the document information dictionary</span>
-<a name="l00222"></a>00222 <span class="comment"> */</span>
-<a name="l00223"></a>00223 <span class="keywordtype">void</span>
-<a name="l00224"></a>00224 vCreateInfoDictionary(diagram_type *pDiag, <span class="keywordtype">int</span> iWordVersion)
-<a name="l00225"></a>00225 {
-<a name="l00226"></a>00226         FILE    *pOutFile;
-<a name="l00227"></a>00227         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szTitle, *szAuthor, *szSubject, *szCreator;
-<a name="l00228"></a>00228         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szCreationDate, *szModDate;
-<a name="l00229"></a>00229 
-<a name="l00230"></a>00230         fail(pDiag == NULL);
-<a name="l00231"></a>00231         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00232"></a>00232         fail(iWordVersion &lt; 0);
-<a name="l00233"></a>00233         fail(szProducer == NULL || szProducer[0] == <span class="charliteral">&#39;\0&#39;</span>);
-<a name="l00234"></a>00234 
-<a name="l00235"></a>00235         szTitle = szGetTitle();
-<a name="l00236"></a>00236         szAuthor = szGetAuthor();
-<a name="l00237"></a>00237         szSubject = szGetSubject();
-<a name="l00238"></a>00238         szCreationDate = szGetCreationDate();
-<a name="l00239"></a>00239         szModDate = szGetModDate();
-<a name="l00240"></a>00240 
-<a name="l00241"></a>00241         <span class="keywordflow">switch</span> (iWordVersion) {
-<a name="l00242"></a>00242         <span class="keywordflow">case</span> 0: szCreator = <span class="stringliteral">&quot;Word for DOS&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00243"></a>00243         <span class="keywordflow">case</span> 1: szCreator = <span class="stringliteral">&quot;WinWord 1.x&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00244"></a>00244         <span class="keywordflow">case</span> 2: szCreator = <span class="stringliteral">&quot;WinWord 2.0&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00245"></a>00245         <span class="keywordflow">case</span> 4: szCreator = <span class="stringliteral">&quot;MacWord 4&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00246"></a>00246         <span class="keywordflow">case</span> 5: szCreator = <span class="stringliteral">&quot;MacWord 5&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00247"></a>00247         <span class="keywordflow">case</span> 6: szCreator = <span class="stringliteral">&quot;Word 6&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00248"></a>00248         <span class="keywordflow">case</span> 7: szCreator = <span class="stringliteral">&quot;Word 7/95&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00249"></a>00249         <span class="keywordflow">case</span> 8: szCreator = <span class="stringliteral">&quot;Word 97 or later&quot;</span>; <span class="keywordflow">break</span>;
-<a name="l00250"></a>00250         <span class="keywordflow">default</span>: szCreator = NULL; <span class="keywordflow">break</span>;
-<a name="l00251"></a>00251         }
-<a name="l00252"></a>00252 
-<a name="l00253"></a>00253         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00254"></a>00254 
-<a name="l00255"></a>00255         vSetLocation(2);
-<a name="l00256"></a>00256         vFPprintf(pOutFile, <span class="stringliteral">&quot;2 0 obj\n&quot;</span>);
-<a name="l00257"></a>00257         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00258"></a>00258         <span class="keywordflow">if</span> (szTitle != NULL &amp;&amp; szTitle[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00259"></a>00259                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Title (%s)\n&quot;</span>, szTitle);
-<a name="l00260"></a>00260         }
-<a name="l00261"></a>00261         <span class="keywordflow">if</span> (szAuthor != NULL &amp;&amp; szAuthor[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00262"></a>00262                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Author (%s)\n&quot;</span>, szAuthor);
-<a name="l00263"></a>00263         }
-<a name="l00264"></a>00264         <span class="keywordflow">if</span> (szSubject != NULL &amp;&amp; szSubject[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00265"></a>00265                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Subject (%s)\n&quot;</span>, szSubject);
-<a name="l00266"></a>00266         }
-<a name="l00267"></a>00267         <span class="keywordflow">if</span> (szCreator != NULL &amp;&amp; szCreator[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00268"></a>00268                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Creator (%s)\n&quot;</span>, szCreator);
-<a name="l00269"></a>00269         }
-<a name="l00270"></a>00270         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Producer (%s %s)\n&quot;</span>, szProducer, VERSIONSTRING);
-<a name="l00271"></a>00271         <span class="keywordflow">if</span> (szCreationDate != NULL &amp;&amp; szCreationDate[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00272"></a>00272                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/CreationDate (%s)\n&quot;</span>, szCreationDate);
-<a name="l00273"></a>00273         }
-<a name="l00274"></a>00274         <span class="keywordflow">if</span> (szModDate != NULL &amp;&amp; szModDate[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00275"></a>00275                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/ModDate (%s)\n&quot;</span>, szModDate);
-<a name="l00276"></a>00276         }
-<a name="l00277"></a>00277         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00278"></a>00278         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00279"></a>00279 } <span class="comment">/* end of vCreateInfoDictionary */</span>
-<a name="l00280"></a>00280 
-<a name="l00281"></a>00281 <span class="comment">/*</span>
-<a name="l00282"></a>00282 <span class="comment"> * vAddHdrFtr - add a header or footer</span>
-<a name="l00283"></a>00283 <span class="comment"> */</span>
-<a name="l00284"></a>00284 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00285"></a>00285 vAddHdrFtr(diagram_type *pDiag, <span class="keyword">const</span> hdrftr_block_type *pHdrFtrInfo)
-<a name="l00286"></a>00286 {
-<a name="l00287"></a>00287         output_type     *pStart, *pPrev, *pNext;
-<a name="l00288"></a>00288 
-<a name="l00289"></a>00289         fail(pDiag == NULL);
-<a name="l00290"></a>00290         fail(pHdrFtrInfo == NULL);
-<a name="l00291"></a>00291 
-<a name="l00292"></a>00292         vStartOfParagraphPDF(pDiag, 0);
-<a name="l00293"></a>00293         pStart = pHdrFtrInfo-&gt;pText;
-<a name="l00294"></a>00294         <span class="keywordflow">while</span> (pStart != NULL) {
-<a name="l00295"></a>00295                 pNext = pStart;
-<a name="l00296"></a>00296                 <span class="keywordflow">while</span> (pNext != NULL &amp;&amp;
-<a name="l00297"></a>00297                        (pNext-&gt;tNextFree != 1 ||
-<a name="l00298"></a>00298                         (pNext-&gt;szStorage[0] != PAR_END &amp;&amp;
-<a name="l00299"></a>00299                          pNext-&gt;szStorage[0] != HARD_RETURN))) {
-<a name="l00300"></a>00300                         pNext = pNext-&gt;pNext;
-<a name="l00301"></a>00301                 }
-<a name="l00302"></a>00302                 <span class="keywordflow">if</span> (pNext == NULL) {
-<a name="l00303"></a>00303                         <span class="keywordflow">if</span> (bOutputContainsText(pStart)) {
-<a name="l00304"></a>00304                                 vAlign2Window(pDiag, pStart,
-<a name="l00305"></a>00305                                         lChar2MilliPoints(DEFAULT_SCREEN_WIDTH),
-<a name="l00306"></a>00306                                         ALIGNMENT_LEFT);
-<a name="l00307"></a>00307                         } <span class="keywordflow">else</span> {
-<a name="l00308"></a>00308                                 vMove2NextLinePDF(pDiag, pStart-&gt;usFontSize);
-<a name="l00309"></a>00309                         }
-<a name="l00310"></a>00310                         <span class="keywordflow">break</span>;
-<a name="l00311"></a>00311                 }
-<a name="l00312"></a>00312                 fail(pNext-&gt;tNextFree != 1);
-<a name="l00313"></a>00313                 fail(pNext-&gt;szStorage[0] != PAR_END &amp;&amp;
-<a name="l00314"></a>00314                         pNext-&gt;szStorage[0] != HARD_RETURN);
-<a name="l00315"></a>00315 
-<a name="l00316"></a>00316                 <span class="keywordflow">if</span> (pStart != pNext) {
-<a name="l00317"></a>00317                         <span class="comment">/* There is something to print */</span>
-<a name="l00318"></a>00318                         pPrev = pNext-&gt;pPrev;
-<a name="l00319"></a>00319                         fail(pPrev-&gt;pNext != pNext);
-<a name="l00320"></a>00320                         <span class="comment">/* Cut the chain */</span>
-<a name="l00321"></a>00321                         pPrev-&gt;pNext = NULL;
-<a name="l00322"></a>00322                         <span class="keywordflow">if</span> (bOutputContainsText(pStart)) {
-<a name="l00323"></a>00323                                 <span class="comment">/* Print it */</span>
-<a name="l00324"></a>00324                                 vAlign2Window(pDiag, pStart,
-<a name="l00325"></a>00325                                         lChar2MilliPoints(DEFAULT_SCREEN_WIDTH),
-<a name="l00326"></a>00326                                         ALIGNMENT_LEFT);
-<a name="l00327"></a>00327                         } <span class="keywordflow">else</span> {
-<a name="l00328"></a>00328                                 <span class="comment">/* Just an empty line */</span>
-<a name="l00329"></a>00329                                 vMove2NextLinePDF(pDiag, pStart-&gt;usFontSize);
-<a name="l00330"></a>00330                         }
-<a name="l00331"></a>00331                         <span class="comment">/* Repair the chain */</span>
-<a name="l00332"></a>00332                         pPrev-&gt;pNext = pNext;
-<a name="l00333"></a>00333                 }
-<a name="l00334"></a>00334                 <span class="keywordflow">if</span> (pNext-&gt;szStorage[0] == PAR_END) {
-<a name="l00335"></a>00335                         vEndOfParagraphPDF(pDiag, pNext-&gt;usFontSize,
-<a name="l00336"></a>00336                                         (<span class="keywordtype">long</span>)pNext-&gt;usFontSize * 200);
-<a name="l00337"></a>00337                 }
-<a name="l00338"></a>00338                 pStart = pNext-&gt;pNext;
-<a name="l00339"></a>00339         }
-<a name="l00340"></a>00340 } <span class="comment">/* end of vAddHdrFtr */</span>
-<a name="l00341"></a>00341 
-<a name="l00342"></a>00342 <span class="comment">/*</span>
-<a name="l00343"></a>00343 <span class="comment"> * vAddHeader - add a page header</span>
-<a name="l00344"></a>00344 <span class="comment"> */</span>
-<a name="l00345"></a>00345 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00346"></a>00346 vAddHeader(diagram_type *pDiag)
-<a name="l00347"></a>00347 {
-<a name="l00348"></a>00348         <span class="keyword">const</span> hdrftr_block_type *pHdrInfo;
-<a name="l00349"></a>00349         <span class="keyword">const</span> hdrftr_block_type *pFtrInfo;
-<a name="l00350"></a>00350 
-<a name="l00351"></a>00351         fail(pDiag == NULL);
-<a name="l00352"></a>00352 
-<a name="l00353"></a>00353         NO_DBG_MSG(<span class="stringliteral">&quot;vAddHeader&quot;</span>);
-<a name="l00354"></a>00354 
-<a name="l00355"></a>00355         pHdrInfo = pGetHdrFtrInfo(iSectionIndex, TRUE,
-<a name="l00356"></a>00356                                         odd(iPageCount), bFirstInSection);
-<a name="l00357"></a>00357         pFtrInfo = pGetHdrFtrInfo(iSectionIndex, FALSE,
-<a name="l00358"></a>00358                                         odd(iPageCount), bFirstInSection);
-<a name="l00359"></a>00359         <span class="comment">/* Set the height of the footer of this page */</span>
-<a name="l00360"></a>00360         lFooterHeight = pFtrInfo == NULL ? 0 : pFtrInfo-&gt;lHeight;
-<a name="l00361"></a>00361         fail(lFooterHeight &lt; 0);
-<a name="l00362"></a>00362 
-<a name="l00363"></a>00363         <span class="keywordflow">if</span> (pHdrInfo == NULL ||
-<a name="l00364"></a>00364             pHdrInfo-&gt;pText == NULL ||
-<a name="l00365"></a>00365             pHdrInfo-&gt;lHeight &lt;= 0) {
-<a name="l00366"></a>00366                 fail(pHdrInfo != NULL &amp;&amp; pHdrInfo-&gt;lHeight &lt; 0);
-<a name="l00367"></a>00367                 fail(pHdrInfo != NULL &amp;&amp;
-<a name="l00368"></a>00368                         pHdrInfo-&gt;pText != NULL &amp;&amp;
-<a name="l00369"></a>00369                         pHdrInfo-&gt;lHeight == 0);
-<a name="l00370"></a>00370                 <span class="keywordflow">return</span>;
-<a name="l00371"></a>00371         }
-<a name="l00372"></a>00372 
-<a name="l00373"></a>00373         vAddHdrFtr(pDiag, pHdrInfo);
-<a name="l00374"></a>00374 
-<a name="l00375"></a>00375         DBG_DEC_C(pHdrInfo-&gt;lHeight !=
-<a name="l00376"></a>00376                 lPageHeight - PS_TOP_MARGIN - pDiag-&gt;lYtop,
-<a name="l00377"></a>00377                 pHdrInfo-&gt;lHeight);
-<a name="l00378"></a>00378         DBG_DEC_C(pHdrInfo-&gt;lHeight !=
-<a name="l00379"></a>00379                 lPageHeight - PS_TOP_MARGIN - pDiag-&gt;lYtop,
-<a name="l00380"></a>00380                 lPageHeight - PS_TOP_MARGIN - pDiag-&gt;lYtop);
-<a name="l00381"></a>00381 } <span class="comment">/* end of vAddHeader */</span>
-<a name="l00382"></a>00382 
-<a name="l00383"></a>00383 <span class="comment">/*</span>
-<a name="l00384"></a>00384 <span class="comment"> * vAddFooter - add a page footer</span>
-<a name="l00385"></a>00385 <span class="comment"> */</span>
-<a name="l00386"></a>00386 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00387"></a>00387 vAddFooter(diagram_type *pDiag)
-<a name="l00388"></a>00388 {
-<a name="l00389"></a>00389         <span class="keyword">const</span> hdrftr_block_type *pFtrInfo;
-<a name="l00390"></a>00390 
-<a name="l00391"></a>00391         fail(pDiag == NULL);
-<a name="l00392"></a>00392 
-<a name="l00393"></a>00393         NO_DBG_MSG(<span class="stringliteral">&quot;vAddFooter&quot;</span>);
-<a name="l00394"></a>00394 
-<a name="l00395"></a>00395         pFtrInfo = pGetHdrFtrInfo(iSectionIndex, FALSE,
-<a name="l00396"></a>00396                                         odd(iPageCount), bFirstInSection);
-<a name="l00397"></a>00397         bFirstInSection = FALSE;
-<a name="l00398"></a>00398         <span class="keywordflow">if</span> (pFtrInfo == NULL ||
-<a name="l00399"></a>00399             pFtrInfo-&gt;pText == NULL ||
-<a name="l00400"></a>00400             pFtrInfo-&gt;lHeight &lt;= 0) {
-<a name="l00401"></a>00401                 fail(pFtrInfo != NULL &amp;&amp; pFtrInfo-&gt;lHeight &lt; 0);
-<a name="l00402"></a>00402                 fail(pFtrInfo != NULL &amp;&amp;
-<a name="l00403"></a>00403                         pFtrInfo-&gt;pText != NULL &amp;&amp;
-<a name="l00404"></a>00404                         pFtrInfo-&gt;lHeight == 0);
-<a name="l00405"></a>00405                 <span class="keywordflow">return</span>;
-<a name="l00406"></a>00406         }
-<a name="l00407"></a>00407 
-<a name="l00408"></a>00408         bInFtrSpace = TRUE;
-<a name="l00409"></a>00409 
-<a name="l00410"></a>00410         DBG_DEC_C(pFtrInfo-&gt;lHeight != lFooterHeight, pFtrInfo-&gt;lHeight);
-<a name="l00411"></a>00411         DBG_DEC_C(pFtrInfo-&gt;lHeight != lFooterHeight, lFooterHeight);
-<a name="l00412"></a>00412         DBG_DEC_C(pDiag-&gt;lYtop &lt; lFooterHeight + PS_BOTTOM_MARGIN,
-<a name="l00413"></a>00413                         pDiag-&gt;lYtop);
-<a name="l00414"></a>00414         DBG_DEC_C(pDiag-&gt;lYtop &lt; lFooterHeight + PS_BOTTOM_MARGIN,
-<a name="l00415"></a>00415                         lFooterHeight + PS_BOTTOM_MARGIN);
-<a name="l00416"></a>00416 
-<a name="l00417"></a>00417         <span class="keywordflow">if</span> (pDiag-&gt;lYtop &gt; lFooterHeight + PS_BOTTOM_MARGIN) {
-<a name="l00418"></a>00418                 <span class="comment">/* Move down to the start of the footer */</span>
-<a name="l00419"></a>00419                 pDiag-&gt;lYtop = lFooterHeight + PS_BOTTOM_MARGIN;
-<a name="l00420"></a>00420                 vMoveTo(pDiag, 0);
-<a name="l00421"></a>00421         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pDiag-&gt;lYtop &lt; lFooterHeight + PS_BOTTOM_MARGIN / 2) {
-<a name="l00422"></a>00422                 DBG_FIXME();
-<a name="l00423"></a>00423                 <span class="comment">/*</span>
-<a name="l00424"></a>00424 <span class="comment">                 * Move up to the start of the footer, to prevent moving</span>
-<a name="l00425"></a>00425 <span class="comment">                 * of the bottom edge of the paper</span>
-<a name="l00426"></a>00426 <span class="comment">                 */</span>
-<a name="l00427"></a>00427                 pDiag-&gt;lYtop = lFooterHeight + PS_BOTTOM_MARGIN;
-<a name="l00428"></a>00428                 vMoveTo(pDiag, 0);
-<a name="l00429"></a>00429         }
-<a name="l00430"></a>00430 
-<a name="l00431"></a>00431         DBG_FLT_C(pDiag-&gt;lYtop &lt; lFooterHeight + PS_BOTTOM_MARGIN,
-<a name="l00432"></a>00432         dDrawUnits2Points(lFooterHeight + PS_BOTTOM_MARGIN - pDiag-&gt;lYtop));
-<a name="l00433"></a>00433 
-<a name="l00434"></a>00434         vAddHdrFtr(pDiag, pFtrInfo);
-<a name="l00435"></a>00435         bInFtrSpace = FALSE;
-<a name="l00436"></a>00436 } <span class="comment">/* end of vAddFooter */</span>
-<a name="l00437"></a>00437 
-<a name="l00438"></a>00438 <span class="comment">/*</span>
-<a name="l00439"></a>00439 <span class="comment"> * vEndPageObject - end the current page object</span>
-<a name="l00440"></a>00440 <span class="comment"> */</span>
-<a name="l00441"></a>00441 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00442"></a>00442 vEndPageObject(FILE *pOutFile)
-<a name="l00443"></a>00443 {
-<a name="l00444"></a>00444         <span class="keywordtype">long</span>    lStreamEnd;
-<a name="l00445"></a>00445 
-<a name="l00446"></a>00446         <span class="keywordflow">if</span> (lStreamStart &lt; 0) {
-<a name="l00447"></a>00447                 <span class="comment">/* There is no current page object */</span>
-<a name="l00448"></a>00448                 <span class="keywordflow">return</span>;
-<a name="l00449"></a>00449         }
-<a name="l00450"></a>00450 
-<a name="l00451"></a>00451         vFPprintf(pOutFile, <span class="stringliteral">&quot;ET\n&quot;</span>);
-<a name="l00452"></a>00452         lStreamEnd = lFilePosition;
-<a name="l00453"></a>00453         vFPprintf(pOutFile, <span class="stringliteral">&quot;endstream\n&quot;</span>);
-<a name="l00454"></a>00454         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00455"></a>00455 
-<a name="l00456"></a>00456         iObjectNumberCurr++;
-<a name="l00457"></a>00457         vSetLocation(iObjectNumberCurr);
-<a name="l00458"></a>00458         vFPprintf(pOutFile, <span class="stringliteral">&quot;%d 0 obj\n&quot;</span>, iObjectNumberCurr);
-<a name="l00459"></a>00459         vFPprintf(pOutFile, <span class="stringliteral">&quot;%lu\n&quot;</span>, lStreamEnd - lStreamStart);
-<a name="l00460"></a>00460         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00461"></a>00461 } <span class="comment">/* end of vEndPageObject */</span>
-<a name="l00462"></a>00462 
-<a name="l00463"></a>00463 <span class="comment">/*</span>
-<a name="l00464"></a>00464 <span class="comment"> * vMove2NextPage - move to the start of the next page</span>
-<a name="l00465"></a>00465 <span class="comment"> */</span>
-<a name="l00466"></a>00466 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00467"></a>00467 vMove2NextPage(diagram_type *pDiag, BOOL bNewSection)
-<a name="l00468"></a>00468 {
-<a name="l00469"></a>00469         FILE    *pOutFile;
-<a name="l00470"></a>00470 
-<a name="l00471"></a>00471         fail(pDiag == NULL);
-<a name="l00472"></a>00472         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00473"></a>00473 
-<a name="l00474"></a>00474         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00475"></a>00475 
-<a name="l00476"></a>00476         vAddFooter(pDiag);
-<a name="l00477"></a>00477         <span class="comment">/* End the old page object */</span>
-<a name="l00478"></a>00478         vEndPageObject(pOutFile);
-<a name="l00479"></a>00479         <span class="keywordflow">if</span> (bNewSection) {
-<a name="l00480"></a>00480                 iSectionIndex++;
-<a name="l00481"></a>00481                 bFirstInSection = TRUE;
-<a name="l00482"></a>00482         }
-<a name="l00483"></a>00483 
-<a name="l00484"></a>00484         <span class="comment">/* Start the new page object */</span>
-<a name="l00485"></a>00485         iObjectNumberCurr++;
-<a name="l00486"></a>00486         vSetLocation(iObjectNumberCurr);
-<a name="l00487"></a>00487         vFillNextPageObject();
-<a name="l00488"></a>00488         vFPprintf(pOutFile, <span class="stringliteral">&quot;%d 0 obj\n&quot;</span>, iObjectNumberCurr);
-<a name="l00489"></a>00489         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00490"></a>00490         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Type /Page\n&quot;</span>);
-<a name="l00491"></a>00491         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Parent 3 0 R\n&quot;</span>);
-<a name="l00492"></a>00492         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Resources 17 0 R\n&quot;</span>);
-<a name="l00493"></a>00493         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Contents %d 0 R\n&quot;</span>, iObjectNumberCurr + 1);
-<a name="l00494"></a>00494         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00495"></a>00495         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00496"></a>00496 
-<a name="l00497"></a>00497         <span class="comment">/* Start the new text object */</span>
-<a name="l00498"></a>00498         iObjectNumberCurr++;
-<a name="l00499"></a>00499         vSetLocation(iObjectNumberCurr);
-<a name="l00500"></a>00500         vFPprintf(pOutFile, <span class="stringliteral">&quot;%d 0 obj\n&quot;</span>, iObjectNumberCurr);
-<a name="l00501"></a>00501         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00502"></a>00502         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Length %d 0 R\n&quot;</span>, iObjectNumberCurr + 1);
-<a name="l00503"></a>00503         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00504"></a>00504         vFPprintf(pOutFile, <span class="stringliteral">&quot;stream\n&quot;</span>);
-<a name="l00505"></a>00505         lStreamStart = lFilePosition;
-<a name="l00506"></a>00506         vFPprintf(pOutFile, <span class="stringliteral">&quot;BT\n&quot;</span>);
-<a name="l00507"></a>00507 
-<a name="l00508"></a>00508         <span class="comment">/* Set variables to their start of page values */</span>
-<a name="l00509"></a>00509         pDiag-&gt;lYtop = lPageHeight - PS_TOP_MARGIN;
-<a name="l00510"></a>00510         tFontRefCurr = (drawfile_fontref)-1;
-<a name="l00511"></a>00511         usFontSizeCurr = 0;
-<a name="l00512"></a>00512         iFontColorCurr = -1;
-<a name="l00513"></a>00513         lYtopCurr = -1;
-<a name="l00514"></a>00514         vAddHeader(pDiag);
-<a name="l00515"></a>00515 } <span class="comment">/* end of vMove2NextPage */</span>
-<a name="l00516"></a>00516 
-<a name="l00517"></a>00517 <span class="comment">/*</span>
-<a name="l00518"></a>00518 <span class="comment"> * vMoveTo - move to the specified X,Y coordinates</span>
-<a name="l00519"></a>00519 <span class="comment"> *</span>
-<a name="l00520"></a>00520 <span class="comment"> * Move the current position of the specified diagram to its X,Y coordinates,</span>
-<a name="l00521"></a>00521 <span class="comment"> * start on a new page if needed</span>
-<a name="l00522"></a>00522 <span class="comment"> */</span>
-<a name="l00523"></a>00523 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00524"></a>00524 vMoveTo(diagram_type *pDiag, <span class="keywordtype">long</span> lLastVerticalMovement)
-<a name="l00525"></a>00525 {
-<a name="l00526"></a>00526         fail(pDiag == NULL);
-<a name="l00527"></a>00527         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00528"></a>00528 
-<a name="l00529"></a>00529         <span class="keywordflow">if</span> (pDiag-&gt;lYtop &lt;= lFooterHeight + PS_BOTTOM_MARGIN &amp;&amp; !bInFtrSpace) {
-<a name="l00530"></a>00530                 vMove2NextPage(pDiag, FALSE);
-<a name="l00531"></a>00531                 <span class="comment">/* Repeat the last vertical movement on the new page */</span>
-<a name="l00532"></a>00532                 pDiag-&gt;lYtop -= lLastVerticalMovement;
-<a name="l00533"></a>00533         }
-<a name="l00534"></a>00534 
-<a name="l00535"></a>00535         fail(pDiag-&gt;lYtop &lt; lFooterHeight + PS_BOTTOM_MARGIN &amp;&amp; !bInFtrSpace);
-<a name="l00536"></a>00536         DBG_DEC_C(pDiag-&gt;lYtop &lt; PS_BOTTOM_MARGIN, pDiag-&gt;lYtop);
-<a name="l00537"></a>00537         fail(pDiag-&gt;lYtop &lt; PS_BOTTOM_MARGIN / 3);
-<a name="l00538"></a>00538 
-<a name="l00539"></a>00539         <span class="keywordflow">if</span> (pDiag-&gt;lYtop != lYtopCurr) {
-<a name="l00540"></a>00540                 vFPprintf(pDiag-&gt;pOutFile, <span class="stringliteral">&quot;1 0 0 1 %.2f %.2f Tm\n&quot;</span>,
-<a name="l00541"></a>00541                         dDrawUnits2Points(pDiag-&gt;lXleft + PS_LEFT_MARGIN),
-<a name="l00542"></a>00542                         dDrawUnits2Points(pDiag-&gt;lYtop));
-<a name="l00543"></a>00543                 lYtopCurr = pDiag-&gt;lYtop;
-<a name="l00544"></a>00544         }
-<a name="l00545"></a>00545 } <span class="comment">/* end of vMoveTo */</span>
-<a name="l00546"></a>00546 
-<a name="l00547"></a>00547 <span class="comment">/*</span>
-<a name="l00548"></a>00548 <span class="comment"> * vProloguePDF - set options and perform the PDF initialization</span>
-<a name="l00549"></a>00549 <span class="comment"> */</span>
-<a name="l00550"></a>00550 <span class="keywordtype">void</span>
-<a name="l00551"></a>00551 vProloguePDF(diagram_type *pDiag,
-<a name="l00552"></a>00552         <span class="keyword">const</span> <span class="keywordtype">char</span> *szTask, <span class="keyword">const</span> options_type *pOptions)
-<a name="l00553"></a>00553 {
-<a name="l00554"></a>00554         FILE    *pOutFile;
-<a name="l00555"></a>00555 
-<a name="l00556"></a>00556         fail(pDiag == NULL);
-<a name="l00557"></a>00557         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00558"></a>00558         fail(pOptions == NULL);
-<a name="l00559"></a>00559 
-<a name="l00560"></a>00560         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00561"></a>00561 
-<a name="l00562"></a>00562         eEncoding = pOptions-&gt;eEncoding;
-<a name="l00563"></a>00563 
-<a name="l00564"></a>00564         <span class="comment">/* Create an empty location array */</span>
-<a name="l00565"></a>00565         tLocations = INITIAL_LOCATION_SIZE;
-<a name="l00566"></a>00566         alLocation = xcalloc(tLocations, <span class="keyword">sizeof</span>(<span class="keywordtype">long</span>));
-<a name="l00567"></a>00567 
-<a name="l00568"></a>00568         <span class="comment">/* Create an empty pageobject array */</span>
-<a name="l00569"></a>00569         tMaxPageObjects = INITIAL_PAGEOBJECT_SIZE;
-<a name="l00570"></a>00570         aiPageObject = xcalloc(tMaxPageObjects, <span class="keyword">sizeof</span>(<span class="keywordtype">int</span>));
-<a name="l00571"></a>00571 
-<a name="l00572"></a>00572         <span class="keywordflow">if</span> (pOptions-&gt;iPageHeight == INT_MAX) {
-<a name="l00573"></a>00573                 lPageHeight = LONG_MAX;
-<a name="l00574"></a>00574         } <span class="keywordflow">else</span> {
-<a name="l00575"></a>00575                 lPageHeight = lPoints2DrawUnits(pOptions-&gt;iPageHeight);
-<a name="l00576"></a>00576         }
-<a name="l00577"></a>00577         DBG_DEC(lPageHeight);
-<a name="l00578"></a>00578         <span class="keywordflow">if</span> (pOptions-&gt;iPageWidth == INT_MAX) {
-<a name="l00579"></a>00579                 lPageWidth = LONG_MAX;
-<a name="l00580"></a>00580         } <span class="keywordflow">else</span> {
-<a name="l00581"></a>00581                 lPageWidth = lPoints2DrawUnits(pOptions-&gt;iPageWidth);
-<a name="l00582"></a>00582         }
-<a name="l00583"></a>00583         DBG_DEC(lPageWidth);
-<a name="l00584"></a>00584         lFooterHeight = 0;
-<a name="l00585"></a>00585         bInFtrSpace = FALSE;
-<a name="l00586"></a>00586 
-<a name="l00587"></a>00587         tFontRefCurr = (drawfile_fontref)-1;
-<a name="l00588"></a>00588         usFontSizeCurr = 0;
-<a name="l00589"></a>00589         iFontColorCurr = -1;
-<a name="l00590"></a>00590         lYtopCurr = -1;
-<a name="l00591"></a>00591         iPageCount = 0;
-<a name="l00592"></a>00592         iImageCount = 0;
-<a name="l00593"></a>00593         iSectionIndex = 0;
-<a name="l00594"></a>00594         bFirstInSection = TRUE;
-<a name="l00595"></a>00595         lFilePosition = 0;
-<a name="l00596"></a>00596         iMaxLocationNumber = 0;
-<a name="l00597"></a>00597         lStreamStart = -1;
-<a name="l00598"></a>00598         iObjectNumberCurr = 17;
-<a name="l00599"></a>00599         pDiag-&gt;lXleft = 0;
-<a name="l00600"></a>00600         pDiag-&gt;lYtop = 0;
-<a name="l00601"></a>00601 
-<a name="l00602"></a>00602         szProducer = szTask;
-<a name="l00603"></a>00603 
-<a name="l00604"></a>00604         vFPprintf(pOutFile, <span class="stringliteral">&quot;%%PDF-1.3\n&quot;</span>);
-<a name="l00605"></a>00605         vFPprintf(pOutFile, <span class="stringliteral">&quot;%%%c%c%c%c\n&quot;</span>, 0xe2, 0xe3, 0xcf, 0xd3);
-<a name="l00606"></a>00606 
-<a name="l00607"></a>00607         <span class="comment">/* Root catalog */</span>
-<a name="l00608"></a>00608         vSetLocation(1);
-<a name="l00609"></a>00609         vFPprintf(pOutFile, <span class="stringliteral">&quot;1 0 obj\n&quot;</span>);
-<a name="l00610"></a>00610         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00611"></a>00611         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Type /Catalog\n&quot;</span>);
-<a name="l00612"></a>00612         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Pages 3 0 R\n&quot;</span>);
-<a name="l00613"></a>00613         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00614"></a>00614         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00615"></a>00615 } <span class="comment">/* end of vProloguePDF */</span>
-<a name="l00616"></a>00616 
-<a name="l00617"></a>00617 <span class="comment">/*</span>
-<a name="l00618"></a>00618 <span class="comment"> * vEpiloguePDF - clean up after everything is done</span>
-<a name="l00619"></a>00619 <span class="comment"> */</span>
-<a name="l00620"></a>00620 <span class="keywordtype">void</span>
-<a name="l00621"></a>00621 vEpiloguePDF(diagram_type *pDiag)
-<a name="l00622"></a>00622 {
-<a name="l00623"></a>00623         FILE    *pOutFile;
-<a name="l00624"></a>00624         <span class="keywordtype">long</span>    lXref;
-<a name="l00625"></a>00625         <span class="keywordtype">int</span>     iIndex;
-<a name="l00626"></a>00626 
-<a name="l00627"></a>00627         fail(pDiag == NULL);
-<a name="l00628"></a>00628         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00629"></a>00629 
-<a name="l00630"></a>00630         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00631"></a>00631 
-<a name="l00632"></a>00632         vAddFooter(pDiag);
-<a name="l00633"></a>00633         <span class="comment">/* End the old page object */</span>
-<a name="l00634"></a>00634         vEndPageObject(pOutFile);
-<a name="l00635"></a>00635 
-<a name="l00636"></a>00636         vSetLocation(3);
-<a name="l00637"></a>00637         vFPprintf(pOutFile, <span class="stringliteral">&quot;3 0 obj\n&quot;</span>);
-<a name="l00638"></a>00638         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00639"></a>00639         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Type /Pages\n&quot;</span>);
-<a name="l00640"></a>00640         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Count %d\n&quot;</span>, iPageCount);
-<a name="l00641"></a>00641         vFPprintf(pOutFile, <span class="stringliteral">&quot;/MediaBox [ 0 0 %.0f %.0f ]\n&quot;</span>,
-<a name="l00642"></a>00642                         dDrawUnits2Points(lPageWidth),
-<a name="l00643"></a>00643                         dDrawUnits2Points(lPageHeight));
-<a name="l00644"></a>00644         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Kids [ &quot;</span>);
-<a name="l00645"></a>00645         <span class="keywordflow">for</span> (iIndex = 1; iIndex &lt;= iPageCount; iIndex++) {
-<a name="l00646"></a>00646                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t%d 0 R\n&quot;</span>, aiPageObject[iIndex]);
-<a name="l00647"></a>00647         }
-<a name="l00648"></a>00648         vFPprintf(pOutFile, <span class="stringliteral">&quot;]\n&quot;</span>);
-<a name="l00649"></a>00649         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00650"></a>00650         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00651"></a>00651 
-<a name="l00652"></a>00652         lXref = lFilePosition;
-<a name="l00653"></a>00653 
-<a name="l00654"></a>00654         vFPprintf(pOutFile, <span class="stringliteral">&quot;xref\n&quot;</span>);
-<a name="l00655"></a>00655         vFPprintf(pOutFile, <span class="stringliteral">&quot;0 %d\n&quot;</span>, iMaxLocationNumber + 1);
-<a name="l00656"></a>00656         vFPprintf(pOutFile, <span class="stringliteral">&quot;0000000000 65535 f \n&quot;</span>);
-<a name="l00657"></a>00657         <span class="keywordflow">for</span> (iIndex = 1; iIndex &lt;= iMaxLocationNumber; iIndex++) {
-<a name="l00658"></a>00658                 vFPprintf(pOutFile, <span class="stringliteral">&quot;%.10ld 00000 n \n&quot;</span>, alLocation[iIndex]);
-<a name="l00659"></a>00659         }
-<a name="l00660"></a>00660 
-<a name="l00661"></a>00661         vFPprintf(pOutFile, <span class="stringliteral">&quot;trailer\n&quot;</span>);
-<a name="l00662"></a>00662         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00663"></a>00663         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Size %d\n&quot;</span>, iMaxLocationNumber + 1);
-<a name="l00664"></a>00664         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Root 1 0 R\n&quot;</span>);
-<a name="l00665"></a>00665         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Info 2 0 R\n&quot;</span>);
-<a name="l00666"></a>00666         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00667"></a>00667 
-<a name="l00668"></a>00668         vFPprintf(pOutFile, <span class="stringliteral">&quot;startxref\n&quot;</span>);
-<a name="l00669"></a>00669         vFPprintf(pOutFile, <span class="stringliteral">&quot;%ld\n&quot;</span>, lXref);
-<a name="l00670"></a>00670         vFPprintf(pOutFile, <span class="stringliteral">&quot;%%%%EOF\n&quot;</span>);
-<a name="l00671"></a>00671 
-<a name="l00672"></a>00672         szProducer = NULL;
-<a name="l00673"></a>00673         aiPageObject = xfree(aiPageObject);
-<a name="l00674"></a>00674         alLocation = xfree(alLocation);
-<a name="l00675"></a>00675 } <span class="comment">/* end of vEpiloguePDF */</span>
-<a name="l00676"></a>00676 
-<a name="l00677"></a>00677 <span class="comment">/*</span>
-<a name="l00678"></a>00678 <span class="comment"> * vPrintPalette - print a pdf color space (palette)</span>
-<a name="l00679"></a>00679 <span class="comment"> */</span>
-<a name="l00680"></a>00680 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00681"></a>00681 vPrintPalette(FILE *pOutFile, <span class="keyword">const</span> imagedata_type *pImg)
-<a name="l00682"></a>00682 {
-<a name="l00683"></a>00683         <span class="keywordtype">int</span>     iIndex;
-<a name="l00684"></a>00684 
-<a name="l00685"></a>00685         fail(pOutFile == NULL);
-<a name="l00686"></a>00686         fail(pImg == NULL);
-<a name="l00687"></a>00687         fail(pImg-&gt;iColorsUsed &lt; 2);
-<a name="l00688"></a>00688         fail(pImg-&gt;iColorsUsed &gt; 256);
-<a name="l00689"></a>00689 
-<a name="l00690"></a>00690         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace [ /Indexed\n&quot;</span>);
-<a name="l00691"></a>00691         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/Device%s %d\n&quot;</span>,
-<a name="l00692"></a>00692                 pImg-&gt;bColorImage ? <span class="stringliteral">&quot;RGB&quot;</span> : <span class="stringliteral">&quot;Gray&quot;</span>, pImg-&gt;iColorsUsed - 1);
-<a name="l00693"></a>00693         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&quot;</span>);
-<a name="l00694"></a>00694         <span class="keywordflow">for</span> (iIndex = 0; iIndex &lt; pImg-&gt;iColorsUsed; iIndex++) {
-<a name="l00695"></a>00695                 vFPprintf(pOutFile, <span class="stringliteral">&quot;%02x&quot;</span>,
-<a name="l00696"></a>00696                                 (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)pImg-&gt;aucPalette[iIndex][0]);
-<a name="l00697"></a>00697                 <span class="keywordflow">if</span> (pImg-&gt;bColorImage) {
-<a name="l00698"></a>00698                         vFPprintf(pOutFile, <span class="stringliteral">&quot;%02x%02x&quot;</span>,
-<a name="l00699"></a>00699                                 (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)pImg-&gt;aucPalette[iIndex][1],
-<a name="l00700"></a>00700                                 (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)pImg-&gt;aucPalette[iIndex][2]);
-<a name="l00701"></a>00701                 }
-<a name="l00702"></a>00702                 <span class="keywordflow">if</span> (iIndex % 8 == 7) {
-<a name="l00703"></a>00703                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\n&quot;</span>);
-<a name="l00704"></a>00704                 } <span class="keywordflow">else</span> {
-<a name="l00705"></a>00705                         vFPprintf(pOutFile, <span class="stringliteral">&quot; &quot;</span>);
-<a name="l00706"></a>00706                 }
-<a name="l00707"></a>00707         }
-<a name="l00708"></a>00708         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt; ]\n&quot;</span>);
-<a name="l00709"></a>00709 } <span class="comment">/* end of vPrintPalette */</span>
-<a name="l00710"></a>00710 
-<a name="l00711"></a>00711 <span class="comment">/*</span>
-<a name="l00712"></a>00712 <span class="comment"> * vImageProloguePDF - perform the image initialization</span>
-<a name="l00713"></a>00713 <span class="comment"> */</span>
-<a name="l00714"></a>00714 <span class="keywordtype">void</span>
-<a name="l00715"></a>00715 vImageProloguePDF(diagram_type *pDiag, <span class="keyword">const</span> imagedata_type *pImg)
-<a name="l00716"></a>00716 {
-<a name="l00717"></a>00717         FILE    *pOutFile;
-<a name="l00718"></a>00718 
-<a name="l00719"></a>00719         fail(pDiag == NULL);
-<a name="l00720"></a>00720         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00721"></a>00721         fail(pImg == NULL);
-<a name="l00722"></a>00722 
-<a name="l00723"></a>00723         <span class="keywordflow">if</span> (pImg-&gt;iVerSizeScaled &lt;= 0 || pImg-&gt;iHorSizeScaled &lt;= 0) {
-<a name="l00724"></a>00724                 <span class="keywordflow">return</span>;
-<a name="l00725"></a>00725         }
-<a name="l00726"></a>00726 
-<a name="l00727"></a>00727         iImageCount++;
-<a name="l00728"></a>00728 
-<a name="l00729"></a>00729         DBG_DEC_C(pDiag-&gt;lXleft != 0, pDiag-&gt;lXleft);
-<a name="l00730"></a>00730 
-<a name="l00731"></a>00731         pDiag-&gt;lYtop -= lPoints2DrawUnits(pImg-&gt;iVerSizeScaled);
-<a name="l00732"></a>00732         vMoveTo(pDiag, lPoints2DrawUnits(pImg-&gt;iVerSizeScaled));
-<a name="l00733"></a>00733 
-<a name="l00734"></a>00734         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00735"></a>00735 
-<a name="l00736"></a>00736         vFPprintf(pOutFile, <span class="stringliteral">&quot;ET\n&quot;</span>);
-<a name="l00737"></a>00737         vFPprintf(pOutFile, <span class="stringliteral">&quot;q %% Image %03d\n&quot;</span>, iImageCount);
-<a name="l00738"></a>00738         <span class="keywordflow">if</span> (pImg-&gt;eImageType == imagetype_is_dib) {
-<a name="l00739"></a>00739                 <span class="comment">/* Scanning from left to right and bottom to top */</span>
-<a name="l00740"></a>00740                 vFPprintf(pOutFile, <span class="stringliteral">&quot;%d 0 0 %d %.2f %.2f cm\n&quot;</span>,
-<a name="l00741"></a>00741                         pImg-&gt;iHorSizeScaled, -pImg-&gt;iVerSizeScaled,
-<a name="l00742"></a>00742                         dDrawUnits2Points(pDiag-&gt;lXleft + PS_LEFT_MARGIN),
-<a name="l00743"></a>00743                         dDrawUnits2Points(pDiag-&gt;lYtop) + pImg-&gt;iVerSizeScaled);
-<a name="l00744"></a>00744         } <span class="keywordflow">else</span> {
-<a name="l00745"></a>00745                 <span class="comment">/* Scanning from left to right and top to bottom */</span>
-<a name="l00746"></a>00746                 vFPprintf(pOutFile, <span class="stringliteral">&quot;%d 0 0 %d %.2f %.2f cm\n&quot;</span>,
-<a name="l00747"></a>00747                         pImg-&gt;iHorSizeScaled, pImg-&gt;iVerSizeScaled,
-<a name="l00748"></a>00748                         dDrawUnits2Points(pDiag-&gt;lXleft + PS_LEFT_MARGIN),
-<a name="l00749"></a>00749                         dDrawUnits2Points(pDiag-&gt;lYtop));
-<a name="l00750"></a>00750         }
-<a name="l00751"></a>00751         vFPprintf(pOutFile, <span class="stringliteral">&quot;BI\n&quot;</span>);
-<a name="l00752"></a>00752         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/Width %d\n&quot;</span>, pImg-&gt;iWidth);
-<a name="l00753"></a>00753         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/Height %d\n&quot;</span>, pImg-&gt;iHeight);
-<a name="l00754"></a>00754         <span class="keywordflow">switch</span> (pImg-&gt;eImageType) {
-<a name="l00755"></a>00755         <span class="keywordflow">case</span> imagetype_is_jpeg:
-<a name="l00756"></a>00756                 <span class="keywordflow">switch</span> (pImg-&gt;iComponents) {
-<a name="l00757"></a>00757                 <span class="keywordflow">case</span> 1:
-<a name="l00758"></a>00758                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceGray\n&quot;</span>);
-<a name="l00759"></a>00759                         <span class="keywordflow">break</span>;
-<a name="l00760"></a>00760                 <span class="keywordflow">case</span> 3:
-<a name="l00761"></a>00761                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceRGB\n&quot;</span>);
-<a name="l00762"></a>00762                         <span class="keywordflow">break</span>;
-<a name="l00763"></a>00763                 <span class="keywordflow">case</span> 4:
-<a name="l00764"></a>00764                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceCMYK\n&quot;</span>);
-<a name="l00765"></a>00765                         <span class="keywordflow">if</span> (pImg-&gt;bAdobe) {
-<a name="l00766"></a>00766                                 <span class="comment">/*</span>
-<a name="l00767"></a>00767 <span class="comment">                                 * Adobe-conforming CMYK file</span>
-<a name="l00768"></a>00768 <span class="comment">                                 * applying workaround for color inversion</span>
-<a name="l00769"></a>00769 <span class="comment">                                 */</span>
-<a name="l00770"></a>00770                                 vFPprintf(pOutFile,
-<a name="l00771"></a>00771                                         <span class="stringliteral">&quot;\t/Decode [1 0 1 0 1 0 1 0]\n&quot;</span>);
-<a name="l00772"></a>00772                         }
-<a name="l00773"></a>00773                         <span class="keywordflow">break</span>;
-<a name="l00774"></a>00774                 <span class="keywordflow">default</span>:
-<a name="l00775"></a>00775                         DBG_DEC(pImg-&gt;iComponents);
-<a name="l00776"></a>00776                         <span class="keywordflow">break</span>;
-<a name="l00777"></a>00777                 }
-<a name="l00778"></a>00778                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent 8\n&quot;</span>);
-<a name="l00779"></a>00779                 vFPprintf(pOutFile,
-<a name="l00780"></a>00780                         <span class="stringliteral">&quot;\t/Filter [ /ASCII85Decode /DCTDecode ]\n&quot;</span>);
-<a name="l00781"></a>00781                 <span class="keywordflow">break</span>;
-<a name="l00782"></a>00782         <span class="keywordflow">case</span> imagetype_is_png:
-<a name="l00783"></a>00783                 <span class="keywordflow">if</span> (pImg-&gt;iComponents == 3 || pImg-&gt;iComponents == 4) {
-<a name="l00784"></a>00784                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceRGB\n&quot;</span>);
-<a name="l00785"></a>00785                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent 8\n&quot;</span>);
-<a name="l00786"></a>00786                 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pImg-&gt;iColorsUsed &gt; 0) {
-<a name="l00787"></a>00787                         vPrintPalette(pOutFile, pImg);
-<a name="l00788"></a>00788                         fail(pImg-&gt;uiBitsPerComponent &gt; 8);
-<a name="l00789"></a>00789                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent %u\n&quot;</span>,
-<a name="l00790"></a>00790                                         pImg-&gt;uiBitsPerComponent);
-<a name="l00791"></a>00791                 } <span class="keywordflow">else</span> {
-<a name="l00792"></a>00792                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceGray\n&quot;</span>);
-<a name="l00793"></a>00793                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent 8\n&quot;</span>);
-<a name="l00794"></a>00794                 }
-<a name="l00795"></a>00795                 vFPprintf(pOutFile,
-<a name="l00796"></a>00796                         <span class="stringliteral">&quot;\t/Filter [ /ASCII85Decode /FlateDecode ]\n&quot;</span>);
-<a name="l00797"></a>00797                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/DecodeParms [ null &lt;&lt;\n&quot;</span>);
-<a name="l00798"></a>00798                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t\t/Predictor 10\n&quot;</span>);
-<a name="l00799"></a>00799                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t\t/Colors %d\n&quot;</span>, pImg-&gt;iComponents);
-<a name="l00800"></a>00800                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t\t/BitsPerComponent %u\n&quot;</span>,
-<a name="l00801"></a>00801                                                 pImg-&gt;uiBitsPerComponent);
-<a name="l00802"></a>00802                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t\t/Columns %d\n&quot;</span>, pImg-&gt;iWidth);
-<a name="l00803"></a>00803                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t\t&gt;&gt; ]\n&quot;</span>);
-<a name="l00804"></a>00804                 <span class="keywordflow">break</span>;
-<a name="l00805"></a>00805         <span class="keywordflow">case</span> imagetype_is_dib:
-<a name="l00806"></a>00806                 <span class="keywordflow">if</span> (pImg-&gt;uiBitsPerComponent &lt;= 8) {
-<a name="l00807"></a>00807                         vPrintPalette(pOutFile, pImg);
-<a name="l00808"></a>00808                 } <span class="keywordflow">else</span> {
-<a name="l00809"></a>00809                         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /DeviceRGB\n&quot;</span>);
-<a name="l00810"></a>00810                 }
-<a name="l00811"></a>00811                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent 8\n&quot;</span>);
-<a name="l00812"></a>00812                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/Filter /ASCII85Decode\n&quot;</span>);
-<a name="l00813"></a>00813                 <span class="keywordflow">break</span>;
-<a name="l00814"></a>00814         <span class="keywordflow">default</span>:
-<a name="l00815"></a>00815                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/ColorSpace /Device%s\n&quot;</span>,
-<a name="l00816"></a>00816                         pImg-&gt;bColorImage ? <span class="stringliteral">&quot;RGB&quot;</span> : <span class="stringliteral">&quot;Gray&quot;</span>);
-<a name="l00817"></a>00817                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/BitsPerComponent 8\n&quot;</span>);
-<a name="l00818"></a>00818                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/Filter /ASCIIHexDecode\n&quot;</span>);
-<a name="l00819"></a>00819                 <span class="keywordflow">break</span>;
-<a name="l00820"></a>00820         }
-<a name="l00821"></a>00821         vFPprintf(pOutFile, <span class="stringliteral">&quot;ID\n&quot;</span>);
-<a name="l00822"></a>00822 } <span class="comment">/* end of vImageProloguePDF */</span>
-<a name="l00823"></a>00823 
-<a name="l00824"></a>00824 <span class="comment">/*</span>
-<a name="l00825"></a>00825 <span class="comment"> * vImageEpiloguePDF - clean up after the image</span>
-<a name="l00826"></a>00826 <span class="comment"> */</span>
-<a name="l00827"></a>00827 <span class="keywordtype">void</span>
-<a name="l00828"></a>00828 vImageEpiloguePDF(diagram_type *pDiag)
-<a name="l00829"></a>00829 {
-<a name="l00830"></a>00830         FILE    *pOutFile;
-<a name="l00831"></a>00831 
-<a name="l00832"></a>00832         fail(pDiag == NULL);
-<a name="l00833"></a>00833         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00834"></a>00834 
-<a name="l00835"></a>00835         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00836"></a>00836 
-<a name="l00837"></a>00837         <span class="comment">/* Correction for the image bytes */</span>
-<a name="l00838"></a>00838         lFilePosition = ftell(pOutFile);
-<a name="l00839"></a>00839 
-<a name="l00840"></a>00840         vFPprintf(pOutFile, <span class="stringliteral">&quot;EI\n&quot;</span>);
-<a name="l00841"></a>00841         vFPprintf(pOutFile, <span class="stringliteral">&quot;Q\n&quot;</span>);
-<a name="l00842"></a>00842         vFPprintf(pOutFile, <span class="stringliteral">&quot;BT\n&quot;</span>);
-<a name="l00843"></a>00843 
-<a name="l00844"></a>00844         pDiag-&gt;lXleft = 0;
-<a name="l00845"></a>00845 } <span class="comment">/* end of vImageEpiloguePDF */</span>
-<a name="l00846"></a>00846 
-<a name="l00847"></a>00847 <span class="comment">/*</span>
-<a name="l00848"></a>00848 <span class="comment"> * bAddDummyImagePDF - add a dummy image</span>
-<a name="l00849"></a>00849 <span class="comment"> *</span>
-<a name="l00850"></a>00850 <span class="comment"> * return TRUE when successful, otherwise FALSE</span>
-<a name="l00851"></a>00851 <span class="comment"> */</span>
-<a name="l00852"></a>00852 BOOL
-<a name="l00853"></a>00853 bAddDummyImagePDF(diagram_type *pDiag, <span class="keyword">const</span> imagedata_type *pImg)
-<a name="l00854"></a>00854 {
-<a name="l00855"></a>00855         FILE    *pOutFile;
-<a name="l00856"></a>00856 
-<a name="l00857"></a>00857         fail(pDiag == NULL);
-<a name="l00858"></a>00858         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00859"></a>00859         fail(pImg == NULL);
-<a name="l00860"></a>00860 
-<a name="l00861"></a>00861         <span class="keywordflow">if</span> (pImg-&gt;iVerSizeScaled &lt;= 0 || pImg-&gt;iHorSizeScaled &lt;= 0) {
-<a name="l00862"></a>00862                 <span class="keywordflow">return</span> FALSE;
-<a name="l00863"></a>00863         }
-<a name="l00864"></a>00864 
-<a name="l00865"></a>00865         iImageCount++;
-<a name="l00866"></a>00866 
-<a name="l00867"></a>00867         DBG_DEC_C(pDiag-&gt;lXleft != 0, pDiag-&gt;lXleft);
-<a name="l00868"></a>00868 
-<a name="l00869"></a>00869         pDiag-&gt;lYtop -= lPoints2DrawUnits(pImg-&gt;iVerSizeScaled);
-<a name="l00870"></a>00870         vMoveTo(pDiag, lPoints2DrawUnits(pImg-&gt;iVerSizeScaled));
-<a name="l00871"></a>00871 
-<a name="l00872"></a>00872         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00873"></a>00873 
-<a name="l00874"></a>00874         vFPprintf(pOutFile, <span class="stringliteral">&quot;ET\n&quot;</span>);
-<a name="l00875"></a>00875         vFPprintf(pOutFile, <span class="stringliteral">&quot;q %% Image %03d\n&quot;</span>, iImageCount);
-<a name="l00876"></a>00876         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t1.0 w\n&quot;</span>);
-<a name="l00877"></a>00877         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t0.3 G\n&quot;</span>);
-<a name="l00878"></a>00878         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t%.2f %.2f %d %d re\n&quot;</span>,
-<a name="l00879"></a>00879                         dDrawUnits2Points(pDiag-&gt;lXleft + PS_LEFT_MARGIN),
-<a name="l00880"></a>00880                         dDrawUnits2Points(pDiag-&gt;lYtop),
-<a name="l00881"></a>00881                         pImg-&gt;iHorSizeScaled,
-<a name="l00882"></a>00882                         pImg-&gt;iVerSizeScaled);
-<a name="l00883"></a>00883         vFPprintf(pOutFile, <span class="stringliteral">&quot;\tS\n&quot;</span>);
-<a name="l00884"></a>00884         vFPprintf(pOutFile, <span class="stringliteral">&quot;Q\n&quot;</span>);
-<a name="l00885"></a>00885         vFPprintf(pOutFile, <span class="stringliteral">&quot;BT\n&quot;</span>);
-<a name="l00886"></a>00886 
-<a name="l00887"></a>00887         pDiag-&gt;lXleft = 0;
-<a name="l00888"></a>00888 
-<a name="l00889"></a>00889         <span class="keywordflow">return</span> TRUE;
-<a name="l00890"></a>00890 } <span class="comment">/* end of bAddDummyImagePDF */</span>
-<a name="l00891"></a>00891 
-<a name="l00892"></a>00892 <span class="comment">/*</span>
-<a name="l00893"></a>00893 <span class="comment"> * vAddFontsPDF - add the font information</span>
-<a name="l00894"></a>00894 <span class="comment"> */</span>
-<a name="l00895"></a>00895 <span class="keywordtype">void</span>
-<a name="l00896"></a>00896 vAddFontsPDF(diagram_type *pDiag)
-<a name="l00897"></a>00897 {
-<a name="l00898"></a>00898         FILE    *pOutFile;
-<a name="l00899"></a>00899         <span class="keywordtype">size_t</span>  tIndex;
-<a name="l00900"></a>00900 
-<a name="l00901"></a>00901         fail(pDiag == NULL);
-<a name="l00902"></a>00902         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l00903"></a>00903 
-<a name="l00904"></a>00904         pOutFile = pDiag-&gt;pOutFile;
-<a name="l00905"></a>00905 
-<a name="l00906"></a>00906         <span class="comment">/* The font encoding */</span>
-<a name="l00907"></a>00907         vSetLocation(4);
-<a name="l00908"></a>00908         vFPprintf(pOutFile, <span class="stringliteral">&quot;4 0 obj\n&quot;</span>);
-<a name="l00909"></a>00909         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00910"></a>00910         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Type /Encoding\n&quot;</span>);
-<a name="l00911"></a>00911         vFPprintf(pOutFile, <span class="stringliteral">&quot;/BaseEncoding /StandardEncoding\n&quot;</span>);
-<a name="l00912"></a>00912         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Differences [\n&quot;</span>);
-<a name="l00913"></a>00913         <span class="keywordflow">switch</span> (eEncoding) {
-<a name="l00914"></a>00914         <span class="keywordflow">case</span> encoding_latin_1:
-<a name="l00915"></a>00915                 <span class="keywordflow">for</span> (tIndex = 0;
-<a name="l00916"></a>00916                      tIndex &lt; elementsof(iso_8859_1);
-<a name="l00917"></a>00917                      tIndex++) {
-<a name="l00918"></a>00918                         vFPprintf(pOutFile, <span class="stringliteral">&quot;%s\n&quot;</span>, iso_8859_1[tIndex]);
-<a name="l00919"></a>00919                 }
-<a name="l00920"></a>00920                 <span class="keywordflow">break</span>;
-<a name="l00921"></a>00921         <span class="keywordflow">case</span> encoding_latin_2:
-<a name="l00922"></a>00922                 <span class="keywordflow">for</span> (tIndex = 0;
-<a name="l00923"></a>00923                      tIndex &lt; elementsof(iso_8859_2);
-<a name="l00924"></a>00924                      tIndex++) {
-<a name="l00925"></a>00925                         vFPprintf(pOutFile, <span class="stringliteral">&quot;%s\n&quot;</span>, iso_8859_2[tIndex]);
-<a name="l00926"></a>00926                 }
-<a name="l00927"></a>00927                 <span class="keywordflow">break</span>;
-<a name="l00928"></a>00928         <span class="keywordflow">case</span> encoding_cyrillic:
-<a name="l00929"></a>00929                 werr(1,
-<a name="l00930"></a>00930                 <span class="stringliteral">&quot;The combination PDF and Cyrillic is not supported&quot;</span>);
-<a name="l00931"></a>00931                 <span class="keywordflow">break</span>;
-<a name="l00932"></a>00932         <span class="keywordflow">case</span> encoding_utf_8:
-<a name="l00933"></a>00933                 werr(1,
-<a name="l00934"></a>00934                 <span class="stringliteral">&quot;The combination PDF and UTF-8 is not supported&quot;</span>);
-<a name="l00935"></a>00935                 <span class="keywordflow">break</span>;
-<a name="l00936"></a>00936         <span class="keywordflow">default</span>:
-<a name="l00937"></a>00937                 DBG_DEC(eEncoding);
-<a name="l00938"></a>00938                 <span class="keywordflow">break</span>;
-<a name="l00939"></a>00939         }
-<a name="l00940"></a>00940         vFPprintf(pOutFile, <span class="stringliteral">&quot;]\n&quot;</span>);
-<a name="l00941"></a>00941         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00942"></a>00942         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00943"></a>00943 
-<a name="l00944"></a>00944         <span class="comment">/* Twelve of the standard type 1 fonts */</span>
-<a name="l00945"></a>00945         <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; 12; tIndex++) {
-<a name="l00946"></a>00946                 vSetLocation(5 + tIndex);
-<a name="l00947"></a>00947                 vFPprintf(pOutFile, <span class="stringliteral">&quot;%u 0 obj\n&quot;</span>, 5 + tIndex);
-<a name="l00948"></a>00948                 vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00949"></a>00949                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Type /Font\n&quot;</span>);
-<a name="l00950"></a>00950                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Subtype /Type1\n&quot;</span>);
-<a name="l00951"></a>00951                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Name /F%u\n&quot;</span>, 1 + tIndex);
-<a name="l00952"></a>00952                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/BaseFont /%s\n&quot;</span>,
-<a name="l00953"></a>00953                                                 atFontname[tIndex].szPDFname);
-<a name="l00954"></a>00954                 vFPprintf(pOutFile, <span class="stringliteral">&quot;/Encoding 4 0 R\n&quot;</span>);
-<a name="l00955"></a>00955                 vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00956"></a>00956                 vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00957"></a>00957         }
-<a name="l00958"></a>00958 
-<a name="l00959"></a>00959         <span class="comment">/* The Resources */</span>
-<a name="l00960"></a>00960         vSetLocation(17);
-<a name="l00961"></a>00961         vFPprintf(pOutFile, <span class="stringliteral">&quot;17 0 obj\n&quot;</span>);
-<a name="l00962"></a>00962         vFPprintf(pOutFile, <span class="stringliteral">&quot;&lt;&lt;\n&quot;</span>);
-<a name="l00963"></a>00963         vFPprintf(pOutFile, <span class="stringliteral">&quot;/ProcSet [ /PDF /Text ]\n&quot;</span>);
-<a name="l00964"></a>00964         vFPprintf(pOutFile, <span class="stringliteral">&quot;/Font &lt;&lt;\n&quot;</span>);
-<a name="l00965"></a>00965         <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; 12; tIndex++) {
-<a name="l00966"></a>00966                 vFPprintf(pOutFile, <span class="stringliteral">&quot;\t/F%u %u 0 R\n&quot;</span>, 1 + tIndex, 5 + tIndex);
-<a name="l00967"></a>00967         }
-<a name="l00968"></a>00968         vFPprintf(pOutFile, <span class="stringliteral">&quot;\t&gt;&gt;\n&quot;</span>);
-<a name="l00969"></a>00969         vFPprintf(pOutFile, <span class="stringliteral">&quot;&gt;&gt;\n&quot;</span>);
-<a name="l00970"></a>00970         vFPprintf(pOutFile, <span class="stringliteral">&quot;endobj\n&quot;</span>);
-<a name="l00971"></a>00971         vAddHeader(pDiag);
-<a name="l00972"></a>00972 } <span class="comment">/* end of vAddFontsPDF */</span>
-<a name="l00973"></a>00973 
-<a name="l00974"></a>00974 <span class="comment">/*</span>
-<a name="l00975"></a>00975 <span class="comment"> * vPrintPDF - print a PDF string</span>
-<a name="l00976"></a>00976 <span class="comment"> */</span>
-<a name="l00977"></a>00977 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00978"></a>00978 vPrintPDF(FILE *pFile, <span class="keyword">const</span> <span class="keywordtype">char</span> *szString, <span class="keywordtype">size_t</span> tStringLength,
-<a name="l00979"></a>00979         USHORT usFontstyle)
-<a name="l00980"></a>00980 {
-<a name="l00981"></a>00981         <span class="keyword">const</span> UCHAR     *aucBytes;
-<a name="l00982"></a>00982         <span class="keywordtype">double</span>  dMove;
-<a name="l00983"></a>00983         <span class="keywordtype">size_t</span>  tCount;
-<a name="l00984"></a>00984 
-<a name="l00985"></a>00985         fail(szString == NULL);
-<a name="l00986"></a>00986 
-<a name="l00987"></a>00987         <span class="keywordflow">if</span> (szString == NULL || szString[0] == <span class="charliteral">&#39;\0&#39;</span> || tStringLength == 0) {
-<a name="l00988"></a>00988                 <span class="keywordflow">return</span>;
-<a name="l00989"></a>00989         }
-<a name="l00990"></a>00990         DBG_DEC_C(usFontSizeCurr &lt; MIN_FONT_SIZE, usFontSizeCurr);
-<a name="l00991"></a>00991 
-<a name="l00992"></a>00992         dMove = 0.0;
-<a name="l00993"></a>00993 
-<a name="l00994"></a>00994         <span class="comment">/* Up for superscript */</span>
-<a name="l00995"></a>00995         <span class="keywordflow">if</span> (bIsSuperscript(usFontstyle) &amp;&amp; usFontSizeCurr != 0) {
-<a name="l00996"></a>00996                 dMove = (double)((usFontSizeCurr + 1) / 2) * 0.375;
-<a name="l00997"></a>00997                 vFPprintf(pFile, <span class="stringliteral">&quot;%.2f Ts\n&quot;</span>, dMove);
-<a name="l00998"></a>00998         }
-<a name="l00999"></a>00999 
-<a name="l01000"></a>01000         <span class="comment">/* Down for subscript */</span>
-<a name="l01001"></a>01001         <span class="keywordflow">if</span> (bIsSubscript(usFontstyle) &amp;&amp; usFontSizeCurr != 0) {
-<a name="l01002"></a>01002                 dMove = (double)usFontSizeCurr * 0.125;
-<a name="l01003"></a>01003                 vFPprintf(pFile, <span class="stringliteral">&quot;%.2f Ts\n&quot;</span>, -dMove);
-<a name="l01004"></a>01004         }
-<a name="l01005"></a>01005 
-<a name="l01006"></a>01006         <span class="comment">/* Generate and print the PDF output */</span>
-<a name="l01007"></a>01007         aucBytes = (UCHAR *)szString;
-<a name="l01008"></a>01008         vFPprintf(pFile, <span class="stringliteral">&quot;(&quot;</span>);
-<a name="l01009"></a>01009         <span class="keywordflow">for</span> (tCount = 0; tCount &lt; tStringLength ; tCount++) {
-<a name="l01010"></a>01010                 <span class="keywordflow">switch</span> (aucBytes[tCount]) {
-<a name="l01011"></a>01011                 <span class="keywordflow">case</span> <span class="charliteral">&#39;(&#39;</span>:
-<a name="l01012"></a>01012                 <span class="keywordflow">case</span> <span class="charliteral">&#39;)&#39;</span>:
-<a name="l01013"></a>01013                 <span class="keywordflow">case</span> <span class="charliteral">&#39;\\&#39;</span>:
-<a name="l01014"></a>01014                         vFPprintf(pFile, <span class="stringliteral">&quot;\\%c&quot;</span>, szString[tCount]);
-<a name="l01015"></a>01015                         <span class="keywordflow">break</span>;
-<a name="l01016"></a>01016                 <span class="keywordflow">default</span>:
-<a name="l01017"></a>01017                         <span class="keywordflow">if</span> (aucBytes[tCount] &lt; 0x20 ||
-<a name="l01018"></a>01018                             aucBytes[tCount] == 0x7f ||
-<a name="l01019"></a>01019                             (aucBytes[tCount] &gt;= 0x81 &amp;&amp;
-<a name="l01020"></a>01020                              aucBytes[tCount] &lt; 0x8c)) {
-<a name="l01021"></a>01021                                 DBG_HEX(aucBytes[tCount]);
-<a name="l01022"></a>01022                                 vFPprintf(pFile, <span class="stringliteral">&quot; &quot;</span>);
-<a name="l01023"></a>01023                         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (aucBytes[tCount] &gt;= 0x80) {
-<a name="l01024"></a>01024                                 vFPprintf(pFile, <span class="stringliteral">&quot;\\%03o&quot;</span>,
-<a name="l01025"></a>01025                                                 (UINT)aucBytes[tCount]);
-<a name="l01026"></a>01026                         } <span class="keywordflow">else</span> {
-<a name="l01027"></a>01027                                 vFPprintf(pFile, <span class="stringliteral">&quot;%c&quot;</span>, szString[tCount]);
-<a name="l01028"></a>01028                         }
-<a name="l01029"></a>01029                         <span class="keywordflow">break</span>;
-<a name="l01030"></a>01030                 }
-<a name="l01031"></a>01031         }
-<a name="l01032"></a>01032         vFPprintf(pFile, <span class="stringliteral">&quot;) Tj\n&quot;</span>);
-<a name="l01033"></a>01033 
-<a name="l01034"></a>01034         <span class="comment">/* Undo the superscript/subscript move */</span>
-<a name="l01035"></a>01035         <span class="keywordflow">if</span> (dMove != 0.0) {
-<a name="l01036"></a>01036                 vFPprintf(pFile, <span class="stringliteral">&quot;0 Ts\n&quot;</span>);
-<a name="l01037"></a>01037         }
-<a name="l01038"></a>01038 } <span class="comment">/* end of vPrintPDF */</span>
-<a name="l01039"></a>01039 
-<a name="l01040"></a>01040 <span class="comment">/*</span>
-<a name="l01041"></a>01041 <span class="comment"> * vSetColor - move to the specified color</span>
-<a name="l01042"></a>01042 <span class="comment"> */</span>
-<a name="l01043"></a>01043 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l01044"></a>01044 vSetColor(FILE *pFile, UCHAR ucFontColor)
-<a name="l01045"></a>01045 {
-<a name="l01046"></a>01046         ULONG   ulTmp, ulRed, ulGreen, ulBlue;
-<a name="l01047"></a>01047 
-<a name="l01048"></a>01048         ulTmp = ulColor2Color(ucFontColor);
-<a name="l01049"></a>01049         ulRed   = (ulTmp &amp; 0x0000ff00) &gt;&gt; 8;
-<a name="l01050"></a>01050         ulGreen = (ulTmp &amp; 0x00ff0000) &gt;&gt; 16;
-<a name="l01051"></a>01051         ulBlue  = (ulTmp &amp; 0xff000000) &gt;&gt; 24;
-<a name="l01052"></a>01052         vFPprintf(pFile, <span class="stringliteral">&quot;%.3f %.3f %.3f rg\n&quot;</span>,
-<a name="l01053"></a>01053                         ulRed / 255.0, ulGreen / 255.0, ulBlue / 255.0);
-<a name="l01054"></a>01054 } <span class="comment">/* end of vSetColor */</span>
-<a name="l01055"></a>01055 
-<a name="l01056"></a>01056 <span class="comment">/*</span>
-<a name="l01057"></a>01057 <span class="comment"> * vMove2NextLinePDF - move to the next line</span>
-<a name="l01058"></a>01058 <span class="comment"> */</span>
-<a name="l01059"></a>01059 <span class="keywordtype">void</span>
-<a name="l01060"></a>01060 vMove2NextLinePDF(diagram_type *pDiag, USHORT usFontSize)
-<a name="l01061"></a>01061 {
-<a name="l01062"></a>01062         fail(pDiag == NULL);
-<a name="l01063"></a>01063         fail(usFontSize &lt; MIN_FONT_SIZE || usFontSize &gt; MAX_FONT_SIZE);
-<a name="l01064"></a>01064 
-<a name="l01065"></a>01065         pDiag-&gt;lYtop -= lComputeLeading(usFontSize);
-<a name="l01066"></a>01066 } <span class="comment">/* end of vMove2NextLinePDF */</span>
-<a name="l01067"></a>01067 
-<a name="l01068"></a>01068 <span class="comment">/*</span>
-<a name="l01069"></a>01069 <span class="comment"> * vSubstringPDF - print a sub string</span>
-<a name="l01070"></a>01070 <span class="comment"> */</span>
-<a name="l01071"></a>01071 <span class="keywordtype">void</span>
-<a name="l01072"></a>01072 vSubstringPDF(diagram_type *pDiag,
-<a name="l01073"></a>01073         <span class="keywordtype">char</span> *szString, <span class="keywordtype">size_t</span> tStringLength, <span class="keywordtype">long</span> lStringWidth,
-<a name="l01074"></a>01074         UCHAR ucFontColor, USHORT usFontstyle, drawfile_fontref tFontRef,
-<a name="l01075"></a>01075         USHORT usFontSize, USHORT usMaxFontSize)
-<a name="l01076"></a>01076 {
-<a name="l01077"></a>01077         <span class="keywordtype">size_t</span>  tFontIndex;
-<a name="l01078"></a>01078 
-<a name="l01079"></a>01079         fail(pDiag == NULL || szString == NULL);
-<a name="l01080"></a>01080         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l01081"></a>01081         fail(pDiag-&gt;lXleft &lt; 0);
-<a name="l01082"></a>01082         fail(tStringLength != strlen(szString));
-<a name="l01083"></a>01083         fail(usFontSize &lt; MIN_FONT_SIZE || usFontSize &gt; MAX_FONT_SIZE);
-<a name="l01084"></a>01084         fail(usMaxFontSize &lt; MIN_FONT_SIZE || usMaxFontSize &gt; MAX_FONT_SIZE);
-<a name="l01085"></a>01085         fail(usFontSize &gt; usMaxFontSize);
-<a name="l01086"></a>01086 
-<a name="l01087"></a>01087         <span class="keywordflow">if</span> (szString[0] == <span class="charliteral">&#39;\0&#39;</span> || tStringLength == 0) {
-<a name="l01088"></a>01088                 <span class="keywordflow">return</span>;
-<a name="l01089"></a>01089         }
-<a name="l01090"></a>01090 
-<a name="l01091"></a>01091         vMoveTo(pDiag, lComputeLeading(usMaxFontSize));
-<a name="l01092"></a>01092         <span class="keywordflow">if</span> (tFontRef != tFontRefCurr || usFontSize != usFontSizeCurr) {
-<a name="l01093"></a>01093                 tFontIndex = tGetFontIndex(tFontRef);
-<a name="l01094"></a>01094                 vFPprintf(pDiag-&gt;pOutFile, <span class="stringliteral">&quot;/F%u %.1f Tf\n&quot;</span>,
-<a name="l01095"></a>01095                          1 + tFontIndex, (<span class="keywordtype">double</span>)usFontSize / 2.0);
-<a name="l01096"></a>01096                 tFontRefCurr = tFontRef;
-<a name="l01097"></a>01097                 usFontSizeCurr = usFontSize;
-<a name="l01098"></a>01098         }
-<a name="l01099"></a>01099         <span class="keywordflow">if</span> ((<span class="keywordtype">int</span>)ucFontColor != iFontColorCurr) {
-<a name="l01100"></a>01100                 vSetColor(pDiag-&gt;pOutFile, ucFontColor);
-<a name="l01101"></a>01101                 iFontColorCurr = (int)ucFontColor;
-<a name="l01102"></a>01102         }
-<a name="l01103"></a>01103         vPrintPDF(pDiag-&gt;pOutFile, szString, tStringLength, usFontstyle);
-<a name="l01104"></a>01104         pDiag-&gt;lXleft += lStringWidth;
-<a name="l01105"></a>01105 } <span class="comment">/* end of vSubstringPDF */</span>
-<a name="l01106"></a>01106 
-<a name="l01107"></a>01107 <span class="comment">/*</span>
-<a name="l01108"></a>01108 <span class="comment"> * Create an start of paragraph by moving the y-top mark</span>
-<a name="l01109"></a>01109 <span class="comment"> */</span>
-<a name="l01110"></a>01110 <span class="keywordtype">void</span>
-<a name="l01111"></a>01111 vStartOfParagraphPDF(diagram_type *pDiag, <span class="keywordtype">long</span> lBeforeIndentation)
-<a name="l01112"></a>01112 {
-<a name="l01113"></a>01113         fail(pDiag == NULL);
-<a name="l01114"></a>01114         fail(lBeforeIndentation &lt; 0);
-<a name="l01115"></a>01115 
-<a name="l01116"></a>01116         pDiag-&gt;lXleft = 0;
-<a name="l01117"></a>01117         pDiag-&gt;lYtop -= lMilliPoints2DrawUnits(lBeforeIndentation);
-<a name="l01118"></a>01118 } <span class="comment">/* end of vStartOfParagraphPDF */</span>
-<a name="l01119"></a>01119 
-<a name="l01120"></a>01120 <span class="comment">/*</span>
-<a name="l01121"></a>01121 <span class="comment"> * Create an end of paragraph by moving the y-top mark</span>
-<a name="l01122"></a>01122 <span class="comment"> */</span>
-<a name="l01123"></a>01123 <span class="keywordtype">void</span>
-<a name="l01124"></a>01124 vEndOfParagraphPDF(diagram_type *pDiag,
-<a name="l01125"></a>01125         USHORT usFontSize, <span class="keywordtype">long</span> lAfterIndentation)
-<a name="l01126"></a>01126 {
-<a name="l01127"></a>01127         fail(pDiag == NULL);
-<a name="l01128"></a>01128         fail(pDiag-&gt;pOutFile == NULL);
-<a name="l01129"></a>01129         fail(usFontSize &lt; MIN_FONT_SIZE || usFontSize &gt; MAX_FONT_SIZE);
-<a name="l01130"></a>01130         fail(lAfterIndentation &lt; 0);
-<a name="l01131"></a>01131 
-<a name="l01132"></a>01132         <span class="keywordflow">if</span> (pDiag-&gt;lXleft &gt; 0) {
-<a name="l01133"></a>01133                 <span class="comment">/* To the start of the line */</span>
-<a name="l01134"></a>01134                 vMove2NextLinePDF(pDiag, usFontSize);
-<a name="l01135"></a>01135         }
-<a name="l01136"></a>01136 
-<a name="l01137"></a>01137         pDiag-&gt;lXleft = 0;
-<a name="l01138"></a>01138         pDiag-&gt;lYtop -= lMilliPoints2DrawUnits(lAfterIndentation);
-<a name="l01139"></a>01139 } <span class="comment">/* end of vEndOfParagraphPDF */</span>
-<a name="l01140"></a>01140 
-<a name="l01141"></a>01141 <span class="comment">/*</span>
-<a name="l01142"></a>01142 <span class="comment"> * Create an end of page</span>
-<a name="l01143"></a>01143 <span class="comment"> */</span>
-<a name="l01144"></a>01144 <span class="keywordtype">void</span>
-<a name="l01145"></a>01145 vEndOfPagePDF(diagram_type *pDiag, BOOL bNewSection)
-<a name="l01146"></a>01146 {
-<a name="l01147"></a>01147         vMove2NextPage(pDiag, bNewSection);
-<a name="l01148"></a>01148 } <span class="comment">/* end of vEndOfPagePDF */</span>
-</pre></div></div>
-<hr size="1"/><address style="text-align: right;"><small>Generated by&nbsp;
-<a href="http://www.doxygen.org/index.html">
-<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.2 </small></address>
-</body>
-</html>