home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume8 / tgif / patch2.1 < prev    next >
Internet Message Format  |  1990-08-03  |  58KB
  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: v08i058: tgif (tgif-1.9 => tgif-1.12), Patch2, Part01/03
  5. Message-ID: <140168@sun.Eng.Sun.COM>
  6. Date: 4 Aug 90 02:12:10 GMT
  7. Sender: news@sun.Eng.Sun.COM
  8. Lines: 1818
  9. Approved: argv@sun.com
  10.  
  11. Submitted-by: william@CS.UCLA.EDU (William Cheng)
  12. Posting-number: Volume 8, Issue 58
  13. Archive-name: tgif/patch2.01
  14. Patch-To: tgif: Volume 7, Issue 56-76 (original: tgif-1.2)
  15. Patch-To: tgif: Volume 8, Issue 46-48 (Patch1: tgif-1.2 => tgif-1.9)
  16.  
  17. Patch2 of tgif takes tgif-1.9 to tgif-1.12.  Below is a list of
  18. added features/bug fixes, followed by the actual patch.
  19.  
  20. tgif-1.9 => tgif-1.10
  21.  
  22. 1) Fix bugs reported by Michael Webb regarding reading very long polygline.
  23. 2) Disallow stretching of zero width or zero height objects.
  24. 3) Add feature:  Add points and delete points to poly and splines.
  25. 4) In case of emergency, save working file in EmergencySave.obj or
  26.    EmergencySave.sym.  (Thanks to Stephen Doyle and Christos Zoulas.)
  27. 5) Add XDefault "Tgif*Synchronize" call XSynchronize ().
  28. 6) Add -p command line option to prtgif to print encapsulated PostScript
  29.    file.  (Thanks to Stephen Doyle.)
  30.  
  31. tgif-1.10 => tgif-1.11
  32.  
  33. 1) Fix bugs reported by Christos Zoulas regarding prtgif bounding box.
  34.    Text objects was generating wrong boudning boxes.
  35. 2) When text objects are saved, its bounding boxes are also saved now.
  36.    This fixes the problem in 1).  File version is bumped to 7!
  37. 3) Fix bugs in select.c (change calls to DelObj () to FreeObj ()).
  38.    This caused segmentation faults when tgif is dbx-ed, it caused
  39.    XError when not dbx-ed.
  40. 4) Prtgif is cleaned up to share functions with the tgif code.  (Turned
  41.    out to be a lot of changes.)
  42. 5) Add double-clicking in selecting file names.  New Xdefaults
  43.    Tgif*DoubleClickInterval (in milli-seconds) is added.
  44.  
  45. tgif-1.11 => tgif-1.12
  46.  
  47. 1) Fix bugs related to stretching boxes and ovals.  It used to complain
  48.    that object width or height is ZERO while it's not.
  49. 2) Fix a minor bug related to a seg fault when exiting tgif.  This doesn't
  50.    really cause problem before.
  51.  
  52. ---------------------------------> cut here <---------------------------------
  53. *** attr.c.orig    Thu Aug  2 09:42:50 1990
  54. --- attr.c    Thu Aug  2 09:42:52 1990
  55. ***************
  56. *** 6,10 ****
  57.   #ifndef lint
  58.   static char RCSid[] =
  59. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/attr.c,v 1.4 90/06/26 00:03:55 william Exp $";
  60.   #endif
  61.   
  62. --- 6,10 ----
  63.   #ifndef lint
  64.   static char RCSid[] =
  65. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/attr.c,v 1.6 90/07/30 11:09:21 william Exp $";
  66.   #endif
  67.   
  68. ***************
  69. *** 484,488 ****
  70.   static
  71.   char * ReadAttrString (Str)
  72. !    char *    Str;
  73.   {
  74.      register char    * s = Str;
  75. --- 484,488 ----
  76.   static
  77.   char * ReadAttrString (Str)
  78. !    char    * Str;
  79.   {
  80.      register char    * s = Str;
  81. ***************
  82. *** 496,502 ****
  83.   }
  84.   
  85. ! int  ReadAttr (FP, AttrPtr)
  86.      FILE            * FP;
  87.      struct AttrRec    * * AttrPtr;
  88.   {
  89.      struct ObjRec    * TextObj;
  90. --- 496,503 ----
  91.   }
  92.   
  93. ! int ReadAttr (FP, AttrPtr, PRTGIF)
  94.      FILE            * FP;
  95.      struct AttrRec    * * AttrPtr;
  96. +    int            PRTGIF;
  97.   {
  98.      struct ObjRec    * TextObj;
  99. ***************
  100. *** 505,509 ****
  101.      int            len, shown, nameshown, inherited;
  102.    
  103. !    fgets (inbuf, 255, FP); 
  104.   
  105.      if (inbuf[0] == ']')  return (FALSE);
  106. --- 506,510 ----
  107.      int            len, shown, nameshown, inherited;
  108.    
  109. !    fgets (inbuf, MAXSTRING, FP); 
  110.   
  111.      if (inbuf[0] == ']')  return (FALSE);
  112. ***************
  113. *** 533,537 ****
  114.      (*AttrPtr)->inherited = inherited;
  115.   
  116. !    ReadObj (FP, &TextObj);
  117.      TextObj->detail.t->attr = *AttrPtr;
  118.      (*AttrPtr)->obj = TextObj;
  119. --- 534,538 ----
  120.      (*AttrPtr)->inherited = inherited;
  121.   
  122. !    ReadObj (FP, &TextObj, PRTGIF);
  123.      TextObj->detail.t->attr = *AttrPtr;
  124.      (*AttrPtr)->obj = TextObj;
  125. ***************
  126. *** 1015,1019 ****
  127.      int            * fore_colors, * pixel_ptr, * valid, * flag_ptr;
  128.      int            len1, len2;
  129. !    char            * * attrStrs, * s, buf[256], msg[80];
  130.      unsigned int        button;
  131.   
  132. --- 1016,1020 ----
  133.      int            * fore_colors, * pixel_ptr, * valid, * flag_ptr;
  134.      int            len1, len2;
  135. !    char            * * attrStrs, * s, buf[MAXSTRING], msg[80];
  136.      unsigned int        button;
  137.   
  138. *** box.c.orig    Thu Aug  2 09:43:01 1990
  139. --- box.c    Thu Aug  2 09:43:02 1990
  140. ***************
  141. *** 6,10 ****
  142.   #ifndef lint
  143.   static char RCSid[] =
  144. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/box.c,v 1.4 90/06/26 00:04:27 william Exp $";
  145.   #endif
  146.   
  147. --- 6,10 ----
  148.   #ifndef lint
  149.   static char RCSid[] =
  150. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/box.c,v 1.5 90/07/16 10:29:15 william Exp $";
  151.   #endif
  152.   
  153. ***************
  154. *** 19,24 ****
  155.   #include "grid.e"
  156.   #include "obj.e"
  157. - #include "poly.e"
  158.   #include "pattern.e"
  159.   #include "raster.e"
  160.   #include "ruler.e"
  161. --- 19,24 ----
  162.   #include "grid.e"
  163.   #include "obj.e"
  164.   #include "pattern.e"
  165. + #include "poly.e"
  166.   #include "raster.e"
  167.   #include "ruler.e"
  168. *** color.c.orig    Thu Aug  2 09:43:08 1990
  169. --- color.c    Thu Aug  2 09:43:10 1990
  170. ***************
  171. *** 6,10 ****
  172.   #ifndef lint
  173.   static char RCSid[] =
  174. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/color.c,v 1.9 90/06/26 00:04:37 william Exp $";
  175.   #endif
  176.   
  177. --- 6,10 ----
  178.   #ifndef lint
  179.   static char RCSid[] =
  180. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/color.c,v 1.11 90/07/31 15:11:08 william Exp $";
  181.   #endif
  182.   
  183. ***************
  184. *** 368,370 ****
  185. --- 368,384 ----
  186.      if (index != INVALID) ChangeAllSelColor (index);
  187.      cfree (pixmap);
  188. + }
  189. + 
  190. + void CleanUpColors ()
  191. + {
  192. +    register int    i;
  193. + 
  194. +    cfree (colorPixels);
  195. +    cfree (xorColorPixels);
  196. +    if (colorDisplay) for (i = 0; i < maxColors; i++) cfree (colorMenuItems[i]);
  197. +    cfree (colorMenuItems);
  198. + 
  199. +    maxColors = MAXCOLORS;
  200. +    defaultColorIndex = 4;
  201. +    colorIndex = 0;
  202.   }
  203. *** cursor.c.orig    Thu Aug  2 09:43:16 1990
  204. --- cursor.c    Thu Aug  2 09:43:17 1990
  205. ***************
  206. *** 6,10 ****
  207.   #ifndef lint
  208.   static char RCSid[] =
  209. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/cursor.c,v 1.2 90/05/22 14:08:44 william Exp $";
  210.   #endif
  211.   
  212. --- 6,10 ----
  213.   #ifndef lint
  214.   static char RCSid[] =
  215. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/cursor.c,v 1.5 90/07/16 10:31:01 william Exp $";
  216.   #endif
  217.   
  218. ***************
  219. *** 11,16 ****
  220.   #include <X11/Xlib.h>
  221.   #include <X11/cursorfont.h>
  222. - #include "types.h"
  223.   #include "const.h"
  224.   
  225.   #include "choice.e"
  226. --- 11,16 ----
  227.   #include <X11/Xlib.h>
  228.   #include <X11/cursorfont.h>
  229.   #include "const.h"
  230. + #include "types.h"
  231.   
  232.   #include "choice.e"
  233. *** dialog.c.orig    Thu Aug  2 09:43:24 1990
  234. --- dialog.c    Thu Aug  2 09:43:25 1990
  235. ***************
  236. *** 6,10 ****
  237.   #ifndef lint
  238.   static char RCSid[] =
  239. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/dialog.c,v 1.4 90/05/25 13:36:58 william Exp $";
  240.   #endif
  241.   
  242. --- 6,10 ----
  243.   #ifndef lint
  244.   static char RCSid[] =
  245. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/dialog.c,v 1.5 90/07/12 09:01:47 william Exp $";
  246.   #endif
  247.   
  248. ***************
  249. *** 117,121 ****
  250.            key_code = key_ev->keycode;
  251.            XLookupString (key_ev, buf, 80, &key_sym, &c_stat);
  252. !          if ((buf[0]=='\r' && (key_sym & 0xff)=='\r') ||
  253.                  (buf[0]=='\n' && (key_sym & 0xff)=='\n') ||
  254.                  (buf[0]=='\b' && (key_sym & 0xff)=='\b') ||
  255. --- 117,122 ----
  256.            key_code = key_ev->keycode;
  257.            XLookupString (key_ev, buf, 80, &key_sym, &c_stat);
  258. !          if ((buf[0]=='\033' && (key_sym & 0xff)=='\033') ||
  259. !                (buf[0]=='\r' && (key_sym & 0xff)=='\r') ||
  260.                  (buf[0]=='\n' && (key_sym & 0xff)=='\n') ||
  261.                  (buf[0]=='\b' && (key_sym & 0xff)=='\b') ||
  262. ***************
  263. *** 127,130 ****
  264. --- 128,135 ----
  265.               switch (buf[0])
  266.               {
  267. +                case '\033':
  268. +                   ReturnStr[0] = '\0';
  269. +                   dialoging = FALSE;
  270. +                   break;
  271.                  case '\r':
  272.                  case '\n':
  273. *** drawing.c.orig    Thu Aug  2 09:43:40 1990
  274. --- drawing.c    Thu Aug  2 09:43:42 1990
  275. ***************
  276. *** 6,10 ****
  277.   #ifndef lint
  278.   static char RCSid[] =
  279. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/drawing.c,v 1.3 90/05/22 14:10:35 william Exp $";
  280.   #endif
  281.   
  282. --- 6,10 ----
  283.   #ifndef lint
  284.   static char RCSid[] =
  285. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/drawing.c,v 1.8 90/07/29 15:34:38 william Exp $";
  286.   #endif
  287.   
  288. ***************
  289. *** 30,35 ****
  290.   #include "menu.e"
  291.   #include "msg.e"
  292. - #include "oval.e"
  293.   #include "obj.e"
  294.   #include "pattern.e"
  295.   #include "poly.e"
  296. --- 30,35 ----
  297.   #include "menu.e"
  298.   #include "msg.e"
  299.   #include "obj.e"
  300. + #include "oval.e"
  301.   #include "pattern.e"
  302.   #include "poly.e"
  303. ***************
  304. *** 471,475 ****
  305.               case '\016': /*^N*/ NewProc (); break;
  306.               case '\017': /*^O*/ OpenProc (); break;
  307. !             case '\020': /*^P*/ Dump (); break;
  308.               case '\021': /*^Q*/ return (QuitProc ());
  309.               case '\022': /*^R*/ ClearAndRedrawDrawWindow (); break;
  310. --- 471,475 ----
  311.               case '\016': /*^N*/ NewProc (); break;
  312.               case '\017': /*^O*/ OpenProc (); break;
  313. !             case '\020': /*^P*/ Dump (FALSE, ""); break;
  314.               case '\021': /*^Q*/ return (QuitProc ());
  315.               case '\022': /*^R*/ ClearAndRedrawDrawWindow (); break;
  316. ***************
  317. *** 530,537 ****
  318.            switch (buf[0])
  319.            {
  320. !             case '\001': /*^#A*/ break;
  321.               case '\002': /*^#B*/ ChangeFontStyle (STYLE_BR); break;
  322.               case '\003': /*^#C*/ ChangeFontJust (JUST_C); break;
  323. !             case '\004': /*^#D*/ break;
  324.               case '\005': /*^#E*/ break;
  325.               case '\006': /*^#F*/ break;
  326. --- 530,537 ----
  327.            switch (buf[0])
  328.            {
  329. !             case '\001': /*^#A*/ AddPoint (); break;
  330.               case '\002': /*^#B*/ ChangeFontStyle (STYLE_BR); break;
  331.               case '\003': /*^#C*/ ChangeFontJust (JUST_C); break;
  332. !             case '\004': /*^#D*/ DeletePoint (); break;
  333.               case '\005': /*^#E*/ break;
  334.               case '\006': /*^#F*/ break;
  335. ***************
  336. *** 552,556 ****
  337.               case '\025': /*^#U*/ break;
  338.               case '\026': /*^#V*/ SetCurChoice (DRAWCIRCLE); break;
  339. !             case '\027': /*^#W*/ break;
  340.               case '\030': /*^#X*/ break;
  341.               case '\031': /*^#Y*/ break;
  342. --- 552,556 ----
  343.               case '\025': /*^#U*/ break;
  344.               case '\026': /*^#V*/ SetCurChoice (DRAWCIRCLE); break;
  345. !             case '\027': /*^#W*/ ToggleAllSelLineType (); break;
  346.               case '\030': /*^#X*/ break;
  347.               case '\031': /*^#Y*/ break;
  348. *** dup.c.orig    Thu Aug  2 09:43:49 1990
  349. --- dup.c    Thu Aug  2 09:43:51 1990
  350. ***************
  351. *** 6,10 ****
  352.   #ifndef lint
  353.   static char RCSid[] =
  354. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/dup.c,v 1.2 90/06/26 00:04:49 william Exp $";
  355.   #endif
  356.   
  357. --- 6,10 ----
  358.   #ifndef lint
  359.   static char RCSid[] =
  360. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/dup.c,v 1.3 90/07/08 00:29:43 william Exp $";
  361.   #endif
  362.   
  363. ***************
  364. *** 306,308 ****
  365. --- 306,342 ----
  366.      HighLightForward ();
  367.      SetFileModified (TRUE);
  368. + }
  369. + 
  370. + void JustDupSelObj (NewTopSel, NewBotSel)
  371. +    struct SelRec    * * NewTopSel, * * NewBotSel;
  372. + {
  373. +    struct SelRec    * sel_ptr, * new_sel_ptr;
  374. +    struct ObjRec    * obj_ptr, * top_obj, * bot_obj;
  375. + 
  376. +    *NewTopSel = *NewBotSel = NULL;
  377. +    if (topSel == NULL) return;
  378. + 
  379. +    top_obj = bot_obj = NULL;
  380. +    for (sel_ptr = botSel; sel_ptr != NULL; sel_ptr = sel_ptr->prev)
  381. +    {
  382. +       obj_ptr = DupObj (sel_ptr->obj);
  383. +       obj_ptr->next = top_obj;
  384. +       new_sel_ptr = (struct SelRec *) calloc (1, sizeof (struct SelRec));
  385. +       new_sel_ptr->next = *NewTopSel;
  386. +       new_sel_ptr->obj = obj_ptr;
  387. +       if (top_obj == NULL)
  388. +       {
  389. +          bot_obj = obj_ptr;
  390. +          *NewBotSel = new_sel_ptr;
  391. +       }
  392. +       else
  393. +       {
  394. +          top_obj->prev = obj_ptr;
  395. +          (*NewTopSel)->prev = new_sel_ptr;
  396. +       }
  397. +       top_obj = obj_ptr;
  398. +       *NewTopSel = new_sel_ptr;
  399. +    }
  400. +    top_obj->prev = NULL;
  401. +    (*NewTopSel)->prev = NULL;
  402.   }
  403. *** edit.c.orig    Thu Aug  2 09:43:59 1990
  404. --- edit.c    Thu Aug  2 09:44:01 1990
  405. ***************
  406. *** 6,13 ****
  407.   #ifndef lint
  408.   static char RCSid[] =
  409. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/edit.c,v 1.2 90/06/26 00:04:59 william Exp $";
  410.   #endif
  411.   
  412.   #include <stdio.h>
  413.   #include <X11/Xlib.h>
  414.   #include "const.h"
  415. --- 6,14 ----
  416.   #ifndef lint
  417.   static char RCSid[] =
  418. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/edit.c,v 1.6 90/07/13 12:51:58 william Exp $";
  419.   #endif
  420.   
  421.   #include <stdio.h>
  422. + #include <math.h>
  423.   #include <X11/Xlib.h>
  424.   #include "const.h"
  425. ***************
  426. *** 16,29 ****
  427. --- 17,41 ----
  428.   #include "align.e"
  429.   #include "color.e"
  430. + #include "cursor.e"
  431.   #include "drawing.e"
  432.   #include "dup.e"
  433. + #include "font.e"
  434.   #include "group.e"
  435.   #include "mark.e"
  436.   #include "obj.e"
  437. + #include "poly.e"
  438.   #include "raster.e"
  439.   #include "select.e"
  440.   #include "setup.e"
  441. + #include "spline.e"
  442.   #include "stretch.e"
  443.   
  444. + #define OFFSET_X(x) (((x) - drawOrigX) >> zoomScale)
  445. + #define OFFSET_Y(y) (((y) - drawOrigY) >> zoomScale)
  446. + #define MARK(X,Y) \
  447. +       XFillRectangle(mainDisplay,drawWindow,revDefaultGC,(X)-2,(Y)-2,5,5)
  448. + #define MyDashedLine(W,GC,V,N) XDrawLines (mainDisplay, W, GC, V, N, \
  449. +       CoordModeOrigin)
  450. + 
  451.   #define EDIT_REDRAW 0
  452.   #define EDIT_DUP 1
  453. ***************
  454. *** 31,44 ****
  455.   #define EDIT_SELALL 3
  456.   #define EDIT_UNDODEL 4
  457. ! #define MAXEDITMENUS 5
  458.   
  459.   static char * editMenuStr[] =
  460. !       { "Redraw     ^R",
  461. !         "Duplicate  ^D",
  462. !         "Delete     ^X",
  463. !         "SelectAll  ^A",
  464. !         "UndoDelete #U"
  465.         };
  466.   
  467.   void EditMenu (X, Y)
  468.      int    X, Y;
  469. --- 43,664 ----
  470.   #define EDIT_SELALL 3
  471.   #define EDIT_UNDODEL 4
  472. ! #define EDIT_DEL_POINT 5
  473. ! #define EDIT_ADD_POINT 6
  474.   
  475. + #define MAXEDITMENUS 7
  476. + 
  477.   static char * editMenuStr[] =
  478. !       { "Redraw       ^R",
  479. !         "Duplicate    ^D",
  480. !         "Delete       ^X",
  481. !         "SelectAll    ^A",
  482. !         "UndoDelete   #U",
  483. !         "DeletePoint ^#D",
  484. !         "AddPoint    ^#A"
  485.         };
  486.   
  487. + void DeletePoint ()
  488. + {
  489. +    register int            i;
  490. +    register struct ObjRec    * obj_ptr;
  491. +    struct PolyRec        * poly_ptr;
  492. +    struct PolygonRec        * polygon_ptr;
  493. +    int                index, n, point_deleted, deleting = TRUE;
  494. +    int                root_x, root_y, old_x, old_y;
  495. +    unsigned int            status;
  496. +    Window            root_win, child_win;
  497. +    XEvent            input;
  498. + 
  499. +    if (!(topSel != NULL && topSel == botSel &&
  500. +          (topSel->obj->type == OBJ_POLY || topSel->obj->type == OBJ_POLYGON)))
  501. +    {
  502. +       Msg ("Please select only one POLY or POLYGON object.");
  503. +       return;
  504. +    }
  505. + 
  506. +    obj_ptr = topSel->obj;
  507. +    switch (obj_ptr->type)
  508. +    {
  509. +       case OBJ_POLY: poly_ptr = obj_ptr->detail.p; break;
  510. +       case OBJ_POLYGON: polygon_ptr = obj_ptr->detail.g; break;
  511. +    }
  512. +    TwoLineMsg ("Click left mouse button to DELETE points.",
  513. +          "Click other buttons to quit.");
  514. + 
  515. +    XGrabPointer (mainDisplay, drawWindow, False,
  516. +          PointerMotionMask | ButtonPressMask,
  517. +          GrabModeAsync, GrabModeAsync, None, defaultCursor, CurrentTime);
  518. +    XQueryPointer (mainDisplay, drawWindow, &root_win, &child_win,
  519. +          &root_x, &root_y, &old_x, &old_y, &status);
  520. +    XDrawString (mainDisplay, drawWindow, revDefaultGC,
  521. +          old_x+4, old_y+defaultFontAsc, "DEL", 3);
  522. +    MarkRulers (old_x, old_y);
  523. + 
  524. +    while (deleting)
  525. +    {
  526. +       XNextEvent (mainDisplay, &input);
  527. +       if (input.type == ButtonPress)
  528. +       {
  529. +          if (input.xbutton.button == Button1)
  530. +          {
  531. +             point_deleted = FALSE;
  532. +             if (obj_ptr->type == OBJ_POLY &&
  533. +                   PtInPolyMark (input.xbutton.x, input.xbutton.y,
  534. +                   poly_ptr->n, poly_ptr->vlist, &index) ||
  535. +                   obj_ptr->type == OBJ_POLYGON &&
  536. +                   PtInPolyMark (input.xbutton.x, input.xbutton.y,
  537. +                   polygon_ptr->n-1, polygon_ptr->vlist, &index))
  538. +             {
  539. +                point_deleted = TRUE;
  540. +                HighLightReverse ();
  541. +                if (obj_ptr->type == OBJ_POLY && poly_ptr->n == 2 ||
  542. +                      obj_ptr->type == OBJ_POLYGON && polygon_ptr->n == 4)
  543. +                {
  544. +                   CopySelToCut ();
  545. +                   DelObj (obj_ptr);
  546. +                   deleting = FALSE;
  547. +                   obj_ptr = NULL;
  548. +                   cfree (topSel);
  549. +                   topSel = botSel = NULL;
  550. +                }
  551. +                else
  552. +                {
  553. +                   switch (obj_ptr->type)
  554. +                   {
  555. +                      case OBJ_POLY:
  556. +                         n = poly_ptr->n;
  557. +                         for (i = index+1; i < n; i++)
  558. +                            poly_ptr->vlist[i-1] = poly_ptr->vlist[i];
  559. +                         poly_ptr->n--;
  560. +                         if (poly_ptr->curved)
  561. +                         {
  562. +                            cfree (poly_ptr->svlist);
  563. +                            poly_ptr->svlist = MakeSplinePolyVertex (
  564. +                                  &(poly_ptr->sn), drawOrigX, drawOrigY,
  565. +                                  poly_ptr->n, poly_ptr->vlist);
  566. +                         }
  567. +                         UpdPolyBBox (obj_ptr, poly_ptr->n, poly_ptr->vlist);
  568. +                         break;
  569. +                      case OBJ_POLYGON:
  570. +                         n = polygon_ptr->n;
  571. +                         for (i = index+1; i < n; i++)
  572. +                            polygon_ptr->vlist[i-1] = polygon_ptr->vlist[i];
  573. +                         polygon_ptr->n--;
  574. +                         n--;
  575. +                         if (index == 0)
  576. +                            polygon_ptr->vlist[n-1] = polygon_ptr->vlist[0];
  577. +                         if (polygon_ptr->curved)
  578. +                         {
  579. +                            cfree (polygon_ptr->svlist);
  580. +                            polygon_ptr->svlist = MakeSplinePolygonVertex (
  581. +                                  &(polygon_ptr->sn), drawOrigX, drawOrigY,
  582. +                                  polygon_ptr->n, polygon_ptr->vlist);
  583. +                         }
  584. +                         UpdPolyBBox (obj_ptr, polygon_ptr->n,
  585. +                               polygon_ptr->vlist);
  586. +                         break;
  587. +                   }
  588. +                   AdjObjBBox (obj_ptr);
  589. +                }
  590. +             }
  591. +             if (point_deleted)
  592. +             {
  593. +                XDrawString (mainDisplay, drawWindow, revDefaultGC, old_x+4,
  594. +                      old_y+defaultFontAsc, "DEL", 3);
  595. +                old_x = input.xbutton.x;
  596. +                old_y = input.xbutton.y;
  597. +                RedrawAnArea (botObj,
  598. +                      selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  599. +                      selRbX+(1<<zoomScale), selRbY+(1<<zoomScale));
  600. +                HighLightForward ();
  601. +                if (obj_ptr != NULL)
  602. +                   XDrawString (mainDisplay, drawWindow, revDefaultGC, old_x+4,
  603. +                         old_y+defaultFontAsc, "DEL", 3);
  604. +                UpdSelBBox ();
  605. +                SetFileModified (TRUE);
  606. +             }
  607. +          }
  608. +          else
  609. +          {
  610. +             deleting = FALSE;
  611. +             XDrawString (mainDisplay, drawWindow, revDefaultGC,
  612. +                   old_x+4, old_y+defaultFontAsc, "DEL", 3);
  613. +          }
  614. +       }
  615. +       else if (input.type == MotionNotify)
  616. +       {
  617. +          XDrawString (mainDisplay, drawWindow, revDefaultGC,
  618. +                old_x+4, old_y+defaultFontAsc, "DEL", 3);
  619. +          old_x = input.xmotion.x;
  620. +          old_y = input.xmotion.y;
  621. +          XDrawString (mainDisplay, drawWindow, revDefaultGC,
  622. +                old_x+4, old_y+defaultFontAsc, "DEL", 3);
  623. +          MarkRulers (old_x, old_y);
  624. +       }
  625. +    }
  626. +    XUngrabPointer (mainDisplay, CurrentTime);
  627. +    Msg ("");
  628. + }
  629. + 
  630. + static
  631. + void ContinueAddPolyPoint (ObjPtr, MouseX, MouseY, Index, PolyPtr,
  632. +       LastMouseX, LastMouseY)
  633. +    struct ObjRec    * ObjPtr;
  634. +    int            MouseX, MouseY, Index;
  635. +    struct PolyRec    * PolyPtr;
  636. +    int            * LastMouseX, * LastMouseY;
  637. +    /* (MouseX,MouseY) is the mouse's origin in screen offsets */
  638. + {
  639. +    int        n = PolyPtr->n, already_moved=FALSE, done=FALSE, before;
  640. +    XPoint    * vs = PolyPtr->vlist, v[3];
  641. +    int        prev_x, prev_y, x, y, next_x, next_y, new_x, new_y, dx, dy;
  642. +    int        orig_x, orig_y, grid_x, grid_y, new_mouse_x, new_mouse_y;
  643. + /* int        prev_dist, next_dist, new_prev_dist, new_next_dist; */
  644. +    int        sel_ltx, sel_lty, sel_rbx, sel_rby, num, i;
  645. +    double    prev_angle, next_angle, new_angle, theta_1, theta_2;
  646. +    XEvent    input;
  647. + 
  648. +    MARK(OFFSET_X(vs[Index].x), OFFSET_Y(vs[Index].y));
  649. + 
  650. +    sel_ltx =  selLtX; sel_lty = selLtY;
  651. +    sel_rbx =  selRbX; sel_rby = selRbY;
  652. + 
  653. +    x = vs[Index].x;
  654. +    y = vs[Index].y;
  655. + 
  656. +    if (Index == 0)
  657. +    {
  658. +       next_x = vs[1].x;    next_y = vs[1].y;
  659. +       prev_x = 2*x-next_x; prev_y = 2*y-next_y;
  660. + /*    prev_dist = next_dist = (x-prev_x)*(x-prev_x) + (y-prev_y)*(y-prev_y); */
  661. +    }
  662. +    else if (Index == n-1)
  663. +    {
  664. +       prev_x = vs[n-2].x;  prev_y = vs[n-2].y;
  665. +       next_x = 2*x-prev_x; next_y = 2*y-prev_y;
  666. + /*    prev_dist = next_dist = (x-prev_x)*(x-prev_x) + (y-prev_y)*(y-prev_y); */
  667. +    }
  668. +    else
  669. +    {
  670. +       prev_x = vs[Index-1].x; prev_y = vs[Index-1].y;
  671. +       next_x = vs[Index+1].x; next_y = vs[Index+1].y;
  672. + /*    prev_dist = (x-prev_x)*(x-prev_x) + (y-prev_y)*(y-prev_y); */
  673. + /*    next_dist = (x-next_x)*(x-next_x) + (y-next_y)*(y-next_y); */
  674. +    }
  675. +    prev_angle = atan2 ((double)(prev_y-y), (double)(prev_x-x));
  676. +    next_angle = atan2 ((double)(next_y-y), (double)(next_x-x));
  677. + 
  678. +    GridXY (MouseX, MouseY, &orig_x, &orig_y);
  679. +    new_mouse_x = MouseX; new_mouse_y = MouseY;
  680. +    XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  681. +          new_mouse_y+defaultFontAsc, "ADD", 3);
  682. + 
  683. +    while (!done)
  684. +    {
  685. +       XNextEvent (mainDisplay, &input);
  686. +       if (input.type == MotionNotify)
  687. +       {
  688. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  689. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  690. +          new_mouse_x = input.xmotion.x;
  691. +          new_mouse_y = input.xmotion.y;
  692. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  693. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  694. + 
  695. +          GridXY (new_mouse_x, new_mouse_y, &grid_x, &grid_y);
  696. +          new_x = ((new_mouse_x-MouseX)<<zoomScale) + x;
  697. +          new_y = ((new_mouse_y-MouseY)<<zoomScale) + y;
  698. +          if (!already_moved)
  699. +          {
  700. +             already_moved = TRUE;
  701. + 
  702. +             new_angle = atan2 ((double)(new_y-y), (double)(new_x-x));
  703. +             theta_1 = fabs (prev_angle - new_angle);
  704. +             theta_2 = fabs (next_angle - new_angle);
  705. +             if (theta_1 > M_PI) theta_1 = 2*M_PI-theta_1;
  706. +             if (theta_2 > M_PI) theta_2 = 2*M_PI-theta_2;
  707. +             before = (theta_1 <= theta_2);
  708. + 
  709. + /*          new_prev_dist = (new_x-prev_x)*(new_x-prev_x) + */
  710. + /*                (new_y-prev_y)*(new_y-prev_y); */
  711. + /*          new_next_dist = (new_x-next_x)*(new_x-next_x) + */
  712. + /*                (new_y-next_y)*(new_y-next_y); */
  713. + 
  714. + /*          if ((new_prev_dist-prev_dist)*(new_next_dist-next_dist) < 0) */
  715. + /*             before = (new_prev_dist < prev_dist); */
  716. + /*          else */
  717. + /*             before = (abs (new_prev_dist-prev_dist) < */
  718. + /*                   abs (new_next_dist-next_dist)); */
  719. + 
  720. +             if (before)
  721. +             {  /* Add a point between the current and the previous point */
  722. +                if (Index == 0)
  723. +                {
  724. +                   num = 2;
  725. +                   v[0].x = OFFSET_X(x); v[0].y = OFFSET_Y(y);
  726. +                   v[1].x = OFFSET_X(x); v[1].y = OFFSET_Y(y);
  727. +                }
  728. +                else
  729. +                {
  730. +                   num = 3;
  731. +                   v[0].x = OFFSET_X(prev_x); v[0].y = OFFSET_Y(prev_y);
  732. +                   v[1].x = OFFSET_X(x);      v[1].y = OFFSET_Y(y);
  733. +                   v[2].x = OFFSET_X(x);      v[2].y = OFFSET_Y(y);
  734. +                }
  735. +             }
  736. +             else
  737. +             {  /* Add a point between the current and the next point */
  738. +                if (Index == n-1)
  739. +                {
  740. +                   num = 2;
  741. +                   v[0].x = OFFSET_X(x);      v[0].y = OFFSET_Y(y);
  742. +                   v[1].x = OFFSET_X(x);      v[1].y = OFFSET_Y(y);
  743. +                }
  744. +                else
  745. +                {
  746. +                   num = 3;
  747. +                   v[0].x = OFFSET_X(x);      v[0].y = OFFSET_Y(y);
  748. +                   v[1].x = OFFSET_X(x);      v[1].y = OFFSET_Y(y);
  749. +                   v[2].x = OFFSET_X(next_x); v[2].y = OFFSET_Y(next_y);
  750. +                }
  751. +             }
  752. +             MyDashedLine (drawWindow, revDefaultGC, v, num);
  753. +          }
  754. +          else
  755. +          {
  756. +             MyDashedLine (drawWindow, revDefaultGC, v, num);
  757. +             v[1].x = OFFSET_X(x) + grid_x - orig_x;
  758. +             v[1].y = OFFSET_Y(y) + grid_y - orig_y;
  759. +             MyDashedLine (drawWindow, revDefaultGC, v, num);
  760. +             MarkRulers (grid_x, grid_y);
  761. +          }
  762. +       }
  763. +       else if (input.type == ButtonRelease)
  764. +       {
  765. +          done = TRUE;
  766. +          *LastMouseX = new_mouse_x; *LastMouseY = new_mouse_y;
  767. +          MARK(OFFSET_X(vs[Index].x), OFFSET_Y(vs[Index].y));
  768. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  769. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  770. + 
  771. +          if (!already_moved)
  772. +             continue;
  773. +          else
  774. +          {
  775. +             MyDashedLine (drawWindow, revDefaultGC, v, num);
  776. +             if (grid_x == orig_x && grid_y == orig_y)
  777. +                continue;
  778. +          }
  779. + 
  780. +          HighLightReverse ();
  781. +          vs = (XPoint *) realloc (vs, (n+2)*sizeof(XPoint));
  782. +          if (vs == NULL)
  783. +          {
  784. +             printf ("Can not realloc () in ContinueAddPolyPoint ().\n");
  785. +             exit (-1);
  786. +          }
  787. +          PolyPtr->vlist = vs;
  788. +          if (before)
  789. +          {
  790. +             for (i = n-1; i >= Index; i--) vs[i+1] = vs[i];
  791. +             vs[Index].x = x + ((grid_x-orig_x)<<zoomScale);
  792. +             vs[Index].y = y + ((grid_y-orig_y)<<zoomScale);
  793. +          }
  794. +          else
  795. +          {
  796. +             for (i = n-1; i > Index; i--) vs[i+1] = vs[i];
  797. +             vs[Index+1].x = x + ((grid_x-orig_x)<<zoomScale);
  798. +             vs[Index+1].y = y + ((grid_y-orig_y)<<zoomScale);
  799. +          }
  800. +          PolyPtr->n++;
  801. +          n++;
  802. +          if (PolyPtr->curved)
  803. +          {
  804. +             cfree (PolyPtr->svlist);
  805. +             PolyPtr->svlist = MakeSplinePolyVertex (&(PolyPtr->sn),
  806. +                   drawOrigX, drawOrigY, PolyPtr->n, PolyPtr->vlist);
  807. +          }
  808. +          UpdPolyBBox (ObjPtr, PolyPtr->n, PolyPtr->vlist);
  809. +          AdjObjBBox (ObjPtr);
  810. + 
  811. +          UpdSelBBox ();
  812. +          RedrawAreas (botObj,
  813. +                sel_ltx-(1<<zoomScale), sel_lty-(1<<zoomScale),
  814. +                sel_rbx+(1<<zoomScale), sel_rby+(1<<zoomScale),
  815. +                selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  816. +                selRbX+(1<<zoomScale), selRbY+(1<<zoomScale));
  817. +          HighLightForward ();
  818. +          SetFileModified (TRUE);
  819. +       }
  820. +    }
  821. + }
  822. + 
  823. + static
  824. + void ContinueAddPolygonPoint (ObjPtr, MouseX, MouseY, Index, PolygonPtr,
  825. +       LastMouseX, LastMouseY)
  826. +    struct ObjRec    * ObjPtr;
  827. +    int            MouseX, MouseY, Index;
  828. +    struct PolygonRec    * PolygonPtr;
  829. +    int            * LastMouseX, * LastMouseY;
  830. +    /* (MouseX,MouseY) is the mouse's origin in screen offsets */
  831. + {
  832. +    int        n = PolygonPtr->n, already_moved=FALSE, done=FALSE, before;
  833. +    XPoint    * vs = PolygonPtr->vlist, v[3];
  834. +    int        prev_x, prev_y, x, y, next_x, next_y, new_x, new_y, dx, dy;
  835. +    int        orig_x, orig_y, grid_x, grid_y, new_mouse_x, new_mouse_y;
  836. + /* int        prev_dist, next_dist, new_prev_dist, new_next_dist; */
  837. +    int        sel_ltx, sel_lty, sel_rbx, sel_rby, i;
  838. +    double    prev_angle, next_angle, new_angle, theta_1, theta_2;
  839. +    XEvent    input;
  840. + 
  841. +    MARK(OFFSET_X(vs[Index].x), OFFSET_Y(vs[Index].y));
  842. + 
  843. +    sel_ltx =  selLtX; sel_lty = selLtY;
  844. +    sel_rbx =  selRbX; sel_rby = selRbY;
  845. + 
  846. +    x = vs[Index].x;
  847. +    y = vs[Index].y;
  848. + 
  849. +    if (Index == 0 || Index == n-1)
  850. +    {
  851. +       next_x = vs[1].x;   next_y = vs[1].y;
  852. +       prev_x = vs[n-2].x; prev_y = vs[n-2].y;
  853. +    }
  854. +    else
  855. +    {
  856. +       prev_x = vs[Index-1].x; prev_y = vs[Index-1].y;
  857. +       next_x = vs[Index+1].x; next_y = vs[Index+1].y;
  858. +    }
  859. +    prev_angle = atan2 ((double)(prev_y-y), (double)(prev_x-x));
  860. +    next_angle = atan2 ((double)(next_y-y), (double)(next_x-x));
  861. + 
  862. + /* prev_dist = (x-prev_x)*(x-prev_x) + (y-prev_y)*(y-prev_y); */
  863. + /* next_dist = (x-next_x)*(x-next_x) + (y-next_y)*(y-next_y); */
  864. + 
  865. +    GridXY (MouseX, MouseY, &orig_x, &orig_y);
  866. +    new_mouse_x = MouseX; new_mouse_y = MouseY;
  867. +    XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  868. +          new_mouse_y+defaultFontAsc, "ADD", 3);
  869. + 
  870. +    while (!done)
  871. +    {
  872. +       XNextEvent (mainDisplay, &input);
  873. +       if (input.type == MotionNotify)
  874. +       {
  875. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  876. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  877. +          new_mouse_x = input.xmotion.x;
  878. +          new_mouse_y = input.xmotion.y;
  879. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  880. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  881. + 
  882. +          GridXY (new_mouse_x, new_mouse_y, &grid_x, &grid_y);
  883. +          new_x = ((new_mouse_x-MouseX)<<zoomScale) + x;
  884. +          new_y = ((new_mouse_y-MouseY)<<zoomScale) + y;
  885. +          if (!already_moved)
  886. +          {
  887. +             already_moved = TRUE;
  888. + 
  889. +             new_angle = atan2 ((double)(new_y-y), (double)(new_x-x));
  890. +             theta_1 = fabs (prev_angle - new_angle);
  891. +             theta_2 = fabs (next_angle - new_angle);
  892. +             if (theta_1 > M_PI) theta_1 = 2*M_PI-theta_1;
  893. +             if (theta_2 > M_PI) theta_2 = 2*M_PI-theta_2;
  894. +             before = (theta_1 <= theta_2);
  895. + 
  896. + /*          new_prev_dist = (new_x-prev_x)*(new_x-prev_x) + */
  897. + /*                (new_y-prev_y)*(new_y-prev_y); */
  898. + /*          new_next_dist = (new_x-next_x)*(new_x-next_x) + */
  899. + /*                (new_y-next_y)*(new_y-next_y); */
  900. + 
  901. + /*          if ((new_prev_dist-prev_dist)*(new_next_dist-next_dist) < 0) */
  902. + /*             before = (new_prev_dist < prev_dist); */
  903. + /*          else */
  904. + /*             before = (abs (new_prev_dist-prev_dist) < */
  905. + /*                   abs (new_next_dist-next_dist)); */
  906. + 
  907. +             if (before)
  908. +             {  /* Add a point between the current and the previous point */
  909. +                v[0].x = OFFSET_X(prev_x); v[0].y = OFFSET_Y(prev_y);
  910. +                v[1].x = OFFSET_X(x);      v[1].y = OFFSET_Y(y);
  911. +                v[2].x = OFFSET_X(x);      v[2].y = OFFSET_Y(y);
  912. +             }
  913. +             else
  914. +             {  /* Add a point between the current and the next point */
  915. +                v[0].x = OFFSET_X(x);      v[0].y = OFFSET_Y(y);
  916. +                v[1].x = OFFSET_X(x);      v[1].y = OFFSET_Y(y);
  917. +                v[2].x = OFFSET_X(next_x); v[2].y = OFFSET_Y(next_y);
  918. +             }
  919. +             MyDashedLine (drawWindow, revDefaultGC, v, 3);
  920. +          }
  921. +          else
  922. +          {
  923. +             MyDashedLine (drawWindow, revDefaultGC, v, 3);
  924. +             v[1].x = OFFSET_X(x) + grid_x - orig_x;
  925. +             v[1].y = OFFSET_Y(y) + grid_y - orig_y;
  926. +             MyDashedLine (drawWindow, revDefaultGC, v, 3);
  927. +             MarkRulers (grid_x, grid_y);
  928. +          }
  929. +       }
  930. +       else if (input.type == ButtonRelease)
  931. +       {
  932. +          done = TRUE;
  933. +          *LastMouseX = new_mouse_x; *LastMouseY = new_mouse_y;
  934. +          MARK(OFFSET_X(vs[Index].x), OFFSET_Y(vs[Index].y));
  935. +          XDrawString (mainDisplay, drawWindow, revDefaultGC, new_mouse_x+4,
  936. +                new_mouse_y+defaultFontAsc, "ADD", 3);
  937. + 
  938. +          if (!already_moved)
  939. +             continue;
  940. +          else
  941. +          {
  942. +             MyDashedLine (drawWindow, revDefaultGC, v, 3);
  943. +             if (grid_x == orig_x && grid_y == orig_y)
  944. +                continue;
  945. +          }
  946. + 
  947. +          HighLightReverse ();
  948. +          vs = (XPoint *) realloc (vs, (n+2)*sizeof(XPoint));
  949. +          if (vs == NULL)
  950. +          {
  951. +             printf ("Can not realloc () in ContinueAddPolygonPoint ().\n");
  952. +             exit (-1);
  953. +          }
  954. +          PolygonPtr->vlist = vs;
  955. +          if (Index == 0 || Index == n-1)
  956. +          {
  957. +             if (before)
  958. +             {
  959. +                vs[n].x = vs[n-1].x;
  960. +                vs[n].y = vs[n-1].y;
  961. +                vs[n-1].x = x + ((grid_x-orig_x)<<zoomScale);
  962. +                vs[n-1].y = y + ((grid_y-orig_y)<<zoomScale);
  963. +             }
  964. +             else
  965. +             {
  966. +                for (i = n-1; i > 0; i--) vs[i+1] = vs[i];
  967. +                vs[1].x = x + ((grid_x-orig_x)<<zoomScale);
  968. +                vs[1].y = y + ((grid_y-orig_y)<<zoomScale);
  969. +             }
  970. +          }
  971. +          else
  972. +          {
  973. +             if (before)
  974. +             {
  975. +                for (i = n-1; i >= Index; i--) vs[i+1] = vs[i];
  976. +                vs[Index].x = x + ((grid_x-orig_x)<<zoomScale);
  977. +                vs[Index].y = y + ((grid_y-orig_y)<<zoomScale);
  978. +             }
  979. +             else
  980. +             {
  981. +                for (i = n-1; i > Index; i--) vs[i+1] = vs[i];
  982. +                vs[Index+1].x = x + ((grid_x-orig_x)<<zoomScale);
  983. +                vs[Index+1].y = y + ((grid_y-orig_y)<<zoomScale);
  984. +             }
  985. +          }
  986. +          PolygonPtr->n++;
  987. +          n++;
  988. +          if (PolygonPtr->curved)
  989. +          {
  990. +             cfree (PolygonPtr->svlist);
  991. +             PolygonPtr->svlist = MakeSplinePolygonVertex (&(PolygonPtr->sn),
  992. +                   drawOrigX, drawOrigY, PolygonPtr->n, PolygonPtr->vlist);
  993. +          }
  994. +          UpdPolyBBox (ObjPtr, PolygonPtr->n, PolygonPtr->vlist);
  995. +          AdjObjBBox (ObjPtr);
  996. + 
  997. +          UpdSelBBox ();
  998. +          RedrawAreas (botObj,
  999. +                sel_ltx-(1<<zoomScale), sel_lty-(1<<zoomScale),
  1000. +                sel_rbx+(1<<zoomScale), sel_rby+(1<<zoomScale),
  1001. +                selLtX-(1<<zoomScale), selLtY-(1<<zoomScale),
  1002. +                selRbX+(1<<zoomScale), selRbY+(1<<zoomScale));
  1003. +          HighLightForward ();
  1004. +          SetFileModified (TRUE);
  1005. +       }
  1006. +    }
  1007. + }
  1008. + 
  1009. + void AddPoint ()
  1010. + {
  1011. +    register int            i;
  1012. +    register struct ObjRec    * obj_ptr;
  1013. +    struct PolyRec        * poly_ptr;
  1014. +    struct PolygonRec        * polygon_ptr;
  1015. +    int                index, n, point_deleted, adding = TRUE;
  1016. +    int                root_x, root_y, old_x, old_y;
  1017. +    unsigned int            status;
  1018. +    Window            root_win, child_win;
  1019. +    XEvent            input;
  1020. + 
  1021. +    if (!(topSel != NULL && topSel == botSel &&
  1022. +          (topSel->obj->type == OBJ_POLY || topSel->obj->type == OBJ_POLYGON)))
  1023. +    {
  1024. +       Msg ("Please select only one POLY or POLYGON object.");
  1025. +       return;
  1026. +    }
  1027. + 
  1028. +    obj_ptr = topSel->obj;
  1029. +    switch (obj_ptr->type)
  1030. +    {
  1031. +       case OBJ_POLY: poly_ptr = obj_ptr->detail.p; break;
  1032. +       case OBJ_POLYGON: polygon_ptr = obj_ptr->detail.g; break;
  1033. +    }
  1034. +    TwoLineMsg ("Drag left mouse button to ADD points.",
  1035. +          "Click other buttons to quit.");
  1036. + 
  1037. +    XGrabPointer (mainDisplay, drawWindow, False,
  1038. +          PointerMotionMask | ButtonPressMask | ButtonReleaseMask,
  1039. +          GrabModeAsync, GrabModeAsync, None, defaultCursor, CurrentTime);
  1040. +    XQueryPointer (mainDisplay, drawWindow, &root_win, &child_win,
  1041. +          &root_x, &root_y, &old_x, &old_y, &status);
  1042. +    XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1043. +          old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1044. +    MarkRulers (old_x, old_y);
  1045. + 
  1046. +    while (adding)
  1047. +    {
  1048. +       XNextEvent (mainDisplay, &input);
  1049. +       if (input.type == ButtonPress)
  1050. +       {
  1051. +          if (input.xbutton.button == Button1)
  1052. +          {
  1053. +             XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1054. +                   old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1055. +             if (obj_ptr->type == OBJ_POLY &&
  1056. +                   PtInPolyMark (input.xbutton.x, input.xbutton.y,
  1057. +                   poly_ptr->n, poly_ptr->vlist, &index))
  1058. +                ContinueAddPolyPoint (obj_ptr, input.xbutton.x, input.xbutton.y,
  1059. +                      index, poly_ptr, &old_x, &old_y);
  1060. +             else if (obj_ptr->type == OBJ_POLYGON &&
  1061. +                   PtInPolyMark (input.xbutton.x, input.xbutton.y,
  1062. +                   polygon_ptr->n-1, polygon_ptr->vlist, &index))
  1063. +                ContinueAddPolygonPoint (obj_ptr, input.xbutton.x,
  1064. +                      input.xbutton.y, index, polygon_ptr, &old_x, &old_y);
  1065. +             XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1066. +                   old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1067. +          }
  1068. +          else
  1069. +          {
  1070. +             adding = FALSE;
  1071. +             XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1072. +                   old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1073. +          }
  1074. +       }
  1075. +       else if (input.type == MotionNotify)
  1076. +       {
  1077. +          XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1078. +                old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1079. +          old_x = input.xmotion.x;
  1080. +          old_y = input.xmotion.y;
  1081. +          XDrawString (mainDisplay, drawWindow, revDefaultGC,
  1082. +                old_x+4, old_y+defaultFontAsc, "ADD", 3);
  1083. +          MarkRulers (old_x, old_y);
  1084. +       }
  1085. +    }
  1086. +    XUngrabPointer (mainDisplay, CurrentTime);
  1087. +    Msg ("");
  1088. + }
  1089. + 
  1090.   void EditMenu (X, Y)
  1091.      int    X, Y;
  1092. ***************
  1093. *** 57,60 ****
  1094. --- 677,682 ----
  1095.         case EDIT_SELALL: SelAllObj (); break;
  1096.         case EDIT_UNDODEL: UndoDelete (); break;
  1097. +       case EDIT_DEL_POINT: DeletePoint (); break;
  1098. +       case EDIT_ADD_POINT: AddPoint (); break;
  1099.      }
  1100.   }
  1101. *** file.c.orig    Thu Aug  2 09:44:28 1990
  1102. --- file.c    Thu Aug  2 09:44:31 1990
  1103. ***************
  1104. *** 6,10 ****
  1105.   #ifndef lint
  1106.   static char RCSid[] =
  1107. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/file.c,v 1.15 90/06/26 13:03:47 william Exp $";
  1108.   #endif
  1109.   
  1110. --- 6,10 ----
  1111.   #ifndef lint
  1112.   static char RCSid[] =
  1113. !       "@(#)$Header: /n/kona/u/tangram/u/william/X11/TGIF/RCS/file.c,v 1.28 90/07/30 16:08:30 william Exp $";
  1114.   #endif
  1115.   
  1116. ***************
  1117. *** 12,15 ****
  1118. --- 12,16 ----
  1119.   #include <sys/file.h>
  1120.   #include <stdio.h>
  1121. + #include <signal.h>
  1122.   #include <X11/Xlib.h>
  1123.   #include "const.h"
  1124. ***************
  1125. *** 27,38 ****
  1126.   #include "grid.e"
  1127.   #include "group.e"
  1128.   #include "menu.e"
  1129.   #include "msg.e"
  1130.   #include "names.e"
  1131.   #include "poly.e"
  1132.   #include "polygon.e"
  1133.   #include "obj.e"
  1134.   #include "oval.e"
  1135. - #include "pattern.e"
  1136.   #include "rect.e"
  1137.   #include "ruler.e"
  1138. --- 28,41 ----
  1139.   #include "grid.e"
  1140.   #include "group.e"
  1141. + #include "mainloop.e"
  1142.   #include "menu.e"
  1143.   #include "msg.e"
  1144.   #include "names.e"
  1145. + #include "pattern.e"
  1146.   #include "poly.e"
  1147.   #include "polygon.e"
  1148. + #include "prtgif.e"
  1149.   #include "obj.e"
  1150.   #include "oval.e"
  1151.   #include "rect.e"
  1152.   #include "ruler.e"
  1153. ***************
  1154. *** 43,47 ****
  1155.   #include "text.e"
  1156.   
  1157. ! #define CUR_VERSION 6
  1158.   
  1159.   char    curFileName[MAXPATHLENGTH];
  1160. --- 46,50 ----
  1161.   #include "text.e"
  1162.   
  1163. ! #define CUR_VERSION 7
  1164.   
  1165.   char    curFileName[MAXPATHLENGTH];
  1166. ***************
  1167. *** 134,138 ****
  1168.   
  1169.   static
  1170. ! int SaveTmpFile ()
  1171.      /* return TRUE if file successfully saved */
  1172.   {
  1173. --- 137,142 ----
  1174.   
  1175.   static
  1176. ! int SaveTmpFile (NewFileName)
  1177. !    char    * NewFileName;
  1178.      /* return TRUE if file successfully saved */
  1179.   {
  1180. ***************
  1181. *** 142,146 ****
  1182.      struct ObjRec    * obj_ptr;
  1183.   
  1184. !    strcpy (new_file_name, "tmpmodel");
  1185.   
  1186.      for (obj_ptr = topObj; obj_ptr != NULL; obj_ptr = obj_ptr->next)
  1187. --- 146,150 ----
  1188.      struct ObjRec    * obj_ptr;
  1189.   
  1190. !    strcpy (new_file_name, NewFileName);
  1191.   
  1192.      for (obj_ptr = topObj; obj_ptr != NULL; obj_ptr = obj_ptr->next)
  1193. ***************
  1194. *** 355,360 ****
  1195.   }
  1196.   
  1197. ! void ReadState (Inbuf)
  1198.      char    * Inbuf;
  1199.   {
  1200.      char    * s;
  1201. --- 359,365 ----
  1202.   }
  1203.   
  1204. ! void ReadState (Inbuf, PRTGIF)
  1205.      char    * Inbuf;
  1206. +    int    PRTGIF;
  1207.   {
  1208.      char    * s;
  1209. ***************
  1210. *** 369,372 ****
  1211. --- 374,379 ----
  1212.         sscanf (s, "%d", &fileVersion);
  1213.   
  1214. +    if (PRTGIF) return;
  1215. + 
  1216.      if (!importingFile)
  1217.      {
  1218. ***************
  1219. *** 419,433 ****
  1220.   }
  1221.   
  1222. ! int ReadObj (FP, ObjPtr)
  1223.      FILE            * FP;
  1224.      struct ObjRec    * * ObjPtr;
  1225.   {
  1226.      char            inbuf[MAXSTRING+1], obj_name[10], tmp_str[MAXSTRING+1];
  1227.      char            * line = NULL, * c_ptr, * s, * s1;
  1228. !    int            len, id, old_len, cur_size, done = FALSE;
  1229. !    int            allocated = FALSE;
  1230. !    struct ObjRec    * tmp_obj_ptr;
  1231. !    struct ObjRec    * tmp_top_obj = NULL, * tmp_bot_obj = NULL;
  1232. !    struct AttrRec       * top_attr = NULL, * bot_attr = NULL, * attr_ptr;
  1233.   
  1234.      while (fgets (inbuf, MAXSTRING, FP) != NULL)
  1235. --- 426,438 ----
  1236.   }
  1237.   
  1238. ! int ReadObj (FP, ObjPtr, PRTGIF)
  1239.      FILE            * FP;
  1240.      struct ObjRec    * * ObjPtr;
  1241. +    int            PRTGIF;
  1242.   {
  1243.      char            inbuf[MAXSTRING+1], obj_name[10], tmp_str[MAXSTRING+1];
  1244.      char            * line = NULL, * c_ptr, * s, * s1;
  1245. !    int            len, id, cur_size, done = FALSE, allocated = FALSE;
  1246. !    struct AttrRec    * top_attr = NULL, * bot_attr = NULL, * attr_ptr;
  1247.   
  1248.      while (fgets (inbuf, MAXSTRING, FP) != NULL)
  1249. ***************
  1250. *** 444,448 ****
  1251.            strcpy (line, inbuf);
  1252.            c_ptr = &(line[MAXSTRING-1]);
  1253. !          while (fgets (inbuf, MAXSTRING, FP) != NULL && !done)
  1254.            {
  1255.               len = strlen(inbuf);
  1256. --- 449,453 ----
  1257.            strcpy (line, inbuf);
  1258.            c_ptr = &(line[MAXSTRING-1]);
  1259. !          while (!done && fgets (inbuf, MAXSTRING, FP) != NULL)
  1260.            {
  1261.               len = strlen(inbuf);
  1262. ***************
  1263. *** 478,482 ****
  1264.            ReadPolyObj (line, ObjPtr);
  1265.            if (fileVersion != INVALID)
  1266. !             while (ReadAttr (FP, &attr_ptr))
  1267.               {
  1268.                  attr_ptr->owner = *ObjPtr;
  1269. --- 483,487 ----
  1270.            ReadPolyObj (line, ObjPtr);
  1271.            if (fileVersion != INVALID)
  1272. !             while (ReadAttr (FP, &attr_ptr, PRTGIF))
  1273.               {
  1274.                  attr_ptr->owner = *ObjPtr;
  1275. ***************
  1276. *** 510,514 ****
  1277.         else if (strcmp (obj_name, "text") == 0)
  1278.         {
  1279. !          ReadTextObj (FP, line, ObjPtr);
  1280.            if (allocated) cfree (line);
  1281.            return (TRUE);
  1282. --- 515,519 ----
  1283.         else if (strcmp (obj_name, "text") == 0)
  1284.         {
  1285. !          ReadTextObj (FP, line, ObjPtr, PRTGIF);
  1286.            if (allocated) cfree (line);
  1287.            return (TRUE);
  1288. ***************
  1289. *** 522,528 ****
  1290.         else if (strcmp (obj_name, "group") == 0)
  1291.         {
  1292. !          ReadGroupObj (FP, ObjPtr);
  1293.            if (fileVersion != INVALID)
  1294. !             while (ReadAttr (FP, &attr_ptr))
  1295.               {
  1296.                  attr_ptr->owner = *ObjPtr;
  1297. --- 527,533 ----
  1298.         else if (strcmp (obj_name, "group") == 0)
  1299.         {
  1300. !          ReadGroupObj (FP, ObjPtr, PRTGIF);
  1301.            if (fileVersion != INVALID)
  1302. !             while (ReadAttr (FP, &attr_ptr, PRTGIF))
  1303.               {
  1304.                  attr_ptr->owner = *ObjPtr;
  1305. ***************
  1306. *** 544,551 ****
  1307.         else if (strcmp (obj_name, "sym") == 0)
  1308.         {
  1309. !          ReadGroupObj (FP, ObjPtr);
  1310.            (*ObjPtr)->type = OBJ_SYM;
  1311.            if (fileVersion != INVALID)
  1312. !             while (ReadAttr (FP, &attr_ptr))
  1313.               {
  1314.                  attr_ptr->owner = *ObjPtr;
  1315. --- 549,556 ----
  1316.         else if (strcmp (obj_name, "sym") == 0)
  1317.         {
  1318. !          ReadGroupObj (FP, ObjPtr, PRTGIF);
  1319.            (*ObjPtr)->type = OBJ_SYM;
  1320.            if (fileVersion != INVALID)
  1321. !             while (ReadAttr (FP, &attr_ptr, PRTGIF))
  1322.               {
  1323.                  attr_ptr->owner = *ObjPtr;
  1324. ***************
  1325. *** 567,571 ****
  1326.         else if (strcmp (obj_name, "icon") == 0)
  1327.         {
  1328. !          ReadGroupObj (FP, ObjPtr);
  1329.            (*ObjPtr)->type = OBJ_ICON;
  1330.            if (fgets (line, MAXSTRING, FP) == NULL)
  1331. --- 572,576 ----
  1332.         else if (strcmp (obj_name, "icon") == 0)
  1333.         {
  1334. !          ReadGroupObj (FP, ObjPtr, PRTGIF);
  1335.            (*ObjPtr)->type = OBJ_ICON;
  1336.            if (fgets (line, MAXSTRING, FP) == NULL)
  1337. ***************
  1338. *** 588,592 ****
  1339.            strcpy ((*ObjPtr)->detail.r->s, tmp_str);
  1340.            if (fileVersion != INVALID)
  1341. !             while (ReadAttr (FP, &attr_ptr))
  1342.               {
  1343.                  attr_ptr->owner = *ObjPtr;
  1344. --- 593,597 ----
  1345.            strcpy ((*ObjPtr)->detail.r->s, tmp_str);
  1346.            if (fileVersion != INVALID)
  1347. !             while (ReadAttr (FP, &attr_ptr, PRTGIF))
  1348.               {
  1349.                  attr_ptr->owner = *ObjPtr;
  1350. ***************
  1351. *** 608,612 ****
  1352.         else if (strcmp (obj_name, "state") == 0)
  1353.         {
  1354. !          ReadState (line);
  1355.            *ObjPtr = NULL;
  1356.            if (allocated) cfree (line);
  1357. --- 613,617 ----
  1358.         else if (strcmp (obj_name, "state") == 0)
  1359.         {
  1360. !          ReadState (line, PRTGIF);
  1361.            *ObjPtr = NULL;
  1362.            if (allocated) cfree (line);
  1363. ***************
  1364. *** 692,696 ****
  1365.      Msg (s);
  1366.   
  1367. !    while (ReadObj (fp, &obj_ptr))
  1368.         if (obj_ptr != NULL)
  1369.            AddObj (NULL, topObj, obj_ptr);
  1370. --- 697,701 ----
  1371.      Msg (s);
  1372.   
  1373. !    while (ReadObj (fp, &obj_ptr, FALSE))
  1374.         if (obj_ptr != NULL)
  1375.            AddObj (NULL, topObj, obj_ptr);
  1376. ***************
  1377. *** 747,751 ****
  1378.      XClearWindow (mainDisplay, drawWindow);
  1379.   
  1380. !    while (ReadObj (fp, &obj_ptr))
  1381.         if (obj_ptr != NULL)
  1382.         {
  1383. --- 752,756 ----
  1384.      XClearWindow (mainDisplay, drawWindow);
  1385.   
  1386. !    while (ReadObj (fp, &obj_ptr, FALSE))
  1387.         if (obj_ptr != NULL)
  1388.         {
  1389. ***************
  1390. *** 794,809 ****
  1391.   }
  1392.   
  1393. ! void DumpAttrs (FP, AttrPtr)
  1394.      FILE                * FP;
  1395.      register struct AttrRec    * AttrPtr;
  1396.   {
  1397.      for ( ; AttrPtr != NULL; AttrPtr = AttrPtr->prev)
  1398.         if (AttrPtr->shown)
  1399. !          DumpTextObj (FP, AttrPtr->obj);
  1400.   }
  1401.   
  1402. ! void DumpAllObj (FP, ObjPtr)
  1403.      FILE                * FP;
  1404.      register struct ObjRec    * ObjPtr;
  1405.   {
  1406.      register struct ObjRec    * obj_ptr;
  1407. --- 799,816 ----
  1408.   }
  1409.   
  1410. ! void DumpAttrs (FP, AttrPtr, PRTGIF)
  1411.      FILE                * FP;
  1412.      register struct AttrRec    * AttrPtr;
  1413. +    int                PRTGIF;
  1414.   {
  1415.      for ( ; AttrPtr != NULL; AttrPtr = AttrPtr->prev)
  1416.         if (AttrPtr->shown)
  1417. !          DumpTextObj (FP, AttrPtr->obj, PRTGIF);
  1418.   }
  1419.   
  1420. ! void DumpAllObj (FP, ObjPtr, PRTGIF)
  1421.      FILE                * FP;
  1422.      register struct ObjRec    * ObjPtr;
  1423. +    int                PRTGIF;
  1424.   {
  1425.      register struct ObjRec    * obj_ptr;
  1426. ***************
  1427. *** 813,821 ****
  1428.         case OBJ_POLY:
  1429.            DumpPolyObj (FP, ObjPtr);
  1430. !          DumpAttrs (FP, ObjPtr->detail.p->lattr);
  1431.            break;
  1432.         case OBJ_BOX: DumpBoxObj (FP, ObjPtr); break;
  1433.         case OBJ_OVAL: DumpOvalObj (FP, ObjPtr); break;
  1434. !       case OBJ_TEXT: DumpTextObj (FP, ObjPtr); break;
  1435.         case OBJ_POLYGON: DumpPolygonObj (FP, ObjPtr); break;
  1436.         case OBJ_SYM:
  1437. --- 820,828 ----
  1438.         case OBJ_POLY:
  1439.            DumpPolyObj (FP, ObjPtr);
  1440. !          DumpAttrs (FP, ObjPtr->detail.p->lattr, PRTGIF);
  1441.            break;
  1442.         case OBJ_BOX: DumpBoxObj (FP, ObjPtr); break;
  1443.         case OBJ_OVAL: DumpOvalObj (FP, ObjPtr); break;
  1444. !       case OBJ_TEXT: DumpTextObj (FP, ObjPtr, PRTGIF); break;
  1445.         case OBJ_POLYGON: DumpPolygonObj (FP, ObjPtr); break;
  1446.         case OBJ_SYM:
  1447. ***************
  1448. *** 824,829 ****
  1449.            obj_ptr = ObjPtr->detail.r->last;
  1450.            for ( ; obj_ptr != NULL; obj_ptr = obj_ptr->prev)
  1451. !             DumpAllObj (FP, obj_ptr);
  1452. !          DumpAttrs (FP, ObjPtr->detail.r->lattr);
  1453.            if (ObjPtr->type == OBJ_SYM) DumpSymOutline (FP, ObjPtr);
  1454.            break;
  1455. --- 831,836 ----
  1456.            obj_ptr = ObjPtr->detail.r->last;
  1457.            for ( ; obj_ptr != NULL; obj_ptr = obj_ptr->prev)
  1458. !             DumpAllObj (FP, obj_ptr, PRTGIF);
  1459. !          DumpAttrs (FP, ObjPtr->detail.r->lattr, PRTGIF);
  1460.            if (ObjPtr->type == OBJ_SYM) DumpSymOutline (FP, ObjPtr);
  1461.            break;
  1462. ***************
  1463. *** 875,879 ****
  1464.   }
  1465.   
  1466. ! void Dump ()
  1467.   {
  1468.      register struct ObjRec    * obj_ptr;
  1469. --- 882,888 ----
  1470.   }
  1471.   
  1472. ! void Dump (PRTGIF, FileName)
  1473. !    int    PRTGIF;
  1474. !    char    * FileName;
  1475.   {
  1476.      register struct ObjRec    * obj_ptr;
  1477. ***************
  1478. *** 886,890 ****
  1479.      if (botObj == NULL) { Msg ("No object to print."); return; }
  1480.   
  1481. !    Msg ("Generating print file ...");
  1482.      strcpy (tmp_file, "/tmp/TgifXXXXXX");
  1483.      mktemp (tmp_file);
  1484. --- 895,900 ----
  1485.      if (botObj == NULL) { Msg ("No object to print."); return; }
  1486.   
  1487. !    if (!PRTGIF) Msg ("Generating print file ...");
  1488. ! 
  1489.      strcpy (tmp_file, "/tmp/TgifXXXXXX");
  1490.      mktemp (tmp_file);
  1491. ***************
  1492. *** 893,901 ****
  1493.      if ((fp = fopen (tmp_file, "w")) == NULL)
  1494.      {
  1495. !       sprintf (tmp_str, "Can not create %s, print aborted.", tmp_file);
  1496. !       Msg (tmp_str);
  1497.         return;
  1498.      }
  1499.   
  1500.      fprintf (fp, "%%!\n");
  1501.      DumpBBox (fp);
  1502. --- 903,918 ----
  1503.      if ((fp = fopen (tmp_file, "w")) == NULL)
  1504.      {
  1505. !       if (PRTGIF)
  1506. !          printf ("Can not create $s, print aborted.", tmp_file);
  1507. !       else
  1508. !       {
  1509. !          sprintf (tmp_str, "Can not create %s, print aborted.", tmp_file);
  1510. !          Msg (tmp_str);
  1511. !       }
  1512.         return;
  1513.      }
  1514.   
  1515. +    if (PRTGIF) printf ("Writing to %s ...\n", tmp_file);
  1516. + 
  1517.      fprintf (fp, "%%!\n");
  1518.      DumpBBox (fp);
  1519. ***************
  1520. *** 903,908 ****
  1521.      if ((fps = fopen (ps_file, "r")) == NULL) 
  1522.      {
  1523. !       sprintf (message, "Can not find %s, print aborted.", ps_file);
  1524. !       Msg (message);
  1525.         fclose (fp);
  1526.         unlink (tmp_file);
  1527. --- 920,930 ----
  1528.      if ((fps = fopen (ps_file, "r")) == NULL) 
  1529.      {
  1530. !       if (PRTGIF)
  1531. !          printf ("Can not find %s, print aborted.\n", ps_file);
  1532. !       else
  1533. !       {
  1534. !          sprintf (message, "Can not find %s, print aborted.", ps_file);
  1535. !          Msg (message);
  1536. !       }
  1537.         fclose (fp);
  1538.         unlink (tmp_file);
  1539. ***************
  1540. *** 925,929 ****
  1541.   
  1542.      for (obj_ptr = botObj; obj_ptr != NULL; obj_ptr = obj_ptr->prev)
  1543. !       DumpAllObj (fp, obj_ptr);
  1544.   
  1545.      fprintf (fp, "grestore\n\n");
  1546. --- 947,951 ----
  1547.   
  1548.      for (obj_ptr = botObj; obj_ptr != NULL; obj_ptr = obj_ptr->prev)
  1549. !       DumpAllObj (fp, obj_ptr, PRTGIF);
  1550.   
  1551.      fprintf (fp, "grestore\n\n");
  1552. ***************
  1553. *** 934,946 ****
  1554.      {
  1555.         case PRINTER:
  1556. !          if ((c_ptr = XGetDefault (mainDisplay,"Tgif","PrintCommand")) != NULL)
  1557. !             sprintf (cmd, "%s %s 2>&1", c_ptr, tmp_file);
  1558.            else
  1559. !             sprintf (cmd, "lpr %s 2>&1", tmp_file);
  1560.   
  1561.            if ((fp = popen (cmd, "r")) == NULL)
  1562.            {
  1563. !             sprintf (message, "Can not execute '%s', print aborted.", cmd);
  1564. !             Msg (message);
  1565.               unlink (tmp_file);
  1566.               return;
  1567. --- 956,991 ----
  1568.      {
  1569.         case PRINTER:
  1570. !          if (PRTGIF)
  1571. !          {
  1572. !             if (lastFile)
  1573. !                sprintf (cmd, "lpr %s 2>&1", tmp_file);
  1574. !             else
  1575. !                sprintf (cmd, "lpr -h %s 2>&1", tmp_file);
  1576. !          }
  1577.            else
  1578. !          {
  1579. !             if ((c_ptr = XGetDefault (mainDisplay,"Tgif","PrintCommand")) !=
  1580. !                   NULL)
  1581. !             {
  1582. !                sprintf (cmd, "%s %s 2>&1", c_ptr, tmp_file);
  1583. !                sprintf (message, "Printing with '%s' command.", c_ptr);
  1584. !             }
  1585. !             else
  1586. !             {
  1587. !                sprintf (cmd, "lpr %s 2>&1", tmp_file);
  1588. !                sprintf (message, "Printing with 'lpr' command.");
  1589. !             }
  1590. !             Msg (message);
  1591. !          }
  1592.   
  1593.            if ((fp = popen (cmd, "r")) == NULL)
  1594.            {
  1595. !             if (PRTGIF)
  1596. !                printf ("Can not execute '%s', print aborted.\n", cmd);
  1597. !             else
  1598. !             {
  1599. !                sprintf (message, "Can not execute '%s', print aborted.", cmd);
  1600. !                Msg (message);
  1601. !             }
  1602.               unlink (tmp_file);
  1603.               return;
  1604. ***************
  1605. *** 948,978 ****
  1606.            while (fgets (tmp_str, MAXSTRING, fp) != NULL)
  1607.            {
  1608. !             Msg (tmp_str);
  1609.               sleep (5);
  1610.            }
  1611. !          pclose (fp);
  1612.            break;
  1613.         case LATEX_FIG:
  1614. !          if (!curFileDefined)
  1615.            {
  1616. !             Dialog ("No current file.  Can not generate LaTeX output!", cmd);
  1617. !             unlink (tmp_file);
  1618. !             return;
  1619.            }
  1620.   
  1621. -          strcpy (ps_file, curDomainName);
  1622. -          if (*curDomainName != '\0') strcat (ps_file, "/");
  1623. -          strcat (ps_file, curFileName);
  1624. -          len = strlen (ps_file);
  1625. -          for (i = len-1; ps_file[i] != '.'; i--) ;
  1626. -          strcpy (&ps_file[i], ".ps");
  1627. -          sprintf (cmd, "Printing into '%s'.", ps_file);
  1628. -          Msg (cmd);
  1629.            sprintf (cmd, "tgif2ps < %s 1> %s 2>&1; chmod %s %s", tmp_file,
  1630.                  ps_file, PSFILE_MOD, ps_file);
  1631.            if ((fp = popen (cmd, "r")) == NULL)
  1632.            {
  1633. !             sprintf (message, "Can not execute '%s', file not saved.", cmd);
  1634. !             Msg (message);
  1635.               unlink (tmp_file);
  1636.               return;
  1637. --- 993,1038 ----
  1638.            while (fgets (tmp_str, MAXSTRING, fp) != NULL)
  1639.            {
  1640. !             if (PRTGIF)
  1641. !                printf ("%s", tmp_str);
  1642. !             else
  1643. !                Msg (tmp_str);
  1644.               sleep (5);
  1645.            }
  1646. !          if (PRTGIF) printf ("%s printed.\n\n", tmp_file);
  1647.            break;
  1648.         case LATEX_FIG:
  1649. !          if (PRTGIF)
  1650. !             sprintf (ps_file, "%s.ps", FileName);
  1651. !          else
  1652.            {
  1653. !             if (!curFileDefined)
  1654. !             {
  1655. !                Dialog ("No current file.  Can not generate LaTeX output!", cmd);
  1656. !                unlink (tmp_file);
  1657. !                return;
  1658. !             }
  1659. ! 
  1660. !             strcpy (ps_file, curDomainName);
  1661. !             if (*curDomainName != '\0') strcat (ps_file, "/");
  1662. !             strcat (ps_file, curFileName);
  1663. !             len = strlen (ps_file);
  1664. !             for (i = len-1; ps_file[i] != '.'; i--) ;
  1665. !             strcpy (&ps_file[i], ".ps");
  1666. !             sprintf (cmd, "Printing into '%s'.", ps_file);
  1667. !             Msg (cmd);
  1668.            }
  1669.   
  1670.            sprintf (cmd, "tgif2ps < %s 1> %s 2>&1; chmod %s %s", tmp_file,
  1671.                  ps_file, PSFILE_MOD, ps_file);
  1672. + 
  1673.            if ((fp = popen (cmd, "r")) == NULL)
  1674.            {
  1675. !             if (PRTGIF)
  1676. !                printf ("Can not execute '%s', print aborted.\n", cmd);
  1677. !             else
  1678. !             {
  1679. !                sprintf (message, "Can not execute '%s', file not saved.", cmd);
  1680. !                Msg (message);
  1681. !             }
  1682.               unlink (tmp_file);
  1683.               return;
  1684. ***************
  1685. *** 980,989 ****
  1686.            while (fgets(tmp_str, MAXSTRING, fp) != NULL)
  1687.            {
  1688. !             Msg (tmp_str);
  1689.               sleep (5);
  1690.            }
  1691. !          pclose (fp);
  1692.            break;
  1693.      }
  1694.      unlink (tmp_file);
  1695.   }
  1696. --- 1040,1059 ----
  1697.            while (fgets(tmp_str, MAXSTRING, fp) != NULL)
  1698.            {
  1699. !             if (PRTGIF)
  1700. !                printf ("%s", tmp_str);
  1701. !             else
  1702. !                Msg (tmp_str);
  1703.               sleep (5);
  1704.            }
  1705. !          if (PRTGIF)
  1706. !             printf ("LaTeX figure printed into '%s'.\n\n", ps_file);
  1707. !          else
  1708. !          {
  1709. !             sprintf (message, "LaTeX figure printed into '%s'.\n\n", ps_file);
  1710. !             Msg (message);
  1711. !          }
  1712.            break;
  1713.      }
  1714. +    pclose (fp);
  1715.      unlink (tmp_file);
  1716.   }
  1717. ***************
  1718. *** 1082,1086 ****
  1719.   int SolveProc ()
  1720.   {
  1721. !    switch (SaveTmpFile ())
  1722.      {
  1723.         case OBJ_FILE_SAVED: return (FILE_SOLVE);
  1724. --- 1152,1156 ----
  1725.   int SolveProc ()
  1726.   {
  1727. !    switch (SaveTmpFile ("tmpmodel"))
  1728.      {
  1729.         case OBJ_FILE_SAVED: return (FILE_SOLVE);
  1730. ***************
  1731. *** 1092,1096 ****
  1732.   int SimulateProc ()
  1733.   {
  1734. !    switch (SaveTmpFile ())
  1735.      {
  1736.         case OBJ_FILE_SAVED: return (FILE_SIMULATE);
  1737. --- 1162,1166 ----
  1738.   int SimulateProc ()
  1739.   {
  1740. !    switch (SaveTmpFile ("tmpmodel"))
  1741.      {
  1742.         case OBJ_FILE_SAVED: return (FILE_SIMULATE);
  1743. ***************
  1744. *** 1102,1106 ****
  1745.   int ProbeProc ()
  1746.   {
  1747. !    switch (SaveTmpFile ())
  1748.      {
  1749.         case OBJ_FILE_SAVED: return (FILE_PROBE);
  1750. --- 1172,1176 ----
  1751.   int ProbeProc ()
  1752.   {
  1753. !    switch (SaveTmpFile ("tmpmodel"))
  1754.      {
  1755.         case OBJ_FILE_SAVED: return (FILE_PROBE);
  1756. ***************
  1757. *** 1112,1116 ****
  1758.   int AnimateProc ()
  1759.   {
  1760. !    switch (SaveTmpFile ())
  1761.      {
  1762.         case OBJ_FILE_SAVED: return (FILE_ANIMATE);
  1763. --- 1182,1186 ----
  1764.   int AnimateProc ()
  1765.   {
  1766. !    switch (SaveTmpFile ("tmpmodel"))
  1767.      {
  1768.         case OBJ_FILE_SAVED: return (FILE_ANIMATE);
  1769. ***************
  1770. *** 1142,1146 ****
  1771.         case FILE_IMPORT: ImportFile (); break;
  1772.         case FILE_DOMAIN: ChangeDomain (); break;
  1773. !       case FILE_DUMP: Dump (); break;
  1774.         case FILE_SOLVE: return (SolveProc ()); break;
  1775.         case FILE_SIMULATE: return (SimulateProc ()); break;
  1776. --- 1212,1216 ----
  1777.         case FILE_IMPORT: ImportFile (); break;
  1778.         case FILE_DOMAIN: ChangeDomain (); break;
  1779. !       case FILE_DUMP: Dump (FALSE, ""); break;
  1780.         case FILE_SOLVE: return (SolveProc ()); break;
  1781.         case FILE_SIMULATE: return (SimulateProc ()); break;
  1782. ***************
  1783. *** 1151,1153 ****
  1784. --- 1221,1254 ----
  1785.      }
  1786.      return (INVALID);
  1787. + }
  1788. + 
  1789. + void CleanUpFiles ()
  1790. + {
  1791. +    ClearFileInfo ();
  1792. +    fileModified = FALSE;
  1793. + }
  1794. + 
  1795. + void EmergencySave ()
  1796. + {
  1797. +    if (exitNormally) return;
  1798. + 
  1799. +    signal (SIGHUP, SIG_DFL);
  1800. +    signal (SIGFPE, SIG_DFL);
  1801. +    signal (SIGBUS, SIG_DFL);
  1802. +    signal (SIGSEGV, SIG_DFL);
  1803. + 
  1804. +    switch (SaveTmpFile ("EmergencySave"))
  1805. +    {
  1806. +       case OBJ_FILE_SAVED:
  1807. +          fprintf (stderr, "Saved to EmergencySave.obj.\n");
  1808. +          break;
  1809. +       case SYM_FILE_SAVED:
  1810. +          fprintf (stderr, "Saved to EmergencySave.sym.\n");
  1811. +          break;
  1812. +       case INVALID:
  1813. +          fprintf (stderr, "Unable to save working file.\n");
  1814. +          break;
  1815. +    }
  1816. +    exitNormally = TRUE;
  1817. +    exit (0);
  1818.   }
  1819. ---------------------------------> cut here <---------------------------------
  1820. --
  1821. Bill Cheng // UCLA Computer Science Department // (213) 206-7135
  1822. 3277 Boelter Hall // Los Angeles, California 90024 // USA
  1823. william@CS.UCLA.EDU      ...!{uunet|ucbvax}!cs.ucla.edu!william
  1824.  
  1825. dan
  1826. ----------------------------------------------------
  1827. O'Reilly && Associates   argv@sun.com / argv@ora.com
  1828. Opinions expressed reflect those of the author only.
  1829.