Subversion Repositories wimsdev

Rev

Rev 15297 | Rev 18133 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  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>
  25. #include <gd.h>
  26. #include <gdfontt.h>
  27. #include <gdfonts.h>
  28. #include <gdfontmb.h>
  29. #include <gdfontl.h>
  30. #include <gdfontg.h>
  31.  
  32. #include "../Lib/libwims.h"
  33.  
  34. #define MAX_PARMS   8192
  35. #define MAX_SIZE    4096
  36. #define MAX_VARS    1024
  37. #define MAX_VARNAMEBUF  16384
  38. #define BOUND   (MAX_SIZE*10)
  39. #define exec_prefix_char '#'
  40.  
  41. extern FILE * tikz_file;
  42. extern int tikz_brushColor;
  43.  
  44. /* from flydraw.c */
  45. extern int linecnt, varcnt;
  46. extern ev_variable vartab[];
  47. extern char varnamebuf[MAX_VARNAMEBUF], *varnameptr;
  48. extern gdImagePtr image, wimg, tileimg, brushimg;
  49. extern int brushed, tiled, styled, savew, wcolor, transform;
  50. typedef double matrice[4];
  51. #define JC_NB_MATRICES 19
  52. extern matrice matrices_pavage[JC_NB_MATRICES+1];
  53. #define matrix matrices_pavage[0]
  54. typedef double vecteur[2];
  55. extern vecteur vecteurs_pavage[JC_NB_MATRICES+1];
  56. #define vector vecteurs_pavage[0];
  57. extern double scale_buf[MAX_PARMS];
  58. extern double transx, transy; /* translation vector */
  59. extern double xscale, yscale, xstart, ystart;
  60. extern int sizex, sizey, saved;
  61. extern int color_white, color_black, color_bounder, color_frame, lstep;
  62. extern int width, width2;
  63. extern double tend, tstart, tstep, plotjump, animstep;
  64. extern int vimg_enable, vimg_ready;
  65. extern FILE *vimgf;
  66. extern char vimgfilename[1024], imagefilename[1024], tikzfilename[1024];
  67. extern int tranged;
  68. extern double parallogram_fonda[6];
  69. extern char *substit(char *p);
  70.  
  71. void output(void);
  72. /* from wimg.c */
  73. void vimg_init (void);
  74. void vimg_close (void);
  75. void vimg_arc (double x0, double y0, double rx, double ry, double a1, double a2);
  76. void vimg_ellipse (double x0, double y0, double rx, double ry);
  77. void vimg_line (double x1, double y1, double x2, double y2);
  78. void vimg_polyline (double xy[], int cnt, int closed);
  79. void vimg_rect (double x1, double y1, double x2, double y2);
  80. void vimg_plotstart (void);
  81. void vimg_plot1 (double x, double y);
  82. void vimg_plotend (void);
  83.  
  84.  
  85. /* from flylines.c */
  86. char *find_name_start(char *p);
  87. char *find_name_end(char *p);
  88. void fly_error(char *p);
  89. void scale(double dbuf[], int ibuf[], int cnt);
  90. /* scale without displacement */
  91. void scale2(double xin, double yin, double *xout, double *yout);
  92. int widthcolor(int w, int color);
  93. int getcolor(int r, int g, int b);
  94. void setvar(char *p, double v);
  95. void collapse_item(char *p, int n);
  96. int ggetline(char buf[]);
  97.  
  98. /* from nametab.c */
  99. enum {t_prep,t_color,t_obj};
  100. typedef struct objparm{ int p[MAX_PARMS]; double pd[MAX_PARMS]; int pcnt, color[2], fill;
  101. char str[MAX_LINELEN+1], font[16]; } objparm;
  102. enum {p_and,p_from,p_to,p_thru,p_center,p_color,p_font,
  103.   p_diameter,p_radius,p_width,p_height };
  104.  
  105. extern struct preptab { char *name;int typ; } preptab[];
  106. extern struct objtab {
  107.  char *name; int required_parms, color_pos, fill_tag, subst;
  108.  void (*routine) (objparm *pm); } objtab[];
  109.  
  110. extern struct colortab {char *name;char *def;} colortab[];
  111. extern struct nametab {char *name;int type;int serial;} nametab[];
  112. extern int nametab_no, prep_no, obj_no, color_no;
  113.  
  114. /* from objects.c */
  115. int obj_main(char *p);
  116.