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

Diff for /OpenXM_contrib2/asir2000/plot/smoothing.c between version 1.2 and 1.4

version 1.2, 2000/10/15 10:58:11 version 1.4, 2000/11/08 05:49:35
Line 1 
Line 1 
 /* $OpenXM: OpenXM_contrib2/asir2000/plot/smoothing.c,v 1.1 2000/10/15 06:56:53 takayama Exp $ */  /* $OpenXM: OpenXM_contrib2/asir2000/plot/smoothing.c,v 1.3 2000/10/24 01:53:53 takayama Exp $ */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
 #include "ox.h"  #include "ox.h"
Line 24  static struct polyLine *polyLine_addNewSegment(struct 
Line 24  static struct polyLine *polyLine_addNewSegment(struct 
                                                                                            int x,int y);                                                                                             int x,int y);
 static int polyLine_lastY(struct polyLine *pl);  static int polyLine_lastY(struct polyLine *pl);
 static void polyLine_outputPS(struct polyLine *pl);  static void polyLine_outputPS(struct polyLine *pl);
   static void polyLine_output_bezier_PS(struct polyLine *pl);
 static void polyLine_outputProlog(int xmin, int ymin, int xmax, int ymax);  static void polyLine_outputProlog(int xmin, int ymin, int xmax, int ymax);
 static void polyLine_outputEpilog(void);  static void polyLine_outputEpilog(void);
 static void polyLine_error(char *s);  static void polyLine_error(char *s);
