wmprint.c File Reference

#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <stdio.h>
#include "machine.h"
#include "Messages.h"
#include "Warnings.h"
#include "Errors.h"
#include "setgetSCIpath.h"
#include "sciprint.h"

Include dependency graph for wmprint.c:

Go to the source code of this file.

Functions
static int Sed	__PARAMS ((int, char *, FILE *, char *, char *, char *, char *, char *, char *))
static void readOneLine	__PARAMS ((char *buff, int *stop, FILE *fd))
static void ConvertName	__PARAMS ((char *filein, char *fileout))
int	ScilabPsToEps (char orientation, char *filein, char *fileout)
static void	ConvertName (char *filein, char *fileout)
static int	Sed (int flag, file, FILE *fileo, strin1, strout1, strin2, strout2, strin3, strout3)
static void	readOneLine (buff, int *stop, FILE *fd)
Variables
static char	entete [256]

---

Function Documentation

static void ConvertName __PARAMS

(

(char *filein, char *fileout)

)

[static]

static void readOneLine __PARAMS

(

(char *buff, int *stop, FILE *fd)

)

[static]

static int Sed __PARAMS

(

(int, char *, FILE *, char *, char *, char *, char *, char *, char *)

)

[static]

static void ConvertName	(	char *	filein,
		char *	fileout
	)			[static]

Definition at line 95 of file wmprint.c.

References p, and strchr().

Referenced by ScilabPsToEps().

{
  char *p = filein, *p1;
  p1 = strchr (p, '/');
  while (p1 != 0)
    {
      p = p1 + 1;
      p1 = strchr (p, '/');
    }
  p = strchr (p, '.');
  if (p != 0)
    {
      *p = '\0';
      sprintf (fileout, "%s.eps", filein);
      *p = '.';
    }
  else
    sprintf (fileout, "%s.eps", filein);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void readOneLine	(	buff	,
		int *	stop,
		FILE *	fd
	)			[static]

Definition at line 177 of file wmprint.c.

References i.

Referenced by Sed().

{
  int i, c;
  for (i = 0; (c = getc (fd)) != '\n' && c != EOF; i++)
    buff[i] = c;
  buff[i] = '\n';
  buff[i + 1] = '\0';
  if (c == EOF)
    {
      *stop = 1;
    }
}

Here is the caller graph for this function:

int ScilabPsToEps	(	char	orientation,
		char *	filein,
		char *	fileout
	)

Definition at line 27 of file wmprint.c.

References ConvertName(), env, getSCIpath(), MSG_ERROR49, MSG_ERROR50, MSG_ERROR51, NULL, rep, sciprint(), and Sed().

{
  int flag = 0, rep;
  FILE *fo;
  char *env;
  env = getSCIpath();
  if (env == NULL)
    {
      sciprint (MSG_ERROR49);
      return (1);
    }
  sprintf (entete, "%s/tools/printer/NperiPos.ps", env);

  ConvertName (filein, fileout);
  if (strcmp (fileout, filein) == 0)
    {
      flag = 1;
      strcat (fileout, ".temp");
    }

  if ((fo = fopen (fileout, "w")) == 0)
    {
      sciprint (MSG_ERROR50, fileout);
      return 1;
    }

  fprintf (fo, "%%!PS-Adobe-2.0 EPSF-2.0\n");
  if (orientation == 'p')
    fprintf (fo, "%%%%BoundingBox: 0 200 600 624\n");
  else
    fprintf (fo, "%%%%BoundingBox: 0 0 600 780\n");

  Sed (0, entete, fo, "%!PS-ADOBE", "%%", (char *) 0, (char *) 0, (char *) 0, (char *) 0);

  if (orientation == 'p')
    rep = Sed (1, filein, fo, "[0.5 10 div 0 0 0.5 10 div neg  0 2120 10 div] concat",
               "[0.5 5 div 0 0 0.5 5 div neg  0 3120 5 div] concat",
               (char *) 0, (char *) 0, (char *) 0, (char *) 0);
  else
    rep = Sed (1, filein, fo, "[0.5 10 div 0 0 0.5 10 div neg  0 2120 10 div] concat",
               "90 rotate 10 640 neg translate [0.5 5 div 0 0 0.5 5 div neg  0 3120 5 div] concat",
               (char *) 0, (char *) 0, (char *) 0, (char *) 0);
  fclose (fo);

  if (rep >= 1)
    {
      if (rep == 1)
        sciprint (MSG_ERROR51);
      remove (fileout);
      return (0);
    }

  if (flag == 1)
    {
      fo = fopen (filein, "w");
      Sed (0, fileout, fo, (char *) 0, (char *) 0, (char *) 0, (char *) 0, (char *) 0, (char *) 0);
      fclose (fo);
    }
  else
    {
      remove (filein);
    }
  return (0);
}

Here is the call graph for this function:

static int Sed	(	int	flag,
		file	,
		FILE *	fileo,
		strin1	,
		strout1	,
		strin2	,
		strout2	,
		strin3	,
		strout3
	)			[static]

Definition at line 123 of file wmprint.c.

References fd, MSG_ERROR52, readOneLine(), and sciprint().

Referenced by main(), ScilabPsToEps(), and ScilabPsToTeX().

{
  FILE *fd;
  fd = fopen (file, "r");
  if (fd != 0)
    {
      int stop = 0;
      while (stop != 1)
        {
          char buff[512];
          readOneLine (buff, &stop, fd);
          if (flag == 1)
            {
              if (strncmp (buff, "%!PS-Adobe-2.0 EPSF-2.0",
                           strlen ("%!PS-Adobe-2.0 EPSF-2.0")) == 0)
                {
                  fclose (fd);
                  return (1);
                }
            }
          if (strin1 != (char *) 0 && strncmp (buff, strin1, strlen (strin1)) == 0)
            fprintf (fileo, "%s\n", strout1);
          else
            {
              if (strin2 != (char *) 0 && strncmp (buff, strin2, strlen (strin2)) == 0)
                fprintf (fileo, "%s\n", strout2);
              else
                {
                  if (strin3 != (char *) 0 && strncmp (buff, strin3, strlen (strin3)) == 0)
                    fprintf (fileo, "%s\n", strout3);
                  else
                    fprintf (fileo, "%s", buff);
                }
            }
        }
      fclose (fd);
    }
  else
    {
      sciprint (MSG_ERROR52, file);
      return (2);
    }
  return (0);
}

Here is the call graph for this function:

Here is the caller graph for this function:

---

Variable Documentation

char entete[256] [static]

Definition at line 25 of file wmprint.c.

Referenced by main().

---