home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume10 / xdvi / patch10.2 < prev    next >
Encoding:
Internet Message Format  |  1990-10-18  |  58.5 KB
  1. Path: uunet!wuarchive!cs.utexas.edu!sun-barr!newstop!sun!math.Berkeley.EDU
  2. From: vojta@math.Berkeley.EDU (Paul Vojta)
  3. Newsgroups: comp.sources.x
  4. Subject: v10i010: xdvi, Patch10, Part02/02
  5. Message-ID: <143916@sun.Eng.Sun.COM>
  6. Date: 18 Oct 90 22:36:23 GMT
  7. References: <csx-10i009:xdvi@uunet.UU.NET>
  8. Sender: news@sun.Eng.Sun.COM
  9. Lines: 1867
  10. Approved: argv@sun.com
  11.  
  12. Submitted-by: vojta@math.berkeley.edu (Paul A Vojta)
  13. Posting-number: Volume 10, Issue 10
  14. Archive-name: xdvi/patch10.2
  15. Patch-To: xdvi: Volume 3, Issues 37-39
  16. Patch-To: xdvi: Volume 4, Issue 44 (xdvi, Patch4)
  17. Patch-To: xdvi: Volume 4, Issue 96 (xdvi, dvi previewer, Patch5)
  18. Patch-To: xdvi: Volume 5, Issue 35 (xdvi, dvi previewer, patch 6, part 1/2)
  19. Patch-To: xdvi: Volume 5, Issue 36 (xdvi, dvi previewer, patch 6, part 2/2)
  20. Patch-To: xdvi: Volume 6, Issue  5 (xdvi, Patch7)
  21. Patch-To: xdvi: Volume 6, Issue 49 (xdvi, dvi previewer, patch 8)
  22. Patch-To: xdvi: Volume 7, Issue 52 (xdvi, dvi previewer, patch 9, part 1/2)
  23. Patch-To: xdvi: Volume 7, Issue 53 (xdvi, dvi previewer, patch 9, part 2/2)
  24.  
  25. diff -cr xdvi_old/pxl_open.c xdvi_new/pxl_open.c
  26. *** xdvi_old/pxl_open.c    Mon Sep 17 17:35:58 1990
  27. --- xdvi_new/pxl_open.c    Wed Oct 10 12:00:50 1990
  28. ***************
  29. *** 1,5 ****
  30.   /*
  31. !  *    pxl_open.c(font, font_ret, mag, mag_ret, factor, name, read_font_index)
  32.    *    Find and open gf, pk, or pxl files in the given path, having the given
  33.    *    name and magnification.  It tries gf files first, followed by pk and pxl
  34.    *    files.  The path variable should be of the form path1:path2:...:pathn,
  35. --- 1,5 ----
  36.   /*
  37. !  *    pxl_open.c(font, font_ret, mag, mag_ret, factor, name)
  38.    *    Find and open gf, pk, or pxl files in the given path, having the given
  39.    *    name and magnification.  It tries gf files first, followed by pk and pxl
  40.    *    files.  The path variable should be of the form path1:path2:...:pathn,
  41. ***************
  42. *** 19,26 ****
  43.    *        *factor    the ratio of the point sizes of the requested font
  44.    *            and the font actually found (or 1.0 if altfont is used).
  45.    *        *name    a pointer to a string containing the file name
  46. -  *        *read_font_index  a pointer to the read_index procedure to be
  47. -  *            used for the given font format.
  48.    *
  49.    *    If the file is not found, then the return value is NULL.
  50.    *
  51. --- 19,24 ----
  52. ***************
  53. *** 33,53 ****
  54.    */
  55.   
  56.   #include <stdio.h>
  57. - 
  58. - #ifndef X10
  59. - #include <X11/Xos.h>    /* same as below */
  60. - #else    /* X10 */
  61. - #ifdef    SYSV
  62. - #include <string.h>
  63. - #define index strchr
  64. - #define rindex strrchr
  65. - #else /* SYSV */
  66. - #include <strings.h>
  67. - #endif /* SYSV */
  68. - #endif    /* X10 */
  69. - 
  70.   #include <errno.h>
  71. ! extern    int    errno;
  72.   
  73.   /*
  74.    *    If you think you have to change DEFAULT_TAIL, then you haven't read the
  75. --- 31,39 ----
  76.    */
  77.   
  78.   #include <stdio.h>
  79.   #include <errno.h>
  80. ! int    errno;
  81. ! #include "xdvi.h"
  82.   
  83.   /*
  84.    *    If you think you have to change DEFAULT_TAIL, then you haven't read the
  85. ***************
  86. *** 57,91 ****
  87.   #define    PATH_SEP    ':'
  88.   #define    DEFAULT_TAIL    "/%f.%d%p"
  89.   #else    /* VMS */
  90. - #include <string.h>
  91. - #define    index    strchr
  92. - #define    rindex    strrchr
  93.   #define    PATH_SEP    '/'
  94.   #define    DEFAULT_TAIL    ":%f.%d%p"
  95.   #endif    /* VMS */
  96.   
  97. - #ifndef    OPEN_MODE
  98. - #ifndef    VMS
  99. - #define    OPEN_MODE    "r"
  100. - #else
  101. - #define    OPEN_MODE    "r", "ctx=stm"
  102. - #endif
  103. - #endif    /* OPEN_MODE */
  104. - 
  105. - extern    int    n_fonts_left;
  106. - extern    char    *alt_font;
  107. - 
  108.   static    char    *font_path;
  109. ! static    char    default_font_path[]    = DEFAULT_FONT_PATH;
  110.   static    int    *sizes, *sizend;
  111.   static    char    default_size_list[]    = DEFAULT_FONT_SIZES;
  112.   
  113. -     /* the corresponding read_char procedures are handled in xdvi.h */
  114. - typedef    void (*read_font_index_proc)();
  115. -     /* struct font *fontp; */
  116. - 
  117. - read_font_index_proc read_GF_index, read_PK_index, read_PXL_index;
  118. - 
  119.   #ifdef    sun
  120.   char    *sprintf();
  121.   #endif
  122. --- 43,57 ----
  123.   #define    PATH_SEP    ':'
  124.   #define    DEFAULT_TAIL    "/%f.%d%p"
  125.   #else    /* VMS */
  126.   #define    PATH_SEP    '/'
  127.   #define    DEFAULT_TAIL    ":%f.%d%p"
  128.   #endif    /* VMS */
  129.   
  130.   static    char    *font_path;
  131. ! static    char    *default_font_path    = DEFAULT_FONT_PATH;
  132.   static    int    *sizes, *sizend;
  133.   static    char    default_size_list[]    = DEFAULT_FONT_SIZES;
  134.   
  135.   #ifdef    sun
  136.   char    *sprintf();
  137.   #endif
  138. ***************
  139. *** 93,101 ****
  140.   char    *malloc(), *getenv();
  141.   double    atof();
  142.   
  143. - #define    Strcpy    (void) strcpy
  144. - #define    Sprintf    (void) sprintf
  145. - 
  146.   static    void
  147.   get_sizes(size_list, spp)
  148.       char    *size_list;
  149. --- 59,64 ----
  150. ***************
  151. *** 117,129 ****
  152.       unsigned int n;
  153.       char    *p;
  154.   
  155. !     if ((font_path = getenv("XDVIFONTS")) == NULL)
  156.           font_path = default_font_path;
  157. !     else if (*font_path == PATH_SEP)
  158. !         /*concatenate default_font_path before font_path */
  159. !         font_path = strcat(strcpy(malloc((unsigned)
  160. !         strlen(default_font_path) + strlen(font_path) + 1),
  161. !         default_font_path), font_path);
  162.   
  163.       size_list = getenv("XDVISIZES");
  164.       n = 1;    /* count number of sizes */
  165. --- 80,89 ----
  166.       unsigned int n;
  167.       char    *p;
  168.   
  169. !     if ((font_path = getenv("XDVIFONTS")) == NULL) {
  170.           font_path = default_font_path;
  171. !         default_font_path = NULL;
  172. !     }
  173.   
  174.       size_list = getenv("XDVISIZES");
  175.       n = 1;    /* count number of sizes */
  176. ***************
  177. *** 155,170 ****
  178.   }
  179.   
  180.   static    FILE *
  181. ! formatted_open(path, font, pxl, mag, name)
  182.       char    *path, *font, *pxl;
  183.       int    mag;
  184.       char    **name;
  185.   {
  186.       char    *p = path,
  187.           nm[128],
  188.           *n = nm,
  189.           c;
  190. !     int    f_used = 0;
  191.       FILE    *f;
  192.   
  193.       for (;;) {
  194. --- 115,132 ----
  195.   }
  196.   
  197.   static    FILE *
  198. ! formatted_open(path, font, pxl, mag, name, count)
  199.       char    *path, *font, *pxl;
  200.       int    mag;
  201.       char    **name;
  202. +     int    count;
  203.   {
  204.       char    *p = path,
  205.           nm[128],
  206.           *n = nm,
  207.           c;
  208. !     Boolean    f_used = False;
  209. !     Boolean    p_used = False;
  210.       FILE    *f;
  211.   
  212.       for (;;) {
  213. ***************
  214. *** 178,187 ****
  215.           c = *p++;
  216.           switch (c) {
  217.               case 'f':
  218. !             f_used=1;
  219.               Strcpy(n, font);
  220.               break;
  221.               case 'p':
  222.               Strcpy(n, pxl);
  223.               break;
  224.               case 'd':
  225. --- 140,150 ----
  226.           c = *p++;
  227.           switch (c) {
  228.               case 'f':
  229. !             f_used = True;
  230.               Strcpy(n, font);
  231.               break;
  232.               case 'p':
  233. +             p_used = True;
  234.               Strcpy(n, pxl);
  235.               break;
  236.               case 'd':
  237. ***************
  238. *** 195,201 ****
  239. --- 158,166 ----
  240.           }
  241.           else *n++ = c;
  242.       }
  243. +     if (!p_used && count > 0) return NULL;
  244.       *n = '\0';
  245. +     if (debug & DBG_OPEN) Printf("Trying font file %s\n", nm);
  246.       f = fopen(nm, OPEN_MODE);
  247.       if (f == NULL && errno == EMFILE) {
  248.           n_fonts_left = 0;
  249. ***************
  250. *** 209,272 ****
  251.       return f;
  252.   }
  253.   
  254.   static    FILE *
  255. ! pre_pxl_open(font, mag, mag_ret, name, read_font_index)
  256.       char    *font;
  257. !     int    mag, *mag_ret;
  258.       char    **name;
  259. !     read_font_index_proc *read_font_index;
  260.   {
  261.       char    *p;
  262.       FILE    *f;
  263. !     int    *p1, *p2, pxlmag, pkmag;
  264.   
  265.       /*
  266. !      * Loop over sizes.  Try closest sizes first.
  267.        */
  268.       for (p2 = sizes; p2 < sizend; ++p2) if (*p2 >= mag) break;
  269.       p1 = p2;
  270.       for (;;) {
  271.           if (p1 <= sizes)
  272.           if (p2 >= sizend) return NULL;
  273.           else pxlmag = *p2++;
  274. !         else if (p2 >= sizend || mag * mag <= p1[-1] * *p2) pxlmag = *--p1;
  275.           else pxlmag = *p2++;
  276. !         *mag_ret = pxlmag;
  277. !         pkmag = (pxlmag + 2) / 5;
  278. !         /*
  279. !          * loop over paths
  280. !          */
  281. !         for (p = font_path;;) {
  282. !         if (read_GF_index &&
  283. !             (f = formatted_open(p, font, "gf", pkmag, name)) != NULL) {
  284. !             *read_font_index = read_GF_index;
  285. !             return f;
  286. !         }
  287. !         if (read_PK_index &&
  288. !             (f = formatted_open(p, font, "pk", pkmag, name)) != NULL) {
  289. !             *read_font_index = read_PK_index;
  290. !             return f;
  291. !         }
  292. !         if (read_PXL_index &&
  293. !             (f = formatted_open(p, font, "pxl", pxlmag, name)) != NULL)
  294. !         {
  295. !             *read_font_index = read_PXL_index;
  296. !             return f;
  297. !         }
  298. !         p = index(p, PATH_SEP);
  299. !         if (p == NULL) break;
  300. !         ++p;
  301. !         }
  302.       }
  303.   }
  304.   
  305.   FILE *
  306. ! pxl_open(font, font_ret, mag, mag_ret, factor, name, read_font_index)
  307.       char    *font, **font_ret;
  308. !     int    mag, *mag_ret;
  309.       float    *factor;
  310.       char    **name;
  311. -     read_font_index_proc *read_font_index;
  312.   {
  313.       FILE    *f;
  314.       int    actual_pt, low_pt, high_pt, trial_pt;
  315. --- 174,274 ----
  316.       return f;
  317.   }
  318.   
  319. + /*
  320. +  *    Try a given size
  321. +  */
  322. + 
  323.   static    FILE *
  324. ! try_size(font, pxlmag, name, font_path, default_font_path)
  325.       char    *font;
  326. !     int    pxlmag;
  327.       char    **name;
  328. !     char    *font_path, *default_font_path;
  329.   {
  330.       char    *p;
  331.       FILE    *f;
  332. !     int    pkmag    = (pxlmag + 2) / 5;
  333.   
  334.       /*
  335. !      * loop over paths
  336.        */
  337. +     for (p = font_path;; ++p) {
  338. +         int count = 0;
  339. + 
  340. +         if (*p == ':' || *p == '\0') {
  341. +         if (default_font_path != NULL &&
  342. +             (f = try_size(font, pxlmag, name, default_font_path,
  343. +             (char *) NULL)) != NULL)
  344. +             return f;
  345. +         if (*p == '\0') break;
  346. +         continue;
  347. +         }
  348. +         if (read_GF_index &&
  349. +         (f = formatted_open(p, font, "gf", pkmag, name, count++))
  350. +             != NULL)
  351. +             return f;
  352. +         if (read_PK_index &&
  353. +         (f = formatted_open(p, font, "pk", pkmag, name, count++))
  354. +             != NULL)
  355. +             return f;
  356. +         if (read_PXL_index &&
  357. +         (f = formatted_open(p, font, "pxl", pxlmag, name, count++))
  358. +             != NULL)
  359. +             return f;
  360. +         p = index(p, PATH_SEP);
  361. +         if (p == NULL) break;
  362. +     }
  363. +     return NULL;
  364. + }
  365. + 
  366. + /*
  367. +  *    Try a given font name
  368. +  */
  369. + 
  370. + static    FILE *
  371. + pre_pxl_open(font, mag, mag_ret, name)
  372. +     char    *font;
  373. +     float    mag;
  374. +     int    *mag_ret;
  375. +     char    **name;
  376. + {
  377. +     FILE    *f;
  378. +     int    *p1, *p2, pxlmag;
  379. + 
  380. +     /*
  381. +      * Loop over sizes.  Try actual size first, then closest sizes.
  382. +      */
  383. +     pxlmag = mag + 0.5;
  384. +     if ((f = try_size(font, *mag_ret = pxlmag, name, font_path,
  385. +         default_font_path)) != NULL)
  386. +         return f;
  387. +     if (pxlmag < mag) ++pxlmag; else --pxlmag;
  388. +     if ((f = try_size(font, *mag_ret = pxlmag, name, font_path,
  389. +         default_font_path)) != NULL)
  390. +         return f;
  391.       for (p2 = sizes; p2 < sizend; ++p2) if (*p2 >= mag) break;
  392.       p1 = p2;
  393.       for (;;) {
  394. +         /* find another magnification */
  395.           if (p1 <= sizes)
  396.           if (p2 >= sizend) return NULL;
  397.           else pxlmag = *p2++;
  398. !         else if (p2 >= sizend || mag * mag <= p1[-1] * *p2)
  399. !             pxlmag = *--p1;
  400.           else pxlmag = *p2++;
  401. !         if ((f = try_size(font, *mag_ret = pxlmag, name, font_path,
  402. !             default_font_path)) != NULL)
  403. !         return f;
  404.       }
  405.   }
  406.   
  407.   FILE *
  408. ! pxl_open(font, font_ret, mag, mag_ret, factor, name)
  409.       char    *font, **font_ret;
  410. !     float    mag;
  411. !     int    *mag_ret;
  412.       float    *factor;
  413.       char    **name;
  414.   {
  415.       FILE    *f;
  416.       int    actual_pt, low_pt, high_pt, trial_pt;
  417. ***************
  418. *** 273,279 ****
  419.       char    fn[50], *fnend;
  420.   
  421.       *factor = 1.0;
  422. !     f = pre_pxl_open(font, mag, mag_ret, name, read_font_index);
  423.       if (f != NULL) {
  424.           *font_ret = NULL;
  425.           return f;
  426. --- 275,281 ----
  427.       char    fn[50], *fnend;
  428.   
  429.       *factor = 1.0;
  430. !     f = pre_pxl_open(font, mag, mag_ret, name);
  431.       if (f != NULL) {
  432.           *font_ret = NULL;
  433.           return f;
  434. ***************
  435. *** 293,300 ****
  436.           else if (high_pt > actual_pt + 5) break;
  437.           else trial_pt = high_pt++;
  438.           Sprintf(fnend, "%d", trial_pt);
  439. !         f = pre_pxl_open(fn, mag * actual_pt / trial_pt, mag_ret, name,
  440. !             read_font_index);
  441.           if (f != NULL) {
  442.               *font_ret = strcpy(malloc((unsigned) strlen(fn) + 1), fn);
  443.               *factor = (float) actual_pt / trial_pt;
  444. --- 295,301 ----
  445.           else if (high_pt > actual_pt + 5) break;
  446.           else trial_pt = high_pt++;
  447.           Sprintf(fnend, "%d", trial_pt);
  448. !         f = pre_pxl_open(fn, mag * actual_pt / trial_pt, mag_ret, name);
  449.           if (f != NULL) {
  450.               *font_ret = strcpy(malloc((unsigned) strlen(fn) + 1), fn);
  451.               *factor = (float) actual_pt / trial_pt;
  452. ***************
  453. *** 304,310 ****
  454.       }
  455.       if (alt_font != NULL) {
  456.           *font_ret = alt_font;
  457. !         f = pre_pxl_open(alt_font, mag, mag_ret, name, read_font_index);
  458.           if (f != NULL)
  459.           *font_ret = strcpy(malloc((unsigned) strlen(alt_font) + 1),
  460.               alt_font);
  461. --- 305,311 ----
  462.       }
  463.       if (alt_font != NULL) {
  464.           *font_ret = alt_font;
  465. !         f = pre_pxl_open(alt_font, mag, mag_ret, name);
  466.           if (f != NULL)
  467.           *font_ret = strcpy(malloc((unsigned) strlen(alt_font) + 1),
  468.               alt_font);
  469. diff -cr xdvi_old/tpic.c xdvi_new/tpic.c
  470. *** xdvi_old/tpic.c    Mon Sep 17 17:36:09 1990
  471. --- xdvi_new/tpic.c    Wed Sep 26 11:17:01 1990
  472. ***************
  473. *** 410,415 ****
  474.       else if (strcmp(command, "sh") == 0) shade_last();
  475.       else if (strcmp(command, "wh") == 0) whiten_last();
  476.       else if (strcmp(command, "bk") == 0) blacken_last();
  477. !     else if (spec_warn)
  478.       Fprintf(stderr, "%s:  special \"%s\" not implemented\n", prog, orig_cp);
  479.   }
  480. --- 410,415 ----
  481.       else if (strcmp(command, "sh") == 0) shade_last();
  482.       else if (strcmp(command, "wh") == 0) whiten_last();
  483.       else if (strcmp(command, "bk") == 0) blacken_last();
  484. !     else if (spec_warn_now)
  485.       Fprintf(stderr, "%s:  special \"%s\" not implemented\n", prog, orig_cp);
  486.   }
  487. diff -cr xdvi_old/xdvi.c xdvi_new/xdvi.c
  488. *** xdvi_old/xdvi.c    Mon Sep 17 17:36:42 1990
  489. --- xdvi_new/xdvi.c    Wed Oct 10 13:35:20 1990
  490. ***************
  491. *** 28,38 ****
  492.    */
  493.   #ifndef lint
  494.   #include "patchlevel.h"
  495. ! static    struct {char    a[36], b, c;}
  496.   #ifndef X10
  497. !     dv_c = {"$Header: xdvi.c (X11), patchlevel = ", '0' + PATCHLEVEL, 0};
  498.   #else
  499. !     dv_c = {"$Header: xdvi.c (X10), patchlevel = ", '0' + PATCHLEVEL, 0};
  500.   #endif
  501.   #endif    /* lint */
  502.   
  503. --- 28,40 ----
  504.    */
  505.   #ifndef lint
  506.   #include "patchlevel.h"
  507. ! static    struct {char    a[36], b, c, d;}
  508.   #ifndef X10
  509. !     dv_c = {"$Header: xdvi.c (X11), patchlevel = ", '0' + PATCHLEVEL / 10,
  510. !         '0' + PATCHLEVEL % 10, 0};
  511.   #else
  512. !     dv_c = {"$Header: xdvi.c (X10), patchlevel = ", '0' + PATCHLEVEL / 10,
  513. !         '0' + PATCHLEVEL % 10, 0};
  514.   #endif
  515.   #endif    /* lint */
  516.   
  517. ***************
  518. *** 58,63 ****
  519. --- 60,66 ----
  520.   #include <X11/Xlib.h>
  521.   #include <X11/Xutil.h>
  522.   #include <X11/cursorfont.h>
  523. + #include <X11/keysym.h>
  524.   #include "xdvi.icon"
  525.   #else /* X10 */
  526.   #include <X/Xlib.h>
  527. ***************
  528. *** 154,163 ****
  529.   
  530.   int    density = 40;
  531.   int    pixels_per_inch = 300;
  532.   int    unshrunk_paper_w, unshrunk_paper_h;
  533.   int    unshrunk_page_w, unshrunk_page_h;
  534.   static    char    *paper        = DEFAULT_PAPER;
  535. ! static    char    *margins, *sidemargin, *topmargin;
  536.   static    Boolean    reverse;
  537.   static    Dimension    bwidth    = 2;
  538.   static    int    bak_shrink;
  539. --- 157,169 ----
  540.   
  541.   int    density = 40;
  542.   int    pixels_per_inch = 300;
  543. + int    offset_x, offset_y;
  544.   int    unshrunk_paper_w, unshrunk_paper_h;
  545.   int    unshrunk_page_w, unshrunk_page_h;
  546. + Boolean    spec_warn    = True;
  547.   static    char    *paper        = DEFAULT_PAPER;
  548. ! static    char    *sidemargin, *topmargin;
  549. ! static    char    *xoffset, *yoffset;
  550.   static    Boolean    reverse;
  551.   static    Dimension    bwidth    = 2;
  552.   static    int    bak_shrink;
  553. ***************
  554. *** 172,177 ****
  555. --- 178,186 ----
  556.   int    pageno_correct    = 1;
  557.   Boolean    keep_flag    = False;
  558.   static    double    specialConv;
  559. + #ifdef    BUTTONS
  560. + Boolean    expert        = False;
  561. + #endif
  562.   
  563.   #ifndef X10
  564.   #ifdef    TOOLKIT
  565. ***************
  566. *** 230,235 ****
  567. --- 239,247 ----
  568.   
  569.   #ifdef    TOOLKIT
  570.   static    Widget    top_level, vport_widget, draw_widget, clip_widget;
  571. + #ifdef    BUTTONS
  572. + static    Widget    form_widget, line_widget, right_widget;
  573. + #endif
  574.   static    Widget    x_bar, y_bar;    /* horizontal and vertical scroll bars */
  575.   
  576.   static    Arg    vport_args[] = {
  577. ***************
  578. *** 320,325 ****
  579. --- 332,363 ----
  580.       {XtNheight,    (XtArgVal) 30},
  581.       {XtNcallback,    (XtArgVal) command_call},
  582.   };
  583. + 
  584. + static    void
  585. + create_buttons(h)
  586. +     XtArgVal    h;
  587. + {
  588. +     int i;
  589. + 
  590. +     line_args[2].value = h;
  591. +     line_args[3].value = (XtArgVal) vport_widget;
  592. +     line_widget = XtCreateManagedWidget("line", widgetClass, form_widget,
  593. +         line_args, XtNumber(line_args));
  594. +     right_args[0].value = (XtArgVal) line_widget;
  595. +     right_args[2].value = h;
  596. +     right_widget = XtCreateManagedWidget("right", compositeWidgetClass,
  597. +         form_widget, right_args, XtNumber(right_args));
  598. + 
  599. +     command_args[2].value = (XtArgVal) vport_widget;
  600. +     for (i = 0; i < XtNumber(command_table); ++i) {
  601. +         command_args[0].value = (XtArgVal) command_table[i].label;
  602. +         command_args[2].value = (XtArgVal) command_table[i].y_pos;
  603. +         command_call[0].closure = (caddr_t) command_table[i].closure;
  604. +         (void) XtCreateManagedWidget(command_table[i].name,
  605. +         commandWidgetClass, right_widget,
  606. +         command_args, XtNumber(command_args));
  607. +     }
  608. + }
  609.   #endif    /* BUTTONS */
  610.   
  611.   #else    /* !TOOLKIT */
  612. ***************
  613. *** 379,384 ****
  614. --- 417,423 ----
  615.   
  616.   char    *malloc();
  617.   double    atof();
  618. + void    exit();
  619.   
  620.   /********************************
  621.    *      tpic routines        *
  622. ***************
  623. *** 614,625 ****
  624.   #define    mane_base_x    0
  625.   #define    mane_base_y    0
  626.   
  627. ! #define    home(x)    Xtk_home()
  628. ! static
  629. ! Xtk_home()
  630.   {
  631.       register int coord;
  632.   
  633.       get_xy();
  634.       if (x_bar) {
  635.           coord = 0;
  636. --- 653,665 ----
  637.   #define    mane_base_x    0
  638.   #define    mane_base_y    0
  639.   
  640. ! static    void
  641. ! home(scrl)
  642. !     Boolean    scrl;
  643.   {
  644.       register int coord;
  645.   
  646. +     if (!scrl) XUnmapWindow(DISP, WINDOW(mane));
  647.       get_xy();
  648.       if (x_bar) {
  649.           coord = 0;
  650. ***************
  651. *** 639,644 ****
  652. --- 679,689 ----
  653.           }
  654.           XtCallCallbacks(y_bar, XtNscrollProc, window_y + coord);
  655.       }
  656. +     if (!scrl) {
  657. +         XMapWindow(DISP, WINDOW(mane));
  658. +         /* Wait for the server to catch up---this eliminates flicker. */
  659. +         XSync(DISP, False);
  660. +     }
  661.   }
  662.   
  663.   static    Boolean    resized    = False;
  664. ***************
  665. *** 793,798 ****
  666. --- 838,849 ----
  667.   {
  668.       int    x_thick = 0;
  669.       int    y_thick = 0;
  670. + #ifdef    X10
  671. +     int    old_clip_w = clip_w;
  672. +     int    old_clip_h = clip_h;
  673. +     int    old_x_thick = x_thick;
  674. +     int    old_y_thick = y_thick;
  675. + #endif
  676.   
  677.           /* determine existence of scrollbars */
  678.       if (window_w < page_w) x_thick = BAR_THICK;
  679. ***************
  680. *** 821,828 ****
  681. --- 872,887 ----
  682.           XMapWindow(DPY WINDOW(mane));
  683.       }
  684.       else
  685. + #ifdef    X10
  686. +     if (clip_w != old_clip_w || clip_h != old_clip_h ||
  687. +         x_thick != old_x_thick || y_thick != old_y_thick) {
  688. + #endif
  689.           XMoveResizeWindow(DPY WINDOW(mane),
  690.           y_thick, x_thick, clip_w, clip_h);
  691. + #ifdef    X10
  692. +         XSync(False);
  693. +     }
  694. + #endif
  695.   
  696.           /* process scroll bars */
  697.       if (x_thick) {
  698. ***************
  699. *** 1124,1130 ****
  700.       XEvent    *eventp;
  701.   {
  702.       int    next_page;
  703. ! #ifndef X10
  704.       Window    ww;
  705.   #endif
  706.   
  707. --- 1183,1189 ----
  708.       XEvent    *eventp;
  709.   {
  710.       int    next_page;
  711. ! #ifdef    TOOLKIT
  712.       Window    ww;
  713.   #endif
  714.   
  715. ***************
  716. *** 1190,1195 ****
  717. --- 1249,1279 ----
  718.           case 'c':
  719.           center(eventp->xkey.x, eventp->xkey.y);
  720.           return;
  721. +         case 'M':
  722. +         XTranslateCoordinates(DISP, eventp->xkey.window,
  723. +             WINDOW(mane), eventp->xkey.x, eventp->xkey.y,
  724. +             &home_x, &home_y, &ww);    /* throw away last argument */
  725. +         home_x *= mane.shrinkfactor;
  726. +         home_y *= mane.shrinkfactor;
  727. +         return;
  728. + #ifdef    BUTTONS
  729. +         case 'x':
  730. +         if (arg0 && expert == (number0 != 0)) return;
  731. +         if (expert) {    /* create buttons */
  732. +             XtResizeWidget(vport_widget, window_w -= XTRA_WID, window_h,
  733. +             0);
  734. +             create_buttons((XtArgVal) window_h);
  735. +             expert = False;
  736. +         }
  737. +         else {        /* destroy buttons */
  738. +             XtResizeWidget(vport_widget, window_w += XTRA_WID, window_h,
  739. +             0);
  740. +             XtDestroyWidget(right_widget);
  741. +             XtDestroyWidget(line_widget);
  742. +             expert = True;
  743. +         }
  744. +         return;
  745. + #endif    /* BUTTONS */
  746.   #else    /* !TOOLKIT */
  747.           case 'l':
  748.           if (mane.base_x <= 0) goto bad;
  749. ***************
  750. *** 1219,1246 ****
  751.           XWarpMouse(WINDOW(mane), clip_w/2, clip_h/2, GXcopy);
  752.   #endif
  753.           return;
  754.   #endif    /* TOOLKIT */
  755.   
  756.   #ifndef X10
  757. -         case 'M':
  758. -         XTranslateCoordinates(DISP, eventp->xkey.window,
  759. -             WINDOW(mane), eventp->xkey.x, eventp->xkey.y,
  760. -             &home_x, &home_y, &ww);    /* throw away last argument */
  761. -         home_x *= mane.shrinkfactor;
  762. -         home_y *= mane.shrinkfactor;
  763. -         return;
  764.           case '\020':    /* Control P */
  765.           Printf("Unit = %d, bitord = %d, byteord = %d\n",
  766.               BitmapUnit(DISP), BitmapBitOrder(DISP),
  767.               ImageByteOrder(DISP));
  768.           return;
  769. - #else
  770. -         case 'M':
  771. -         home_x = (XKEY(*eventp).x - (y_bar ? BAR_THICK : 0)
  772. -             + mane.base_x) * mane.shrinkfactor;
  773. -         home_y = (XKEY(*eventp).y - (x_bar ? BAR_THICK : 0)
  774. -             + mane.base_y) * mane.shrinkfactor;
  775. -         return;
  776.   #endif
  777.           case 's':
  778.           if (!arg0) {
  779. --- 1303,1322 ----
  780.           XWarpMouse(WINDOW(mane), clip_w/2, clip_h/2, GXcopy);
  781.   #endif
  782.           return;
  783. +         case 'M':
  784. +         home_x = (XKEY(*eventp).x - (y_bar ? BAR_THICK : 0)
  785. +             + mane.base_x) * mane.shrinkfactor;
  786. +         home_y = (XKEY(*eventp).y - (x_bar ? BAR_THICK : 0)
  787. +             + mane.base_y) * mane.shrinkfactor;
  788. +         return;
  789.   #endif    /* TOOLKIT */
  790.   
  791.   #ifndef X10
  792.           case '\020':    /* Control P */
  793.           Printf("Unit = %d, bitord = %d, byteord = %d\n",
  794.               BitmapUnit(DISP), BitmapBitOrder(DISP),
  795.               ImageByteOrder(DISP));
  796.           return;
  797.   #endif
  798.           case 's':
  799.           if (!arg0) {
  800. ***************
  801. *** 1258,1281 ****
  802.               reset_fonts();
  803.           }
  804.   #ifdef    TOOLKIT
  805. !         XUnmapWindow(DISP, WINDOW(mane));
  806. !         {
  807. !             Dimension replyW, replyH;
  808. !             if (XtMakeResizeRequest(draw_widget, (Dimension) page_w,
  809. !                 (Dimension) page_h, &replyW, &replyH)
  810. !                 == XtGeometryAlmost)
  811. !             (void) XtMakeResizeRequest(draw_widget, replyW, replyH,
  812. !                 (Dimension *) NULL, (Dimension *) NULL);
  813. !         }
  814.           get_geom();
  815.           home(False);
  816. -         XMapWindow(DISP, WINDOW(mane));
  817. -         /* Wait for next event; this will likely be an expose event,
  818. -            so we don't redraw the window twice. */
  819. -         {
  820. -             XEvent event;
  821. -             XPeekEvent(DISP, &event);
  822. -         }
  823.   #else    /* TOOLKIT */
  824.           reconfig();
  825.           home(False);
  826. --- 1334,1344 ----
  827.               reset_fonts();
  828.           }
  829.   #ifdef    TOOLKIT
  830. !         draw_args[0].value = (XtArgVal) page_w;
  831. !         draw_args[1].value = (XtArgVal) page_h;
  832. !         XtSetValues(draw_widget, draw_args, (Cardinal) 2);
  833.           get_geom();
  834.           home(False);
  835.   #else    /* TOOLKIT */
  836.           reconfig();
  837.           home(False);
  838. ***************
  839. *** 1299,1305 ****
  840.       if (0 <= next_page && next_page < total_pages) {
  841.           if (current_page != next_page) {
  842.           current_page = next_page;
  843. !         spec_warn = True;
  844.           if (!keep_flag) home(False);
  845.           }
  846.           canit = True;
  847. --- 1362,1368 ----
  848.       if (0 <= next_page && next_page < total_pages) {
  849.           if (current_page != next_page) {
  850.           current_page = next_page;
  851. !         spec_warn_now = spec_warn;
  852.           if (!keep_flag) home(False);
  853.           }
  854.           canit = True;
  855. ***************
  856. *** 1566,1578 ****
  857.       }
  858.       else {
  859.           draw_page();
  860. !         spec_warn = False;
  861.       }
  862.   }
  863.   
  864.   redraw_page()
  865.   {
  866. !     if (debug & DBG_EVENT) fputs("Redraw page:  ", stdout);
  867.       get_xy();
  868.       ClearPage(mane);
  869.       mane.min_x = -window_x;
  870. --- 1629,1641 ----
  871.       }
  872.       else {
  873.           draw_page();
  874. !         spec_warn_now = False;
  875.       }
  876.   }
  877.   
  878.   redraw_page()
  879.   {
  880. !     if (debug & DBG_EVENT) Fputs("Redraw page:  ", stdout);
  881.       get_xy();
  882.       ClearPage(mane);
  883.       mane.min_x = -window_x;
  884. ***************
  885. *** 1610,1616 ****
  886.       windowrec->max_x = windowrec->max_y = 0;
  887.   }
  888.   
  889. ! static    int
  890.   handle_intr() {
  891.       event_counter = 1;
  892.       event_freq = -1;    /* forget Plan B */
  893. --- 1673,1679 ----
  894.       windowrec->max_x = windowrec->max_y = 0;
  895.   }
  896.   
  897. ! static    void
  898.   handle_intr() {
  899.       event_counter = 1;
  900.       event_freq = -1;    /* forget Plan B */
  901. ***************
  902. *** 1681,1703 ****
  903.   usage() {
  904.   #ifndef X10
  905.   #ifndef    VMS
  906. !     fputs("\
  907. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-S <density>] [-p <pixels>] [-l]\n\
  908.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  909. !     [-margins <inches>] [-sidemargin <inches>] [-topmargin <inches>] [-rv]\
  910.   \n\
  911.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  912.   [-cr <color>]\n\
  913.       [-bw <width>] [-geometry <geometry>] [-icongeometry <geometry>]\n\
  914.       [-iconic] [-display <host:display>] [-copy] [-thorough] dvi_file\n",
  915.       stderr);
  916.   #else    /* VMS */
  917. !     fputs("\
  918. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-density <%>] [-p <pixels>] [-l]\n\
  919.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  920. !     [-margins <inches>] [-sidemargin <inches>] [-topmargin <inches>] [-rv]\
  921.   \n", stderr);
  922. !     fputs("\
  923.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  924.   [-cr <color>]\n\
  925.       [-bw <width>] [-geometry <geometry>] [-icongeometry <geometry>]\n\
  926. --- 1744,1782 ----
  927.   usage() {
  928.   #ifndef X10
  929.   #ifndef    VMS
  930. ! #ifdef    BUTTONS
  931. !     Fputs("\
  932. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-S <density>] [-p <pixels>] [-l] [-sw]\n\
  933. !     [-expert] [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  934. !     [-margins <dimen>] [-sidemargin <dimen>] [-topmargin <dimen>] [-rv]\
  935. ! \n\
  936. !     [-offsets <dimen>] [-xoffset <dimen>] [-yoffset <dimen>]\n\
  937. !     [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  938. ! [-cr <color>]\n\
  939. !     [-bw <width>] [-geometry <geometry>] [-icongeometry <geometry>]\n\
  940. !     [-iconic] [-display <host:display>] [-copy] [-thorough] dvi_file\n",
  941. !     stderr);
  942. ! #else    /* !BUTTONS */
  943. !     Fputs("\
  944. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-S <density>] [-p <pixels>] [-l] [-sw]\n\
  945.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  946. !     [-margins <dimen>] [-sidemargin <dimen>] [-topmargin <dimen>] [-rv]\
  947.   \n\
  948. +     [-offsets <dimen>] [-xoffset <dimen>] [-yoffset <dimen>]\n\
  949.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  950.   [-cr <color>]\n\
  951.       [-bw <width>] [-geometry <geometry>] [-icongeometry <geometry>]\n\
  952.       [-iconic] [-display <host:display>] [-copy] [-thorough] dvi_file\n",
  953.       stderr);
  954. + #endif    /* BUTTONS */
  955.   #else    /* VMS */
  956. !     Fputs("\
  957. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-density <%>] [-p <pixels>] [-l] [-sw]\n\
  958.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  959. !     [-margins <dimen>] [-sidemargin <dimen>] [-topmargin <dimen>] [-rv]\
  960.   \n", stderr);
  961. !     Fputs("\
  962. !     [-offsets <dimen>] [-xoffset <dimen>] [-yoffset <dimen>]\n\
  963.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  964.   [-cr <color>]\n\
  965.       [-bw <width>] [-geometry <geometry>] [-icongeometry <geometry>]\n\
  966. ***************
  967. *** 1705,1715 ****
  968.       stderr);
  969.   #endif    /* VMS */
  970.   #else    /* X10 */
  971. !     fputs("\
  972. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-S <density>] [-p <pixels>] [-l]\n\
  973.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  974. !     [-margins <inches>] [-sidemargin <inches>] [-topmargin <inches>] [-rv]\
  975.   \n\
  976.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  977.   [-cr <color>]\n\
  978.       [-bw <width>] [-geometry <geometry> | =<geometry>]\n\
  979. --- 1784,1795 ----
  980.       stderr);
  981.   #endif    /* VMS */
  982.   #else    /* X10 */
  983. !     Fputs("\
  984. ! Usage: xdvi [+[<page>]] [-s <shrink>] [-S <density>] [-p <pixels>] [-l] [-sw]\n\
  985.       [-paper <papertype>] [-mgs[n] <size>] [-altfont <font>]\n\
  986. !     [-margins <dimen>] [-sidemargin <dimen>] [-topmargin <dimen>] [-rv]\
  987.   \n\
  988. +     [-offsets <dimen>] [-xoffset <dimen>] [-yoffset <dimen>]\n\
  989.       [-fg <color>] [-bg <color>] [-hl <color>] [-bd <color>] \
  990.   [-cr <color>]\n\
  991.       [-bw <width>] [-geometry <geometry> | =<geometry>]\n\
  992. ***************
  993. *** 1718,1723 ****
  994. --- 1798,1813 ----
  995.       exit(1);
  996.   }
  997.   
  998. + static    int
  999. + atopix(arg)
  1000. +     char    *arg;
  1001. + {
  1002. +     int    len    = strlen(arg);
  1003. + 
  1004. +     return (len > 2 && arg[len - 2] == 'c' && arg[len - 1] == 'm' ?
  1005. +         1.0 / 2.54 : 1.0) * atof(arg) * pixels_per_inch + 0.5;
  1006. + }
  1007. + 
  1008.   /**
  1009.    **    Main programs start here.
  1010.    **/
  1011. ***************
  1012. *** 1738,1750 ****
  1013.   #endif
  1014.   {"-density",    ".densityPercent", XrmoptionSepArg,    (caddr_t) NULL},
  1015.   {"-p",        ".pixelsPerInch", XrmoptionSepArg,    (caddr_t) NULL},
  1016. ! {"-margins",    ".margins",    XrmoptionSepArg,    (caddr_t) NULL},
  1017.   {"-sidemargin",    ".sideMargin",    XrmoptionSepArg,    (caddr_t) NULL},
  1018.   {"-topmargin",    ".topMargin",    XrmoptionSepArg,    (caddr_t) NULL},
  1019.   {"-paper",    ".paper",    XrmoptionSepArg,    (caddr_t) NULL},
  1020.   {"-altfont",    ".altFont",    XrmoptionSepArg,    (caddr_t) NULL},
  1021.   {"-l",        ".listFonts",    XrmoptionNoArg,        (caddr_t) "on"},
  1022.   {"+l",        ".listFonts",    XrmoptionNoArg,        (caddr_t) "off"},
  1023.   {"-fg",        ".foreground",    XrmoptionSepArg,    (caddr_t) NULL},
  1024.   {"-foreground",    ".foreground",    XrmoptionSepArg,    (caddr_t) NULL},
  1025.   {"-bg",        ".background",    XrmoptionSepArg,    (caddr_t) NULL},
  1026. --- 1828,1845 ----
  1027.   #endif
  1028.   {"-density",    ".densityPercent", XrmoptionSepArg,    (caddr_t) NULL},
  1029.   {"-p",        ".pixelsPerInch", XrmoptionSepArg,    (caddr_t) NULL},
  1030. ! {"-margins",    ".Margin",    XrmoptionSepArg,    (caddr_t) NULL},
  1031.   {"-sidemargin",    ".sideMargin",    XrmoptionSepArg,    (caddr_t) NULL},
  1032.   {"-topmargin",    ".topMargin",    XrmoptionSepArg,    (caddr_t) NULL},
  1033. + {"-offsets",    ".Offset",    XrmoptionSepArg,    (caddr_t) NULL},
  1034. + {"-xoffset",    ".xOffset",    XrmoptionSepArg,    (caddr_t) NULL},
  1035. + {"-yoffset",    ".yOffset",    XrmoptionSepArg,    (caddr_t) NULL},
  1036.   {"-paper",    ".paper",    XrmoptionSepArg,    (caddr_t) NULL},
  1037.   {"-altfont",    ".altFont",    XrmoptionSepArg,    (caddr_t) NULL},
  1038.   {"-l",        ".listFonts",    XrmoptionNoArg,        (caddr_t) "on"},
  1039.   {"+l",        ".listFonts",    XrmoptionNoArg,        (caddr_t) "off"},
  1040. + {"-sw",        ".specialWarn",    XrmoptionNoArg,        (caddr_t) "on"},
  1041. + {"+sw",        ".specialWarn",    XrmoptionNoArg,        (caddr_t) "off"},
  1042.   {"-fg",        ".foreground",    XrmoptionSepArg,    (caddr_t) NULL},
  1043.   {"-foreground",    ".foreground",    XrmoptionSepArg,    (caddr_t) NULL},
  1044.   {"-bg",        ".background",    XrmoptionSepArg,    (caddr_t) NULL},
  1045. ***************
  1046. *** 1756,1761 ****
  1047. --- 1851,1860 ----
  1048.   {"+copy",    ".copy",    XrmoptionNoArg,        (caddr_t) "off"},
  1049.   {"-thorough",    ".thorough",    XrmoptionNoArg,        (caddr_t) "on"},
  1050.   {"+thorough",    ".thorough",    XrmoptionNoArg,        (caddr_t) "off"},
  1051. + #ifdef    BUTTONS
  1052. + {"-expert",    ".expert",    XrmoptionNoArg,        (caddr_t) "on"},
  1053. + {"+expert",    ".expert",    XrmoptionNoArg,        (caddr_t) "off"},
  1054. + #endif
  1055.   {"-mgs",    ".magnifierSize1",XrmoptionSepArg,    (caddr_t) NULL},
  1056.   {"-mgs1",    ".magnifierSize1",XrmoptionSepArg,    (caddr_t) NULL},
  1057.   {"-mgs2",    ".magnifierSize2",XrmoptionSepArg,    (caddr_t) NULL},
  1058. ***************
  1059. *** 1773,1784 ****
  1060.     (Cardinal) &density, XtRInt, (caddr_t) &density},
  1061.   {"pixelsPerInch", "PixelsPerInch", XtRInt, sizeof(int),
  1062.     (Cardinal) &pixels_per_inch, XtRInt, (caddr_t) &pixels_per_inch},
  1063. - {"margins", "Margin", XtRString, sizeof(char *),
  1064. -   (Cardinal) &margins, XtRString, NULL},
  1065.   {"sideMargin", "Margin", XtRString, sizeof(char *),
  1066.     (Cardinal) &sidemargin, XtRString, NULL},
  1067.   {"topMargin", "Margin", XtRString, sizeof(char *),
  1068.     (Cardinal) &topmargin, XtRString, NULL},
  1069.   {"paper", "Paper", XtRString, sizeof(char *),
  1070.     (Cardinal) &paper, XtRString, (caddr_t) DEFAULT_PAPER},
  1071.   {"altFont", "AltFont", XtRString, sizeof(char *),
  1072. --- 1872,1885 ----
  1073.     (Cardinal) &density, XtRInt, (caddr_t) &density},
  1074.   {"pixelsPerInch", "PixelsPerInch", XtRInt, sizeof(int),
  1075.     (Cardinal) &pixels_per_inch, XtRInt, (caddr_t) &pixels_per_inch},
  1076.   {"sideMargin", "Margin", XtRString, sizeof(char *),
  1077.     (Cardinal) &sidemargin, XtRString, NULL},
  1078.   {"topMargin", "Margin", XtRString, sizeof(char *),
  1079.     (Cardinal) &topmargin, XtRString, NULL},
  1080. + {"xOffset", "Offset", XtRString, sizeof(char *),
  1081. +   (Cardinal) &xoffset, XtRString, NULL},
  1082. + {"yOffset", "Offset", XtRString, sizeof(char *),
  1083. +   (Cardinal) &yoffset, XtRString, NULL},
  1084.   {"paper", "Paper", XtRString, sizeof(char *),
  1085.     (Cardinal) &paper, XtRString, (caddr_t) DEFAULT_PAPER},
  1086.   {"altFont", "AltFont", XtRString, sizeof(char *),
  1087. ***************
  1088. *** 1787,1792 ****
  1089. --- 1888,1895 ----
  1090.     (Cardinal) &list_fonts, XtRBoolean, (caddr_t) &list_fonts},
  1091.   {"reverseVideo", "ReverseVideo", XtRBoolean, sizeof(Boolean),
  1092.     (Cardinal) &reverse, XtRBoolean, (caddr_t) &reverse},
  1093. + {"specialWarn", "SpecialWarn", XtRBoolean, sizeof(Boolean),
  1094. +   (Cardinal) &spec_warn, XtRBoolean, (caddr_t) &spec_warn},
  1095.   {"foreground", "Foreground", XtRPixel, sizeof(Pixel),
  1096.     (Cardinal)&fore_Pixel, XtRPixel, (caddr_t) &fore_Pixel},
  1097.   {"foreground", "Foreground", XtRString, sizeof(char *),
  1098. ***************
  1099. *** 1813,1818 ****
  1100. --- 1916,1925 ----
  1101.     (Cardinal)©, XtRBoolean, (caddr_t) ©},
  1102.   {"thorough", "Thorough", XtRBoolean, sizeof(Boolean),
  1103.     (Cardinal)&thorough, XtRBoolean, (caddr_t) &thorough},
  1104. + #ifdef    BUTTONS
  1105. + {"expert", "Expert", XtRBoolean, sizeof(Boolean),
  1106. +   (Cardinal)&expert, XtRBoolean, (caddr_t) &expert},
  1107. + #endif
  1108.   {"magnifierSize1", "MagnifierSize", XtRInt, sizeof(int),
  1109.     (Cardinal) &mg_size[0], XtRInt, (caddr_t) &mg_size[0]},
  1110.   {"magnifierSize2", "MagnifierSize", XtRInt, sizeof(int),
  1111. ***************
  1112. *** 1837,1842 ****
  1113. --- 1944,1950 ----
  1114.       {XtNheight,    (XtArgVal) 0},
  1115.       {XtNiconPixmap,    (XtArgVal) 0},
  1116.       {XtNinput,    (XtArgVal) True},
  1117. +     {XtNtitle,    (XtArgVal) 0},
  1118.   };
  1119.   
  1120.   #else    /* !TOOLKIT */
  1121. ***************
  1122. *** 1843,1848 ****
  1123. --- 1951,1958 ----
  1124.   
  1125.   static    char    *display;
  1126.   static    char    *geometry;
  1127. + static    char    *margins;
  1128. + static    char    *offsets;
  1129.   
  1130.   #ifndef X10
  1131.   static    Boolean    iconic    = False;
  1132. ***************
  1133. *** 1879,1933 ****
  1134.       char    *resource;
  1135.       enum    {FalseArg, TrueArg, StickyArg, SepArg} argclass;
  1136.       enum    {BooleanArg, StringArg, NumberArg} argtype;
  1137.       caddr_t    address;
  1138.   }    options[] = {
  1139.           /* the display option MUST be first */
  1140. ! {"-display",    NULL,        SepArg,    StringArg,    (caddr_t) &display},
  1141. ! {"-d",        "debugLevel",    SepArg,    StringArg,    (caddr_t) &debug_arg},
  1142. ! {"+",        NULL,        StickyArg, StringArg,    (caddr_t) &curr_page},
  1143. ! {"-s",        "shrinkFactor", SepArg, NumberArg,    (caddr_t) &shrink_factor},
  1144. ! {"-S",        "densityPercent", SepArg, NumberArg,    (caddr_t) &density},
  1145. ! {"-density",    NULL,        SepArg, NumberArg,    (caddr_t) &density},
  1146. ! {"-p",        "pixelsPerInch", SepArg, NumberArg,    (caddr_t) &pixels_per_inch},
  1147. ! {"-margins",    "margins",    SepArg,    StringArg,    (caddr_t) &margins},
  1148. ! {"-sidemargin",    "sideMargin",    SepArg,    StringArg,    (caddr_t) &sidemargin},
  1149. ! {"-topmargin",    "topMargin",    SepArg,    StringArg,    (caddr_t) &topmargin},
  1150. ! {"-paper",    "paper",    SepArg,    StringArg,    (caddr_t) &paper},
  1151. ! {"-altfont",    "altFont",    SepArg,    StringArg,    (caddr_t) &alt_font},
  1152. ! {"-l",        "listFonts",    TrueArg, BooleanArg,    (caddr_t) &list_fonts},
  1153. ! {"+l",        NULL,        FalseArg, BooleanArg,    (caddr_t) &list_fonts},
  1154. ! {"-rv",        "reverseVideo",    TrueArg, BooleanArg,    (caddr_t) &reverse},
  1155. ! {"+rv",        NULL,        FalseArg, BooleanArg,    (caddr_t) &reverse},
  1156. ! {"-bw",        "borderWidth",    SepArg,    NumberArg,    (caddr_t) &bwidth},
  1157. ! {"-borderwidth", NULL,        SepArg,    NumberArg,    (caddr_t) &bwidth},
  1158. ! {"-fg",        "foreground",    SepArg,    StringArg,    (caddr_t) &fore_color},
  1159. ! {"-foreground",    NULL,        SepArg,    StringArg,    (caddr_t) &fore_color},
  1160. ! {"-bg",        "background",    SepArg,    StringArg,    (caddr_t) &back_color},
  1161. ! {"-background",    NULL,        SepArg,    StringArg,    (caddr_t) &back_color},
  1162. ! {"-bd",        "borderColor",    SepArg,    StringArg,    (caddr_t) &brdr_color},
  1163. ! {"-bordercolor",NULL,        SepArg,    StringArg,    (caddr_t) &brdr_color},
  1164. ! {"-hl",        "highlight",    SepArg,    StringArg,    (caddr_t) &high_color},
  1165. ! {"-cr",        "cursorColor",    SepArg,    StringArg,    (caddr_t) &curs_color},
  1166. ! {"-geometry",    "geometry",    SepArg,    StringArg,    (caddr_t) &geometry},
  1167.   #ifdef    X10
  1168. ! {"=",        NULL,        StickyArg, StringArg,    (caddr_t) &geometry},
  1169.   #endif
  1170.   #ifndef    X10
  1171. ! {"-icongeometry","iconGeometry",StickyArg, StringArg,    (caddr_t) &icon_geometry},
  1172. ! {"-iconic",    "iconic",    TrueArg, BooleanArg,    (caddr_t) &iconic},
  1173. ! {"+iconic",    NULL,        FalseArg, BooleanArg,    (caddr_t) &iconic},
  1174. ! {"-copy",    "copy",        TrueArg, BooleanArg,    (caddr_t) ©},
  1175. ! {"+copy",    NULL,        FalseArg, BooleanArg,    (caddr_t) ©},
  1176. ! {"-thorough",    "thorough",    TrueArg, BooleanArg,    (caddr_t) &thorough},
  1177. ! {"+thorough",    NULL,        FalseArg, BooleanArg,    (caddr_t) &thorough},
  1178.   #endif    /* X10 */
  1179. ! {"-mgs",    NULL,        SepArg, NumberArg,    (caddr_t) &mg_size[0]},
  1180. ! {"-mgs1",    "magnifierSize1",SepArg, NumberArg,    (caddr_t) &mg_size[0]},
  1181. ! {"-mgs2",    "magnifierSize2",SepArg, NumberArg,    (caddr_t) &mg_size[1]},
  1182. ! {"-mgs3",    "magnifierSize3",SepArg, NumberArg,    (caddr_t) &mg_size[2]},
  1183.   #ifndef X10
  1184. ! {"-mgs4",    "magnifierSize3",SepArg, NumberArg,    (caddr_t) &mg_size[3]},
  1185. ! {"-mgs5",    "magnifierSize3",SepArg, NumberArg,    (caddr_t) &mg_size[4]},
  1186.   #endif
  1187.   };
  1188.   
  1189. --- 1989,2049 ----
  1190.       char    *resource;
  1191.       enum    {FalseArg, TrueArg, StickyArg, SepArg} argclass;
  1192.       enum    {BooleanArg, StringArg, NumberArg} argtype;
  1193. +     int    classcount;
  1194.       caddr_t    address;
  1195.   }    options[] = {
  1196.           /* the display option MUST be first */
  1197. ! {"-display",    NULL,        SepArg,    StringArg, 1,    (caddr_t) &display},
  1198. ! {"-d",        "debugLevel",    SepArg,    StringArg, 1,    (caddr_t) &debug_arg},
  1199. ! {"+",        NULL,        StickyArg, StringArg, 1,(caddr_t) &curr_page},
  1200. ! {"-s",        "shrinkFactor", SepArg, NumberArg, 1,    (caddr_t) &shrink_factor},
  1201. ! {"-S",        NULL,        SepArg, NumberArg, 2,    (caddr_t) &density},
  1202. ! {"-density",    "densityPercent", SepArg, NumberArg, 1,    (caddr_t) &density},
  1203. ! {"-p",        "pixelsPerInch", SepArg, NumberArg, 1,    (caddr_t) &pixels_per_inch},
  1204. ! {"-margins",    "Margin",    SepArg,    StringArg, 3,    (caddr_t) &margins},
  1205. ! {"-sidemargin",    "sideMargin",    SepArg,    StringArg, 1,    (caddr_t) &sidemargin},
  1206. ! {"-topmargin",    "topMargin",    SepArg,    StringArg, 1,    (caddr_t) &topmargin},
  1207. ! {"-offsets",    "Offset",    SepArg,    StringArg, 3,    (caddr_t) &offsets},
  1208. ! {"-xoffset",    "xOffset",    SepArg,    StringArg, 1,    (caddr_t) &xoffset},
  1209. ! {"-yoffset",    "yOffset",    SepArg,    StringArg, 1,    (caddr_t) &yoffset},
  1210. ! {"-paper",    "paper",    SepArg,    StringArg, 1,    (caddr_t) &paper},
  1211. ! {"-altfont",    "altFont",    SepArg,    StringArg, 1,    (caddr_t) &alt_font},
  1212. ! {"-l",        NULL,        TrueArg, BooleanArg, 2,    (caddr_t) &list_fonts},
  1213. ! {"+l",        "listFonts",    FalseArg, BooleanArg, 1,(caddr_t) &list_fonts},
  1214. ! {"-rv",        NULL,        TrueArg, BooleanArg, 2,    (caddr_t) &reverse},
  1215. ! {"+rv",        "reverseVideo",    FalseArg, BooleanArg, 1,(caddr_t) &reverse},
  1216. ! {"-sw",        NULL,        TrueArg, BooleanArg, 2,    (caddr_t) &spec_warn},
  1217. ! {"+sw",        "specialWarn",    FalseArg, BooleanArg, 1,(caddr_t) &spec_warn},
  1218. ! {"-bw",        NULL,        SepArg,    NumberArg, 2,    (caddr_t) &bwidth},
  1219. ! {"-borderwidth", "borderWidth",    SepArg,    NumberArg, 1,    (caddr_t) &bwidth},
  1220. ! {"-fg",        NULL,        SepArg,    StringArg, 2,    (caddr_t) &fore_color},
  1221. ! {"-foreground",    "foreground",    SepArg,    StringArg, 1,    (caddr_t) &fore_color},
  1222. ! {"-bg",        NULL,        SepArg,    StringArg, 2,    (caddr_t) &back_color},
  1223. ! {"-background",    "background",    SepArg,    StringArg, 1,    (caddr_t) &back_color},
  1224. ! {"-bd",        NULL,        SepArg,    StringArg, 2,    (caddr_t) &brdr_color},
  1225. ! {"-bordercolor","borderColor",    SepArg,    StringArg, 1,    (caddr_t) &brdr_color},
  1226. ! {"-hl",        "highlight",    SepArg,    StringArg, 1,    (caddr_t) &high_color},
  1227. ! {"-cr",        "cursorColor",    SepArg,    StringArg, 1,    (caddr_t) &curs_color},
  1228.   #ifdef    X10
  1229. ! {"=",        NULL,        StickyArg, StringArg, 2,(caddr_t) &geometry},
  1230.   #endif
  1231. + {"-geometry",    "geometry",    SepArg,    StringArg, 1,    (caddr_t) &geometry},
  1232.   #ifndef    X10
  1233. ! {"-icongeometry","iconGeometry",StickyArg, StringArg, 1,(caddr_t) &icon_geometry},
  1234. ! {"-iconic",    NULL,        TrueArg, BooleanArg, 2,    (caddr_t) &iconic},
  1235. ! {"+iconic",    "iconic",    FalseArg, BooleanArg, 1,(caddr_t) &iconic},
  1236. ! {"-copy",    NULL,        TrueArg, BooleanArg, 2,    (caddr_t) ©},
  1237. ! {"+copy",    "copy",        FalseArg, BooleanArg, 1,(caddr_t) ©},
  1238. ! {"-thorough",    NULL,        TrueArg, BooleanArg, 2,    (caddr_t) &thorough},
  1239. ! {"+thorough",    "thorough",    FalseArg, BooleanArg, 1,(caddr_t) &thorough},
  1240.   #endif    /* X10 */
  1241. ! {"-mgs",    NULL,        SepArg, NumberArg, 2,    (caddr_t) &mg_size[0]},
  1242. ! {"-mgs1",    "magnifierSize1",SepArg, NumberArg, 1,    (caddr_t) &mg_size[0]},
  1243. ! {"-mgs2",    "magnifierSize2",SepArg, NumberArg, 1,    (caddr_t) &mg_size[1]},
  1244. ! {"-mgs3",    "magnifierSize3",SepArg, NumberArg, 1,    (caddr_t) &mg_size[2]},
  1245.   #ifndef X10
  1246. ! {"-mgs4",    "magnifierSize4",SepArg, NumberArg, 1,    (caddr_t) &mg_size[3]},
  1247. ! {"-mgs5",    "magnifierSize5",SepArg, NumberArg, 1,    (caddr_t) &mg_size[4]},
  1248.   #endif
  1249.   };
  1250.   
  1251. ***************
  1252. *** 1946,1952 ****
  1253.       char    *optstring;
  1254.       caddr_t    addr;
  1255.       struct option *opt, *candidate;
  1256. !     int    len1, len2, matchlen;
  1257.   
  1258.       for (arg = argv + 1; arg < argvend; ++arg) {
  1259.           len1 = strlen(*arg);
  1260. --- 2062,2068 ----
  1261.       char    *optstring;
  1262.       caddr_t    addr;
  1263.       struct option *opt, *candidate;
  1264. !     int    len1, len2, matchlen, i;
  1265.   
  1266.       for (arg = argv + 1; arg < argvend; ++arg) {
  1267.           len1 = strlen(*arg);
  1268. ***************
  1269. *** 1989,1996 ****
  1270.           }
  1271.           }
  1272.           addr = candidate->address;
  1273. -         for (opt = options; opt < options + XtNumber(options); ++opt)
  1274. -         if (opt->address == addr) opt->resource = NULL;
  1275.           switch (candidate->argclass) {
  1276.           case FalseArg:    *((Boolean *) addr) = False; break;
  1277.           case TrueArg:    *((Boolean *) addr) = True; break;
  1278. --- 2105,2110 ----
  1279. ***************
  1280. *** 2006,2011 ****
  1281. --- 2120,2127 ----
  1282.           case StringArg:    *((char **) addr) = optstring; break;
  1283.           case NumberArg:    *((int *) addr) = atoi(optstring); break;
  1284.           }
  1285. +         for (i = candidate->classcount; i > 0; --i)
  1286. +         (candidate++)->resource = NULL;
  1287.       }
  1288.   
  1289.   #ifndef X10
  1290. ***************
  1291. *** 2035,2040 ****
  1292. --- 2151,2161 ----
  1293.               *((Boolean *) opt->address) =
  1294.                   (strcmp(optstring, "on") == 0);
  1295.           }
  1296. + 
  1297. +     if (!sidemargin) sidemargin = margins;
  1298. +     if (!topmargin) topmargin = margins;
  1299. +     if (!xoffset) xoffset = offsets;
  1300. +     if (!yoffset) yoffset = offsets;
  1301.   }
  1302.   
  1303.   #endif    /* TOOLKIT */
  1304. ***************
  1305. *** 2102,2140 ****
  1306.   
  1307.   static    Boolean
  1308.   set_paper_type() {
  1309.       char    temp[21];
  1310. -     int    i;
  1311. -     double    factor    = 1.0;
  1312. -     char    c;
  1313.       char    **p;
  1314.       char    *q;
  1315.   
  1316.       if (strlen(paper) > sizeof(temp) - 1) return False;
  1317. !     i = 0;
  1318.       for (;;) {    /* convert to lower case */
  1319. !         c = paper[i];
  1320.           if (c >= 'A' && c <= 'Z') c ^= ('a' ^ 'A');
  1321. !         temp[i] = c;
  1322.           if (c == '\0') break;
  1323. -         ++i;
  1324.       }
  1325.       /* perform substitutions */
  1326.       for (p = paper_types; p < paper_types + XtNumber(paper_types); p += 2)
  1327.           if (strcmp(temp, *p) == 0) {
  1328. !         (void) strcpy(temp, p[1]);
  1329. !         i = strlen(temp);
  1330.           break;
  1331.           }
  1332. !     if (i > 2 && strcmp(temp + i - 2, "cm") == 0) {
  1333. !         factor = 1.0 / 2.54;
  1334. !         temp[i - 2] = '\0';
  1335. !     }
  1336. !     q = index(temp, 'x');
  1337.       if (q == NULL) return False;
  1338. !     *q = '\0';
  1339. !     factor *= pixels_per_inch;
  1340. !     unshrunk_paper_w = atof(temp) * factor + 0.5;
  1341. !     unshrunk_paper_h = atof(q + 1) * factor + 0.5;
  1342.       return (unshrunk_paper_w != 0 && unshrunk_paper_h != 0);
  1343.   }
  1344.   
  1345. --- 2223,2253 ----
  1346.   
  1347.   static    Boolean
  1348.   set_paper_type() {
  1349. +     char    *arg;
  1350.       char    temp[21];
  1351.       char    **p;
  1352.       char    *q;
  1353.   
  1354.       if (strlen(paper) > sizeof(temp) - 1) return False;
  1355. !     arg = paper;
  1356. !     q = temp;
  1357.       for (;;) {    /* convert to lower case */
  1358. !         char c = *arg++;
  1359.           if (c >= 'A' && c <= 'Z') c ^= ('a' ^ 'A');
  1360. !         *q++ = c;
  1361.           if (c == '\0') break;
  1362.       }
  1363. +     arg = temp;
  1364.       /* perform substitutions */
  1365.       for (p = paper_types; p < paper_types + XtNumber(paper_types); p += 2)
  1366.           if (strcmp(temp, *p) == 0) {
  1367. !         arg = p[1];
  1368.           break;
  1369.           }
  1370. !     q = index(arg, 'x');
  1371.       if (q == NULL) return False;
  1372. !     unshrunk_paper_w = atopix(arg);
  1373. !     unshrunk_paper_h = atopix(q + 1);
  1374.       return (unshrunk_paper_w != 0 && unshrunk_paper_h != 0);
  1375.   }
  1376.   
  1377. ***************
  1378. *** 2149,2156 ****
  1379.   
  1380.   #ifdef    TOOLKIT
  1381.   #ifdef    BUTTONS
  1382. !     Widget    form_widget;
  1383. !     Widget    right_widget;
  1384.   #endif
  1385.   #else    /* !TOOLKIT */
  1386.   #ifndef X10
  1387. --- 2262,2268 ----
  1388.   
  1389.   #ifdef    TOOLKIT
  1390.   #ifdef    BUTTONS
  1391. !     int        xtra_wid;
  1392.   #endif
  1393.   #else    /* !TOOLKIT */
  1394.   #ifndef X10
  1395. ***************
  1396. *** 2190,2196 ****
  1397.   
  1398.       XtGetApplicationResources(top_level, (caddr_t) NULL, resources,
  1399.           XtNumber(resources), NULL, 0);
  1400. -     if (shrink_factor <= 0 || density <= 0 || pixels_per_inch <= 0) usage();
  1401.       DISP = XtDisplay(top_level);
  1402.       SCRN = XtScreen(top_level);
  1403.   
  1404. --- 2302,2307 ----
  1405. ***************
  1406. *** 2204,2222 ****
  1407.       if (high_color) hl_Pixel = string_to_pixel(&high_color);
  1408.       if (curs_color) cr_Pixel = string_to_pixel(&curs_color);
  1409.   #endif
  1410. -     if (shrink_factor <= 0 || density <= 0 || pixels_per_inch <= 0 ||
  1411. -         dvi_name == NULL) usage();
  1412.   
  1413.   #endif    /* TOOLKIT */
  1414.   
  1415.       if (shrink_factor != 1) bak_shrink = shrink_factor;
  1416.       mane.shrinkfactor = shrink_factor;
  1417.       specialConv = pixels_per_inch / 1000.0;
  1418.       if (debug_arg != NULL)
  1419.           debug = isdigit(*debug_arg) ? atoi(debug_arg) : DBG_ALL;
  1420. !     if (margins) home_x = home_y = atof(margins) * pixels_per_inch;
  1421. !     if (sidemargin) home_x = atof(sidemargin) * pixels_per_inch;
  1422. !     if (topmargin) home_y = atof(topmargin) * pixels_per_inch;
  1423.       if (!set_paper_type()) oops("Don't recognize paper type %s", paper);
  1424.   
  1425.       init_pxl_open();
  1426. --- 2315,2334 ----
  1427.       if (high_color) hl_Pixel = string_to_pixel(&high_color);
  1428.       if (curs_color) cr_Pixel = string_to_pixel(&curs_color);
  1429.   #endif
  1430.   
  1431.   #endif    /* TOOLKIT */
  1432.   
  1433. +     if (shrink_factor <= 0 || density <= 0 || pixels_per_inch <= 0 ||
  1434. +         dvi_name == NULL) usage();
  1435.       if (shrink_factor != 1) bak_shrink = shrink_factor;
  1436.       mane.shrinkfactor = shrink_factor;
  1437.       specialConv = pixels_per_inch / 1000.0;
  1438.       if (debug_arg != NULL)
  1439.           debug = isdigit(*debug_arg) ? atoi(debug_arg) : DBG_ALL;
  1440. !     if (sidemargin) home_x = atopix(sidemargin);
  1441. !     if (topmargin) home_y = atopix(topmargin);
  1442. !     offset_x = xoffset ? atopix(xoffset) : pixels_per_inch;
  1443. !     offset_y = yoffset ? atopix(yoffset) : pixels_per_inch;
  1444.       if (!set_paper_type()) oops("Don't recognize paper type %s", paper);
  1445.   
  1446.       init_pxl_open();
  1447. ***************
  1448. *** 2309,2323 ****
  1449.       screen_w = WidthOfScreen(SCRN) - 2*bwidth;
  1450.       screen_h = HeightOfScreen(SCRN) - 2*bwidth;
  1451.   #ifdef    BUTTONS
  1452. !     temp_args3[0].value = (XtArgVal) (page_w + XTRA_WID < screen_w ?
  1453. !                       page_w + XTRA_WID : screen_w);
  1454.   #else
  1455. !     temp_args3[0].value = (XtArgVal) (page_w<screen_w ? page_w : screen_w);
  1456.   #endif
  1457.       temp_args3[1].value = (XtArgVal) (page_h<screen_h ? page_h : screen_h);
  1458.       temp_args3[2].value = (XtArgVal) (XCreateBitmapFromData(DISP,
  1459.                   RootWindowOfScreen(SCRN),
  1460.                   xdvi_bits, xdvi_width, xdvi_height));
  1461.       XtSetValues(top_level, temp_args3, XtNumber(temp_args3));
  1462.   
  1463.   #ifdef    BUTTONS
  1464. --- 2421,2437 ----
  1465.       screen_w = WidthOfScreen(SCRN) - 2*bwidth;
  1466.       screen_h = HeightOfScreen(SCRN) - 2*bwidth;
  1467.   #ifdef    BUTTONS
  1468. !     xtra_wid = expert ? 0 : XTRA_WID;
  1469.   #else
  1470. ! #define    xtra_wid    0
  1471.   #endif
  1472. +     temp_args3[0].value = (XtArgVal) (page_w + xtra_wid < screen_w ?
  1473. +                       page_w + xtra_wid : screen_w);
  1474.       temp_args3[1].value = (XtArgVal) (page_h<screen_h ? page_h : screen_h);
  1475.       temp_args3[2].value = (XtArgVal) (XCreateBitmapFromData(DISP,
  1476.                   RootWindowOfScreen(SCRN),
  1477.                   xdvi_bits, xdvi_width, xdvi_height));
  1478. +     temp_args3[4].value = (XtArgVal) dvi_name;
  1479.       XtSetValues(top_level, temp_args3, XtNumber(temp_args3));
  1480.   
  1481.   #ifdef    BUTTONS
  1482. ***************
  1483. *** 2324,2358 ****
  1484.       form_widget = XtCreateManagedWidget("form", formWidgetClass,
  1485.           top_level, form_args, XtNumber(form_args));
  1486.   
  1487. !     vport_args[0].value = temp_args3[0].value - XTRA_WID;
  1488.       vport_args[1].value = temp_args3[1].value;
  1489.       vport_widget = XtCreateManagedWidget("vport", viewportWidgetClass,
  1490.           form_widget, vport_args, XtNumber(vport_args));
  1491.   
  1492.       line_args[0].value = (XtArgVal) high_color ? hl_Pixel : fore_Pixel;
  1493. !     line_args[2].value = temp_args3[1].value;
  1494. !     line_args[3].value = (XtArgVal) vport_widget;
  1495. !     right_args[0].value = (XtArgVal) XtCreateManagedWidget("line",
  1496. !         widgetClass, form_widget, line_args, XtNumber(line_args));
  1497. !     right_args[2].value = temp_args3[1].value;
  1498. !     right_widget = XtCreateManagedWidget("right", compositeWidgetClass,
  1499. !         form_widget, right_args, XtNumber(right_args));
  1500. ! 
  1501. !     command_args[2].value = (XtArgVal) vport_widget;
  1502. !     {
  1503. !         int i;
  1504. !         for (i = 0; i < XtNumber(command_table); ++i) {
  1505. !         command_args[0].value = (XtArgVal) command_table[i].label;
  1506. !         command_args[2].value = (XtArgVal) command_table[i].y_pos;
  1507. !         command_call[0].closure = (caddr_t) command_table[i].closure;
  1508. !         (void) XtCreateManagedWidget(command_table[i].name,
  1509. !             commandWidgetClass, right_widget,
  1510. !             command_args, XtNumber(command_args));
  1511. !         }
  1512. !     }
  1513.   #else    /* !BUTTONS */
  1514.       vport_widget = XtCreateManagedWidget("vport", viewportWidgetClass,
  1515.           top_level, vport_args, XtNumber(vport_args));
  1516.   #endif    /* BUTTONS */
  1517.       clip_widget = XtNameToWidget(vport_widget, "clip");
  1518.       draw_args[0].value = (XtArgVal) page_w;
  1519. --- 2438,2454 ----
  1520.       form_widget = XtCreateManagedWidget("form", formWidgetClass,
  1521.           top_level, form_args, XtNumber(form_args));
  1522.   
  1523. !     vport_args[0].value = temp_args3[0].value - xtra_wid;
  1524.       vport_args[1].value = temp_args3[1].value;
  1525.       vport_widget = XtCreateManagedWidget("vport", viewportWidgetClass,
  1526.           form_widget, vport_args, XtNumber(vport_args));
  1527.   
  1528.       line_args[0].value = (XtArgVal) high_color ? hl_Pixel : fore_Pixel;
  1529. !     if (!expert) create_buttons(temp_args3[1].value);
  1530.   #else    /* !BUTTONS */
  1531.       vport_widget = XtCreateManagedWidget("vport", viewportWidgetClass,
  1532.           top_level, vport_args, XtNumber(vport_args));
  1533. + #define    form_widget    vport_widget    /* for calls to XtAddEventHandler */
  1534.   #endif    /* BUTTONS */
  1535.       clip_widget = XtNameToWidget(vport_widget, "clip");
  1536.       draw_args[0].value = (XtArgVal) page_w;
  1537. ***************
  1538. *** 2364,2370 ****
  1539.           XtSetValues(draw_widget, &back_args, 1);
  1540.           XtSetValues(clip_widget, &back_args, 1);
  1541.       }
  1542. !     XtAddEventHandler(vport_widget, KeyPressMask, False, handle_key,
  1543.           (caddr_t) NULL);
  1544.       XtAddEventHandler(vport_widget, StructureNotifyMask, False,
  1545.           handle_resize, (caddr_t) NULL);
  1546. --- 2460,2466 ----
  1547.           XtSetValues(draw_widget, &back_args, 1);
  1548.           XtSetValues(clip_widget, &back_args, 1);
  1549.       }
  1550. !     XtAddEventHandler(form_widget, KeyPressMask, False, handle_key,
  1551.           (caddr_t) NULL);
  1552.       XtAddEventHandler(vport_widget, StructureNotifyMask, False,
  1553.           handle_resize, (caddr_t) NULL);
  1554. ***************
  1555. *** 2445,2450 ****
  1556. --- 2541,2554 ----
  1557.   
  1558.   #endif    /* TOOLKIT */
  1559.   
  1560. +     XRebindKeysym(DISP, XK_Home, NULL, 0, (ubyte *) "^", 1);
  1561. +     XRebindKeysym(DISP, XK_Left, NULL, 0, (ubyte *) "l", 1);
  1562. +     XRebindKeysym(DISP, XK_Up, NULL, 0, (ubyte *) "u", 1);
  1563. +     XRebindKeysym(DISP, XK_Right, NULL, 0, (ubyte *) "r", 1);
  1564. +     XRebindKeysym(DISP, XK_Down, NULL, 0, (ubyte *) "d", 1);
  1565. +     XRebindKeysym(DISP, XK_Prior, NULL, 0, (ubyte *) "b", 1);
  1566. +     XRebindKeysym(DISP, XK_Next, NULL, 0, (ubyte *) "f", 1);
  1567. + 
  1568.       image = XCreateImage(DISP, DefaultVisualOfScreen(SCRN), 1, XYBitmap, 0,
  1569.                    (char *)NULL, 0, 0, BITS_PER_BMUNIT, 0);
  1570.       image->bitmap_unit = BITS_PER_BMUNIT;
  1571. ***************
  1572. *** 2533,2536 ****
  1573. --- 2637,2643 ----
  1574.   #endif    /* X10 */
  1575.   
  1576.       do_pages();
  1577. + #ifdef    lint
  1578. +     return 0;
  1579. + #endif
  1580.   }
  1581. diff -cr xdvi_old/xdvi.h xdvi_new/xdvi.h
  1582. *** xdvi_old/xdvi.h    Mon Sep 17 17:36:48 1990
  1583. --- xdvi_new/xdvi.h    Wed Oct 10 11:26:37 1990
  1584. ***************
  1585. *** 40,46 ****
  1586. --- 40,50 ----
  1587.   #define    Sprintf    (void) sprintf
  1588.   #define    Fseek    (void) fseek
  1589.   #define    Fread    (void) fread
  1590. + #define    Fputs    (void) fputs
  1591. + #define    Putc    (void) putc
  1592. + #define    Putchar    (void) putchar
  1593.   #define    Fclose    (void) fclose
  1594. + #define    Strcpy    (void) strcpy
  1595.   
  1596.   unsigned long num();
  1597.   long snum();
  1598. ***************
  1599. *** 143,149 ****
  1600.   /*
  1601.    * Mechanism for reducing repeated warning about specials.
  1602.    */
  1603. ! extern    Boolean    spec_warn;
  1604.   
  1605.   
  1606.   /*
  1607. --- 147,153 ----
  1608.   /*
  1609.    * Mechanism for reducing repeated warning about specials.
  1610.    */
  1611. ! extern    Boolean    spec_warn, spec_warn_now;
  1612.   
  1613.   
  1614.   /*
  1615. ***************
  1616. *** 189,197 ****
  1617.       /* struct font *fp; */
  1618.       /* ubyte ch; */
  1619.   
  1620. !     /* the corresponding read_font_index procedures occur in pxl_open.c */
  1621.   typedef    void (*read_font_index_proc)();
  1622.       /* struct font *fontp; */
  1623.   
  1624.   struct font {
  1625.       struct font *next;        /* link to next font info block */
  1626. --- 193,202 ----
  1627.       /* struct font *fp; */
  1628.       /* ubyte ch; */
  1629.   
  1630. !     /* the corresponding read_font_index procedures occur in dvi_init.c */
  1631.   typedef    void (*read_font_index_proc)();
  1632.       /* struct font *fontp; */
  1633. + extern    read_font_index_proc read_GF_index, read_PK_index, read_PXL_index;
  1634.   
  1635.   struct font {
  1636.       struct font *next;        /* link to next font info block */
  1637. ***************
  1638. *** 221,231 ****
  1639.   #define DBG_PK          0x4
  1640.   #define DBG_BATCH       0x8
  1641.   #define    DBG_EVENT    0x10
  1642. ! #define DBG_ALL        (DBG_BITMAP|DBG_DVI|DBG_PK|DBG_EVENT)
  1643.   
  1644.   extern    Boolean    list_fonts;
  1645.   
  1646.   extern    int    pixels_per_inch;
  1647.   extern    int    unshrunk_paper_w, unshrunk_paper_h;
  1648.   extern    int    unshrunk_page_w, unshrunk_page_h;
  1649.   extern    int    density;
  1650. --- 226,238 ----
  1651.   #define DBG_PK          0x4
  1652.   #define DBG_BATCH       0x8
  1653.   #define    DBG_EVENT    0x10
  1654. ! #define    DBG_OPEN    0x20
  1655. ! #define DBG_ALL        (DBG_BITMAP|DBG_DVI|DBG_PK|DBG_EVENT|DBG_OPEN)
  1656.   
  1657.   extern    Boolean    list_fonts;
  1658.   
  1659.   extern    int    pixels_per_inch;
  1660. + extern    int    offset_x, offset_y;
  1661.   extern    int    unshrunk_paper_w, unshrunk_paper_h;
  1662.   extern    int    unshrunk_page_w, unshrunk_page_h;
  1663.   extern    int    density;
  1664. ***************
  1665. *** 232,237 ****
  1666. --- 239,245 ----
  1667.   
  1668.   extern    char    *dvi_name;
  1669.   extern    FILE    *dvi_file;                /* user's file */
  1670. + extern    char    *alt_font;
  1671.   extern    char    *prog;
  1672.   
  1673.   extern    struct    WindowRec {
  1674. diff -cr xdvi_old/xdvi_man.sed xdvi_new/xdvi_man.sed
  1675. *** xdvi_old/xdvi_man.sed    Mon Sep 17 17:36:59 1990
  1676. --- xdvi_new/xdvi_man.sed    Wed Sep 26 16:42:39 1990
  1677. ***************
  1678. *** 9,21 ****
  1679.   .B xdvi
  1680.   .nh
  1681.   [+[\fIpage\fP]] [\-s \fIshrink\fP] [\-S \fIdensity\fP] [\-p \fIpixels\fP] [\-l]
  1682. ! [\-paper \fIpapertype\fP] [\-mgs[\fIn\fP] \fIsize\fP] [\-altfont \fIfont\fP]
  1683. ! [\-margins \fIinches\fP] [\-sidemargin \fIinches\fP] [\-topmargin \fIinches\fP]
  1684.   [\-rv] [\-fg \fIcolor\fP] [\-bg \fIcolor\fP]
  1685.   [\-hl \fIcolor\fP] [\-bd \fIcolor\fP] [\-cr \fIcolor\fP] [\-bw \fIwidth\fP]
  1686.   #ifx11
  1687. ! [\-geometry \fIgeometry\fP] [-icongeometry \fIgeometry\fP] [-iconic]
  1688. ! [\-display \fIdisplay\fP] [-copy] [-thorough]
  1689.   #ifx10
  1690.   [\-geometry \fIgeometry\fP | =\fIgeometry\fP]
  1691.   [\-display \fIhost\fP:\fIdisplay\fP | \fIhost\fP:\fIdisplay\fP]
  1692. --- 9,25 ----
  1693.   .B xdvi
  1694.   .nh
  1695.   [+[\fIpage\fP]] [\-s \fIshrink\fP] [\-S \fIdensity\fP] [\-p \fIpixels\fP] [\-l]
  1696. ! [\-sw] [\-paper \fIpapertype\fP] [\-mgs[\fIn\fP] \fIsize\fP]
  1697. ! [\-altfont \fIfont\fP]
  1698. ! [\-margins \fIdimen\fP] [\-sidemargin \fIdimen\fP] [\-topmargin \fIdimen\fP]
  1699. ! [\-offsets \fIdimen\fP] [\-xoffset \fIdimen\fP] [\-yoffset \fIdimen\fP]
  1700.   [\-rv] [\-fg \fIcolor\fP] [\-bg \fIcolor\fP]
  1701.   [\-hl \fIcolor\fP] [\-bd \fIcolor\fP] [\-cr \fIcolor\fP] [\-bw \fIwidth\fP]
  1702.   #ifx11
  1703. ! [\-geometry \fIgeometry\fP] [\-icongeometry \fIgeometry\fP] [\-iconic]
  1704. ! [\-display \fIdisplay\fP] [\-copy] [\-thorough]
  1705. ! #ifbuttons
  1706. ! [\-expert]
  1707.   #ifx10
  1708.   [\-geometry \fIgeometry\fP | =\fIgeometry\fP]
  1709.   [\-display \fIhost\fP:\fIdisplay\fP | \fIhost\fP:\fIdisplay\fP]
  1710. ***************
  1711. *** 90,95 ****
  1712. --- 94,105 ----
  1713.   (%%dot%%listFonts)
  1714.   Causes the names of the fonts used to be listed.
  1715.   .TP
  1716. + .B \-sw
  1717. + (%%dot%%specialWarn)
  1718. + Causes \fIxdvi\fR to warn the user when it encounters a \\special string
  1719. + which it cannot process.  This option is on by default; to turn it off,
  1720. + use \fB+sw\fR.
  1721. + .TP
  1722.   .B \-rv
  1723.   (%%dot%%reverseVideo)
  1724.   Causes the page to be displayed with white characters on a
  1725. ***************
  1726. *** 149,160 ****
  1727.   Always use the \fIcopy\fR operation when writing characters to the display.
  1728.   This option may be necessary for correct operation on a color display, but
  1729.   overstrike characters will be incorrect.
  1730.   #endif
  1731.   .TP
  1732. ! .BI \-margins " inches"
  1733. ! (%%dot%%margins)
  1734. ! Specifies the size of both the top margin and side margin.  This
  1735. ! can be a decimal number, \fIe.g.\fR, 1.5.  It determines
  1736.   the ``home'' position of the page within the window as follows.  If the entire
  1737.   page fits in the window, then the margin settings are ignored.  If, even
  1738.   after removing the margins from the left, right, top, and bottom, the page
  1739. --- 159,176 ----
  1740.   Always use the \fIcopy\fR operation when writing characters to the display.
  1741.   This option may be necessary for correct operation on a color display, but
  1742.   overstrike characters will be incorrect.
  1743. + #ifbuttons
  1744. + .TP
  1745. + .B \-expert
  1746. + (.expert)
  1747. + Prevent the buttons from appearing.
  1748.   #endif
  1749.   .TP
  1750. ! .BI \-margins " dimen"
  1751. ! (%%dot%%Margin)
  1752. ! Specifies the size of both the top margin and side margin.
  1753. ! This should be a decimal number optionally followed by "cm", e.g., 1.5 or 3cm,
  1754. ! giving a measurement in inches or centimeters.  It determines
  1755.   the ``home'' position of the page within the window as follows.  If the entire
  1756.   page fits in the window, then the margin settings are ignored.  If, even
  1757.   after removing the margins from the left, right, top, and bottom, the page
  1758. ***************
  1759. *** 164,177 ****
  1760.   Otherwise, the text is centered in the window.  See also `\fBM\fR' under
  1761.   the KEY\%STROKES section.
  1762.   .TP
  1763. ! .BI \-sidemargin " inches"
  1764.   (%%dot%%sideMargin)
  1765.   Specifies the side margin (see above).
  1766.   .TP
  1767. ! .BI \-topmargin " inches"
  1768.   (%%dot%%topMargin)
  1769.   Specifies the top and bottom margins (see above).
  1770.   .TP
  1771.   .BI \-paper " papertype"
  1772.   (%%dot%%paper)
  1773.   Specifies the size of the printed page.  This may be of the form
  1774. --- 180,213 ----
  1775.   Otherwise, the text is centered in the window.  See also `\fBM\fR' under
  1776.   the KEY\%STROKES section.
  1777.   .TP
  1778. ! .BI \-sidemargin " dimen"
  1779.   (%%dot%%sideMargin)
  1780.   Specifies the side margin (see above).
  1781.   .TP
  1782. ! .BI \-topmargin " dimen"
  1783.   (%%dot%%topMargin)
  1784.   Specifies the top and bottom margins (see above).
  1785.   .TP
  1786. + .BI \-offsets " dimen"
  1787. + (%%dot%%Offset)
  1788. + Specifies the size of both the horizontal and vertical offsets of the
  1789. + output on the page.  This should be a decimal number optionally followed by
  1790. + "cm", e.g., 1.5 or 3cm, giving a measurement in inches or centimeters.
  1791. + By decree
  1792. + of the Stanford TeX Project, the default TeX page origin is always 1 inch
  1793. + over and down from the top-left page corner, even when non-American paper
  1794. + sizes are used.  Therefore, the default offsets are 1.0 inch.
  1795. + .TP
  1796. + .BI \-xoffset " dimen"
  1797. + (%%dot%%xOffset)
  1798. + Specifies the size of the horizontal offset of the output on the page
  1799. + (see above).
  1800. + .TP
  1801. + .BI \-yoffset " dimen"
  1802. + (%%dot%%yOffset)
  1803. + Specifies the size of the vertical offset of the output on the page
  1804. + (see above).
  1805. + .TP
  1806.   .BI \-paper " papertype"
  1807.   (%%dot%%paper)
  1808.   Specifies the size of the printed page.  This may be of the form
  1809. ***************
  1810. *** 240,245 ****
  1811. --- 276,285 ----
  1812.   \fBXdvi\fR recognizes the following keystrokes when typed in its window.
  1813.   Each may optionally be preceded by a (positive or negative) number, whose
  1814.   interpretation will depend on the particular keystroke.
  1815. + #ifx11
  1816. + Also, the "Home", "Prior", "Next", and arrow cursor keys are synonyms for
  1817. + `^', `b', `f', `l', `r', `u', and `d' keys, respectively.
  1818. + #endif
  1819.   .TP
  1820.   .B q
  1821.   Quits the program.  Control-C and control-D will do this, too.
  1822. ***************
  1823. *** 309,314 ****
  1824. --- 349,360 ----
  1825.   The `k' keystroke toggles a `keep-position' flag which, when set, will keep
  1826.   the same position when moving between pages.  Also `0k' and `1k' clear and
  1827.   set this flag, respectively.
  1828. + #ifbuttons
  1829. + .TP
  1830. + .B x
  1831. + Toggles expert mode (in which the buttons do not appear).  Also `0x' and `1x'
  1832. + clear and reset this mode, respectively.
  1833. + #endif
  1834.   .SH MOUSE ACTIONS
  1835.   If the shrink factor is set to any number other than one, then clicking
  1836.   any mouse button will pop up a ``magnifying glass'' which shows the unshrunk
  1837. ***************
  1838. *** 336,343 ****
  1839.   the end.  For example, if the string is ``/usr/local/tex/fonts'' and the font is
  1840.   cmr10 at 300dpi, then it searches for /usr/local/tex/fonts/cmr10.300gf,
  1841.   /usr/local/tex/fonts/cmr10.300pk, and /usr/local/tex/fonts/cmr10.1500pxl,
  1842. ! in that order.  If the first character of the ``XDVIFONTS'' variable
  1843. ! is a colon, then the system default paths are tried first.  If the font is not
  1844.   found in the desired size, then \fIxdvi\fR will try to find the nearest size.
  1845.   If the font cannot be found at all, then \fIxdvi\fR will try to vary the point
  1846.   size of the font (within a certain range), and if this fails, then it will
  1847. --- 382,389 ----
  1848.   the end.  For example, if the string is ``/usr/local/tex/fonts'' and the font is
  1849.   cmr10 at 300dpi, then it searches for /usr/local/tex/fonts/cmr10.300gf,
  1850.   /usr/local/tex/fonts/cmr10.300pk, and /usr/local/tex/fonts/cmr10.1500pxl,
  1851. ! in that order.  An extra colon anywhere in the ``XDVIFONTS'' variable
  1852. ! causes the system default paths to be tried at that point.  If the font is not
  1853.   found in the desired size, then \fIxdvi\fR will try to find the nearest size.
  1854.   If the font cannot be found at all, then \fIxdvi\fR will try to vary the point
  1855.   size of the font (within a certain range), and if this fails, then it will
  1856. ***************
  1857. *** 349,355 ****
  1858.   Sizes are expressed in dots per inch; decimals may be used for ``pxl'' files:
  1859.   for example, a 300 dots per inch file magnified by half a step comes out to
  1860.   1643 dots per five inches, which should be encoded as 328.6.  The current
  1861. ! default set of sizes is %%DEFAULT_FONT_SIZES%%.
  1862.   .SH FILES
  1863.   .br
  1864.   %%DEFAULT_FONT_PATH%%   Font pixel files.
  1865. --- 395,402 ----
  1866.   Sizes are expressed in dots per inch; decimals may be used for ``pxl'' files:
  1867.   for example, a 300 dots per inch file magnified by half a step comes out to
  1868.   1643 dots per five inches, which should be encoded as 328.6.  The current
  1869. ! default set of sizes is %%DEFAULT_FONT_SIZES%%.  \fIxdvi\fR will also try the
  1870. ! actual size of the font before trying any of the given sizes.
  1871.   .SH FILES
  1872.   .br
  1873.   %%DEFAULT_FONT_PATH%%   Font pixel files.
  1874.  
  1875. dan
  1876. ----------------------------------------------------
  1877. O'Reilly && Associates   argv@sun.com / argv@ora.com
  1878. Opinions expressed reflect those of the author only.
  1879.