Graphics Plus/Graphics Plus.iso/libs/gle/glecmd.c

C/C++ Source or Header | 1992-11-29 | 4.4 KB | 172 lines

/* This is the gle command which translates to run the individual
   gle programs:
      gle myfile -dps       ---> gle_ps myfile

          gle myfile /nomaxpath -dlj -old -noflip
               ---> gle_dvi myfile /nomaxpath
               ---> gle_dviprint -dlj -out myfile.hp -old -noflip
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/wait.h>
#include "glepath.h"

#define false 0
#define true (!false)
main(int argc,char *argv[])
{
    static char buff[200];
    static char glefile[200];
    static char device[200];
    static char outfile[200];
    static char bmpdev[100];
    static char gleoptions[200];
    static char devoptions[200];
    static char bindir[200];
    char *s;
    FILE *f;
    int i;
    int gotdevice;

/*  Get the directory containing the gle_* binaries */
    s = getenv("GLE_TOP");
    if (s!=NULL) {
        strcpy(bindir,s);
    } else {
        strcpy(bindir,GLEBINS);
    }
    if (bindir[strlen(bindir)-1] != '/')
        strcat(bindir,"/");

    if (argc<2) {
      printf("Usage: gle filename.gle -ddevice\n");
      printf("    gle test -dx    (Xwindows) \n");
      printf("    gle test -dtek  (TEK4010) \n");
      printf("    gle test -dhpgl (HP Plotters) \n");
      printf("    gle test -dps   (PostScript) \n");
      printf("    gle test -deps   (Encapsulated PostScript) \n");
      printf("    gle test -depson [-hires] (For dot matrix printers) \n");
      printf("    gle test -dlj [-hires] (For HP Laserjet printers) \n");
      printf("    gle test -dpj [-hires] (For HP Paintjet printers) \n");
      printf("    surface test.sur -dx (Surface utility) \n");
      printf("    contour         (Contour plots) \n");
      printf("    fitls           (Fit n variable equation to data)\n");
      printf("    fitz            (Fits even surface to xyz data)\n");
      printf("    letz            (Creates surface from eqn) \n");
      printf("    manip test.dat  (Data editor) \n");
      printf("To find out what drivers are available type in:\n");
      printf("         ls %sgle_* \n", bindir);
      printf(" \n");
      return 0;
    }

/*  Parse the arguments on the command line.
    Options before device spec (-dxx) are put in gleoptions and those after
      are put in devoptions.  This allows passing options to gle_dviprint.
*/
    strcpy(device,"vt");
    gotdevice = false;
    for (i=1;i<argc;i++) {
        if (strncmp(argv[i],"-d",2)==0) {
        strcpy(device,argv[i]+2);
        gotdevice = true;
        }
        else if (isalnum(*argv[i]))
        strcpy(glefile,argv[i]);
        else {
        if (gotdevice) {
            strcat(devoptions," ");
            strcat(devoptions,argv[i]);
        } else {
            strcat(gleoptions," ");
            strcat(gleoptions,argv[i]);
        }
        }
    }

/*  Make the output file name */
    strcpy(outfile,glefile);
    s = strchr(outfile,'.');
    if (s!=NULL) *s = 0;
    strcat(outfile,".");

/*
    if (strcmp(device,"lj")==0) {
      strcat(outfile,"hp");
    } else if (strcmp(device,"pj")==0) {
      strcat(outfile,"hp");
    } else if (strcmp(device,"epson")==0) {
      strcat(outfile,"prn");
    } else
*/
      strcat(outfile,device);

    sprintf(buff,"%sgle_",bindir);           /* , GLEBINS); */
    sprintf(bmpdev,"%sgle_dviprint",bindir);

/*  Do special stuff for the bitmapped devices (dvi) */
    if (strcmp(device,"epson")==0) {
      strcpy(device,"dvi");
      strcat(bmpdev," -depson -out ");
      strcat(bmpdev,outfile);
      strcat(bmpdev,devoptions);
    }
    if (strcmp(device,"lj")==0) {
      strcpy(device,"dvi");
      strcat(bmpdev," -dlj -out ");
      strcat(bmpdev,outfile);
      strcat(bmpdev,devoptions);
    }
    if (strcmp(device,"bmptest")==0) {
      strcpy(device,"dvi");
      strcat(bmpdev," -dvt -out ");
      strcat(bmpdev,outfile);
      strcat(bmpdev,devoptions);
    }
    if (strcmp(device,"pj")==0) {
      strcpy(device,"dvi");
      strcat(bmpdev," -dpj -out ");
      strcat(bmpdev,outfile);
      strcat(bmpdev,devoptions);
    }

    if (strcmp(device,"eps")==0) {
      strcat(buff,"ps");
      strcat(gleoptions," /eps");
    } else {
      strcat(buff,device);
    }
    strcat(buff," ");
    strcat(buff,glefile);
    strcat(buff," /output=");
    strcat(buff,outfile);
    strcat(buff,gleoptions);
    if (strcmp(device,"dvi")!=0) {
      strcat(buff,devoptions);
    }
    /*printf("%s\n",buff);*/

/*  Make the command script file glecmd.tmp */
    f = fopen("glecmd.tmp","w");
    fprintf(f,"echo %s\n",buff);
    fprintf(f,"%s\n",buff);
    if (strcmp(device,"dvi")==0) {
     /* printf("%s\n",bmpdev); */
      fprintf(f,"echo %s\n",bmpdev);
      fprintf(f,"%s\n",bmpdev);
    }
    fclose(f);
    if (chmod("glecmd.tmp",0x1ff)!=0)
               printf("chmod +x failed on glecmd.tmp \n");
    execlp("sh","sh","-c", "./glecmd.tmp",0);
/*
    execlp("sh","sh","-c", buff,0);
*/
}