Subversion Repositories wimsdev

Rev

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

  1. /*    Copyright (C) 2002-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. /* tex 2 gif translator */
  19.  
  20. #include "texgif.h"
  21. char *progname;
  22. char *tmpdir="/tmp";
  23. char *fontdir="/tmp";
  24. char *headerfile="";
  25. char *texstyle="";
  26. char *outfile="/tmp/texgif.gif";
  27. char cwd[1024];
  28. double blacker=0.4;
  29. int basedensity=100, density;
  30. int compressratio=1;
  31. int wrapexec=0;
  32. int currentcolor;
  33.  
  34. FONT wfont[FONT_NUMBER_LIMIT];
  35. int fontcnt;
  36.  
  37. enum {tt_plain, tt_latex};
  38. int textype=tt_plain;
  39. char *texname="tex";
  40.  
  41. #include "basic.c"
  42. #include "colors.c"
  43. #include "tfm.c"
  44. #include "gf.c"
  45. #include "font.c"
  46. #include "image.c"
  47. #include "dvi.c"
  48.  
  49. void checktextype(char *p)
  50. {
  51.     if(strstr(p,"\\begin{")!=NULL ||
  52.        strstr(p,"\\end{")!=NULL ||
  53.        strstr(p,"\\underset")!=NULL ||
  54.        strstr(p,"\\overset")!=NULL ||
  55.        strstr(p,"\\displaystyle")!=NULL ||
  56.        strstr(p,"\\mathcal")!=NULL) {
  57.         textype=tt_latex; texname="latex";
  58.     }
  59. }
  60.  
  61.         /* pass thru tex */
  62. void tex(void)
  63. {
  64.     char *src;
  65.     char *hd;
  66.     char fbuf[1024], nbuf[2048];
  67.     char *parmbuf[8];
  68.     FILE *f;
  69.     long int l;
  70.     src=getenv("texgif_src");
  71.     if(src==NULL || *src==0) error("No source.");
  72.     checktextype(src);
  73.     snprintf(fbuf,sizeof(fbuf),"%s/texgif.tex",tmpdir);
  74.     if(*headerfile) {
  75.      if (strstr(headerfile,".latex")!=NULL) {textype=tt_latex; texname="latex";}
  76.          if(strstr(headerfile,".tex")==NULL && strstr(headerfile,".latex")==NULL)
  77.           snprintf(nbuf,sizeof(nbuf),"%s.%s",headerfile,texname);
  78.         else
  79.           snprintf(nbuf,sizeof(nbuf),"%s",headerfile);
  80.         f=fopen(nbuf,"r");
  81.         if(f!=NULL) {
  82.             fseek(f,0,SEEK_END); l=ftell(f); fseek(f,0,SEEK_SET);
  83.             if(l>0 && l<FILE_LENGTH_LIMIT) {
  84.                 hd=xmalloc(l+16); (void)fread(hd,1,l,f);
  85.             }
  86.             else {l=0; hd="";}
  87.             fclose(f); f=fopen(fbuf,"w");
  88.             fwrite(hd,1,l,f); free(hd);
  89.         }
  90.         else f=fopen(fbuf,"w");
  91.     }
  92.     else f=fopen(fbuf,"w");
  93.     if(textype==tt_plain) {
  94.         fprintf(f,"%s %s %s\n\\end\n",texstyle, src, texstyle); fclose(f);
  95.     }
  96.     else {
  97.         fprintf(f,"{\\newpage\\clearpage\n\
  98. %s %s %s\n\
  99. \\clearpage}\n\
  100. \\end{document}\n",texstyle, src, texstyle); fclose(f);
  101.     }
  102.     if (chdir(tmpdir)) error("chdir failure");
  103.     parmbuf[0]=texname; parmbuf[1]="texgif"; parmbuf[2]=NULL;
  104.     wrapexec=1;
  105.     execredirected(texname,NULL,NULL,NULL,parmbuf);
  106.     if (cwd[0] && chdir(cwd)) error("chdir failure");
  107. }
  108.  
  109. void parms(void)
  110. {
  111.     char *p;
  112.     int t;
  113.     p=getenv("tmp_dir"); if(p!=NULL && *p!=0) tmpdir=p;
  114.     p=getenv("texgif_tmpdir"); if(p!=NULL && *p!=0) tmpdir=p;
  115.     p=getenv("texgif_fontdir"); if(p!=NULL && *p!=0) fontdir=p;
  116.     p=getenv("texgif_outfile"); if(p!=NULL && *p!=0) outfile=p;
  117.     p=getenv("texgif_texheader"); if(p!=NULL && *p!=0) headerfile=p;
  118.     p=getenv("texgif_style"); if(p!=NULL && *p!=0) texstyle=p;
  119.     p=getenv("texgif_density"); if(p!=NULL && *p!=0) {
  120.         t=atoi(p); if(t>10 && t<1000) basedensity=t;
  121.     }
  122.     p=getenv("texgif_compressratio"); if(p!=NULL && *p!=0) {
  123.         t=atoi(p); if(t>1 && t<=5) compressratio=t;
  124.     }
  125.     if(getcwd(cwd,sizeof(cwd))==NULL) cwd[0]=0;
  126. }
  127.  
  128. int main(int argc, char *argv[])
  129. {
  130.     progname=argv[0];
  131.     parms();
  132.     fontcnt=0;
  133.     tex();
  134.     setreuid(geteuid(),geteuid());setregid(getegid(),getegid());
  135.     dvi();
  136.     return 0;
  137. }
  138.  
  139.