version 1.2, 2000/10/15 10:58:11 |
version 1.4, 2000/11/08 05:49:35 |
|
|
/* $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(); |