home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume8 / tgif / patch1.03 < prev    next >
Internet Message Format  |  1990-07-08  |  61KB
  1. Path: uunet!cs.utexas.edu!sun-barr!newstop!sun!CS.UCLA.EDU
  2. From: william@CS.UCLA.EDU (William Cheng)
  3. Newsgroups: comp.sources.x
  4. Subject: v08i048: tgif 1.9, Patch1, Part03/03
  5. Message-ID: <138564@sun.Eng.Sun.COM>
  6. Date: 9 Jul 90 07:22:23 GMT
  7. Sender: news@sun.Eng.Sun.COM
  8. Lines: 1941
  9. Approved: argv@sun.com
  10.  
  11. Submitted-by: william@CS.UCLA.EDU (William Cheng)
  12. Posting-number: Volume 8, Issue 48
  13. Archive-name: tgif/patch2.03
  14. Patch-To: tgif: Volume 7, Issue 56-76
  15.  
  16.  
  17. Here is part 03 of the patch that takes tgif from version 1.2 to 1.9.
  18. The most recent version is available for anonymous ftp at the following places.
  19.  
  20.         expo.lcs.mit.edu        contrib/tgif-1.9.tar.Z
  21.         rye.cs.ucla.edu         pub/tgif-1.9.tar.Z
  22.  
  23. --Bill
  24. ---------------------------------> cut here <---------------------------------
  25. *** setup.c.orig    Wed Jun 27 13:30:39 1990
  26. --- setup.c    Wed Jun 27 13:30:41 1990
  27. ***************
  28. *** 6,10 ****
  29.   #ifndef lint
  30.   static char RCSid[] =
  31. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/setup.c,v 1.3 90/05/15 09:33:59 william Exp $";
  32.   #endif
  33.   
  34. --- 6,10 ----
  35.   #ifndef lint
  36.   static char RCSid[] =
  37. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/setup.c,v 1.8 90/06/26 00:13:09 william Exp $";
  38.   #endif
  39.   
  40. ***************
  41. *** 105,110 ****
  42.   int    objId = 0;
  43.   
  44. ! int    myBlackPixel;
  45. ! int    myWhitePixel;
  46.   
  47.   char    drawPath[255];
  48. --- 105,112 ----
  49.   int    objId = 0;
  50.   
  51. ! int    myBgPixel;
  52. ! int    myFgPixel;
  53. ! int    myBorderPixel;
  54. ! int    reverseVideo = FALSE;
  55.   
  56.   char    drawPath[255];
  57. ***************
  58. *** 206,210 ****
  59.   void Setup ()
  60.   {
  61. !    int        num_of_planes, brdr_pixel, bg_pixel, bitmask = 0, index;
  62.      char        * c_ptr;
  63.      Window    root_win;
  64. --- 208,212 ----
  65.   void Setup ()
  66.   {
  67. !    int        num_of_planes, bitmask = 0, index;
  68.      char        * c_ptr;
  69.      Window    root_win;
  70. ***************
  71. *** 219,236 ****
  72.      InitColor ();
  73.   
  74. -    bg_pixel = myBlackPixel;
  75. - 
  76. -    if ((c_ptr = XGetDefault (mainDisplay, TOOL_NAME, "BorderColor")) == NULL ||
  77. -          XParseColor (mainDisplay, mainColormap, c_ptr, &color) == 0 ||
  78. -          XAllocColor (mainDisplay, mainColormap, &color) == 0)
  79. -       brdr_pixel = myWhitePixel;
  80. -    else
  81. -       brdr_pixel = color.pixel;
  82. - 
  83.      if ((c_ptr = getenv ("TGIFPATH")) == NULL)
  84. !       strcpy (drawPath, "/u/tangram/u/william/X11/TGIF");
  85.      else
  86.         if (strlen (c_ptr) >= 255)
  87. !          strcpy (drawPath, "/u/tangram/u/william/X11/TGIF");
  88.         else
  89.            strcpy (drawPath, c_ptr);
  90. --- 221,229 ----
  91.      InitColor ();
  92.   
  93.      if ((c_ptr = getenv ("TGIFPATH")) == NULL)
  94. !       strcpy (drawPath, TGIF_PATH);
  95.      else
  96.         if (strlen (c_ptr) >= 255)
  97. !          strcpy (drawPath, TGIF_PATH);
  98.         else
  99.            strcpy (drawPath, c_ptr);
  100. ***************
  101. *** 294,298 ****
  102.      if ((mainWindow = XCreateSimpleWindow (mainDisplay, rootWindow,
  103.            sizehints.x, sizehints.y, sizehints.width, sizehints.height,
  104. !          brdrW, brdr_pixel, bg_pixel)) == 0)
  105.      { printf ("Could not create main window!\n"); exit(1); }
  106.   
  107. --- 287,291 ----
  108.      if ((mainWindow = XCreateSimpleWindow (mainDisplay, rootWindow,
  109.            sizehints.x, sizehints.y, sizehints.width, sizehints.height,
  110. !          brdrW, myBorderPixel, myBgPixel)) == 0)
  111.      { printf ("Could not create main window!\n"); exit(1); }
  112.   
  113. ***************
  114. *** 310,319 ****
  115.   
  116.      if ((titleWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0, 0,
  117. !          titleWindowW, titleWindowH, brdrW, brdr_pixel, bg_pixel)) == 0) 
  118.      { printf ("Could not create menu window!\n"); exit(1); }
  119.   
  120.      if ((msgWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  121. !          titleWindowH+2*brdrW, msgWindowW, msgWindowH, brdrW, brdr_pixel,
  122. !          bg_pixel)) == 0)
  123.      { printf ("Could not create message window!\n"); exit(1); }
  124.   
  125. --- 303,312 ----
  126.   
  127.      if ((titleWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0, 0,
  128. !          titleWindowW, titleWindowH, brdrW, myBorderPixel, myBgPixel)) == 0) 
  129.      { printf ("Could not create menu window!\n"); exit(1); }
  130.   
  131.      if ((msgWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  132. !          titleWindowH+2*brdrW, msgWindowW, msgWindowH, brdrW, myBorderPixel,
  133. !          myBgPixel)) == 0)
  134.      { printf ("Could not create message window!\n"); exit(1); }
  135.   
  136. ***************
  137. *** 320,324 ****
  138.      if ((choiceWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  139.            msgWindowW+2*brdrW, titleWindowH+2*brdrW, choiceWindowW, choiceWindowH,
  140. !          brdrW, brdr_pixel, bg_pixel)) == 0)
  141.      { printf ("Could not create choice window!\n"); exit(1); }
  142.   
  143. --- 313,317 ----
  144.      if ((choiceWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  145.            msgWindowW+2*brdrW, titleWindowH+2*brdrW, choiceWindowW, choiceWindowH,
  146. !          brdrW, myBorderPixel, myBgPixel)) == 0)
  147.      { printf ("Could not create choice window!\n"); exit(1); }
  148.   
  149. ***************
  150. *** 327,331 ****
  151.      if ((hRuleWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  152.            rulerW+2*brdrW, titleWindowH+choiceWindowH+4*brdrW, drawWinW, rulerW,
  153. !          brdrW, brdr_pixel, bg_pixel)) == 0)
  154.      { printf ("Could not create horizontal ruler window!\n"); exit(1); }
  155.   
  156. --- 320,324 ----
  157.      if ((hRuleWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  158.            rulerW+2*brdrW, titleWindowH+choiceWindowH+4*brdrW, drawWinW, rulerW,
  159. !          brdrW, myBorderPixel, myBgPixel)) == 0)
  160.      { printf ("Could not create horizontal ruler window!\n"); exit(1); }
  161.   
  162. ***************
  163. *** 332,336 ****
  164.      if ((vRuleWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  165.            titleWindowH+rulerW+choiceWindowH+6*brdrW, rulerW, drawWinH,
  166. !          brdrW, brdr_pixel, bg_pixel)) == 0)
  167.      { printf ("Could not create vertical ruler window!\n"); exit(1); }
  168.   
  169. --- 325,329 ----
  170.      if ((vRuleWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  171.            titleWindowH+rulerW+choiceWindowH+6*brdrW, rulerW, drawWinH,
  172. !          brdrW, myBorderPixel, myBgPixel)) == 0)
  173.      { printf ("Could not create vertical ruler window!\n"); exit(1); }
  174.   
  175. ***************
  176. *** 337,341 ****
  177.      if ((drawWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  178.            rulerW+2*brdrW, titleWindowH+rulerW+choiceWindowH+6*brdrW,
  179. !          drawWinW, drawWinH, brdrW, brdr_pixel, bg_pixel)) == 0) 
  180.      { printf ("Could not create draw window!\n"); exit(1); }
  181.   
  182. --- 330,334 ----
  183.      if ((drawWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  184.            rulerW+2*brdrW, titleWindowH+rulerW+choiceWindowH+6*brdrW,
  185. !          drawWinW, drawWinH, brdrW, myBorderPixel, myBgPixel)) == 0) 
  186.      { printf ("Could not create draw window!\n"); exit(1); }
  187.   
  188. ***************
  189. *** 342,346 ****
  190.      if ((vSBarWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  191.            4*brdrW+rulerW+drawWinW, titleWindowH+choiceWindowH+4*brdrW,
  192. !          scrollBarW, vSBarH, brdrW, brdr_pixel, bg_pixel)) == 0) 
  193.      { printf ("Could not create vertical scrollbar window!\n"); exit(1); }
  194.   
  195. --- 335,339 ----
  196.      if ((vSBarWindow = XCreateSimpleWindow (mainDisplay, mainWindow,
  197.            4*brdrW+rulerW+drawWinW, titleWindowH+choiceWindowH+4*brdrW,
  198. !          scrollBarW, vSBarH, brdrW, myBorderPixel, myBgPixel)) == 0) 
  199.      { printf ("Could not create vertical scrollbar window!\n"); exit(1); }
  200.   
  201. ***************
  202. *** 347,351 ****
  203.      if ((hSBarWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  204.            titleWindowH+rulerW+drawWinH+choiceWindowH+8*brdrW,
  205. !          hSBarW, scrollBarW, brdrW, brdr_pixel, bg_pixel)) == 0) 
  206.      { printf ("Could not create horizontal scrollbar window!\n"); exit(1); }
  207.   
  208. --- 340,344 ----
  209.      if ((hSBarWindow = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  210.            titleWindowH+rulerW+drawWinH+choiceWindowH+8*brdrW,
  211. !          hSBarW, scrollBarW, brdrW, myBorderPixel, myBgPixel)) == 0) 
  212.      { printf ("Could not create horizontal scrollbar window!\n"); exit(1); }
  213.   
  214. ***************
  215. *** 353,357 ****
  216.            rulerW+drawWinW+4*brdrW,
  217.            titleWindowH+choiceWindowH+rulerW+drawWinH+8*brdrW,
  218. !          scrollBarW, scrollBarW, brdrW, brdr_pixel, bg_pixel)) == 0) 
  219.      { printf ("Could not create dummy window!\n"); exit(1); }
  220.   
  221. --- 346,350 ----
  222.            rulerW+drawWinW+4*brdrW,
  223.            titleWindowH+choiceWindowH+rulerW+drawWinH+8*brdrW,
  224. !          scrollBarW, scrollBarW, brdrW, myBorderPixel, myBgPixel)) == 0) 
  225.      { printf ("Could not create dummy window!\n"); exit(1); }
  226.   
  227. ***************
  228. *** 358,362 ****
  229.      if ((dummyWindow2 = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  230.            titleWindowH+choiceWindowH+4*brdrW, rulerW, rulerW,
  231. !          brdrW, brdr_pixel, bg_pixel)) == 0) 
  232.      { printf ("Could not create dummy window!\n"); exit(1); }
  233.   
  234. --- 351,355 ----
  235.      if ((dummyWindow2 = XCreateSimpleWindow (mainDisplay, mainWindow, 0,
  236.            titleWindowH+choiceWindowH+4*brdrW, rulerW, rulerW,
  237. !          brdrW, myBorderPixel, myBgPixel)) == 0) 
  238.      { printf ("Could not create dummy window!\n"); exit(1); }
  239.   
  240. ***************
  241. *** 406,408 ****
  242. --- 399,411 ----
  243.      if (curChoice == DRAWTEXT) return (CreateTextObj ());
  244.      return (FALSE);
  245. + }
  246. + 
  247. + void SetFileModified (modified)
  248. +    int    modified;
  249. + {
  250. +    if (modified != fileModified)
  251. +    {
  252. +       fileModified = modified;
  253. +       RedrawTitleWindow ();
  254. +    }
  255.   }
  256. *** special.c.orig    Wed Jun 27 13:30:53 1990
  257. --- special.c    Wed Jun 27 13:30:55 1990
  258. ***************
  259. *** 6,10 ****
  260.   #ifndef lint
  261.   static char RCSid[] =
  262. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/special.c,v 1.1 90/04/01 22:16:42 william Exp $";
  263.   #endif
  264.   
  265. --- 6,10 ----
  266.   #ifndef lint
  267.   static char RCSid[] =
  268. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/special.c,v 1.4 90/06/26 13:05:00 william Exp $";
  269.   #endif
  270.   
  271. ***************
  272. *** 74,81 ****
  273.      struct ObjRec    * obj_ptr;
  274.      struct AttrRec       * attr_ptr, * top_attr = NULL, * bot_attr = NULL;
  275. !    char            inbuf[255], obj_name[10];
  276.      int            len;
  277.   
  278. !    while (fgets (inbuf, 255, FP) != NULL)
  279.      {
  280.         len = strlen (inbuf) - 1;
  281. --- 74,81 ----
  282.      struct ObjRec    * obj_ptr;
  283.      struct AttrRec       * attr_ptr, * top_attr = NULL, * bot_attr = NULL;
  284. !    char            inbuf[MAXPATHLENGTH], obj_name[10];
  285.      int            len;
  286.   
  287. !    while (fgets (inbuf, MAXPATHLENGTH, FP) != NULL)
  288.      {
  289.         len = strlen (inbuf) - 1;
  290. ***************
  291. *** 185,189 ****
  292.   void Instantiate ()
  293.   {
  294. !    char            file_name[80], sym_name[80], full_name[MAXPATHLENGTH];
  295.      struct ObjRec    * obj_ptr;
  296.      FILE            * fp;
  297. --- 185,189 ----
  298.   void Instantiate ()
  299.   {
  300. !    char            file_name[MAXPATHLENGTH], sym_name[MAXPATHLENGTH], full_name[MAXPATHLENGTH];
  301.      struct ObjRec    * obj_ptr;
  302.      FILE            * fp;
  303. ***************
  304. *** 220,224 ****
  305.         if (topObj != NULL) SelectTopObj ();
  306.         ShowCursor ();
  307. !       fileModified = TRUE;
  308.         justDupped = FALSE;
  309.      }
  310. --- 220,224 ----
  311.         if (topObj != NULL) SelectTopObj ();
  312.         ShowCursor ();
  313. !       SetFileModified (TRUE);
  314.         justDupped = FALSE;
  315.      }
  316. ***************
  317. *** 234,238 ****
  318.         topSel->obj->type = OBJ_SYM;
  319.         Msg ("Selected GROUP object is now SYMBOLIC.");
  320. !       fileModified = TRUE;
  321.         AdjObjBBox (topSel->obj);
  322.         UpdSelBBox ();
  323. --- 234,238 ----
  324.         topSel->obj->type = OBJ_SYM;
  325.         Msg ("Selected GROUP object is now SYMBOLIC.");
  326. !       SetFileModified (TRUE);
  327.         AdjObjBBox (topSel->obj);
  328.         UpdSelBBox ();
  329. ***************
  330. *** 280,284 ****
  331.      {
  332.         HighLightReverse ();
  333. !       fileModified = TRUE;
  334.         UpdSelBBox ();
  335.         RedrawAnArea (botObj,
  336. --- 280,284 ----
  337.      {
  338.         HighLightReverse ();
  339. !       SetFileModified (TRUE);
  340.         UpdSelBBox ();
  341.         RedrawAnArea (botObj,
  342. ***************
  343. *** 291,297 ****
  344.   void MakeIconic ()
  345.   {
  346. !    char         icon_name[80], file_name[80], s[255];
  347.      FILE            * fp;
  348.      struct ObjRec    * saved_obj_ptr;
  349.   
  350.      if (topSel!=NULL && topSel==botSel && topSel->obj->type==OBJ_GROUP)
  351. --- 291,299 ----
  352.   void MakeIconic ()
  353.   {
  354. !    char         icon_name[MAXPATHLENGTH], file_name[MAXPATHLENGTH];
  355. !    char         s[MAXPATHLENGTH];
  356.      FILE            * fp;
  357.      struct ObjRec    * saved_obj_ptr;
  358. +    int            len;
  359.   
  360.      if (topSel!=NULL && topSel==botSel && topSel->obj->type==OBJ_GROUP)
  361. ***************
  362. *** 298,301 ****
  363. --- 300,304 ----
  364.      {
  365.         Dialog ("Please Enter Name of the Icon:", icon_name);
  366. +       len = strlen (icon_name);
  367.         if (*icon_name == '\0')
  368.         {
  369. ***************
  370. *** 303,310 ****
  371.            return;
  372.         }
  373.         if (*curDomainName != '\0')
  374. !          sprintf (file_name, "%s/%s.sym", curDomainName, icon_name);
  375.         else
  376. !          sprintf (file_name, "%s.sym", icon_name);
  377.         if (!OkayToCreateFile (file_name)) return;
  378.         if ((fp = fopen (file_name, "w")) == NULL)
  379. --- 306,333 ----
  380.            return;
  381.         }
  382. + 
  383. +       if (strlen (icon_name) >= 4)
  384. +       {
  385. +          if (strcmp (&icon_name[len-4], ".obj") == 0)
  386. +          {
  387. +             Msg ("Can not save as a .obj file, icon not created.");
  388. +             return;
  389. +          }
  390. +          else if (strcmp (&icon_name[len-4], ".sym") != 0)
  391. +             strcat (icon_name, ".sym");
  392. + 
  393. +          if (strlen (icon_name) == 4)
  394. +          {
  395. +             Msg ("No file name specified.  File not saved.");
  396. +             return;
  397. +          }
  398. +       }
  399. +       else
  400. +          strcat (icon_name, ".sym");
  401. + 
  402.         if (*curDomainName != '\0')
  403. !          sprintf (file_name, "%s/%s", curDomainName, icon_name);
  404.         else
  405. !          sprintf (file_name, "%s", icon_name);
  406.         if (!OkayToCreateFile (file_name)) return;
  407.         if ((fp = fopen (file_name, "w")) == NULL)
  408. ***************
  409. *** 332,336 ****
  410.         topSel->obj->detail.r->id = objId++;
  411.         Msg ("Selected GROUP object is now ICONIC.");
  412. !       fileModified = TRUE;
  413.         AdjObjBBox (topSel->obj);
  414.         UpdSelBBox ();
  415. --- 355,359 ----
  416.         topSel->obj->detail.r->id = objId++;
  417.         Msg ("Selected GROUP object is now ICONIC.");
  418. !       SetFileModified (TRUE);
  419.         AdjObjBBox (topSel->obj);
  420.         UpdSelBBox ();
  421. ***************
  422. *** 366,370 ****
  423.      {
  424.         Msg ("Selected ICONIC objects are GROUP objects now.");
  425. !       fileModified = TRUE;
  426.         UpdSelBBox ();
  427.         RedrawAnArea (botObj, selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  428. --- 389,393 ----
  429.      {
  430.         Msg ("Selected ICONIC objects are GROUP objects now.");
  431. !       SetFileModified (TRUE);
  432.         UpdSelBBox ();
  433.         RedrawAnArea (botObj, selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  434. ***************
  435. *** 378,382 ****
  436.   {
  437.      register int    index;
  438. -    char        s[80];
  439.      int        * fore_colors, * valid;
  440.   
  441. --- 401,404 ----
  442. *** spline.c.orig    Wed Jun 27 13:31:02 1990
  443. --- spline.c    Wed Jun 27 13:31:04 1990
  444. ***************
  445. *** 6,10 ****
  446.   #ifndef lint
  447.   static char RCSid[] =
  448. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/spline.c,v 1.1 90/04/30 10:36:03 william Exp $";
  449.   #endif
  450.   
  451. --- 6,10 ----
  452.   #ifndef lint
  453.   static char RCSid[] =
  454. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/spline.c,v 1.2 90/05/22 14:38:02 william Exp $";
  455.   #endif
  456.   
  457. ***************
  458. *** 181,185 ****
  459.      {
  460.         sv[sn].x = sv[0].x; sv[sn].y = sv[0].y;
  461. !       values.foreground = (Fill == 2) ? myBlackPixel : Pixel;
  462.         values.function = GXcopy;
  463.         values.fill_style = FillOpaqueStippled;
  464. --- 181,185 ----
  465.      {
  466.         sv[sn].x = sv[0].x; sv[sn].y = sv[0].y;
  467. !       values.foreground = (Fill == 2) ? myBgPixel : Pixel;
  468.         values.function = GXcopy;
  469.         values.fill_style = FillOpaqueStippled;
  470. ***************
  471. *** 194,198 ****
  472.      if (Pen != 0)
  473.      {
  474. !       values.foreground = (Pen == 2) ? myBlackPixel : Pixel;
  475.         values.function = GXcopy;
  476.         values.fill_style = FillOpaqueStippled;
  477. --- 194,198 ----
  478.      if (Pen != 0)
  479.      {
  480. !       values.foreground = (Pen == 2) ? myBgPixel : Pixel;
  481.         values.function = GXcopy;
  482.         values.fill_style = FillOpaqueStippled;
  483. ***************
  484. *** 292,296 ****
  485.      if (Fill != 0)
  486.      {
  487. !       values.foreground = (Fill == 2) ? myBlackPixel : Pixel;
  488.         values.function = GXcopy;
  489.         values.fill_style = FillOpaqueStippled;
  490. --- 292,296 ----
  491.      if (Fill != 0)
  492.      {
  493. !       values.foreground = (Fill == 2) ? myBgPixel : Pixel;
  494.         values.function = GXcopy;
  495.         values.fill_style = FillOpaqueStippled;
  496. ***************
  497. *** 303,307 ****
  498.      if (Pen != 0)
  499.      {
  500. !       values.foreground = (Pen == 2) ? myBlackPixel : Pixel;
  501.         values.function = GXcopy;
  502.         values.fill_style = FillOpaqueStippled;
  503. --- 303,307 ----
  504.      if (Pen != 0)
  505.      {
  506. !       values.foreground = (Pen == 2) ? myBgPixel : Pixel;
  507.         values.function = GXcopy;
  508.         values.fill_style = FillOpaqueStippled;
  509. *** stk.c.orig    Wed Jun 27 13:31:12 1990
  510. --- stk.c    Wed Jun 27 13:31:13 1990
  511. ***************
  512. *** 6,10 ****
  513.   #ifndef lint
  514.   static char RCSid[] =
  515. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/stk.c,v 1.1 90/04/01 22:16:44 william Exp $";
  516.   #endif
  517.   
  518. --- 6,10 ----
  519.   #ifndef lint
  520.   static char RCSid[] =
  521. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/stk.c,v 1.3 90/06/26 00:11:30 william Exp $";
  522.   #endif
  523.   
  524. ***************
  525. *** 49,53 ****
  526.      struct StkRec    * stk_ptr;
  527.      struct ObjRec    * obj_ptr;
  528. !    char            file_name[80], s[80], full_name[MAXPATHLENGTH];
  529.      FILE            * fp;
  530.   
  531. --- 49,54 ----
  532.      struct StkRec    * stk_ptr;
  533.      struct ObjRec    * obj_ptr;
  534. !    char            file_name[MAXPATHLENGTH], s[MAXPATHLENGTH];
  535. !    char            full_name[MAXPATHLENGTH];
  536.      FILE            * fp;
  537.   
  538. ***************
  539. *** 128,132 ****
  540.      curFileDefined = TRUE;
  541.   
  542. !    fileModified = FALSE;
  543.      sprintf (s, "Current file is '%s'.", file_name);
  544.      Msg (s);
  545. --- 129,133 ----
  546.      curFileDefined = TRUE;
  547.   
  548. !    SetFileModified (FALSE);
  549.      sprintf (s, "Current file is '%s'.", file_name);
  550.      Msg (s);
  551. ***************
  552. *** 137,141 ****
  553.   void PopIcon ()
  554.   {
  555. !    char    dummy[80];
  556.   
  557.      if (topStk == NULL)
  558. --- 138,142 ----
  559.   void PopIcon ()
  560.   {
  561. !    char    dummy[MAXPATHLENGTH];
  562.   
  563.      if (topStk == NULL)
  564. *** stretch.c.orig    Wed Jun 27 13:31:29 1990
  565. --- stretch.c    Wed Jun 27 13:31:33 1990
  566. ***************
  567. *** 6,10 ****
  568.   #ifndef lint
  569.   static char RCSid[] =
  570. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/stretch.c,v 1.1 90/04/01 22:16:45 william Exp $";
  571.   #endif
  572.   
  573. --- 6,10 ----
  574.   #ifndef lint
  575.   static char RCSid[] =
  576. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/stretch.c,v 1.4 90/06/26 00:11:32 william Exp $";
  577.   #endif
  578.   
  579. ***************
  580. *** 173,181 ****
  581.      int        x, y, dx, dy, num, pixel, stretching = TRUE;
  582.      int        ltx, lty, rbx, rby, curved;
  583. !    int        grid_x = XGridOff, grid_y = YGridOff, new_grid_x, new_grid_y;
  584. !    Window    root_win, child_win;
  585. !    int        root_x, root_y;
  586. !    unsigned int    status;
  587. !    XGCValues    values;
  588.   
  589.      switch (ObjPtr->type)
  590. --- 173,178 ----
  591.      int        x, y, dx, dy, num, pixel, stretching = TRUE;
  592.      int        ltx, lty, rbx, rby, curved;
  593. !    int        grid_x = XGridOff, grid_y = YGridOff;
  594. !    XEvent    input;
  595.   
  596.      switch (ObjPtr->type)
  597. ***************
  598. *** 230,260 ****
  599.      rby = ObjPtr->bbox.rby;
  600.   
  601. !    XGrabPointer (mainDisplay, drawWindow, FALSE, ButtonReleaseMask,
  602.            GrabModeAsync, GrabModeAsync, None, handCursor, CurrentTime);
  603.   
  604. !    if (curved == LT_SPLINE) MyDashedLine (drawWindow, revDefaultGC, v, num);
  605.      dx = dy = 0;
  606.      while (stretching)
  607.      {
  608. !       XQueryPointer (mainDisplay, drawWindow, &root_win, &child_win,
  609. !             &root_x, &root_y, &x, &y, &status);
  610. !       GridXY (x, y, &new_grid_x, &new_grid_y);
  611. ! 
  612. !       if (new_grid_x==grid_x && new_grid_y==grid_y && (status & Button1Mask)!=0)
  613. !          continue;
  614. ! 
  615. !       grid_x = new_grid_x; grid_y = new_grid_y;
  616. ! 
  617. !       MyDashedLine (drawWindow, revDefaultGC, v, num);
  618. !       dx = grid_x - XGridOff;
  619. !       dy = grid_y - YGridOff;
  620. !       v[1].x = OFFSET_X(V[Index].x) + dx;
  621. !       v[1].y = OFFSET_Y(V[Index].y) + dy;
  622. !       MarkRulers (grid_x, grid_y);
  623. ! 
  624. !       if ((status & Button1Mask) == 0)
  625.         {
  626.            XUngrabPointer (mainDisplay, CurrentTime);
  627.            stretching = FALSE;
  628.            HighLightReverse ();
  629.   
  630. --- 227,245 ----
  631.      rby = ObjPtr->bbox.rby;
  632.   
  633. !    XGrabPointer (mainDisplay, drawWindow, FALSE,
  634. !          PointerMotionMask | ButtonReleaseMask,
  635.            GrabModeAsync, GrabModeAsync, None, handCursor, CurrentTime);
  636.   
  637. !    MyDashedLine (drawWindow, revDefaultGC, v, num);
  638.      dx = dy = 0;
  639.      while (stretching)
  640.      {
  641. !       XNextEvent (mainDisplay, &input);
  642. !       if (input.type == ButtonRelease)
  643.         {
  644.            XUngrabPointer (mainDisplay, CurrentTime);
  645.            stretching = FALSE;
  646. + 
  647. +          MyDashedLine (drawWindow, revDefaultGC, v, num);
  648.            HighLightReverse ();
  649.   
  650. ***************
  651. *** 303,315 ****
  652.                     ObjPtr->bbox.rbx+(1<<zoomScale),
  653.                     ObjPtr->bbox.rby+(1<<zoomScale));
  654. !             fileModified = TRUE;
  655.            }
  656. -          else
  657. -             MyDashedLine (drawWindow, revDefaultGC, v, num);
  658. - 
  659.            HighLightForward ();
  660.         }
  661. !       else
  662.            MyDashedLine (drawWindow, revDefaultGC, v, num);
  663.      }
  664.   }
  665. --- 288,311 ----
  666.                     ObjPtr->bbox.rbx+(1<<zoomScale),
  667.                     ObjPtr->bbox.rby+(1<<zoomScale));
  668. !             SetFileModified (TRUE);
  669.            }
  670.            HighLightForward ();
  671.         }
  672. !       else if (input.type == MotionNotify)
  673. !       {
  674. !          x = input.xmotion.x;
  675. !          y = input.xmotion.y;
  676. !          GridXY (x, y, &grid_x, &grid_y);
  677. ! 
  678.            MyDashedLine (drawWindow, revDefaultGC, v, num);
  679. + 
  680. +          dx = grid_x - XGridOff;
  681. +          dy = grid_y - YGridOff;
  682. +          v[1].x = OFFSET_X(V[Index].x) + dx;
  683. +          v[1].y = OFFSET_Y(V[Index].y) + dy;
  684. +          MarkRulers (grid_x, grid_y);
  685. + 
  686. +          MyDashedLine (drawWindow, revDefaultGC, v, num);
  687. +       }
  688.      }
  689.   }
  690. ***************
  691. *** 516,525 ****
  692.      int        stretched_sel_ltx, stretched_sel_lty, stretched_sel_rbx;
  693.      int        stretched_sel_rby;
  694. -    Window    root_win, child_win;
  695. -    int        root_x, root_y;
  696. -    unsigned int    status;
  697.      double    obj_w, obj_h;
  698. !    int        grid_x = XGridOff, grid_y = YGridOff, new_grid_x, new_grid_y;
  699. !    XGCValues    values;
  700.   
  701.      SetPivot (Corner, ObjPtr->obbox);
  702. --- 512,518 ----
  703.      int        stretched_sel_ltx, stretched_sel_lty, stretched_sel_rbx;
  704.      int        stretched_sel_rby;
  705.      double    obj_w, obj_h;
  706. !    int        grid_x = XGridOff, grid_y = YGridOff;
  707. !    XEvent    input;
  708.   
  709.      SetPivot (Corner, ObjPtr->obbox);
  710. ***************
  711. *** 542,546 ****
  712.      obj_h = (double)(moveY - pivotY);
  713.   
  714. !    XGrabPointer (mainDisplay, drawWindow, FALSE, ButtonReleaseMask,
  715.            GrabModeAsync, GrabModeAsync, None, handCursor, CurrentTime);
  716.   
  717. --- 535,540 ----
  718.      obj_h = (double)(moveY - pivotY);
  719.   
  720. !    XGrabPointer (mainDisplay, drawWindow, FALSE,
  721. !          PointerMotionMask | ButtonReleaseMask,
  722.            GrabModeAsync, GrabModeAsync, None, handCursor, CurrentTime);
  723.   
  724. ***************
  725. *** 547,579 ****
  726.      while (stretching)
  727.      {
  728. !       XQueryPointer (mainDisplay, drawWindow, &root_win, &child_win,
  729. !             &root_x, &root_y, &x, &y, &status);
  730. !       GridXY (x, y, &new_grid_x, &new_grid_y);
  731. ! 
  732. !       if (new_grid_x==grid_x && new_grid_y==grid_y && (status & Button1Mask)!=0)
  733. !          continue;
  734. ! 
  735. !       grid_x = new_grid_x; grid_y = new_grid_y;
  736. ! 
  737. !       MarkRulers (grid_x, grid_y);
  738. ! 
  739. !       SelBox (drawWindow, revDefaultGC, stretched_ltx, stretched_lty,
  740. !             stretched_rbx, stretched_rby);
  741. !       SelBox (drawWindow, revDefaultGC, stretched_sel_ltx-1,
  742. !             stretched_sel_lty-1, stretched_sel_rbx+1, stretched_sel_rby+1);
  743. ! 
  744. !       if (changeX)
  745. !          multX = (double)(moveX + grid_x - XGridOff - pivotX) / obj_w;
  746. !       else
  747. !          multX = (double)1.0;
  748. !       if (changeY)
  749. !          multY = (double)(moveY + grid_y - YGridOff - pivotY) / obj_h;
  750. !       else
  751. !          multY = (double)1.0;
  752. ! 
  753. !       if ((status & Button1Mask) == 0)
  754.         {
  755.            XUngrabPointer (mainDisplay, CurrentTime);
  756.            stretching = FALSE;
  757.            if (multX != (double)1.0 || multY != (double)1.0)
  758.            {
  759. --- 541,555 ----
  760.      while (stretching)
  761.      {
  762. !       XNextEvent (mainDisplay, &input);
  763. !       if (input.type == ButtonRelease)
  764.         {
  765.            XUngrabPointer (mainDisplay, CurrentTime);
  766.            stretching = FALSE;
  767. + 
  768. +          SelBox (drawWindow, revDefaultGC, stretched_ltx, stretched_lty,
  769. +                stretched_rbx, stretched_rby);
  770. +          SelBox (drawWindow, revDefaultGC, stretched_sel_ltx-1,
  771. +                stretched_sel_lty-1, stretched_sel_rbx+1, stretched_sel_rby+1);
  772. + 
  773.            if (multX != (double)1.0 || multY != (double)1.0)
  774.            {
  775. ***************
  776. *** 590,598 ****
  777.               HighLightForward ();
  778.               UpdSelBBox ();
  779. !             fileModified = TRUE;
  780.            }
  781.         }
  782. !       else
  783.         {
  784.            StretchedXY (sel_ltx, sel_lty, &stretched_sel_ltx, &stretched_sel_lty);
  785.            StretchedXY (sel_rbx, sel_rby, &stretched_sel_rbx, &stretched_sel_rby);
  786. --- 566,593 ----
  787.               HighLightForward ();
  788.               UpdSelBBox ();
  789. !             SetFileModified (TRUE);
  790.            }
  791.         }
  792. !       else if (input.type == MotionNotify)
  793.         {
  794. +          x = input.xmotion.x;
  795. +          y = input.xmotion.y;
  796. +          GridXY (x, y, &grid_x, &grid_y);
  797. +          MarkRulers (grid_x, grid_y);
  798. + 
  799. +          SelBox (drawWindow, revDefaultGC, stretched_ltx, stretched_lty,
  800. +                stretched_rbx, stretched_rby);
  801. +          SelBox (drawWindow, revDefaultGC, stretched_sel_ltx-1,
  802. +                stretched_sel_lty-1, stretched_sel_rbx+1, stretched_sel_rby+1);
  803. + 
  804. +          if (changeX)
  805. +             multX = (double)(moveX + grid_x - XGridOff - pivotX) / obj_w;
  806. +          else
  807. +             multX = (double)1.0;
  808. +          if (changeY)
  809. +             multY = (double)(moveY + grid_y - YGridOff - pivotY) / obj_h;
  810. +          else
  811. +             multY = (double)1.0;
  812. + 
  813.            StretchedXY (sel_ltx, sel_lty, &stretched_sel_ltx, &stretched_sel_lty);
  814.            StretchedXY (sel_rbx, sel_rby, &stretched_sel_rbx, &stretched_sel_rby);
  815. ***************
  816. *** 643,647 ****
  817.      struct AttrRec    * attr_ptr;
  818.   
  819. !    fileModified = TRUE;
  820.      two_x_pivot = selObjLtX + selObjRbX;
  821.      new_obj_ltx = two_x_pivot - ObjPtr->obbox.rbx;
  822. --- 638,642 ----
  823.      struct AttrRec    * attr_ptr;
  824.   
  825. !    SetFileModified (TRUE);
  826.      two_x_pivot = selObjLtX + selObjRbX;
  827.      new_obj_ltx = two_x_pivot - ObjPtr->obbox.rbx;
  828. ***************
  829. *** 734,738 ****
  830.      struct AttrRec    * attr_ptr;
  831.   
  832. !    fileModified = TRUE;
  833.      two_x_pivot = selObjLtY + selObjRbY;
  834.      new_obj_lty = two_x_pivot - ObjPtr->obbox.rby;
  835. --- 729,733 ----
  836.      struct AttrRec    * attr_ptr;
  837.   
  838. !    SetFileModified (TRUE);
  839.      two_x_pivot = selObjLtY + selObjRbY;
  840.      new_obj_lty = two_x_pivot - ObjPtr->obbox.rby;
  841. ***************
  842. *** 851,855 ****
  843.      struct AttrRec    * attr_ptr;
  844.   
  845. !    fileModified = TRUE;
  846.      switch (ObjPtr->type)
  847.      {
  848. --- 846,850 ----
  849.      struct AttrRec    * attr_ptr;
  850.   
  851. !    SetFileModified (TRUE);
  852.      switch (ObjPtr->type)
  853.      {
  854. ***************
  855. *** 957,961 ****
  856.      struct AttrRec    * attr_ptr;
  857.   
  858. !    fileModified = TRUE;
  859.      switch (ObjPtr->type)
  860.      {
  861. --- 952,956 ----
  862.      struct AttrRec    * attr_ptr;
  863.   
  864. !    SetFileModified (TRUE);
  865.      switch (ObjPtr->type)
  866.      {
  867. *** text.c.orig    Wed Jun 27 13:32:29 1990
  868. --- text.c    Wed Jun 27 13:32:33 1990
  869. ***************
  870. *** 6,10 ****
  871.   #ifndef lint
  872.   static char RCSid[] =
  873. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/text.c,v 1.1 90/04/01 22:16:47 william Exp $";
  874.   #endif
  875.   
  876. --- 6,10 ----
  877.   #ifndef lint
  878.   static char RCSid[] =
  879. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/text.c,v 1.6 90/06/26 00:11:37 william Exp $";
  880.   #endif
  881.   
  882. ***************
  883. *** 265,274 ****
  884.            }
  885.   
  886. !          XSetFont (mainDisplay, defaultGC, canvasFontPtr->fid);
  887. !          XDrawImageString (mainDisplay, textBackingPixmap, defaultGC, 0,
  888.                  canvasFontAsc, Str, len);
  889.            from_image = XGetImage (mainDisplay, textBackingPixmap, 0, 0, w, h, 1,
  890.                  XYPixmap);
  891. -          XSetFont (mainDisplay, defaultGC, defaultFontPtr->fid);
  892.   
  893.            values.foreground = colorPixels[ColorIndex];
  894. --- 265,273 ----
  895.            }
  896.   
  897. !          XSetFont (mainDisplay, revDefaultGC, canvasFontPtr->fid);
  898. !          XDrawImageString (mainDisplay, textBackingPixmap, revDefaultGC, 0,
  899.                  canvasFontAsc, Str, len);
  900.            from_image = XGetImage (mainDisplay, textBackingPixmap, 0, 0, w, h, 1,
  901.                  XYPixmap);
  902.   
  903.            values.foreground = colorPixels[ColorIndex];
  904. ***************
  905. *** 282,286 ****
  906.            for (i = 0; i < w; i++)
  907.               for (j = 0; j < h; j++)
  908. !                if (XGetPixel (from_image, i, j) == myWhitePixel)
  909.                     switch (Rotate)
  910.                     {
  911. --- 281,285 ----
  912.            for (i = 0; i < w; i++)
  913.               for (j = 0; j < h; j++)
  914. !                if (XGetPixel (from_image, i, j) == 1)
  915.                     switch (Rotate)
  916.                     {
  917. ***************
  918. *** 287,291 ****
  919.                        case ROTATE90:
  920.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff-j, YOff+i); */
  921. !                         /* Hack to run on RTs -- stupid IBM */
  922.                           XDrawLine (mainDisplay, Win, gc, XOff-j, YOff+i,
  923.                                 XOff-j, YOff+i);
  924. --- 286,290 ----
  925.                        case ROTATE90:
  926.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff-j, YOff+i); */
  927. ! /*                         Hack to run on RTs -- crash server on RTs       */
  928.                           XDrawLine (mainDisplay, Win, gc, XOff-j, YOff+i,
  929.                                 XOff-j, YOff+i);
  930. ***************
  931. *** 293,297 ****
  932.                        case ROTATE180:
  933.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff-i, YOff-j); */
  934. !                         /* Hack to run on RTs -- stupid IBM */
  935.                           XDrawLine (mainDisplay, Win, gc, XOff-i, YOff-j,
  936.                                 XOff-i, YOff-j);
  937. --- 292,296 ----
  938.                        case ROTATE180:
  939.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff-i, YOff-j); */
  940. ! /*                         Hack to run on RTs -- crash server on RTs       */
  941.                           XDrawLine (mainDisplay, Win, gc, XOff-i, YOff-j,
  942.                                 XOff-i, YOff-j);
  943. ***************
  944. *** 299,303 ****
  945.                        case ROTATE270:
  946.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff+j, YOff-i); */
  947. !                         /* Hack to run on RTs -- stupid IBM */
  948.                           XDrawLine (mainDisplay, Win, gc, XOff+j, YOff-i,
  949.                                 XOff+j, YOff-i);
  950. --- 298,302 ----
  951.                        case ROTATE270:
  952.   /*                      XDrawPoint (mainDisplay, Win, gc, XOff+j, YOff-i); */
  953. ! /*                         Hack to run on RTs -- crash server on RTs       */
  954.                           XDrawLine (mainDisplay, Win, gc, XOff+j, YOff-i,
  955.                                 XOff+j, YOff-i);
  956. ***************
  957. *** 309,313 ****
  958.      else
  959.      {
  960. !       values.foreground = myBlackPixel;
  961.         values.function = GXcopy;
  962.         values.fill_style = FillSolid;
  963. --- 308,312 ----
  964.      else
  965.      {
  966. !       values.foreground = myBgPixel;
  967.         values.function = GXcopy;
  968.         values.fill_style = FillSolid;
  969. ***************
  970. *** 328,334 ****
  971. --- 327,335 ----
  972.   void EraseTextCursor ()
  973.   {
  974. +    XSetForeground (mainDisplay, revDefaultGC, myFgPixel^myBgPixel);
  975.      XDrawLine (mainDisplay, drawWindow, revDefaultGC, textCurX>>zoomScale,
  976.            textCurY>>zoomScale, textCurX>>zoomScale,
  977.            (textCurY+textCursorH)>>zoomScale);
  978. +    XSetForeground (mainDisplay, revDefaultGC, 1);
  979.   }
  980.   
  981. ***************
  982. *** 728,732 ****
  983.   {
  984.      register int    left, w;
  985. !    char        s[256];
  986.   
  987.      strcpy (s, curStr->s);
  988. --- 729,733 ----
  989.   {
  990.      register int    left, w;
  991. !    char        s[MAXSTRING+1];
  992.   
  993.      strcpy (s, curStr->s);
  994. ***************
  995. *** 745,776 ****
  996.   
  997.   static
  998. - int DrawAttrAndName (AttrPtr)
  999. -    struct AttrRec    * AttrPtr;
  1000. - {
  1001. -    struct TextRec    * text_ptr;
  1002. -    struct BBRec        old_bbox, new_bbox;
  1003. -    int            offset = 0;
  1004. - 
  1005. -    if (AttrPtr->nameshown != TRUE)
  1006. -    {
  1007. -       text_ptr = AttrPtr->obj->detail.t;
  1008. -       strcpy (text_ptr->first->s, AttrPtr->name);
  1009. -       strcat (text_ptr->first->s, AttrPtr->s);
  1010. -       offset = XTextWidth (canvasFontPtr, text_ptr->first->s,
  1011. -             strlen (text_ptr->first->s));
  1012. - 
  1013. -       old_bbox = AttrPtr->obj->bbox;
  1014. -       UpdTextBBox (AttrPtr->obj);
  1015. -       new_bbox = AttrPtr->obj->bbox;
  1016. -       RedrawAreas (botObj,
  1017. -             old_bbox.ltx-(1<<zoomScale), old_bbox.lty-(1<<zoomScale),
  1018. -             old_bbox.rbx+(1<<zoomScale), old_bbox.rby+(1<<zoomScale),
  1019. -             new_bbox.ltx-(1<<zoomScale), new_bbox.lty-(1<<zoomScale),
  1020. -             new_bbox.rbx+(1<<zoomScale), new_bbox.rby+(1<<zoomScale)); 
  1021. -    }
  1022. -    return (offset);
  1023. - }
  1024. - 
  1025. - static
  1026.   void HandleButton (Button_Ev)
  1027.      XButtonEvent    * Button_Ev;
  1028. --- 746,749 ----
  1029. ***************
  1030. *** 1077,1082 ****
  1031.      struct StrRec    * s_ptr, * s_ptr1, * new_cur_str;
  1032.      int            highlighting = FALSE, new_cur_index, second_index, len;
  1033. !    int            i, y, new_cur_y;
  1034. !    char            * s;
  1035.   
  1036.      if (!textHighlight) return;
  1037. --- 1050,1055 ----
  1038.      struct StrRec    * s_ptr, * s_ptr1, * new_cur_str;
  1039.      int            highlighting = FALSE, new_cur_index, second_index, len;
  1040. !    int            i, y, new_cur_y, len1, len2;
  1041. !    char            * s, msg[80];
  1042.   
  1043.      if (!textHighlight) return;
  1044. ***************
  1045. *** 1090,1093 ****
  1046. --- 1063,1075 ----
  1047.            {
  1048.               second_index = (s_ptr == curStr) ? textCurIndex : textEndIndex;
  1049. +             len1 = strlen (new_cur_str->s);
  1050. +             len2 = strlen (&(s_ptr->s[second_index]));
  1051. +             if (len1+len2 >= MAXSTRING)
  1052. +             {
  1053. +                sprintf (msg, "String length exceeds %1d.  String truncated.",
  1054. +                      MAXSTRING);
  1055. +                Msg (msg);
  1056. +                s_ptr->s[MAXSTRING-len1+second_index] = '\0';
  1057. +             }
  1058.               strcat (new_cur_str->s, &(s_ptr->s[second_index]));
  1059.               if (s_ptr == lastStr)
  1060. ***************
  1061. *** 1167,1174 ****
  1062.      AddStr (curStr, curStr->next, str_ptr);
  1063.      curStr = str_ptr;
  1064. -    textCurX = textOrigX;
  1065.      textCurY += textCursorH;
  1066.      textCurIndex = 0;
  1067.      curStrW = XTextWidth (canvasFontPtr, curStr->s, strlen (curStr->s));
  1068.      i = textCursorH * NumLines ();
  1069.      if (i > textH)
  1070. --- 1149,1156 ----
  1071.      AddStr (curStr, curStr->next, str_ptr);
  1072.      curStr = str_ptr;
  1073.      textCurY += textCursorH;
  1074.      textCurIndex = 0;
  1075.      curStrW = XTextWidth (canvasFontPtr, curStr->s, strlen (curStr->s));
  1076. +    SetTextCurX ();
  1077.      i = textCursorH * NumLines ();
  1078.      if (i > textH)
  1079. ***************
  1080. *** 1200,1203 ****
  1081. --- 1182,1187 ----
  1082.      struct StrRec    * str_ptr;
  1083.      struct AttrRec       * attr_ptr;
  1084. +    int            len1, len2;
  1085. +    char            msg[80];
  1086.   
  1087.      if (textHighlight)
  1088. ***************
  1089. *** 1249,1252 ****
  1090. --- 1233,1245 ----
  1091.               curStr->prev->next = curStr->next;
  1092.               textCurIndex = strlen (curStr->prev->s);
  1093. +             len1 = strlen (curStr->prev->s);
  1094. +             len2 = strlen (curStr->s);
  1095. +             if (len1+len2 >= MAXSTRING)
  1096. +             {
  1097. +                sprintf (msg, "String length exceeds %1d.  String truncated.",
  1098. +                      MAXSTRING);
  1099. +                Msg (msg);
  1100. +                curStr->s[MAXSTRING-len1] = '\0';
  1101. +             }
  1102.               strcat (curStr->prev->s, curStr->s);
  1103.               cfree (curStr);
  1104. ***************
  1105. *** 1283,1289 ****
  1106. --- 1276,1293 ----
  1107.      register int        amount;
  1108.      int            need_redraw;
  1109. +    char            msg[80];
  1110. +    XEvent        ev;
  1111.   
  1112.      if (need_redraw = textHighlight) DeleteHighlightedText ();
  1113.   
  1114. +    if (textCurIndex+strlen (&(curStr->s[textCurIndex])) >= MAXSTRING)
  1115. +    {
  1116. +       sprintf (msg, "String length exceeds %1d.  Character ignored.",MAXSTRING);
  1117. +       Msg (msg);
  1118. +       RedrawCurText ();
  1119. +       while (XCheckWindowEvent (mainDisplay, drawWindow, KeyPressMask, &ev)) ;
  1120. +       return;
  1121. +    }
  1122. + 
  1123.      amount = XTextWidth (canvasFontPtr, Str, 1);
  1124.    
  1125. ***************
  1126. *** 1356,1360 ****
  1127.         PutTextCursor ();
  1128.         MarkRulers (textCurX>>zoomScale, textCurY>>zoomScale);
  1129. !       fileModified = TRUE;
  1130.      }
  1131.   }
  1132. --- 1360,1364 ----
  1133.         PutTextCursor ();
  1134.         MarkRulers (textCurX>>zoomScale, textCurY>>zoomScale);
  1135. !       SetFileModified (TRUE);
  1136.      }
  1137.   }
  1138. ***************
  1139. *** 1681,1685 ****
  1140.      struct StrRec    * s_ptr;
  1141.      struct TextRec    * text_ptr;
  1142. !    char            color_str[20], * s, tmp_str[80], inbuf[255];
  1143.      int            num_lines, x, y, font, style, size;
  1144.      int            text_just, rotate, pen;
  1145. --- 1685,1690 ----
  1146.      struct StrRec    * s_ptr;
  1147.      struct TextRec    * text_ptr;
  1148. !    char            color_str[80], * s;
  1149. !    char            tmp_str[MAXSTRING+1], inbuf[MAXSTRING+1];
  1150.      int            num_lines, x, y, font, style, size;
  1151.      int            text_just, rotate, pen;
  1152. ***************
  1153. *** 1715,1719 ****
  1154.      for (i = 0; i < num_lines; i++)
  1155.      {
  1156. !       fgets (inbuf, 255, FP);
  1157.         strcpy(tmp_str, FindChar ('"', inbuf));
  1158.         s = ReadString (tmp_str);
  1159. --- 1720,1724 ----
  1160.      for (i = 0; i < num_lines; i++)
  1161.      {
  1162. !       fgets (inbuf, MAXSTRING, FP);
  1163.         strcpy(tmp_str, FindChar ('"', inbuf));
  1164.         s = ReadString (tmp_str);
  1165. ***************
  1166. *** 1805,1809 ****
  1167.   {
  1168.      register char    * s = ObjPtr->detail.t->first->s, * s1 = Str;
  1169. !    char            tmp_str[80], * c_ptr;
  1170.      int            len;
  1171.      struct BBRec        bbox;
  1172. --- 1810,1814 ----
  1173.   {
  1174.      register char    * s = ObjPtr->detail.t->first->s, * s1 = Str;
  1175. !    char            tmp_str[MAXSTRING+1], * c_ptr;
  1176.      int            len;
  1177.      struct BBRec        bbox;
  1178. ***************
  1179. *** 1830,1834 ****
  1180.      if (*s != '\0')
  1181.      {
  1182. !       values.foreground = myBlackPixel;
  1183.         values.function = GXcopy;
  1184.         values.fill_style = FillSolid;
  1185. --- 1835,1839 ----
  1186.      if (*s != '\0')
  1187.      {
  1188. !       values.foreground = myBgPixel;
  1189.         values.function = GXcopy;
  1190.         values.fill_style = FillSolid;
  1191. *** tgif2ps.c.orig    Wed Jun 27 13:32:59 1990
  1192. --- tgif2ps.c    Wed Jun 27 13:33:00 1990
  1193. ***************
  1194. *** 6,10 ****
  1195.   #ifndef lint
  1196.   static char RCSid[] =
  1197. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/tgif2ps.c,v 1.1 90/04/04 22:59:59 william Exp $";
  1198.   #endif
  1199.   
  1200. --- 6,10 ----
  1201.   #ifndef lint
  1202.   static char RCSid[] =
  1203. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/tgif2ps.c,v 1.4 90/06/05 09:31:14 william Exp $";
  1204.   #endif
  1205.   
  1206. ***************
  1207. *** 25,28 ****
  1208. --- 25,29 ----
  1209.         exit (-1);
  1210.      }
  1211. +    printf ("%%!\n");
  1212.   }
  1213.   
  1214. ***************
  1215. *** 79,83 ****
  1216.         }
  1217.         else if (strcmp (inbuf, "72 0.4 mul 72 -0.6 mul translate\n") == 0)
  1218. !       {  /* landscape format */
  1219.   /*       printf ("72 3.5 mul 72 -0.6 mul translate\n"); */
  1220.        if (fgets (inbuf, 255, stdin) == NULL)
  1221. --- 80,84 ----
  1222.         }
  1223.         else if (strcmp (inbuf, "72 0.4 mul 72 -0.6 mul translate\n") == 0)
  1224. !       {  /* landscape or slide-landscape format */
  1225.   /*       printf ("72 3.5 mul 72 -0.6 mul translate\n"); */
  1226.        if (fgets (inbuf, 255, stdin) == NULL)
  1227. ***************
  1228. *** 88,95 ****
  1229.            if (strcmp (inbuf, "0.565 -0.565 scale\n") != 0)
  1230.            {
  1231. !             fprintf (stderr, "ERROR:  '0.565 -0.565 scale' not found.\n");
  1232. !             exit (-1);
  1233.            }
  1234. !          printf ("0.565 -0.565 scale\n");
  1235.         }
  1236.         else if (strcmp (inbuf, "72 0.2 mul 72 -0.3 mul translate\n") == 0)
  1237. --- 89,102 ----
  1238.            if (strcmp (inbuf, "0.565 -0.565 scale\n") != 0)
  1239.            {
  1240. !             if (strcmp (inbuf, "1.13 -1.13 scale\n") != 0)
  1241. !             {
  1242. !                fprintf (stderr, "ERROR:  neither '0.565 -0.565 scale' nor ");
  1243. !                fprintf (stderr, "'1.13 -1.13 scale' is found.\n");
  1244. !                exit (-1);
  1245. !             }
  1246. !             printf ("1.13 -1.13 scale\n");
  1247.            }
  1248. !          else
  1249. !             printf ("0.565 -0.565 scale\n");
  1250.         }
  1251.         else if (strcmp (inbuf, "72 0.2 mul 72 -0.3 mul translate\n") == 0)
  1252. ***************
  1253. *** 107,125 ****
  1254.            }
  1255.            printf ("0.28 -0.28 scale\n");
  1256. -       }
  1257. -       else if (strcmp (inbuf, "72 0.4 mul 72 -0.6 mul translate\n") == 0)
  1258. -       {  /* slide-landscape format */
  1259. - /*       printf ("72 3.5 mul 72 -0.6 mul translate\n"); */
  1260. -      if (fgets (inbuf, 255, stdin) == NULL)
  1261. -          {
  1262. -             fprintf (stderr, "ERROR:  Incomplete file.\n");
  1263. -             exit (-1);
  1264. -          }
  1265. -          if (strcmp (inbuf, "1.13 -1.13 scale\n") != 0)
  1266. -          {
  1267. -             fprintf (stderr, "ERROR:  '1.13 -1.13 scale' not found.\n");
  1268. -             exit (-1);
  1269. -          }
  1270. -          printf ("1.13 -1.13 scale\n");
  1271.         }
  1272.         else if (strcmp (inbuf, "showpage\n") == 0)
  1273. --- 114,117 ----
  1274. *** version.c.orig    Wed Jun 27 13:33:08 1990
  1275. --- version.c    Wed Jun 27 13:33:09 1990
  1276. ***************
  1277. *** 6,11 ****
  1278.   #ifndef lint
  1279.   static char RCSid[] =
  1280. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/version.c,v 1.3 90/05/16 08:31:53 william Exp $";
  1281.   #endif
  1282.   
  1283. ! char    * version_string = "1.2";
  1284. --- 6,11 ----
  1285.   #ifndef lint
  1286.   static char RCSid[] =
  1287. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/version.c,v 1.12 90/06/26 08:47:59 william Exp $";
  1288.   #endif
  1289.   
  1290. ! char    * version_string = "1.9";
  1291. *** file.e.orig    Wed Jun 27 13:33:15 1990
  1292. --- file.e    Wed Jun 27 13:33:17 1990
  1293. ***************
  1294. *** 4,8 ****
  1295.    * Copyright (C) 1989, William Cheng.
  1296.    *
  1297. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/file.e,v 1.1 90/04/01 22:17:03 william Exp $
  1298.    */
  1299.   
  1300. --- 4,8 ----
  1301.    * Copyright (C) 1989, William Cheng.
  1302.    *
  1303. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/file.e,v 1.6 90/05/24 10:35:30 william Exp $
  1304.    */
  1305.   
  1306. ***************
  1307. *** 12,15 ****
  1308. --- 12,24 ----
  1309.   extern int    importingFile;
  1310.   extern char    * fileMenuStr[];
  1311. + extern int    psDotsPerInch;
  1312. + extern char    * psScaleStr[];
  1313. + extern float    psScale[];
  1314. + extern char    * psXOffStr[];
  1315. + extern float    psXOff[];
  1316. + extern char    * psYOffStr[];
  1317. + extern float    psYOff[];
  1318. + extern float    psPageWidthInInch[];
  1319. + extern float    psPageHeightInInch[];
  1320.   
  1321.   extern void    ClearFileInfo ();
  1322. ***************
  1323. *** 28,31 ****
  1324. --- 37,41 ----
  1325.   extern void    DumpAttrs ();
  1326.   extern void    DumpAllObj ();
  1327. + extern void    DumpBBox ();
  1328.   extern void    Dump ();
  1329.   extern void    NewProc ();
  1330. *** scroll.e.orig    Wed Jun 27 13:33:22 1990
  1331. --- scroll.e    Wed Jun 27 13:33:23 1990
  1332. ***************
  1333. *** 4,8 ****
  1334.    * Copyright (C) 1989, William Cheng.
  1335.    *
  1336. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/scroll.e,v 1.1 90/04/01 22:17:19 william Exp $
  1337.    */
  1338.   
  1339. --- 4,8 ----
  1340.    * Copyright (C) 1989, William Cheng.
  1341.    *
  1342. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/scroll.e,v 1.2 90/05/21 16:43:32 william Exp $
  1343.    */
  1344.   
  1345. ***************
  1346. *** 15,18 ****
  1347. --- 15,22 ----
  1348.   extern void    InitScroll ();
  1349.   extern void    RedrawScrollBars ();
  1350. + extern void    ScrollUp ();
  1351. + extern void    ScrollDown ();
  1352. + extern void    ScrollLeft ();
  1353. + extern void    ScrollRight ();
  1354.   extern void    ScrollEventHandler ();
  1355.   extern void    CleanUpScrolls ();
  1356. *** setup.e.orig    Wed Jun 27 13:33:28 1990
  1357. --- setup.e    Wed Jun 27 13:33:29 1990
  1358. ***************
  1359. *** 4,8 ****
  1360.    * Copyright (C) 1989, William Cheng.
  1361.    *
  1362. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/setup.e,v 1.2 90/05/15 09:33:37 william Exp $
  1363.    */
  1364.   
  1365. --- 4,8 ----
  1366.    * Copyright (C) 1989, William Cheng.
  1367.    *
  1368. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/setup.e,v 1.6 90/06/25 23:44:35 william Exp $
  1369.    */
  1370.   
  1371. ***************
  1372. *** 66,72 ****
  1373.   extern void    Setup ();
  1374.   extern int    TieLooseEnds ();
  1375.   
  1376. ! extern int    myBlackPixel;
  1377. ! extern int    myWhitePixel;
  1378.   
  1379.   extern char    drawPath[];
  1380. --- 66,75 ----
  1381.   extern void    Setup ();
  1382.   extern int    TieLooseEnds ();
  1383. + extern void    SetFileModified ();
  1384.   
  1385. ! extern int    myBgPixel;
  1386. ! extern int    myFgPixel;
  1387. ! extern int    myBorderPixel;
  1388. ! extern int    reverseVideo;
  1389.   
  1390.   extern char    drawPath[];
  1391. *** const.h.orig    Wed Jun 27 13:33:34 1990
  1392. --- const.h    Wed Jun 27 13:33:35 1990
  1393. ***************
  1394. *** 4,8 ****
  1395.    * Copyright (C) 1990, William Cheng.
  1396.    *
  1397. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/const.h,v 1.1 90/04/01 22:17:28 william Exp $
  1398.    */
  1399.   
  1400. --- 4,8 ----
  1401.    * Copyright (C) 1990, William Cheng.
  1402.    *
  1403. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/const.h,v 1.5 90/05/23 08:54:00 william Exp Locker: william $
  1404.    */
  1405.   
  1406. ***************
  1407. *** 37,40 ****
  1408. --- 37,41 ----
  1409.   #define SetRecVals(R,X,Y,W,H) ((R).x=(X),(R).y=(Y),(R).width=(W),(R).height=(H))
  1410.   
  1411. + #define MAXSTRING 256
  1412.   #define MAXPATHLENGTH 256
  1413.   
  1414. ***************
  1415. *** 175,178 ****
  1416. --- 176,181 ----
  1417.   #define SLIDEPORT 4
  1418.   #define SLIDELAND 5
  1419. + 
  1420. + #define MAXPAGESTYLES 6
  1421.   
  1422.   /* where to print */
  1423. *** types.h.orig    Wed Jun 27 13:33:40 1990
  1424. --- types.h    Wed Jun 27 13:33:41 1990
  1425. ***************
  1426. *** 4,10 ****
  1427.    * Copyright (C) 1990, William Cheng.
  1428.    *
  1429. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/types.h,v 1.1 90/04/01 22:17:28 william Exp $
  1430.    */
  1431.   
  1432.   typedef struct BBRec {
  1433.      int    ltx, lty, rbx, rby;
  1434. --- 4,12 ----
  1435.    * Copyright (C) 1990, William Cheng.
  1436.    *
  1437. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/types.h,v 1.3 90/05/18 20:23:48 william Exp $
  1438.    */
  1439.   
  1440. + #include "const.h"
  1441. + 
  1442.   typedef struct BBRec {
  1443.      int    ltx, lty, rbx, rby;
  1444. ***************
  1445. *** 32,37 ****
  1446.   
  1447.   typedef struct AttrRec {
  1448. !    char            name[80]; /* attribute name */
  1449. !    char            s[80]; /* attribute value string */
  1450.      short        shown; /* TRUE if the attribute is shown */
  1451.      short        nameshown; /* TRUE if the attr name is also shown */
  1452. --- 34,39 ----
  1453.   
  1454.   typedef struct AttrRec {
  1455. !    char            name[MAXSTRING+1]; /* attribute name */
  1456. !    char            s[MAXSTRING+1]; /* attribute value string */
  1457.      short        shown; /* TRUE if the attribute is shown */
  1458.      short        nameshown; /* TRUE if the attr name is also shown */
  1459. ***************
  1460. *** 44,48 ****
  1461.   typedef struct GroupRec {
  1462.      struct ObjRec    * first, * last;
  1463. !    char            s[80];
  1464.      int            id, dirty;
  1465.      struct AttrRec    * fattr, *lattr; /* first and last attributes */
  1466. --- 46,50 ----
  1467.   typedef struct GroupRec {
  1468.      struct ObjRec    * first, * last;
  1469. !    char            s[MAXSTRING+1];
  1470.      int            id, dirty;
  1471.      struct AttrRec    * fattr, *lattr; /* first and last attributes */
  1472. ***************
  1473. *** 76,80 ****
  1474.   
  1475.   typedef struct StrRec {
  1476. !    char            s[80];
  1477.      struct StrRec    * next, * prev;
  1478.   } * StrRecPtr;
  1479. --- 78,82 ----
  1480.   
  1481.   typedef struct StrRec {
  1482. !    char            s[MAXSTRING+1];
  1483.      struct StrRec    * next, * prev;
  1484.   } * StrRecPtr;
  1485. ***************
  1486. *** 100,112 ****
  1487.      int            color, h_align, v_align, line_w, line_s;
  1488.      int            fill, pen, just, font, font_s, f_size, f_comp_size;
  1489. !    char            name[80], domain[256];
  1490.   } * StkRecPtr;
  1491.   
  1492.   typedef struct _DspItem {
  1493. !    char        s[256];
  1494.   } DspItem;
  1495.   
  1496.   typedef struct _DspList {
  1497. !    char            itemstr[256];
  1498.      struct _DspList    * next;
  1499.   } DspList;
  1500. --- 102,114 ----
  1501.      int            color, h_align, v_align, line_w, line_s;
  1502.      int            fill, pen, just, font, font_s, f_size, f_comp_size;
  1503. !    char            name[MAXPATHLENGTH+1], domain[MAXPATHLENGTH+1];
  1504.   } * StkRecPtr;
  1505.   
  1506.   typedef struct _DspItem {
  1507. !    char        s[MAXPATHLENGTH+1];
  1508.   } DspItem;
  1509.   
  1510.   typedef struct _DspList {
  1511. !    char            itemstr[MAXPATHLENGTH+1];
  1512.      struct _DspList    * next;
  1513.   } DspList;
  1514. *** Makefile.noimake.orig    Wed Jun 27 13:33:50 1990
  1515. --- Makefile.noimake    Wed Jun 27 13:33:51 1990
  1516. ***************
  1517. *** 4,8 ****
  1518.   # Copyright (C) 1990, William Cheng.
  1519.   #
  1520. ! # @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/Makefile.noimake,v 1.3 90/05/10 09:12:10 william Exp $
  1521.   #
  1522.   
  1523. --- 4,8 ----
  1524.   # Copyright (C) 1990, William Cheng.
  1525.   #
  1526. ! # @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/Makefile.noimake,v 1.10 90/06/13 14:32:34 william Exp $
  1527.   #
  1528.   
  1529. ***************
  1530. *** 13,17 ****
  1531.   
  1532.   CC = cc
  1533. ! CFLAGS = -g -I/usr/local/include
  1534.   LFLAGS = -lX11 -lm
  1535.   
  1536. --- 13,18 ----
  1537.   
  1538.   CC = cc
  1539. ! CFLAGS = -g -DTGIF_PATH=\"/u/tangram/u/william/X11/TGIF\" -DPSFILE_MOD=\"664\" \
  1540. !         -I/usr/local/include
  1541.   LFLAGS = -lX11 -lm
  1542.   
  1543. ***************
  1544. *** 94,103 ****
  1545.   cursor.o:    const.h types.h $(CURSOR_BM) choice.e setup.e
  1546.   tgif.o:        const.h types.h mainloop.e setup.e version.e
  1547. ! dialog.o:    const.h types.h cursor.e box.e font.e mainloop.e raster.e
  1548.   drawing.o:    const.h types.h \
  1549.           align.e animate.e attr.e box.e choice.e cursor.e dialog.e \
  1550.           dup.e edit.e file.e font.e grid.e group.e mark.e menu.e msg.e \
  1551. !         obj.e oval.e poly.e polygon.e raster.e rect.e ruler.e \
  1552. !         select.e setup.e special.e stk.e stretch.e text.e
  1553.   dup.o:        const.h types.h \
  1554.           attr.e drawing.e grid.e obj.e select.e setup.e
  1555. --- 95,105 ----
  1556.   cursor.o:    const.h types.h $(CURSOR_BM) choice.e setup.e
  1557.   tgif.o:        const.h types.h mainloop.e setup.e version.e
  1558. ! dialog.o:    const.h cursor.e box.e font.e mainloop.e raster.e setup.e
  1559.   drawing.o:    const.h types.h \
  1560.           align.e animate.e attr.e box.e choice.e cursor.e dialog.e \
  1561.           dup.e edit.e file.e font.e grid.e group.e mark.e menu.e msg.e \
  1562. !         obj.e oval.e pattern.e poly.e polygon.e raster.e rect.e \
  1563. !         ruler.e scroll.e select.e setup.e special.e stk.e stretch.e \
  1564. !         text.e
  1565.   dup.o:        const.h types.h \
  1566.           attr.e drawing.e grid.e obj.e select.e setup.e
  1567. ***************
  1568. *** 127,131 ****
  1569.           box.e choice.e color.e cursor.e dialog.e drawing.e edit.e \
  1570.           file.e font.e grid.e msg.e names.e obj.e pattern.e raster.e \
  1571. !         select.e setup.e special.e text.e
  1572.   move.o:        const.h types.h \
  1573.           attr.e cursor.e drawing.e dup.e grid.e obj.e oval.e \
  1574. --- 129,133 ----
  1575.           box.e choice.e color.e cursor.e dialog.e drawing.e edit.e \
  1576.           file.e font.e grid.e msg.e names.e obj.e pattern.e raster.e \
  1577. !         select.e setup.e special.e text.e version.e
  1578.   move.o:        const.h types.h \
  1579.           attr.e cursor.e drawing.e dup.e grid.e obj.e oval.e \
  1580. *** Imakefile.orig    Wed Jun 27 13:33:58 1990
  1581. --- Imakefile    Wed Jun 27 13:33:59 1990
  1582. ***************
  1583. *** 4,18 ****
  1584.   /**/# Copyright (C) 1990, William Cheng.
  1585.   /**/#
  1586. ! /**/# @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/Imakefile,v 1.5 90/05/17 08:34:23 william Exp $
  1587.   /**/#
  1588.   
  1589. ! XLIB        = -lX11
  1590. ! MATHLIB        = -lm
  1591.   PROGRAMS    = tgif prtgif tgif2ps frontend11.o
  1592.   CDEBUGFLAGS    = -g
  1593.   BINDIR        = /u/tangram/bin
  1594. ! /**/# MY_LIBRARIES    = /usr/lib/debug/malloc.o $(XLIB) $(MATHLIB)
  1595. ! MY_LIBRARIES    = $(XLIB) $(MATHLIB)
  1596. ! TGIFVERSION    = 1.2
  1597.   
  1598.   OBJ1 =    align.o animate.o attr.o \
  1599. --- 4,18 ----
  1600.   /**/# Copyright (C) 1990, William Cheng.
  1601.   /**/#
  1602. ! /**/# @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/Imakefile,v 1.16 90/06/26 08:48:16 william Exp $
  1603.   /**/#
  1604.   
  1605. ! TGIFVERSION    = 1.9
  1606.   PROGRAMS    = tgif prtgif tgif2ps frontend11.o
  1607.   CDEBUGFLAGS    = -g
  1608.   BINDIR        = /u/tangram/bin
  1609. ! DEFINES        = -DTGIF_PATH=\"/u/tangram/u/william/X11/TGIF\" \
  1610. !           -DPSFILE_MOD=\"664\"
  1611. ! LOCAL_LIBRARIES    = $(XLIB)
  1612. ! SYS_LIBRARIES    = -lm
  1613.   
  1614.   OBJ1 =    align.o animate.o attr.o \
  1615. ***************
  1616. *** 34,43 ****
  1617.   OBJS1 = tgif.o $(OBJ1)
  1618.   OBJS2 = prtgif.o $(OBJ1)
  1619. ! OBJS3 = $(OBJ1)
  1620.   
  1621.   SRCS1 = .//**/*.c
  1622. ! SRCS2 = .//**/*.c
  1623. ! SRCS3 = .//**/*.c
  1624.   
  1625.   .SUFFIXES: .l .man
  1626.   
  1627. --- 34,49 ----
  1628.   OBJS1 = tgif.o $(OBJ1)
  1629.   OBJS2 = prtgif.o $(OBJ1)
  1630. ! OBJS3 = tgif2ps.o
  1631.   
  1632.   SRCS1 = .//**/*.c
  1633. ! SRCS2 = 
  1634. ! SRCS3 = 
  1635.   
  1636. + ComplexProgramTarget_1(tgif,$(LOCAL_LIBRARIES),)
  1637. + ComplexProgramTarget_2(prtgif,$(LOCAL_LIBRARIES),)
  1638. + ComplexProgramTarget_3(tgif2ps,,)
  1639. + 
  1640. + NormalRelocatableTarget(frontend11,$(OBJ1))
  1641. + 
  1642.   .SUFFIXES: .l .man
  1643.   
  1644. ***************
  1645. *** 46,59 ****
  1646.       cp $*.l $*.man
  1647.   
  1648. - ComplexProgramTarget_1(tgif,,$(MY_LIBRARIES))
  1649. - NormalProgramTarget(prtgif,$(OBJS2),,,$(MY_LIBRARIES))
  1650. - NormalProgramTarget(tgif2ps,tgif2ps.o,,,)
  1651. - NormalRelocatableTarget(frontend11,$(OBJS3))
  1652. - InstallProgram(tgif2ps,$(BINDIR))
  1653. - InstallProgram(prtgif,$(BINDIR))
  1654. - 
  1655.   OBJDEMO = an-sr-flip-flop.obj fonts.obj slide-demo.obj spice//**/*.obj
  1656.   SYMDEMO = flip-flop.sym nand2.sym pin.sym tangram.sym spice//**/*.sym
  1657. ! MISCTAR = *.man README Copyright tgif.pl spice//**/*.mod
  1658.   
  1659.   distr: tar shar version
  1660. --- 52,58 ----
  1661.       cp $*.l $*.man
  1662.   
  1663.   OBJDEMO = an-sr-flip-flop.obj fonts.obj slide-demo.obj spice//**/*.obj
  1664.   SYMDEMO = flip-flop.sym nand2.sym pin.sym tangram.sym spice//**/*.sym
  1665. ! MISCTAR = *.man README Copyright tgif.pl spice//**/*.mod example.tex
  1666.   
  1667.   distr: tar shar version
  1668. ***************
  1669. *** 60,64 ****
  1670.   
  1671.   tar:
  1672. !     rm tgif-$(TGIFVERSION).tar/**/*
  1673.       tar cvf tgif-$(TGIFVERSION).tar /**/*.c /**/*.e /**/*.h \
  1674.           Makefile.noimake Imakefile bitmaps//**/*.bm \
  1675. --- 59,63 ----
  1676.   
  1677.   tar:
  1678. !     rm -f tgif-$(TGIFVERSION).tar/**/*
  1679.       tar cvf tgif-$(TGIFVERSION).tar /**/*.c /**/*.e /**/*.h \
  1680.           Makefile.noimake Imakefile bitmaps//**/*.bm \
  1681. ***************
  1682. *** 70,74 ****
  1683.   
  1684.   SPICE_1 = spice spice//**/*.obj spice//**/*.sym spice//**/*.mod
  1685. ! MAN_1 = /**/*.man
  1686.   MISC_1 = Makefile.noimake Imakefile .psmac ./**/*port ./**/*land \
  1687.           README Copyright tgif.pl tgificon.obj
  1688. --- 69,73 ----
  1689.   
  1690.   SPICE_1 = spice spice//**/*.obj spice//**/*.sym spice//**/*.mod
  1691. ! MAN_1 = /**/*.man example.tex
  1692.   MISC_1 = Makefile.noimake Imakefile .psmac ./**/*port ./**/*land \
  1693.           README Copyright tgif.pl tgificon.obj
  1694. ***************
  1695. *** 77,81 ****
  1696.   
  1697.   shar:
  1698. !     rm tgif-$(TGIFVERSION).shar./**/*
  1699.       shar -otgif-$(TGIFVERSION).shar.1 -n1 -e21 a/**/*.c
  1700.       shar -otgif-$(TGIFVERSION).shar.2 -n2 -e21 b/**/*.c c/**/*.c
  1701. --- 76,80 ----
  1702.   
  1703.   shar:
  1704. !     rm -f tgif-$(TGIFVERSION).shar./**/*
  1705.       shar -otgif-$(TGIFVERSION).shar.1 -n1 -e21 a/**/*.c
  1706.       shar -otgif-$(TGIFVERSION).shar.2 -n2 -e21 b/**/*.c c/**/*.c
  1707. *** tgif.man.orig    Wed Jun 27 13:34:05 1990
  1708. --- tgif.man    Wed Jun 27 13:34:06 1990
  1709. ***************
  1710. *** 1,4 ****
  1711. ! .\"@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/tgif.man,v 1.4 90/05/17 09:21:26 william Exp $
  1712. ! .TH TGIF 1 "Version 1.1" "Tgif"
  1713.   .SH NAME
  1714.   \fItgif\fR \- Xlib based 2-D drawing facility under X11.  Also supports
  1715. --- 1,4 ----
  1716. ! .\"@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/tgif.man,v 1.6 90/06/05 12:19:24 william Exp $
  1717. ! .TH TGIF 1 "Version 1.6" "Tgif"
  1718.   .SH NAME
  1719.   \fItgif\fR \- Xlib based 2-D drawing facility under X11.  Also supports
  1720. ***************
  1721. *** 176,179 ****
  1722. --- 176,181 ----
  1723.     ^X    delete all selected objects\br
  1724.     ^Z    escape to Prolog\br
  1725. +   ^,    scroll left\br
  1726. +   ^.    scroll right\br
  1727.   \br
  1728.     #A    attach selected attributes to the selected complex object\br
  1729. ***************
  1730. *** 187,190 ****
  1731. --- 189,193 ----
  1732.     #I    increment the grid size\br
  1733.     #J    hide attribute names on the selected objects\br
  1734. +   #K    change the drawing mode to select\br
  1735.     #L    give the line style and line width pop-up menu\br
  1736.     #M    move the attributes of a selected object\br
  1737. ***************
  1738. *** 208,211 ****
  1739. --- 211,216 ----
  1740.     #4    change the font size to 18\br
  1741.     #5    change the font size to 24\br
  1742. +   #,    scroll up\br
  1743. +   #.    scroll down\br
  1744.   \br
  1745.    ^#B    change the text style to bold\br
  1746. ***************
  1747. *** 265,271 ****
  1748.   Save and name the file.
  1749.   .SH LATEX FIGURE FORMATS
  1750. ! Here we show how to make a figure for a LaTeX file.
  1751.   .PP
  1752. ! Before printing a file in the \fI.ps\fR format, center the picture
  1753.   on the page (e.g., the width of a portrait style page is 7.5 inch, so the
  1754.   center of the page is at the 3.75 inch mark),
  1755. --- 270,311 ----
  1756.   Save and name the file.
  1757.   .SH LATEX FIGURE FORMATS
  1758. ! Here we show how to make a figure for a LaTeX file, first with
  1759. ! the \fIpsfig\fR (or \fIepsf\fR) special construct, then with the
  1760. ! \fIpsfile\fR special construct.  An example of both can be found
  1761. ! in ``example.tex'' included with this distribution.
  1762.   .PP
  1763. ! To print a tgif file to be included in a LaTeX document with
  1764. ! the \fIpsfig\fR or \fIepsf\fR special construct
  1765. ! (files generated will be in the
  1766. ! \fIencapsulated PostScript\fR format), first
  1767. ! select LaTeX format in the panel window (click the left mouse
  1768. ! button on the laser printer icon), then type ^P to generate
  1769. ! the PostScript file.  If the file name is ``an-sr-flip-flop.obj'',
  1770. ! then the LaTeX figure file generated will be named
  1771. ! ``an-sr-flip-flop.ps''.  This file can be included in a LaTeX
  1772. ! document as follows,
  1773. ! .PP
  1774. ! .DS I
  1775. ! \\begin{figure*}[htb]
  1776. ! .br
  1777. ! \\input{psfig}
  1778. ! .br
  1779. ! \\centerline{\\psfig{figure=an-sr-flip-flop.ps}}
  1780. ! .br
  1781. ! \\caption{An SR flip-flop.  \\label{fig:an-sr-flip-flop}}
  1782. ! .br
  1783. ! \\end{figure*}
  1784. ! .br
  1785. ! .DE
  1786. ! .br
  1787. ! .PP
  1788. ! The \\centerline command above centers the picture.  Also, \fItgif2ps\fR is
  1789. ! used to generate the \fI.ps\fR file, so it should be
  1790. ! installed (see the man pages on tgif2ps,
  1791. ! which is included in the tgif distribution).
  1792. ! .PP
  1793. ! If encapsulated PostScript is not desired, the \fIpsfile\fR
  1794. ! special construct can be used as described here.
  1795. ! First, center the picture
  1796.   on the page (e.g., the width of a portrait style page is 7.5 inch, so the
  1797.   center of the page is at the 3.75 inch mark),
  1798. ***************
  1799. *** 272,281 ****
  1800.   and make the top object on the page as close to
  1801.   the top of the page as possible.
  1802. ! Select LaTeX format in the panel window (click the left mouse button
  1803. ! in the laser printer icon),
  1804.   then print in the LaTeX format.
  1805. ! For example, if the file name is ``an-sr-flip-flop.obj'', the LaTeX figure
  1806. ! file generated will be named ``an-sr-flip-flop.ps''.  This file can be
  1807. ! included in a LaTeX document as follows,
  1808.   .PP
  1809.   .DS I
  1810. --- 312,320 ----
  1811.   and make the top object on the page as close to
  1812.   the top of the page as possible.
  1813. ! Select LaTeX format in the panel window,
  1814.   then print in the LaTeX format.
  1815. ! Same as with the \fIpsfig\fR construct, a file with the \fI.ps\fR
  1816. ! extention will be generated.
  1817. ! This file can be included in a LaTeX document as follows,
  1818.   .PP
  1819.   .DS I
  1820. ***************
  1821. *** 297,304 ****
  1822.   
  1823.   Notice that the psfile special construct is used.  Encapsulated
  1824. ! PostScript format is not supported.  Also, \fItgif2ps\fR is
  1825.   used to generate the \fI.ps\fR file, so it should be
  1826. ! installed (see the man pages on tgif2ps,
  1827. ! which is included in the tgif distribution).
  1828.   .SH X DEFAULTS
  1829.   .TP
  1830. --- 336,342 ----
  1831.   
  1832.   Notice that the psfile special construct is used.  Encapsulated
  1833. ! PostScript format is not supported.  Again, \fItgif2ps\fR is
  1834.   used to generate the \fI.ps\fR file, so it should be
  1835. ! installed in the path.
  1836.   .SH X DEFAULTS
  1837.   .TP
  1838. ***************
  1839. *** 307,312 ****
  1840. --- 345,359 ----
  1841.   .I Tgif*IconGeometry: +X+Y
  1842.   .TP
  1843. + .I Tgif*Foreground: COLORSTRING
  1844. + .TP
  1845. + .I Tgif*Background: COLORSTRING
  1846. + .TP
  1847.   .I Tgif*BorderColor: COLORSTRING
  1848.   .TP
  1849. + .I Tgif*ReverseVideo: [on,off]
  1850. + For black and white terminal, reverse video ``on'' means the background
  1851. + is black.  For color terminal, reverse video ``on'' means the background
  1852. + is specified by the Tgif*Foreground color.
  1853. + .TP
  1854.   .I Tgif*Color#: COLORSTRING
  1855.   This specified the correspondance between the color number and a color.
  1856. ***************
  1857. *** 319,322 ****
  1858. --- 366,373 ----
  1859.   This specified the default color index if certain color can not be found.
  1860.   Default is 0.
  1861. + .TP
  1862. + .I Tgif*PrintCommand: COMMAND
  1863. + This specified the print command used for printing the PostScript file.
  1864. + Default is lpr (without any quotes).
  1865.   .SH ENVIRONMENT
  1866.   .TP
  1867. ***************
  1868. *** 345,350 ****
  1869.   .br
  1870.   .DE
  1871.   .SH SEE ALSO
  1872. ! \fBlatex\fR(1L), \fBlpr\fR(1), \fBenv\fR(1), \fBX\fR(1), \fBtgif2ps\fR(1)
  1873.   .SH BUGS
  1874.   When any of the ``escape to Prolog'' commands are accidentally
  1875. --- 396,406 ----
  1876.   .br
  1877.   .DE
  1878. + .br
  1879. + .PP
  1880. + Note that the last 6 files are no longer needed for version 1.3
  1881. + and above.
  1882.   .SH SEE ALSO
  1883. ! \fBlatex\fR(1L), \fBlpr\fR(1), \fBenv\fR(1), \fBX\fR(1), \fBtgif2ps\fR(1),
  1884. ! \fBdvips\fR(1)
  1885.   .SH BUGS
  1886.   When any of the ``escape to Prolog'' commands are accidentally
  1887. *** README.orig    Wed Jun 27 13:34:11 1990
  1888. --- README    Wed Jun 27 13:34:12 1990
  1889. ***************
  1890. *** 2,6 ****
  1891.    * Author:    William Chia-Wei Cheng (william@cs.ucla.edu)
  1892.    *
  1893. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/README,v 1.2 90/05/10 09:23:20 william Exp $
  1894.    */
  1895.   
  1896. --- 2,6 ----
  1897.    * Author:    William Chia-Wei Cheng (william@cs.ucla.edu)
  1898.    *
  1899. !  * @(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/README,v 1.3 90/05/25 14:34:11 william Exp $
  1900.    */
  1901.   
  1902. ***************
  1903. *** 16,20 ****
  1904.       psroff -man tgif.man        <== to print
  1905.   
  1906. ! 3) If you don't have imake, just do the following,
  1907.       cp Makefile.noimake Makefile
  1908.       make tgif
  1909. --- 16,23 ----
  1910.       psroff -man tgif.man        <== to print
  1911.   
  1912. ! 3) Modify Makefile.noimake or Imakefile such that TGIF_PATH is set
  1913. !    to the directory where the icon file and the PostScript macro file are.
  1914. ! 
  1915. ! 4) If you don't have imake, just do the following,
  1916.       cp Makefile.noimake Makefile
  1917.       make tgif
  1918. ***************
  1919. *** 24,29 ****
  1920.       make tgif
  1921.   
  1922. ! 4) Remember to set the environment variables TGIFPATH and TGIFICON (see
  1923.       the man pages).
  1924.   
  1925. ! 5) Please also note that tgif has nothing to do with GIF files/formats.
  1926. --- 27,32 ----
  1927.       make tgif
  1928.   
  1929. ! 5) Remember to set the environment variables TGIFPATH and TGIFICON (see
  1930.       the man pages).
  1931.   
  1932. ! 6) Please also note that tgif has nothing to do with GIF files/formats.
  1933. *** .psmac.orig    Wed Jun 27 14:28:37 1990
  1934. --- .psmac    Wed Jun 27 14:28:37 1990
  1935. ***************
  1936. *** 1,3 ****
  1937. - %!
  1938.   
  1939.   /ellipsedict 6 dict def
  1940. --- 1,2 ----
  1941. ---------------------------------> cut here <---------------------------------
  1942. --
  1943.  
  1944. -- Bill Cheng // UCLA Computer Science Department // (213) 206-7135
  1945.    3277 Boelter Hall // Los Angeles, California 90024 // USA
  1946.    william@CS.UCLA.EDU      ...!{uunet|ucbvax}!cs.ucla.edu!william
  1947.  
  1948. dan
  1949. ----------------------------------------------------
  1950. O'Reilly && Associates   argv@sun.com / argv@ora.com
  1951. Opinions expressed reflect those of the author only.
  1952.