1 rizwank 1.1 /*
  2              * Printer interface for DOS.
  3              * Copyright (c) 1996-2001 Markku Rossi.
  4              *
  5              * Author: Markku Rossi <mtr@iki.fi>
  6              */
  7             
  8             /*
  9              * This file is part of GNU enscript.
 10              *
 11              * This program is free software; you can redistribute it and/or modify
 12              * it under the terms of the GNU General Public License as published by
 13              * the Free Software Foundation; either version 2, or (at your option)
 14              * any later version.
 15              *
 16              * This program is distributed in the hope that it will be useful,
 17              * but WITHOUT ANY WARRANTY; without even the implied warranty of
 18              * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 19              * GNU General Public License for more details.
 20              *
 21              * You should have received a copy of the GNU General Public License
 22 rizwank 1.1  * along with this program; see the file COPYING.  If not, write to
 23              * the Free Software Foundation, 59 Temple Place - Suite 330,
 24              * Boston, MA 02111-1307, USA.
 25              */
 26             
 27             #include "gsint.h"
 28             
 29             /************************** Types and definitions ***************************/
 30             
 31             struct PrinterCtxRec
 32             {
 33               /* Output stream. */
 34               FILE *fp;
 35             
 36               /* If using temporary file, this is its name. */
 37               char tmpfile[512];
 38             
 39               /* Command to spool the temporary output.  This is NULL if we
 40                  already spooled the output to `fp' and there is no
 41                  post-processing to do. */
 42               Buffer *command;
 43 rizwank 1.1 };
 44             
 45             typedef struct PrinterCtxRec PrinterCtxStruct;
 46             typedef struct PrinterCtxRec *PrinterCtx;
 47             
 48             
 49             /***************************** Global functions *****************************/
 50             
 51             FILE *
 52             printer_open(char *cmd, char *options, char *queue_param, char *printer_name,
 53             	     void **context_return)
 54             {
 55               PrinterCtx ctx;
 56             
 57               ctx = xcalloc(1, sizeof(*ctx));
 58             
 59               if (cmd && cmd[0])
 60                 {
 61                   if (tmpnam(ctx->tmpfile) == NULL)
 62             	FATAL((stderr, _("could not create temporary spool file name: %s"),
 63             	       strerror(errno)));
 64 rizwank 1.1 
 65                   /* Spool output to a temporary file and spool with with command
 66             	 when the printer is closed. */
 67             
 68                   ctx->command = buffer_alloc();
 69             
 70                   buffer_append(ctx->command, cmd);
 71                   buffer_append(ctx->command, " ");
 72             
 73                   if (options)
 74             	{
 75             	  buffer_append(ctx->command, options);
 76             	  buffer_append(ctx->command, " ");
 77             	}
 78             
 79                   if (printer_name)
 80             	{
 81             	  buffer_append(ctx->command, queue_param);
 82             	  buffer_append(ctx->command, printer_name);
 83             	  buffer_append(ctx->command, " ");
 84             	}
 85 rizwank 1.1 
 86                   buffer_append(ctx->command, ctx->tmpfile);
 87             
 88                   /* Open the temporary spool file. */
 89                   ctx->fp = fopen(ctx->tmpfile, "wb");
 90                   if (ctx->fp == NULL)
 91             	FATAL((stderr, _("Could not open temporary spool file `%s': %s"),
 92             	       ctx->tmpfile, strerror(errno)));
 93                 }
 94               else
 95                 {
 96                   /* Just open file pointer to the printer. */
 97                   ctx->fp = fopen(printer_name, "wb");
 98                   if (ctx->fp == NULL)
 99             	FATAL((stderr, _("Could not open printer `%s': %s"), printer_name,
100             	      strerror(errno)));
101                 }
102             
103               *context_return = ctx;
104             
105               return ctx->fp;
106 rizwank 1.1 }
107             
108             
109             void
110             printer_close(void *context)
111             {
112               PrinterCtx ctx = (PrinterCtx) context;
113             
114               /* Close the output stream. */
115               fclose(ctx->fp);
116             
117               /* Do we need to do post-processing (read spooling). */
118               if (ctx->command)
119                 {
120                   /* Yes. */
121                   if (system(buffer_ptr(ctx->command)) == -1)
122             	FATAL((stderr, _("Could not spool temporary output `%s': %s"),
123             	       ctx->tmpfile, strerror(errno)));
124             
125                   /* We do not need the spool command anymore. */
126                   buffer_free(ctx->command);
127 rizwank 1.1 
128                   /* Unlink the temporary output file. */
129                   (void) remove(ctx->tmpfile);
130                 }
131             
132               /* Free context. */
133               xfree(ctx);
134             }