home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume5 / xplot / patch2 next >
Encoding:
Text File  |  1989-09-19  |  6.5 KB  |  243 lines
  1. Path: uunet!island!argv
  2. From: argv@island.uu.net (Dan Heller)
  3. Newsgroups: comp.sources.x
  4. Subject: v05i001: Xplot, Patch2
  5. Message-ID: <1079@island.uu.net>
  6. Date: 19 Sep 89 08:21:25 GMT
  7. Organization: Island Graphics, Marin County, California
  8. Lines: 232
  9. Approved: island!argv@sun.com
  10.  
  11. Submitted-by: uunet!helios.tn.cornell.edu!arthur (Arthur Smith)
  12. Posting-number: Volume 5, Issue 1
  13. Archive-name: xplot/patch2
  14. Patch-To: xplot: Volume 4, Issue 81
  15.  
  16. The patch consists of a shar file containing the patchlevel.h
  17. file which it seems is now required, and a patch file to be
  18. applied to xplot.c. The patches were based on suggestions
  19. or code supplied by a number of people, particularly dana@bellcore.com
  20. who fixed it to work with color. There is a new #define variable
  21. "WideLabel", which determines whether the current point is
  22. moved after a label is drawn. This is not required in the plot(5)
  23. standard, but seems to be assumed by various graphics programs,
  24. particularly by graph(1). The time WAITINTERVAL in microseconds
  25. is intended to put in a delay in the read process, so that
  26. xplot doesn't keep redrawing the screen each time there is a small
  27. gap in data input. If there are any problems, my e-mail address is
  28. below:
  29.  
  30.                 Arthur
  31.  
  32.         arpanet:    arthur@helios.tn.cornell.edu
  33.         bitnet:        arthur@crnlassp
  34.  
  35. # This is a shell archive.  Remove anything before this line,
  36. # then unpack it by saving it in a file and typing "sh file".
  37. #
  38. # Wrapped by helios!arthur on Mon Sep 18 18:27:27 EDT 1989
  39. # Contents:  patchlevel.h xplot.patch2
  40.  
  41. echo x - patchlevel.h
  42. sed 's/^@//' > "patchlevel.h" <<'@//E*O*F patchlevel.h//'
  43. 2.0
  44. @//E*O*F patchlevel.h//
  45. chmod u=rw,g=r,o=r patchlevel.h
  46.  
  47. echo x - xplot.patch2
  48. sed 's/^@//' > "xplot.patch2" <<'@//E*O*F xplot.patch2//'
  49. *** xplot.c.orig    Wed Sep 13 13:56:40 1989
  50. --- xplot.c    Wed Sep 13 13:27:33 1989
  51. ***************
  52. *** 10,15 ****
  53. --- 10,16 ----
  54.   #include <X11/Label.h>
  55.   
  56.   #define LINE 512
  57. + #define WAITINTERVAL 50000
  58.   char buf[LINE];
  59.   char cptr[LINE];
  60.   char *prog;
  61. ***************
  62. *** 21,27 ****
  63.   GC gc;
  64.   XGCValues gcv;
  65.   XtInputId inid;
  66. ! /*XtAppContext app_context; */
  67.   int rwidth = 500, rheight = 500;
  68.   
  69.   short xmin, ymax;
  70. --- 22,29 ----
  71.   GC gc;
  72.   XGCValues gcv;
  73.   XtInputId inid;
  74. ! Pixel fg, bg;
  75. ! XFontStruct *font;
  76.   int rwidth = 500, rheight = 500;
  77.   
  78.   short xmin, ymax;
  79. ***************
  80. *** 211,219 ****
  81.   int argc;
  82.   char **argv;
  83.   {
  84. !     int i, dimset, narg;
  85.   
  86. -     dimset = 0;
  87.       for (i=0;i<argc;i++){
  88.           if (strcmp(argv[i],"-geometry"))
  89.               continue;
  90. --- 213,221 ----
  91.   int argc;
  92.   char **argv;
  93.   {
  94. !     int i, dimset = 0, narg;
  95. !     char *ptr;
  96.   
  97.       for (i=0;i<argc;i++){
  98.           if (strcmp(argv[i],"-geometry"))
  99.               continue;
  100. ***************
  101. *** 226,249 ****
  102.       }
  103.       toplevel = XtInitialize(argv[0], "xplot",NULL, 0, &argc, argv); 
  104.       dpy = XtDisplay(toplevel);
  105. - /*    app_context = XtCreateApplicationContext(); */
  106.   
  107. !     pixmap = XCreatePixmap(dpy,DefaultRootWindow(dpy), rwidth, rheight, 1);
  108. !     gc = XCreateGC(dpy, pixmap, 0L, &gcv);
  109. !     XSetForeground(dpy,gc,1);
  110.   
  111. !     XtSetArg(wargs[0], XtNbitmap, pixmap);
  112. !     narg = 1;
  113.       if (dimset == 0) {
  114. !         XtSetArg(wargs[1], XtNheight, rheight);
  115. !         XtSetArg(wargs[2], XtNwidth, rwidth);
  116. !         narg = 3;
  117.       } 
  118.       child = XtCreateManagedWidget(prog, labelWidgetClass,
  119.                           toplevel, wargs, narg);
  120. - /*    XtCreateManagedWidget(prog, labelWidgetClass, child, wargs, narg); */
  121.       XtRealizeWidget(toplevel);
  122.       widgetwin = XtWindow(child);
  123.       inid = XtAddInput(fileno(instrm), XtInputReadMask, doplot, NULL);
  124.       XtMainLoop();
  125.   }
  126. --- 228,271 ----
  127.       }
  128.       toplevel = XtInitialize(argv[0], "xplot",NULL, 0, &argc, argv); 
  129.       dpy = XtDisplay(toplevel);
  130.   
  131. !     if (!dimset)
  132. !         if (ptr = XGetDefault(dpy,"xplot","geometry")){
  133. !             dimset = 1;
  134. !             rwidth = atoi(ptr);
  135. !             rheight = atoi(1 + index(ptr,'x'));
  136. !         }
  137.   
  138. !     pixmap = XCreatePixmap(dpy,DefaultRootWindow(dpy), rwidth, rheight,
  139. !         DefaultDepth(dpy, DefaultScreen(dpy)));
  140. ! 
  141. !     narg = 0;
  142. !     XtSetArg(wargs[narg], XtNbitmap, pixmap); narg++;
  143. !     XtSetArg(wargs[narg], XtNinternalWidth, 0); narg++;
  144. !     XtSetArg(wargs[narg], XtNinternalHeight, 0); narg++;
  145.       if (dimset == 0) {
  146. !         XtSetArg(wargs[narg], XtNheight, rheight); narg++;
  147. !         XtSetArg(wargs[narg], XtNwidth, rwidth); narg++;
  148.       } 
  149. + 
  150.       child = XtCreateManagedWidget(prog, labelWidgetClass,
  151.                           toplevel, wargs, narg);
  152.       XtRealizeWidget(toplevel);
  153.       widgetwin = XtWindow(child);
  154. + 
  155. +     narg = 0;
  156. +     XtSetArg(wargs[narg], XtNbackground, &bg); narg++;
  157. +     XtSetArg(wargs[narg], XtNforeground, &fg); narg++;
  158. +     XtSetArg(wargs[narg], XtNfont, &font); narg++;
  159. +     XtGetValues(child, wargs, narg);
  160. + 
  161. +     gcv.foreground = fg;
  162. +     gcv.background = bg;
  163. +     gcv.font = font->fid;
  164. +     gc = XCreateGC(dpy, pixmap, GCForeground | GCBackground | GCFont,
  165. +              &gcv);
  166. +     erase();
  167. + 
  168.       inid = XtAddInput(fileno(instrm), XtInputReadMask, doplot, NULL);
  169.       XtMainLoop();
  170.   }
  171. ***************
  172. *** 254,262 ****
  173.   {
  174.   /* Wait for button event */
  175.   /* Clear pixmap */
  176. !     XSetForeground(dpy,gc,0);
  177.       XFillRectangle(dpy,pixmap,gc,0,0,rwidth,rheight);
  178. !     XSetForeground(dpy,gc,1);
  179.   }
  180.   
  181.   /* Don't know how I'm going to do this ! */
  182. --- 276,284 ----
  183.   {
  184.   /* Wait for button event */
  185.   /* Clear pixmap */
  186. !     XSetForeground(dpy, gc, bg);
  187.       XFillRectangle(dpy,pixmap,gc,0,0,rwidth,rheight);
  188. !     XSetForeground(dpy, gc, fg);
  189.   }
  190.   
  191.   /* Don't know how I'm going to do this ! */
  192. ***************
  193. *** 266,271 ****
  194. --- 288,296 ----
  195.   {
  196.       XDrawString(dpy,pixmap,gc,MAPX(curpt[0]),MAPY(curpt[1]),s,
  197.               strlen(s) - 1);
  198. + #ifdef WideLabel
  199. +     curpt[0] += (strlen(s)*font->max_bounds.width)/xfactor;
  200. + #endif
  201.   }
  202.   
  203.   line(x1,y1,x2,y2)
  204. ***************
  205. *** 411,418 ****
  206.       if (len > 0)
  207.           bcopy(curp, cptr, len);
  208.       if ((lenp = fread(cptr+len, 1, LINE - len, strm)) == 0){
  209. !         endinp = 1;
  210. !         return 0;
  211.       }
  212.       len += lenp;
  213.       curp = cptr;
  214. --- 436,446 ----
  215.       if (len > 0)
  216.           bcopy(curp, cptr, len);
  217.       if ((lenp = fread(cptr+len, 1, LINE - len, strm)) == 0){
  218. !         usleep(WAITINTERVAL); /* Wait in case stuff is on the way */
  219. !         if ((lenp = fread(cptr+len, 1, LINE - len, strm)) == 0){
  220. !             endinp = 1;
  221. !             return 0;
  222. !         }
  223.       }
  224.       len += lenp;
  225.       curp = cptr;
  226. @//E*O*F xplot.patch2//
  227. chmod u=rw,g=r,o=r xplot.patch2
  228.  
  229. echo Inspecting for damage in transit...
  230. temp=/tmp/shar$$; dtemp=/tmp/.shar$$
  231. trap "rm -f $temp $dtemp; exit" 0 1 2 3 15
  232. cat > $temp <<\!!!
  233.        1       1       4 patchlevel.h
  234.      177     564    4376 xplot.patch2
  235.      178     565    4380 total
  236. !!!
  237. wc  patchlevel.h xplot.patch2 | sed 's=[^ ]*/==' | diff -b $temp - >$dtemp
  238. if [ -s $dtemp ]
  239. then echo "Ouch [diff of wc output]:" ; cat $dtemp
  240. else echo "No problems found."
  241. fi
  242. exit 0
  243.