00001
-00002
-00003
-00004
-00005
-00006
-00007
-00008
-00009
-00010
-00011
-00012
-00013
-00014
-00015
-00016 #include <stdlib.h>
-00017 #include <errno.h>
-00018 #include <time.h>
-00019 #include <string.h>
-00020 #include "version.h"
-00021 #include "antiword.h"
-00022
-00023
-00024 static encoding_type eEncoding = encoding_neutral;
-00025
-00026 static image_level_enum eImageLevel = level_default;
-00027
-00028 static BOOL bUseLandscape = FALSE;
-00029
-00030 static long lPageHeight = LONG_MAX;
-00031 static long lPageWidth = LONG_MAX;
-00032
-00033 static long lFooterHeight = 0;
-00034
-00035 static BOOL bInFtrSpace = FALSE;
-00036
-00037 static const char *szCreationDate = NULL;
-00038
-00039 static const char *szCreator = NULL;
-00040
-00041 static drawfile_fontref tFontRefCurr = (drawfile_fontref)-1;
-00042 static USHORT usFontSizeCurr = 0;
-00043 static int iFontColorCurr = -1;
-00044
-00045 static long lYtopCurr = -1;
-00046
-00047 static int iPageCount = 0;
-00048
-00049 static int iImageCount = 0;
-00050
-00051 static int iSectionIndex = 0;
-00052
-00053 static BOOL bFirstInSection = TRUE;
-00054
-00055 static void vMoveTo(diagram_type *, long);
-00056
-00057 static const char *iso_8859_1_data[] = {
-00058 "/newcodes % ISO-8859-1 character encodings",
-00059 "[",
-00060 "140/ellipsis 141/trademark 142/perthousand 143/bullet",
-00061 "144/quoteleft 145/quoteright 146/guilsinglleft 147/guilsinglright",
-00062 "148/quotedblleft 149/quotedblright 150/quotedblbase 151/endash 152/emdash",
-00063 "153/minus 154/OE 155/oe 156/dagger 157/daggerdbl 158/fi 159/fl",
-00064 "160/space 161/exclamdown 162/cent 163/sterling 164/currency",
-00065 "165/yen 166/brokenbar 167/section 168/dieresis 169/copyright",
-00066 "170/ordfeminine 171/guillemotleft 172/logicalnot 173/hyphen 174/registered",
-00067 "175/macron 176/degree 177/plusminus 178/twosuperior 179/threesuperior",
-00068 "180/acute 181/mu 182/paragraph 183/periodcentered 184/cedilla",
-00069 "185/onesuperior 186/ordmasculine 187/guillemotright 188/onequarter",
-00070 "189/onehalf 190/threequarters 191/questiondown 192/Agrave 193/Aacute",
-00071 "194/Acircumflex 195/Atilde 196/Adieresis 197/Aring 198/AE 199/Ccedilla",
-00072 "200/Egrave 201/Eacute 202/Ecircumflex 203/Edieresis 204/Igrave 205/Iacute",
-00073 "206/Icircumflex 207/Idieresis 208/Eth 209/Ntilde 210/Ograve 211/Oacute",
-00074 "212/Ocircumflex 213/Otilde 214/Odieresis 215/multiply 216/Oslash",
-00075 "217/Ugrave 218/Uacute 219/Ucircumflex 220/Udieresis 221/Yacute 222/Thorn",
-00076 "223/germandbls 224/agrave 225/aacute 226/acircumflex 227/atilde",
-00077 "228/adieresis 229/aring 230/ae 231/ccedilla 232/egrave 233/eacute",
-00078 "234/ecircumflex 235/edieresis 236/igrave 237/iacute 238/icircumflex",
-00079 "239/idieresis 240/eth 241/ntilde 242/ograve 243/oacute 244/ocircumflex",
-00080 "245/otilde 246/odieresis 247/divide 248/oslash 249/ugrave 250/uacute",
-00081 "251/ucircumflex 252/udieresis 253/yacute 254/thorn 255/ydieresis",
-00082 "] bind def",
-00083 "",
-00084 "/reencdict 12 dict def",
-00085 "",
-00086 };
-00087
-00088 static const char *iso_8859_2_data[] = {
-00089 "/newcodes % ISO-8859-2 character encodings",
-00090 "[",
-00091 "160/space 161/Aogonek 162/breve 163/Lslash 164/currency 165/Lcaron",
-00092 "166/Sacute 167/section 168/dieresis 169/Scaron 170/Scommaaccent",
-00093 "171/Tcaron 172/Zacute 173/hyphen 174/Zcaron 175/Zdotaccent 176/degree",
-00094 "177/aogonek 178/ogonek 179/lslash 180/acute 181/lcaron 182/sacute",
-00095 "183/caron 184/cedilla 185/scaron 186/scommaaccent 187/tcaron",
-00096 "188/zacute 189/hungarumlaut 190/zcaron 191/zdotaccent 192/Racute",
-00097 "193/Aacute 194/Acircumflex 195/Abreve 196/Adieresis 197/Lacute",
-00098 "198/Cacute 199/Ccedilla 200/Ccaron 201/Eacute 202/Eogonek",
-00099 "203/Edieresis 204/Ecaron 205/Iacute 206/Icircumflex 207/Dcaron",
-00100 "208/Dcroat 209/Nacute 210/Ncaron 211/Oacute 212/Ocircumflex",
-00101 "213/Ohungarumlaut 214/Odieresis 215/multiply 216/Rcaron 217/Uring",
-00102 "218/Uacute 219/Uhungarumlaut 220/Udieresis 221/Yacute 222/Tcommaaccent",
-00103 "223/germandbls 224/racute 225/aacute 226/acircumflex 227/abreve",
-00104 "228/adieresis 229/lacute 230/cacute 231/ccedilla 232/ccaron 233/eacute",
-00105 "234/eogonek 235/edieresis 236/ecaron 237/iacute 238/icircumflex",
-00106 "239/dcaron 240/dcroat 241/nacute 242/ncaron 243/oacute 244/ocircumflex",
-00107 "245/ohungarumlaut 246/odieresis 247/divide 248/rcaron 249/uring",
-00108 "250/uacute 251/uhungarumlaut 252/udieresis 253/yacute 254/tcommaaccent",
-00109 "255/dotaccent",
-00110 "] bind def",
-00111 "",
-00112 "/reencdict 12 dict def",
-00113 "",
-00114 };
-00115
-00116 static const char *iso_8859_5_data[] = {
-00117 "/newcodes % ISO-8859-5 character encodings",
-00118 "[",
-00119 "160/space 161/afii10023 162/afii10051 163/afii10052 164/afii10053",
-00120 "165/afii10054 166/afii10055 167/afii10056 168/afii10057 169/afii10058",
-00121 "170/afii10059 171/afii10060 172/afii10061 173/hyphen 174/afii10062",
-00122 "175/afii10145 176/afii10017 177/afii10018 178/afii10019 179/afii10020",
-00123 "180/afii10021 181/afii10022 182/afii10024 183/afii10025 184/afii10026",
-00124 "185/afii10027 186/afii10028 187/afii10029 188/afii10030 189/afii10031",
-00125 "190/afii10032 191/afii10033 192/afii10034 193/afii10035 194/afii10036",
-00126 "195/afii10037 196/afii10038 197/afii10039 198/afii10040 199/afii10041",
-00127 "200/afii10042 201/afii10043 202/afii10044 203/afii10045 204/afii10046",
-00128 "205/afii10047 206/afii10048 207/afii10049 208/afii10065 209/afii10066",
-00129 "210/afii10067 211/afii10068 212/afii10069 213/afii10070 214/afii10072",
-00130 "215/afii10073 216/afii10074 217/afii10075 218/afii10076 219/afii10077",
-00131 "220/afii10078 221/afii10079 222/afii10080 223/afii10081 224/afii10082",
-00132 "225/afii10083 226/afii10084 227/afii10085 228/afii10086 229/afii10087",
-00133 "230/afii10088 231/afii10089 232/afii10090 233/afii10091 234/afii10092",
-00134 "235/afii10093 236/afii10094 237/afii10095 238/afii10096 239/afii10097",
-00135 "240/afii61352 241/afii10071 242/afii10099 243/afii10100 244/afii10101",
-00136 "245/afii10102 246/afii10103 247/afii10104 248/afii10105 249/afii10106",
-00137 "250/afii10107 251/afii10108 252/afii10109 253/section 254/afii10110",
-00138 "255/afii10193",
-00139 "] bind def",
-00140 "",
-00141 "/reencdict 12 dict def",
-00142 "",
-00143 };
-00144
-00145 static const char *iso_8859_x_func[] = {
-00146 "% change fonts using ISO-8859-x characters",
-00147 "/ChgFnt % size psname natname => font",
-00148 "{",
-00149 " dup FontDirectory exch known % is re-encoded name known?",
-00150 " { exch pop } % yes, get rid of long name",
-00151 " { dup 3 1 roll ReEncode } ifelse % no, re-encode it",
-00152 " findfont exch scalefont setfont",
-00153 "} bind def",
-00154 "",
-00155 "/ReEncode",
-00156 "{",
-00157 "reencdict begin",
-00158 " /newname exch def",
-00159 " /basename exch def",
-00160 " /basedict basename findfont def",
-00161 " /newfont basedict maxlength dict def",
-00162 " basedict",
-00163 " { exch dup /FID ne",
-00164 " { dup /Encoding eq",
-00165 " { exch dup length array copy newfont 3 1 roll put }",
-00166 " { exch newfont 3 1 roll put } ifelse",
-00167 " }",
-00168 " { pop pop } ifelse",
-00169 " } forall",
-00170 " newfont /FontName newname put",
-00171 " newcodes aload pop newcodes length 2 idiv",
-00172 " { newfont /Encoding get 3 1 roll put } repeat",
-00173 " newname newfont definefont pop",
-00174 "end",
-00175 "} bind def",
-00176 "",
-00177 };
-00178
-00179 static const char *misc_func[] = {
-00180 "% draw a line and show the string",
-00181 "/LineShow % string linewidth movement",
-00182 "{",
-00183 " gsave",
-00184 " 0 exch rmoveto",
-00185 " setlinewidth",
-00186 " dup",
-00187 " stringwidth pop",
-00188 " 0 rlineto stroke",
-00189 " grestore",
-00190 " show",
-00191 "} bind def",
-00192 "",
-00193 "% begin an EPS file (level 2 and up)",
-00194 "/BeginEPSF",
-00195 "{",
-00196 " /b4_Inc_state save def",
-00197 " /dict_count countdictstack def",
-00198 " /op_count count 1 sub def",
-00199 " userdict begin",
-00200 " /showpage { } def",
-00201 " 0 setgray 0 setlinecap",
-00202 " 1 setlinewidth 0 setlinejoin",
-00203 " 10 setmiterlimit [ ] 0 setdash newpath",
-00204 " false setstrokeadjust false setoverprint",
-00205 "} bind def",
-00206 "",
-00207 "% end an EPS file",
-00208 "/EndEPSF {",
-00209 " count op_count sub { pop } repeat",
-00210 " countdictstack dict_count sub { end } repeat",
-00211 " b4_Inc_state restore",
-00212 "} bind def",
-00213 "",
-00214 };
-00215
-00216
-00217
-00218
-00219
-00220 static void
-00221 vAddPageSetup(FILE *pOutFile)
-00222 {
-00223 if (bUseLandscape) {
-00224 fprintf(pOutFile, "%%%%BeginPageSetup\n");
-00225 fprintf(pOutFile, "90 rotate\n");
-00226 fprintf(pOutFile, "0.00 %.2f translate\n",
-00227 -dDrawUnits2Points(lPageHeight));
-00228 fprintf(pOutFile, "%%%%EndPageSetup\n");
-00229 }
-00230 }
-00231
-00232
-00233
-00234
-00235 static void
-00236 vAddHdrFtr(diagram_type *pDiag, const hdrftr_block_type *pHdrFtrInfo)
-00237 {
-00238 output_type *pStart, *pPrev, *pNext;
-00239
-00240 fail(pDiag == NULL);
-00241 fail(pHdrFtrInfo == NULL);
-00242
-00243 vStartOfParagraphPS(pDiag, 0);
-00244 pStart = pHdrFtrInfo->pText;
-00245 while (pStart != NULL) {
-00246 pNext = pStart;
-00247 while (pNext != NULL &&
-00248 (pNext->tNextFree != 1 ||
-00249 (pNext->szStorage[0] != PAR_END &&
-00250 pNext->szStorage[0] != HARD_RETURN))) {
-00251 pNext = pNext->pNext;
-00252 }
-00253 if (pNext == NULL) {
-00254 if (bOutputContainsText(pStart)) {
-00255 vAlign2Window(pDiag, pStart,
-00256 lChar2MilliPoints(DEFAULT_SCREEN_WIDTH),
-00257 ALIGNMENT_LEFT);
-00258 } else {
-00259 vMove2NextLinePS(pDiag, pStart->usFontSize);
-00260 }
-00261 break;
-00262 }
-00263 fail(pNext->tNextFree != 1);
-00264 fail(pNext->szStorage[0] != PAR_END &&
-00265 pNext->szStorage[0] != HARD_RETURN);
-00266
-00267 if (pStart != pNext) {
-00268
-00269 pPrev = pNext->pPrev;
-00270 fail(pPrev->pNext != pNext);
-00271
-00272 pPrev->pNext = NULL;
-00273 if (bOutputContainsText(pStart)) {
-00274
-00275 vAlign2Window(pDiag, pStart,
-00276 lChar2MilliPoints(DEFAULT_SCREEN_WIDTH),
-00277 ALIGNMENT_LEFT);
-00278 } else {
-00279
-00280 vMove2NextLinePS(pDiag, pStart->usFontSize);
-00281 }
-00282
-00283 pPrev->pNext = pNext;
-00284 }
-00285 if (pNext->szStorage[0] == PAR_END) {
-00286 vEndOfParagraphPS(pDiag, pNext->usFontSize,
-00287 (long)pNext->usFontSize * 200);
-00288 }
-00289 pStart = pNext->pNext;
-00290 }
-00291 }
-00292
-00293
-00294
-00295
-00296 static void
-00297 vAddHeader(diagram_type *pDiag)
-00298 {
-00299 const hdrftr_block_type *pHdrInfo;
-00300 const hdrftr_block_type *pFtrInfo;
-00301
-00302 fail(pDiag == NULL);
-00303
-00304 NO_DBG_MSG("vAddHeader");
-00305
-00306 pHdrInfo = pGetHdrFtrInfo(iSectionIndex, TRUE,
-00307 odd(iPageCount), bFirstInSection);
-00308 pFtrInfo = pGetHdrFtrInfo(iSectionIndex, FALSE,
-00309 odd(iPageCount), bFirstInSection);
-00310
-00311 lFooterHeight = pFtrInfo == NULL ? 0 : pFtrInfo->lHeight;
-00312 fail(lFooterHeight < 0);
-00313
-00314 if (pHdrInfo == NULL ||
-00315 pHdrInfo->pText == NULL ||
-00316 pHdrInfo->lHeight <= 0) {
-00317 fail(pHdrInfo != NULL && pHdrInfo->lHeight < 0);
-00318 fail(pHdrInfo != NULL &&
-00319 pHdrInfo->pText != NULL &&
-00320 pHdrInfo->lHeight == 0);
-00321 return;
-00322 }
-00323
-00324 vAddHdrFtr(pDiag, pHdrInfo);
-00325
-00326 DBG_DEC_C(pHdrInfo->lHeight !=
-00327 lPageHeight - PS_TOP_MARGIN - pDiag->lYtop,
-00328 pHdrInfo->lHeight);
-00329 DBG_DEC_C(pHdrInfo->lHeight !=
-00330 lPageHeight - PS_TOP_MARGIN - pDiag->lYtop,
-00331 lPageHeight - PS_TOP_MARGIN - pDiag->lYtop);
-00332
-00333 #if 0
-00334 fprintf(pDiag->pOutFile,
-00335 "(HEADER: FileOffset 0x%04lx-0x%04lx; Height %ld-%ld) show\n",
-00336 ulCharPos2FileOffset(pHdrInfo->ulCharPosStart),
-00337 ulCharPos2FileOffset(pHdrInfo->ulCharPosNext),
-00338 pHdrInfo->lHeight,
-00339 lPageHeight - PS_TOP_MARGIN - pDiag->lYtop);
-00340 #endif
-00341 }
-00342
-00343
-00344
-00345
-00346 static void
-00347 vAddFooter(diagram_type *pDiag)
-00348 {
-00349 const hdrftr_block_type *pFtrInfo;
-00350
-00351 fail(pDiag == NULL);
-00352
-00353 NO_DBG_MSG("vAddFooter");
-00354 pFtrInfo = pGetHdrFtrInfo(iSectionIndex, FALSE,
-00355 odd(iPageCount), bFirstInSection);
-00356 bFirstInSection = FALSE;
-00357 if (pFtrInfo == NULL ||
-00358 pFtrInfo->pText == NULL ||
-00359 pFtrInfo->lHeight <= 0) {
-00360 fail(pFtrInfo != NULL && pFtrInfo->lHeight < 0);
-00361 fail(pFtrInfo != NULL &&
-00362 pFtrInfo->pText != NULL &&
-00363 pFtrInfo->lHeight == 0);
-00364 return;
-00365 }
-00366
-00367 bInFtrSpace = TRUE;
-00368
-00369 DBG_DEC_C(pFtrInfo->lHeight != lFooterHeight, pFtrInfo->lHeight);
-00370 DBG_DEC_C(pFtrInfo->lHeight != lFooterHeight, lFooterHeight);
-00371 DBG_DEC_C(pDiag->lYtop < lFooterHeight + PS_BOTTOM_MARGIN,
-00372 pDiag->lYtop);
-00373 DBG_DEC_C(pDiag->lYtop < lFooterHeight + PS_BOTTOM_MARGIN,
-00374 lFooterHeight + PS_BOTTOM_MARGIN);
-00375
-00376 if (pDiag->lYtop > lFooterHeight + PS_BOTTOM_MARGIN) {
-00377
-00378 pDiag->lYtop = lFooterHeight + PS_BOTTOM_MARGIN;
-00379 vMoveTo(pDiag, 0);
-00380 } else if (pDiag->lYtop < lFooterHeight + PS_BOTTOM_MARGIN / 2) {
-00381 DBG_FIXME();
-00382
-00383
-00384
-00385
-00386 pDiag->lYtop = lFooterHeight + PS_BOTTOM_MARGIN;
-00387 vMoveTo(pDiag, 0);
-00388 }
-00389
-00390 DBG_FLT_C(pDiag->lYtop < lFooterHeight + PS_BOTTOM_MARGIN,
-00391 dDrawUnits2Points(lFooterHeight + PS_BOTTOM_MARGIN - pDiag->lYtop));
-00392
-00393 #if 0
-00394 fprintf(pDiag->pOutFile,
-00395 "(FOOTER: FileOffset 0x%04lx-0x%04lx; Bottom %ld-%ld) show\n",
-00396 ulCharPos2FileOffset(pFtrInfo->ulCharPosStart),
-00397 ulCharPos2FileOffset(pFtrInfo->ulCharPosNext),
-00398 pDiag->lYtop,
-00399 pFtrInfo->lHeight + PS_BOTTOM_MARGIN);
-00400 #endif
-00401 vAddHdrFtr(pDiag, pFtrInfo);
-00402 bInFtrSpace = FALSE;
-00403 }
-00404
-00405
-00406
-00407
-00408 static void
-00409 vMove2NextPage(diagram_type *pDiag, BOOL bNewSection)
-00410 {
-00411 fail(pDiag == NULL);
-00412
-00413 vAddFooter(pDiag);
-00414 fprintf(pDiag->pOutFile, "showpage\n");
-00415 iPageCount++;
-00416 fprintf(pDiag->pOutFile, "%%%%Page: %d %d\n", iPageCount, iPageCount);
-00417 if (bNewSection) {
-00418 iSectionIndex++;
-00419 bFirstInSection = TRUE;
-00420 }
-00421 vAddPageSetup(pDiag->pOutFile);
-00422 pDiag->lYtop = lPageHeight - PS_TOP_MARGIN;
-00423 lYtopCurr = -1;
-00424 vAddHeader(pDiag);
-00425 }
-00426
-00427
-00428
-00429
-00430
-00431
-00432
-00433 static void
-00434 vMoveTo(diagram_type *pDiag, long lLastVerticalMovement)
-00435 {
-00436 fail(pDiag == NULL);
-00437 fail(pDiag->pOutFile == NULL);
-00438
-00439 if (pDiag->lYtop <= lFooterHeight + PS_BOTTOM_MARGIN && !bInFtrSpace) {
-00440 vMove2NextPage(pDiag, FALSE);
-00441
-00442 pDiag->lYtop -= lLastVerticalMovement;
-00443 }
-00444
-00445 fail(pDiag->lYtop < lFooterHeight + PS_BOTTOM_MARGIN && !bInFtrSpace);
-00446 DBG_DEC_C(pDiag->lYtop < PS_BOTTOM_MARGIN, pDiag->lYtop);
-00447 fail(pDiag->lYtop < PS_BOTTOM_MARGIN / 3);
-00448
-00449 if (pDiag->lYtop != lYtopCurr) {
-00450 fprintf(pDiag->pOutFile, "%.2f %.2f moveto\n",
-00451 dDrawUnits2Points(pDiag->lXleft + PS_LEFT_MARGIN),
-00452 dDrawUnits2Points(pDiag->lYtop));
-00453 lYtopCurr = pDiag->lYtop;
-00454 }
-00455 }
-00456
-00457
-00458
-00459
-00460 void
-00461 vProloguePS(diagram_type *pDiag,
-00462 const char *szTask, const char *szFilename,
-00463 const options_type *pOptions)
-00464 {
-00465 FILE *pOutFile;
-00466 const char *szTmp;
-00467 time_t tTime;
-00468
-00469 fail(pDiag == NULL);
-00470 fail(pDiag->pOutFile == NULL);
-00471 fail(szTask == NULL || szTask[0] == '\0');
-00472 fail(pOptions == NULL);
-00473
-00474 pOutFile = pDiag->pOutFile;
-00475
-00476 bUseLandscape = pOptions->bUseLandscape;
-00477 eEncoding = pOptions->eEncoding;
-00478 eImageLevel = pOptions->eImageLevel;
-00479
-00480 if (pOptions->iPageHeight == INT_MAX) {
-00481 lPageHeight = LONG_MAX;
-00482 } else {
-00483 lPageHeight = lPoints2DrawUnits(pOptions->iPageHeight);
-00484 }
-00485 DBG_DEC(lPageHeight);
-00486 if (pOptions->iPageWidth == INT_MAX) {
-00487 lPageWidth = LONG_MAX;
-00488 } else {
-00489 lPageWidth = lPoints2DrawUnits(pOptions->iPageWidth);
-00490 }
-00491 DBG_DEC(lPageWidth);
-00492 lFooterHeight = 0;
-00493 bInFtrSpace = FALSE;
-00494
-00495 tFontRefCurr = (drawfile_fontref)-1;
-00496 usFontSizeCurr = 0;
-00497 iFontColorCurr = -1;
-00498 lYtopCurr = -1;
-00499 iPageCount = 0;
-00500 iImageCount = 0;
-00501 iSectionIndex = 0;
-00502 bFirstInSection = TRUE;
-00503 pDiag->lXleft = 0;
-00504 pDiag->lYtop = lPageHeight - PS_TOP_MARGIN;
-00505
-00506 szCreator = szTask;
-00507
-00508 fprintf(pOutFile, "%%!PS-Adobe-2.0\n");
-00509 fprintf(pOutFile, "%%%%Title: %s\n", szBasename(szFilename));
-00510 fprintf(pOutFile, "%%%%Creator: %s %s\n", szCreator, VERSIONSTRING);
-00511 szTmp = getenv("LOGNAME");
-00512 if (szTmp == NULL || szTmp[0] == '\0') {
-00513 szTmp = getenv("USER");
-00514 if (szTmp == NULL || szTmp[0] == '\0') {
-00515 szTmp = "unknown";
-00516 }
-00517 }
-00518 fprintf(pOutFile, "%%%%For: %.50s\n", szTmp);
-00519 errno = 0;
-00520 tTime = time(NULL);
-00521 if (tTime == (time_t)-1 && errno != 0) {
-00522 szCreationDate = NULL;
-00523 } else {
-00524 szCreationDate = ctime(&tTime);
-00525 }
-00526 if (szCreationDate == NULL || szCreationDate[0] == '\0') {
-00527 szCreationDate = "unknown\n";
-00528 }
-00529 fprintf(pOutFile, "%%%%CreationDate: %s", szCreationDate);
-00530 if (bUseLandscape) {
-00531 fprintf(pOutFile, "%%%%Orientation: Landscape\n");
-00532 fprintf(pOutFile, "%%%%BoundingBox: 0 0 %.0f %.0f\n",
-00533 dDrawUnits2Points(lPageHeight),
-00534 dDrawUnits2Points(lPageWidth));
-00535 } else {
-00536 fprintf(pOutFile, "%%%%Orientation: Portrait\n");
-00537 fprintf(pOutFile, "%%%%BoundingBox: 0 0 %.0f %.0f\n",
-00538 dDrawUnits2Points(lPageWidth),
-00539 dDrawUnits2Points(lPageHeight));
-00540 }
-00541 }
-00542
-00543
-00544
-00545
-00546 void
-00547 vEpiloguePS(diagram_type *pDiag)
-00548 {
-00549 fail(pDiag == NULL);
-00550 fail(pDiag->pOutFile == NULL);
-00551
-00552 if (pDiag->lYtop < lPageHeight - PS_TOP_MARGIN) {
-00553 vAddFooter(pDiag);
-00554 fprintf(pDiag->pOutFile, "showpage\n");
-00555 }
-00556 fprintf(pDiag->pOutFile, "%%%%Trailer\n");
-00557 fprintf(pDiag->pOutFile, "%%%%Pages: %d\n", iPageCount);
-00558 fprintf(pDiag->pOutFile, "%%%%EOF\n");
-00559 szCreationDate = NULL;
-00560 szCreator = NULL;
-00561 }
-00562
-00563
-00564
-00565
-00566 static void
-00567 vPrintPalette(FILE *pOutFile, const imagedata_type *pImg)
-00568 {
-00569 int iIndex;
-00570
-00571 fail(pOutFile == NULL);
-00572 fail(pImg == NULL);
-00573 fail(pImg->iColorsUsed < 2);
-00574 fail(pImg->iColorsUsed > 256);
-00575
-00576 fprintf(pOutFile, "[ /Indexed\n");
-00577 fprintf(pOutFile, "\t/Device%s %d\n",
-00578 pImg->bColorImage ? "RGB" : "Gray", pImg->iColorsUsed - 1);
-00579 fprintf(pOutFile, "<");
-00580 for (iIndex = 0; iIndex < pImg->iColorsUsed; iIndex++) {
-00581 fprintf(pOutFile, "%02x",
-00582 (unsigned int)pImg->aucPalette[iIndex][0]);
-00583 if (pImg->bColorImage) {
-00584 fprintf(pOutFile, "%02x%02x",
-00585 (unsigned int)pImg->aucPalette[iIndex][1],
-00586 (unsigned int)pImg->aucPalette[iIndex][2]);
-00587 }
-00588 if (iIndex % 8 == 7) {
-00589 fprintf(pOutFile, "\n");
-00590 } else {
-00591 fprintf(pOutFile, " ");
-00592 }
-00593 }
-00594 fprintf(pOutFile, ">\n");
-00595 fprintf(pOutFile, "] setcolorspace\n");
-00596 }
-00597
-00598
-00599
-00600
-00601 void
-00602 vImageProloguePS(diagram_type *pDiag, const imagedata_type *pImg)
-00603 {
-00604 FILE *pOutFile;
-00605
-00606 fail(pDiag == NULL);
-00607 fail(pDiag->pOutFile == NULL);
-00608 fail(pImg == NULL);
-00609
-00610 if (pImg->iVerSizeScaled <= 0 || pImg->iHorSizeScaled <= 0) {
-00611 return;
-00612 }
-00613
-00614 fail(szCreationDate == NULL);
-00615 fail(szCreator == NULL);
-00616 fail(eImageLevel == level_no_images);
-00617
-00618 iImageCount++;
-00619
-00620 DBG_DEC_C(pDiag->lXleft != 0, pDiag->lXleft);
-00621
-00622 pDiag->lYtop -= lPoints2DrawUnits(pImg->iVerSizeScaled);
-00623 vMoveTo(pDiag, lPoints2DrawUnits(pImg->iVerSizeScaled));
-00624
-00625 pOutFile = pDiag->pOutFile;
-00626
-00627 fprintf(pOutFile, "BeginEPSF\n");
-00628 fprintf(pOutFile, "%%%%BeginDocument: image%03d.eps\n", iImageCount);
-00629 fprintf(pOutFile, "%%!PS-Adobe-2.0 EPSF-2.0\n");
-00630 fprintf(pOutFile, "%%%%Creator: %s %s\n", szCreator, VERSIONSTRING);
-00631 fprintf(pOutFile, "%%%%Title: Image %03d\n", iImageCount);
-00632 fprintf(pOutFile, "%%%%CreationDate: %s", szCreationDate);
-00633 fprintf(pOutFile, "%%%%BoundingBox: 0 0 %d %d\n",
-00634 pImg->iHorSizeScaled, pImg->iVerSizeScaled);
-00635 fprintf(pOutFile, "%%%%DocumentData: Clean7Bit\n");
-00636 fprintf(pOutFile, "%%%%LanguageLevel: 2\n");
-00637 fprintf(pOutFile, "%%%%EndComments\n");
-00638 fprintf(pOutFile, "%%%%BeginProlog\n");
-00639 fprintf(pOutFile, "%%%%EndProlog\n");
-00640 fprintf(pOutFile, "%%%%Page: 1 1\n");
-00641
-00642 fprintf(pOutFile, "save\n");
-00643
-00644 switch (pImg->eImageType) {
-00645 case imagetype_is_jpeg:
-00646 fprintf(pOutFile, "/Data1 currentfile ");
-00647 fprintf(pOutFile, "/ASCII85Decode filter def\n");
-00648 fprintf(pOutFile, "/Data Data1 << ");
-00649 fprintf(pOutFile, ">> /DCTDecode filter def\n");
-00650 switch (pImg->iComponents) {
-00651 case 1:
-00652 fprintf(pOutFile, "/DeviceGray setcolorspace\n");
-00653 break;
-00654 case 3:
-00655 fprintf(pOutFile, "/DeviceRGB setcolorspace\n");
-00656 break;
-00657 case 4:
-00658 fprintf(pOutFile, "/DeviceCMYK setcolorspace\n");
-00659 break;
-00660 default:
-00661 DBG_DEC(pImg->iComponents);
-00662 break;
-00663 }
-00664 break;
-00665 case imagetype_is_png:
-00666 if (eImageLevel == level_gs_special) {
-00667 fprintf(pOutFile,
-00668 "/Data2 currentfile /ASCII85Decode filter def\n");
-00669 fprintf(pOutFile,
-00670 "/Data1 Data2 << >> /FlateDecode filter def\n");
-00671 fprintf(pOutFile, "/Data Data1 <<\n");
-00672 fprintf(pOutFile, "\t/Colors %d\n", pImg->iComponents);
-00673 fprintf(pOutFile, "\t/BitsPerComponent %u\n",
-00674 pImg->uiBitsPerComponent);
-00675 fprintf(pOutFile, "\t/Columns %d\n", pImg->iWidth);
-00676 fprintf(pOutFile,
-00677 ">> /PNGPredictorDecode filter def\n");
-00678 } else {
-00679 fprintf(pOutFile,
-00680 "/Data1 currentfile /ASCII85Decode filter def\n");
-00681 fprintf(pOutFile,
-00682 "/Data Data1 << >> /FlateDecode filter def\n");
-00683 }
-00684 if (pImg->iComponents == 3 || pImg->iComponents == 4) {
-00685 fprintf(pOutFile, "/DeviceRGB setcolorspace\n");
-00686 } else if (pImg->iColorsUsed > 0) {
-00687 vPrintPalette(pOutFile, pImg);
-00688 } else {
-00689 fprintf(pOutFile, "/DeviceGray setcolorspace\n");
-00690 }
-00691 break;
-00692 case imagetype_is_dib:
-00693 fprintf(pOutFile, "/Data currentfile ");
-00694 fprintf(pOutFile, "/ASCII85Decode filter def\n");
-00695 if (pImg->uiBitsPerComponent <= 8) {
-00696 vPrintPalette(pOutFile, pImg);
-00697 } else {
-00698 fprintf(pOutFile, "/DeviceRGB setcolorspace\n");
-00699 }
-00700 break;
-00701 default:
-00702 fprintf(pOutFile, "/Data currentfile ");
-00703 fprintf(pOutFile, "/ASCIIHexDecode filter def\n");
-00704 fprintf(pOutFile, "/Device%s setcolorspace\n",
-00705 pImg->bColorImage ? "RGB" : "Gray");
-00706 break;
-00707 }
-00708
-00709
-00710 fprintf(pOutFile, "%.2f %.2f translate\n",
-00711 dDrawUnits2Points(pDiag->lXleft + PS_LEFT_MARGIN),
-00712 dDrawUnits2Points(pDiag->lYtop));
-00713
-00714 fprintf(pOutFile, "%d %d scale\n",
-00715 pImg->iHorSizeScaled, pImg->iVerSizeScaled);
-00716
-00717 fprintf(pOutFile, "{ <<\n");
-00718 fprintf(pOutFile, "\t/ImageType 1\n");
-00719 fprintf(pOutFile, "\t/Width %d\n", pImg->iWidth);
-00720 fprintf(pOutFile, "\t/Height %d\n", pImg->iHeight);
-00721 if (pImg->eImageType == imagetype_is_dib) {
-00722
-00723 fprintf(pOutFile, "\t/ImageMatrix [ %d 0 0 %d 0 0 ]\n",
-00724 pImg->iWidth, pImg->iHeight);
-00725 } else {
-00726
-00727 fprintf(pOutFile, "\t/ImageMatrix [ %d 0 0 %d 0 %d ]\n",
-00728 pImg->iWidth, -pImg->iHeight, pImg->iHeight);
-00729 }
-00730 fprintf(pOutFile, "\t/DataSource Data\n");
-00731
-00732 switch (pImg->eImageType) {
-00733 case imagetype_is_jpeg:
-00734 fprintf(pOutFile, "\t/BitsPerComponent 8\n");
-00735 switch (pImg->iComponents) {
-00736 case 1:
-00737 fprintf(pOutFile, "\t/Decode [0 1]\n");
-00738 break;
-00739 case 3:
-00740 fprintf(pOutFile, "\t/Decode [0 1 0 1 0 1]\n");
-00741 break;
-00742 case 4:
-00743 if (pImg->bAdobe) {
-00744
-00745
-00746
-00747
-00748 fprintf(pOutFile,
-00749 "\t/Decode [1 0 1 0 1 0 1 0]\n");
-00750 } else {
-00751 fprintf(pOutFile,
-00752 "\t/Decode [0 1 0 1 0 1 0 1]\n");
-00753 }
-00754 break;
-00755 default:
-00756 DBG_DEC(pImg->iComponents);
-00757 break;
-00758 }
-00759 break;
-00760 case imagetype_is_png:
-00761 if (pImg->iComponents == 3) {
-00762 fprintf(pOutFile, "\t/BitsPerComponent 8\n");
-00763 fprintf(pOutFile, "\t/Decode [0 1 0 1 0 1]\n");
-00764 } else if (pImg->iColorsUsed > 0) {
-00765 fail(pImg->uiBitsPerComponent > 8);
-00766 fprintf(pOutFile, "\t/BitsPerComponent %u\n",
-00767 pImg->uiBitsPerComponent);
-00768 fprintf(pOutFile, "\t/Decode [0 %d]\n",
-00769 (1 << pImg->uiBitsPerComponent) - 1);
-00770 } else {
-00771 fprintf(pOutFile, "\t/BitsPerComponent 8\n");
-00772 fprintf(pOutFile, "\t/Decode [0 1]\n");
-00773 }
-00774 break;
-00775 case imagetype_is_dib:
-00776 fprintf(pOutFile, "\t/BitsPerComponent 8\n");
-00777 if (pImg->uiBitsPerComponent <= 8) {
-00778 fprintf(pOutFile, "\t/Decode [0 255]\n");
-00779 } else {
-00780 fprintf(pOutFile, "\t/Decode [0 1 0 1 0 1]\n");
-00781 }
-00782 break;
-00783 default:
-00784 fprintf(pOutFile, "\t/BitsPerComponent 8\n");
-00785 if (pImg->bColorImage) {
-00786 fprintf(pOutFile, "\t/Decode [0 1 0 1 0 1]\n");
-00787 } else {
-00788 fprintf(pOutFile, "\t/Decode [0 1]\n");
-00789 }
-00790 break;
-00791 }
-00792
-00793 fprintf(pOutFile, " >> image\n");
-00794 fprintf(pOutFile, " Data closefile\n");
-00795 fprintf(pOutFile, " showpage\n");
-00796 fprintf(pOutFile, " restore\n");
-00797 fprintf(pOutFile, "} exec\n");
-00798 }
-00799
-00800
-00801
-00802
-00803 void
-00804 vImageEpiloguePS(diagram_type *pDiag)
-00805 {
-00806 FILE *pOutFile;
-00807
-00808 fail(pDiag == NULL);
-00809 fail(pDiag->pOutFile == NULL);
-00810
-00811 pOutFile = pDiag->pOutFile;
-00812
-00813 fprintf(pOutFile, "%%%%EOF\n");
-00814 fprintf(pOutFile, "%%%%EndDocument\n");
-00815 fprintf(pOutFile, "EndEPSF\n");
-00816
-00817 pDiag->lXleft = 0;
-00818 }
-00819
-00820
-00821
-00822
-00823
-00824
-00825 BOOL
-00826 bAddDummyImagePS(diagram_type *pDiag, const imagedata_type *pImg)
-00827 {
-00828 FILE *pOutFile;
-00829
-00830 fail(pDiag == NULL);
-00831 fail(pDiag->pOutFile == NULL);
-00832 fail(pImg == NULL);
-00833
-00834 if (pImg->iVerSizeScaled <= 0 || pImg->iHorSizeScaled <= 0) {
-00835 return FALSE;
-00836 }
-00837
-00838 iImageCount++;
-00839
-00840 DBG_DEC_C(pDiag->lXleft != 0, pDiag->lXleft);
-00841
-00842 pDiag->lYtop -= lPoints2DrawUnits(pImg->iVerSizeScaled);
-00843 vMoveTo(pDiag, lPoints2DrawUnits(pImg->iVerSizeScaled));
-00844
-00845 pOutFile = pDiag->pOutFile;
-00846
-00847 fprintf(pOutFile, "gsave %% Image %03d\n", iImageCount);
-00848 fprintf(pOutFile, "\tnewpath\n");
-00849 fprintf(pOutFile, "\t%.2f %.2f moveto\n",
-00850 dDrawUnits2Points(pDiag->lXleft + PS_LEFT_MARGIN),
-00851 dDrawUnits2Points(pDiag->lYtop));
-00852 fprintf(pOutFile, "\t1.0 setlinewidth\n");
-00853 fprintf(pOutFile, "\t0.3 setgray\n");
-00854 fprintf(pOutFile, "\t0 %d rlineto\n", pImg->iVerSizeScaled);
-00855 fprintf(pOutFile, "\t%d 0 rlineto\n", pImg->iHorSizeScaled);
-00856 fprintf(pOutFile, "\t0 %d rlineto\n", -pImg->iVerSizeScaled);
-00857 fprintf(pOutFile, "\tclosepath\n");
-00858 fprintf(pOutFile, "\tstroke\n");
-00859 fprintf(pOutFile, "grestore\n");
-00860
-00861 pDiag->lXleft = 0;
-00862
-00863 return TRUE;
-00864 }
-00865
-00866
-00867
-00868
-00869 void
-00870 vAddFontsPS(diagram_type *pDiag)
-00871 {
-00872 FILE *pOutFile;
-00873 const font_table_type *pTmp, *pTmp2;
-00874 size_t tIndex;
-00875 int iLineLen, iOurFontnameLen;
-00876 BOOL bFound;
-00877
-00878 fail(pDiag == NULL);
-00879 fail(pDiag->pOutFile == NULL);
-00880
-00881 pOutFile = pDiag->pOutFile;
-00882 iLineLen = fprintf(pOutFile, "%%%%DocumentFonts:");
-00883
-00884 if (tGetFontTableLength() == 0) {
-00885 iLineLen += fprintf(pOutFile, " Courier");
-00886 } else {
-00887 pTmp = NULL;
-00888 while ((pTmp = pGetNextFontTableRecord(pTmp)) != NULL) {
-00889
-00890 bFound = FALSE;
-00891 pTmp2 = NULL;
-00892 while ((pTmp2 = pGetNextFontTableRecord(pTmp2))
-00893 != NULL && pTmp2 < pTmp) {
-00894 bFound = STREQ(pTmp2->szOurFontname,
-00895 pTmp->szOurFontname);
-00896 if (bFound) {
-00897 break;
-00898 }
-00899 }
-00900 iOurFontnameLen = (int)strlen(pTmp->szOurFontname);
-00901 if (bFound || iOurFontnameLen <= 0) {
-00902 continue;
-00903 }
-00904 if (iLineLen + iOurFontnameLen > 76) {
-00905 fprintf(pOutFile, "\n%%%%+");
-00906 iLineLen = 3;
-00907 }
-00908 iLineLen += fprintf(pOutFile,
-00909 " %s", pTmp->szOurFontname);
-00910 }
-00911 }
-00912 fprintf(pOutFile, "\n");
-00913 fprintf(pOutFile, "%%%%Pages: (atend)\n");
-00914 fprintf(pOutFile, "%%%%EndComments\n");
-00915 fprintf(pOutFile, "%%%%BeginProlog\n");
-00916
-00917 switch (eEncoding) {
-00918 case encoding_latin_1:
-00919 for (tIndex = 0;
-00920 tIndex < elementsof(iso_8859_1_data);
-00921 tIndex++) {
-00922 fprintf(pOutFile, "%s\n", iso_8859_1_data[tIndex]);
-00923 }
-00924 fprintf(pOutFile, "\n");
-00925 for (tIndex = 0;
-00926 tIndex < elementsof(iso_8859_x_func);
-00927 tIndex++) {
-00928 fprintf(pOutFile, "%s\n", iso_8859_x_func[tIndex]);
-00929 }
-00930 break;
-00931 case encoding_latin_2:
-00932 for (tIndex = 0;
-00933 tIndex < elementsof(iso_8859_2_data);
-00934 tIndex++) {
-00935 fprintf(pOutFile, "%s\n", iso_8859_2_data[tIndex]);
-00936 }
-00937 fprintf(pOutFile, "\n");
-00938 for (tIndex = 0;
-00939 tIndex < elementsof(iso_8859_x_func);
-00940 tIndex++) {
-00941 fprintf(pOutFile, "%s\n", iso_8859_x_func[tIndex]);
-00942 }
-00943 break;
-00944 case encoding_cyrillic:
-00945 for (tIndex = 0;
-00946 tIndex < elementsof(iso_8859_5_data);
-00947 tIndex++) {
-00948 fprintf(pOutFile, "%s\n", iso_8859_5_data[tIndex]);
-00949 }
-00950 fprintf(pOutFile, "\n");
-00951 for (tIndex = 0;
-00952 tIndex < elementsof(iso_8859_x_func);
-00953 tIndex++) {
-00954 fprintf(pOutFile, "%s\n", iso_8859_x_func[tIndex]);
-00955 }
-00956 break;
-00957 case encoding_utf_8:
-00958 werr(1,
-00959 "The combination PostScript and UTF-8 is not supported");
-00960 break;
-00961 default:
-00962 DBG_DEC(eEncoding);
-00963 break;
-00964 }
-00965
-00966
-00967 for (tIndex = 0; tIndex < elementsof(misc_func); tIndex++) {
-00968 fprintf(pOutFile, "%s\n", misc_func[tIndex]);
-00969 }
-00970 fprintf(pOutFile, "%%%%EndProlog\n");
-00971 iPageCount = 1;
-00972 fprintf(pDiag->pOutFile, "%%%%Page: %d %d\n", iPageCount, iPageCount);
-00973 vAddPageSetup(pDiag->pOutFile);
-00974 vAddHeader(pDiag);
-00975 }
-00976
-00977
-00978
-00979
-00980 static void
-00981 vPrintPS(FILE *pFile, const char *szString, size_t tStringLength,
-00982 USHORT usFontstyle)
-00983 {
-00984 double dSuperscriptMove, dSubscriptMove;
-00985 const UCHAR *ucBytes;
-00986 size_t tCount;
-00987
-00988 fail(szString == NULL);
-00989
-00990 if (szString == NULL || szString[0] == '\0' || tStringLength == 0) {
-00991 return;
-00992 }
-00993 DBG_DEC_C(usFontSizeCurr < MIN_FONT_SIZE, usFontSizeCurr);
-00994
-00995 dSuperscriptMove = 0.0;
-00996 dSubscriptMove = 0.0;
-00997
-00998
-00999 if (bIsSuperscript(usFontstyle) && usFontSizeCurr != 0) {
-01000 dSuperscriptMove = (double)((usFontSizeCurr + 1) / 2) * 0.375;
-01001 fprintf(pFile, "0 %.2f rmoveto\n", dSuperscriptMove);
-01002 }
-01003
-01004
-01005 if (bIsSubscript(usFontstyle) && usFontSizeCurr != 0) {
-01006 dSubscriptMove = (double)usFontSizeCurr * 0.125;
-01007 fprintf(pFile, "0 %.2f rmoveto\n", -dSubscriptMove);
-01008 }
-01009
-01010
-01011 ucBytes = (UCHAR *)szString;
-01012 (void)putc('(', pFile);
-01013 for (tCount = 0; tCount < tStringLength ; tCount++) {
-01014 switch (ucBytes[tCount]) {
-01015 case '(':
-01016 case ')':
-01017 case '\\':
-01018 (void)putc('\\', pFile);
-01019 (void)putc(szString[tCount], pFile);
-01020 break;
-01021 default:
-01022 if (ucBytes[tCount] < 0x20 ||
-01023 (ucBytes[tCount] >= 0x7f &&
-01024 ucBytes[tCount] < 0x8c)) {
-01025 DBG_HEX(ucBytes[tCount]);
-01026 (void)putc(' ', pFile);
-01027 } else if (ucBytes[tCount] >= 0x80) {
-01028 fprintf(pFile, "\\%03o", (UINT)ucBytes[tCount]);
-01029 } else {
-01030 (void)putc(szString[tCount], pFile);
-01031 }
-01032 break;
-01033 }
-01034 }
-01035 fprintf(pFile, ") ");
-01036 if ((bIsStrike(usFontstyle) || bIsMarkDel(usFontstyle)) &&
-01037 usFontSizeCurr != 0) {
-01038 fprintf(pFile, "%.2f %.2f LineShow\n",
-01039 (double)usFontSizeCurr * 0.02,
-01040 (double)usFontSizeCurr * 0.12);
-01041 } else if (bIsUnderline(usFontstyle) && usFontSizeCurr != 0) {
-01042 fprintf(pFile, "%.2f %.2f LineShow\n",
-01043 (double)usFontSizeCurr * 0.02,
-01044 (double)usFontSizeCurr * -0.06);
-01045 } else {
-01046 fprintf(pFile, "show\n");
-01047 }
-01048
-01049
-01050 if (bIsSuperscript(usFontstyle) && usFontSizeCurr != 0) {
-01051 fprintf(pFile, "0 %.2f rmoveto\n", -dSuperscriptMove);
-01052 }
-01053
-01054
-01055 if (bIsSubscript(usFontstyle) && usFontSizeCurr != 0) {
-01056 fprintf(pFile, "0 %.2f rmoveto\n", dSubscriptMove);
-01057 }
-01058 }
-01059
-01060
-01061
-01062
-01063 static void
-01064 vSetColor(FILE *pFile, UCHAR ucFontColor)
-01065 {
-01066 ULONG ulTmp, ulRed, ulGreen, ulBlue;
-01067
-01068 ulTmp = ulColor2Color(ucFontColor);
-01069 ulRed = (ulTmp & 0x0000ff00) >> 8;
-01070 ulGreen = (ulTmp & 0x00ff0000) >> 16;
-01071 ulBlue = (ulTmp & 0xff000000) >> 24;
-01072 fprintf(pFile, "%.3f %.3f %.3f setrgbcolor\n",
-01073 ulRed / 255.0, ulGreen / 255.0, ulBlue / 255.0);
-01074 }
-01075
-01076
-01077
-01078
-01079 void
-01080 vMove2NextLinePS(diagram_type *pDiag, USHORT usFontSize)
-01081 {
-01082 fail(pDiag == NULL);
-01083 fail(usFontSize < MIN_FONT_SIZE || usFontSize > MAX_FONT_SIZE);
-01084
-01085 pDiag->lYtop -= lComputeLeading(usFontSize);
-01086 }
-01087
-01088
-01089
-01090
-01091 void
-01092 vSubstringPS(diagram_type *pDiag,
-01093 char *szString, size_t tStringLength, long lStringWidth,
-01094 UCHAR ucFontColor, USHORT usFontstyle, drawfile_fontref tFontRef,
-01095 USHORT usFontSize, USHORT usMaxFontSize)
-01096 {
-01097 const char *szOurFontname;
-01098
-01099 fail(pDiag == NULL || szString == NULL);
-01100 fail(pDiag->pOutFile == NULL);
-01101 fail(pDiag->lXleft < 0);
-01102 fail(tStringLength != strlen(szString));
-01103 fail(usFontSize < MIN_FONT_SIZE || usFontSize > MAX_FONT_SIZE);
-01104 fail(usMaxFontSize < MIN_FONT_SIZE || usMaxFontSize > MAX_FONT_SIZE);
-01105 fail(usFontSize > usMaxFontSize);
-01106
-01107 if (szString[0] == '\0' || tStringLength == 0) {
-01108 return;
-01109 }
-01110
-01111 if (tFontRef != tFontRefCurr || usFontSize != usFontSizeCurr) {
-01112 szOurFontname = szGetFontname(tFontRef);
-01113 fail(szOurFontname == NULL);
-01114 fprintf(pDiag->pOutFile,
-01115 "%.1f /%s /%s-ISO-8859-x ChgFnt\n",
-01116 (double)usFontSize / 2.0,
-01117 szOurFontname, szOurFontname);
-01118 tFontRefCurr = tFontRef;
-01119 usFontSizeCurr = usFontSize;
-01120 }
-01121 if ((int)ucFontColor != iFontColorCurr) {
-01122 vSetColor(pDiag->pOutFile, ucFontColor);
-01123 iFontColorCurr = (int)ucFontColor;
-01124 }
-01125 vMoveTo(pDiag, lComputeLeading(usMaxFontSize));
-01126 vPrintPS(pDiag->pOutFile, szString, tStringLength, usFontstyle);
-01127 pDiag->lXleft += lStringWidth;
-01128 }
-01129
-01130
-01131
-01132
-01133 void
-01134 vStartOfParagraphPS(diagram_type *pDiag, long lBeforeIndentation)
-01135 {
-01136 fail(pDiag == NULL);
-01137 fail(lBeforeIndentation < 0);
-01138
-01139 pDiag->lXleft = 0;
-01140 pDiag->lYtop -= lMilliPoints2DrawUnits(lBeforeIndentation);
-01141 }
-01142
-01143
-01144
-01145
-01146 void
-01147 vEndOfParagraphPS(diagram_type *pDiag,
-01148 USHORT usFontSize, long lAfterIndentation)
-01149 {
-01150 fail(pDiag == NULL);
-01151 fail(pDiag->pOutFile == NULL);
-01152 fail(usFontSize < MIN_FONT_SIZE || usFontSize > MAX_FONT_SIZE);
-01153 fail(lAfterIndentation < 0);
-01154
-01155 if (pDiag->lXleft > 0) {
-01156
-01157 vMove2NextLinePS(pDiag, usFontSize);
-01158 }
-01159
-01160 pDiag->lXleft = 0;
-01161 pDiag->lYtop -= lMilliPoints2DrawUnits(lAfterIndentation);
-01162 }
-01163
-01164
-01165
-01166
-01167 void
-01168 vEndOfPagePS(diagram_type *pDiag, BOOL bNewSection)
-01169 {
-01170 vMove2NextPage(pDiag, bNewSection);
-01171 }
-