Line 43  static int updatePolyLine(struct polyLine *pl[], int p
Line 44  static int updatePolyLine(struct polyLine *pl[], int p
   
 static void polyLine_outputPS_dashed_line(int x0,int y0,int x1,int y1);  static void polyLine_outputPS_dashed_line(int x0,int y0,int x1,int y1);
 static int polyLine_pline(struct canvas *can);  static int polyLine_pline(struct canvas *can);
   static int Strategy_generate_PS = 0;
   
   
 static void *gcmalloc(a)  {  static void *gcmalloc(a)  {
   void *m;    void *m;
   /* BUG:  interruption must be locked. */    /* BUG:  interruption must be locked. */
Line 115  static void polyLine_outputPS(struct polyLine *pl) {
Line 116  static void polyLine_outputPS(struct polyLine *pl) {
   }    }
   fflush(Fp);    fflush(Fp);
 }  }
   static void polyLine_output_bezier_PS(struct polyLine *pl) {
     int n,i,m;
     n = pl->numberOfSegments;
     if (n == 1) {
           fprintf(Fp," %d %d ifplot_putpixel\n",translateX(pl->x[0]),translateY(pl->y[0]));
     }else if (n > 1) {
           fprintf(Fp," newpath ");
       i=0;
           m = n-1-((n-1)/3)*3;
       fprintf(Fp," %d %d ",translateX(pl->x[i]),translateY(pl->y[i]));
           fprintf(Fp," moveto \n ");
           for (i=1; i<= ((n-1)/3)*3; i++) {
             fprintf(Fp," %d %d ",translateX(pl->x[i]),translateY(pl->y[i]));
             if ( i%3 == 0) fprintf(Fp," curveto ");
           }
           for (i=n-m; i<n; i++) {
             fprintf(Fp," %d %d lineto ",translateX(pl->x[i]),translateY(pl->y[i]));
           }
           fprintf(Fp," stroke\n");
     }
     fflush(Fp);
   }
 static void polyLine_outputProlog(int xmin, int ymin,int xmax, int ymax) {  static void polyLine_outputProlog(int xmin, int ymin,int xmax, int ymax) {
   fprintf(Fp,"%%!PS-Adobe-1.0\n");    fprintf(Fp,"%%!PS-Adobe-1.0\n");
   fprintf(Fp,"%%%%BoundingBox: %d %d %d %d \n",    fprintf(Fp,"%%%%BoundingBox: %d %d %d %d \n",
Line 123  static void polyLine_outputProlog(int xmin, int ymin,i
Line 146  static void polyLine_outputProlog(int xmin, int ymin,i
   fprintf(Fp,"%%%%Creator: This is generated by ifplot\n");    fprintf(Fp,"%%%%Creator: This is generated by ifplot\n");
   fprintf(Fp,"%%%%Title: ifplot\n");    fprintf(Fp,"%%%%Title: ifplot\n");
   fprintf(Fp,"%%%%EndComments: \n");    fprintf(Fp,"%%%%EndComments: \n");
     fprintf(Fp,"0.1 setlinewidth \n");
     fprintf(Fp,"2 setlinecap \n");
     fprintf(Fp,"2 setlinejoin \n");
   fprintf(Fp,"/ifplot_putpixel {  \n");    fprintf(Fp,"/ifplot_putpixel {  \n");
   fprintf(Fp,"    /yyy 2 1 roll def /xxx 2 1 roll def \n");    fprintf(Fp,"    /yyy 2 1 roll def /xxx 2 1 roll def \n");
   fprintf(Fp,"    gsave newpath xxx yyy .5 0 360 arc \n");    fprintf(Fp,"    gsave newpath xxx yyy .5 0 360 arc \n");
Line 183  static int updatePolyLine(struct polyLine *pl[], int p
Line 209  static int updatePolyLine(struct polyLine *pl[], int p
   }    }
   for (i=1; i<=Ysize; i++) {    for (i=1; i<=Ysize; i++) {
         if (prevHasNext[i] == NO && prev[i] IS_POLYLINE) {          if (prevHasNext[i] == NO && prev[i] IS_POLYLINE) {
           polyLine_outputPS(pl[prev[i]]);            /* polyLine_outputPS(pl[prev[i]]); */
             polyLine_output_bezier_PS(pl[prev[i]]);
         }          }
   }    }
   
Line 325  generatePS_from_image(FILE *fp,XImage *image,int xsize
Line 352  generatePS_from_image(FILE *fp,XImage *image,int xsize
   int *prev;    int *prev;
   int *curr;    int *curr;
   int i,x,y,c;    int i,x,y,c;
     extern int Strategy_generate_PS;
   
   Xsize = xsize;    Xsize = xsize;
   Ysize = ysize;    Ysize = ysize;
Line 333  generatePS_from_image(FILE *fp,XImage *image,int xsize
Line 361  generatePS_from_image(FILE *fp,XImage *image,int xsize
   curr = (int *)gcmalloc(sizeof(int)*(Ysize+2));    curr = (int *)gcmalloc(sizeof(int)*(Ysize+2));
   Fp = fp;    Fp = fp;
   polyLine_outputProlog(0,0,Xsize,Ysize);    polyLine_outputProlog(0,0,Xsize,Ysize);
   for (c=0; c<colorSize; c++) {    switch(Strategy_generate_PS) {
         /* Set color if necessary */    case 1:
         for (i=0; i<= Ysize+1; i++) {          for (c=0; c<colorSize; c++) {
           prev[i] = -1;            /* Set color if necessary */
             for (i=0; i<= Ysize+1; i++) {
                   prev[i] = -1;
             }
             for (x=0; x<Xsize; x++) {
                   curr[0] = curr[Ysize+1] = 0;
                   for (y=0; y<Ysize; y++) {
                     if ((int) XGetPixel(image,x,y) == color[c]) curr[y+1]=1;
                     else curr[y+1] = 0;
                   }
                   plSize = updatePolyLine(pl,plSize,prev,curr,x);
             }
             for (y=0; y<Ysize+2; y++) {
                   curr[y] = 0;
             }
             plSize = updatePolyLine(pl,plSize,prev,curr,Xsize);
         }          }
         for (x=0; x<Xsize; x++) {          break;
           curr[0] = curr[Ysize+1] = 0;    default:
           for (y=0; y<Ysize; y++) {          for (c=0; c<colorSize; c++) {
                 if ((int) XGetPixel(image,x,y) == color[c]) curr[y+1]=1;            /* Set color if necessary */
                 else curr[y+1] = 0;            for (x=0; x<Xsize; x++) {
                   for (y=0; y<Ysize; y++) {
                     if ((int) XGetPixel(image,x,y) == color[c]){
                           fprintf(Fp," %d %d ", translateX(x),translateY(y) );
                           fprintf(Fp," ifplot_putpixel\n");
                     }
                   }
           }            }
           plSize = updatePolyLine(pl,plSize,prev,curr,x);  
         }          }
         for (y=0; y<Ysize+2; y++) {          break;
           curr[y] = 0;  
         }  
         plSize = updatePolyLine(pl,plSize,prev,curr,Xsize);  
   }    }
   polyLine_pline(can);    polyLine_pline(can);
   polyLine_outputEpilog();    polyLine_outputEpilog();
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>