[BACK]Return to ox_plot_xevent.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / plot

Diff for /OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c between version 1.13 and 1.16

version 1.13, 2001/12/25 02:39:07 version 1.16, 2002/07/11 12:35:03
Line 45 
Line 45 
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,   * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.   * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *   *
  * $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c,v 1.12 2001/08/22 09:19:21 noro Exp $   * $OpenXM: OpenXM_contrib2/asir2000/plot/ox_plot_xevent.c,v 1.15 2002/07/11 03:34:34 takayama Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 55 
Line 55 
 #include <X11/Xaw/MenuButton.h>  #include <X11/Xaw/MenuButton.h>
 #include <X11/Xaw/Paned.h>  #include <X11/Xaw/Paned.h>
   
   /* XXX : these lines are in plotg.c, but ld says they are not defined */
   #if __DARWIN__
   int stream;
   
   DISPLAY *display;
   CURSOR normalcur,runningcur,errorcur;
   
   #if defined(VISUAL)
   POINT start_point, end_point;
   SIZE cansize;
   #else
   Window rootwin;
   GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC,cdrawGC;
   XFontStruct *sffs;
   #endif
   
   struct canvas *canvas[MAXCANVAS];
   struct canvas *current_can;
   #endif /* __DARWIN__ */
   
 #ifdef ABS  #ifdef ABS
 #undef ABS  #undef ABS
 #define ABS(a) ((a)>0?(a):-(a))  #define ABS(a) ((a)>0?(a):-(a))
Line 1101  static void output_to_ps_printer(w,fbutton,call) 
Line 1121  static void output_to_ps_printer(w,fbutton,call) 
    ifplot(x^2-y^3);     ifplot(x^2-y^3);
    drawcircle(0,0,100,0,0);     drawcircle(0,0,100,0,0);
    */     */
   static int getColorSizeOfImageForPS(int xsize,int ysize,XImage *image,
                                       struct xcolorForPS **tableOfxcolorForPS);
   
 static void generate_psfile(can,fp)  static void generate_psfile(can,fp)
          struct canvas *can;           struct canvas *can;
          FILE *fp;           FILE *fp;
Line 1110  static void generate_psfile(can,fp)
Line 1133  static void generate_psfile(can,fp)
   int color[1];    int color[1];
   int colorSize = 1;    int colorSize = 1;
   char *m;    char *m;
     struct xcolorForPS *tableOfxcolorForPS;
   extern int PrintingMethod;    extern int PrintingMethod;
   fprintf(stderr,"generate_psfile\n");    fprintf(stderr,"generate_psfile\n");
   if (PrintingMethod == PRINTING_METHOD_BITMAP) {    if (PrintingMethod == PRINTING_METHOD_BITMAP) {
Line 1117  static void generate_psfile(can,fp)
Line 1141  static void generate_psfile(can,fp)
           fprintf(stderr,"generate_psfile: output to a file.\n");            fprintf(stderr,"generate_psfile: output to a file.\n");
           image = XGetImage(display,can->pix,            image = XGetImage(display,can->pix,
                                                 0,0,can->width,can->height,-1,ZPixmap);                                                  0,0,can->width,can->height,-1,ZPixmap);
           color[0] = 0; /* balck line */            colorSize =
           generatePS_from_image(fp,image,can->width,can->height,color,colorSize,can);                  getColorSizeOfImageForPS(can->width,can->height,image,&tableOfxcolorForPS);
             color[0] = 0; /* black line */
             generatePS_from_image(fp,image,can->width,can->height,color,colorSize,can,tableOfxcolorForPS);
         }else{          }else{
           fprintf(stderr,"Cannot print on this system\n");            fprintf(stderr,"Cannot print on this system\n");
         }          }
