Subversion Repositories wimsdev

Rev

Rev 8102 | Rev 8158 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
10 reyssat 1
/*    Copyright (C) 1998-2003 XIAO, Gang of Universite de Nice - Sophia Antipolis
2
 *
3
 *  This program is free software; you can redistribute it and/or modify
4
 *  it under the terms of the GNU General Public License as published by
5
 *  the Free Software Foundation; either version 2 of the License, or
6
 *  (at your option) any later version.
7
 *
8
 *  This program is distributed in the hope that it will be useful,
9
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
10
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11
 *  GNU General Public License for more details.
12
 *
13
 *  You should have received a copy of the GNU General Public License
14
 *  along with this program; if not, write to the Free Software
15
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
16
 */
17
 
18
#include <stdio.h>
19
#include <stdlib.h>
20
#include <stdarg.h>
21
#include <string.h>
22
#include <unistd.h>
23
#include <ctype.h>
24
#include <math.h>
7615 bpr 25
#include <gd.h>
26
#include <gdfontt.h>
27
#include <gdfonts.h>
28
#include <gdfontmb.h>
29
#include <gdfontl.h>
30
#include <gdfontg.h>
10 reyssat 31
 
8102 bpr 32
#include "../config.h"
33
#include "../Lib/libwims.h"
34
 
10 reyssat 35
#define MAX_PARMS   8192
36
#define MAX_SIZE    4096
37
#define MAX_VARS    1024
38
#define MAX_VARNAMEBUF  16384
39
#define BOUND   (MAX_SIZE*10)
40
#define exec_prefix_char '#'
41
 
42
 
8102 bpr 43
/* from flydraw.c */
44
extern int linecnt, varcnt;
45
extern ev_variable vartab[];
46
extern char varnamebuf[MAX_VARNAMEBUF], *varnameptr;
47
extern gdImagePtr image, wimg,tileimg,brushimg;
48
extern int brushed,tiled,styled,savew, wcolor, transform;
49
typedef double matrice[4];
50
#define JC_NB_MATRICES 19
51
extern matrice matrices_pavage[JC_NB_MATRICES+1];
52
#define matrix matrices_pavage[0]
53
typedef double vecteur[2];
54
extern vecteur vecteurs_pavage[JC_NB_MATRICES+1];
55
#define vector vecteurs_pavage[0];
56
extern double scale_buf[MAX_PARMS];
57
extern double transx,transy; /* translation vector */
58
extern double xscale,yscale,xstart,ystart;
59
extern int sizex, sizey, saved;
60
extern int color_white,color_black,color_bounder,lstep;
61
extern int width;
62
extern double tend, tstart, tstep, plotjump,animstep;
63
int tranged;
64
extern int vimg_enable,vimg_ready;
65
extern FILE *vimgf;
66
extern char vimgfilename[1024], imagefilename[1024];
8134 bpr 67
double parallogram_fonda[6];
68
char *substit(char *p);
8102 bpr 69
void output(void);
70
/* from wimg.c */
71
void vimg_init (void);
72
void vimg_close (void);
73
void vimg_arc (double x0,double y0, double rx, double ry,double a1, double a2);
74
void vimg_ellipse (double x0, double y0, double rx, double ry);
75
void vimg_line (double x1,double y1,double x2,double y2);
76
void vimg_polyline (double xy[], int cnt, int closed);
77
void vimg_rect (double x1, double y1, double x2, double y2);
78
void vimg_plotstart (void);
79
void vimg_plot1 (double x, double y);
80
void vimg_plotend (void);
81
 
82
 
83
/* from flylines.c */
84
char *find_name_start(char *p);
85
char *find_name_end(char *p);
86
void error(char *p);
87
void scale(double dbuf[], int ibuf[], int cnt);
88
/* scale without displacement */
89
void scale2(double xin, double yin, double *xout, double *yout);
90
int widthcolor(int w, int color);
91
int getcolor(int r, int g, int b);
92
void setvar(char *p, double v);
93
void collapse_item(char *p, int n);
94
int ggetline(char buf[]);
95
 
96
/* from nametab.c */
97
enum {t_prep,t_color,t_obj};
98
typedef struct objparm{ int p[MAX_PARMS]; double pd[MAX_PARMS]; int pcnt,color[2],fill;
99
char str[MAX_LINELEN+1],font[16]; } objparm;
100
enum {p_and,p_from,p_to,p_thru,p_center,p_color,p_font,
101
  p_diameter,p_radius,p_width,p_height };
102
 
103
extern struct preptab { char *name;int typ; } preptab[];
104
extern struct objtab {
105
 char *name;int required_parms,color_pos,fill_tag,subst;
106
 void (*routine) (objparm *pm); } objtab[];
107
 
108
extern struct colortab {char *name;char *def;} colortab[];
109
extern struct nametab {char *name;int type;int serial;} nametab[];
110
extern int nametab_no, prep_no, obj_no, color_no;
111
 
112
/* from objects.c */
113
int obj_main(char *p);