Line 1145  struct canvas *can;
Line 1171  struct canvas *can;
         XFillRectangle(display,can->pix,clearGC,0,0,can->width,can->height);          XFillRectangle(display,can->pix,clearGC,0,0,can->width,can->height);
         XFlush(display);          XFlush(display);
 }  }
   
   /*
      The following functions are used to generate color postscript file.
   */
   /* In order to count colorSize, binary tree (sm_btree) is used. */
   static struct sm_btree *sm_newNode(unsigned long v);
   static int sm_insert(struct sm_btree *node,unsigned long v);
   static int sm_count(struct sm_btree *rootp);
   #define MALLOC(a) GC_malloc(a)
   struct sm_btree {
     unsigned long p;
     struct sm_btree * left;
     struct sm_btree * right;
   };
   static struct sm_btree *sm_newNode(unsigned long v) {
     struct sm_btree * n;
     n = (struct sm_btree *)MALLOC(sizeof(struct sm_btree));
     if (n == NULL) { fprintf(stderr,"No more memory.\n"); exit(10); }
     n->p = v;
     n->left = NULL;
     n->right = NULL;
     return n;
   }
   static int sm_insert(struct sm_btree *node,unsigned long v)
   {
     if (node->p == v) return;
     if (node->p > v) {
       if (node->left == NULL) {
         node->left = sm_newNode(v);
         return;
       }
       sm_insert(node->left,v);
     }
     if (node->p < v) {
       if (node->right == NULL) {
         node->right = sm_newNode(v);
         return;
       }
       sm_insert(node->right,v);
     }
   }
   static int sm_count(struct sm_btree *rootp)
   {
     if (rootp == NULL) return 0;
     return (1+sm_count(rootp->left)+sm_count(rootp->right));
   }
   
   static int setTableOfxcolorForPS(struct sm_btree *rootp,
                                    struct xcolorForPS *table,int k,int size)
   {
     int m;
     m = k;
     if (rootp == NULL) return;
     if (k >= size) {
       warning(Can,"internal error of setTableOfxcolorForPS");
     }
     if (rootp->left != NULL) {
       m = setTableOfxcolorForPS(rootp->left,table,k,size);
     }
   
     (table[m]).pixel = rootp->p;
     m++;
     if (rootp->right != NULL) {
       m = setTableOfxcolorForPS(rootp->right,table,m,size);
     }
     return m;
   }
   
   
   static int getColorSizeOfImageForPS(int xsize,int ysize,XImage *image,
                                       struct xcolorForPS **tableOfxcolorForPS)
   {
     int x,y;
     int size;
     struct sm_btree root;
     struct xcolorForPS *table;
     XStandardColormap scm;
     Colormap cm;
     XColor color;
     XColor white;
     int screen,i;
   
     root.p = 0;
     root.left = NULL; root.right=NULL;
     /* get color size */
     for (x=0; x<xsize; x++) {
       for (y=0; y<ysize; y++) {
         sm_insert(&root,XGetPixel(image,x,y));
       }
     }
     size=sm_count(&root);
   
     table = (struct xcolorForPS *)MALLOC((size+1)*sizeof(struct xcolorForPS));
     if (table == NULL) {
           fprintf(stderr,"No more memory in getColorSizeOfImageForPS.\n");
           return 0;
     }
     /* Set rgb values standing for the pixel values.
     */
     if (setTableOfxcolorForPS(&root,table,0,size) != size) {
           warning(Can,"internal error.");
           return ;
     }
   
     screen = DefaultScreen(display);
     cm = DefaultColormap(display,screen);
     /*  BUG: it does not work.
     if (!XGetStandardColormap(display,RootWindow(display,DefaultScreen(display)),&scm,XA_RGB_DEFAULT_MAP)) {
           warning(Can,"failed to open the X Standard Colormap.");
           scm.red_max = 0xffff;
           scm.green_max = 0xffff;
           scm.blue_max = 0xffff;
     }
     */
     /* Set by hand. */
     scm.red_max = 0xffff;
     scm.green_max = 0xffff;
     scm.blue_max = 0xffff;
     XParseColor(display,cm,"White",&white);
     for (i=0; i<size; i++) {
       color.pixel=(table[i]).pixel;
       /*
       {
         char s[254];
         sprintf(s,"%ld",color.pixel);
         warning(Can,s);
       }
       */
       XQueryColor(display,cm,&color);
       (table[i]).r = ((double) color.red)/((double) scm.red_max);
       (table[i]).g = ((double) color.green)/((double) scm.green_max);
       (table[i]).b = ((double) color.blue)/((double) scm.blue_max);
       if ((table[i]).r > 1.0) (table[i]).r = 1.0;
       if ((table[i]).g > 1.0) (table[i]).g = 1.0;
       if ((table[i]).b > 1.0) (table[i]).b = 1.0;
       if (color.red == white.red && color.green == white.green
           && color.blue == white.blue) {
         (table[i]).print = 0;
       }else{
         (table[i]).print = 1;
       }
     }
   
     *tableOfxcolorForPS = table;
     return size;
   }
   
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.16
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>