workbench/tools/Edit/Print.c

   1 /**************************************************************
   2 **** Print.c : procedures for printing                     ****
   3 **** Free software under GNU license, started on 2/2/2012  ****
   4 **** © AROS Team                                           ****
   5 **************************************************************/
   6
   7 #include <intuition/intuition.h>
   8 #include <libraries/asl.h>
   9 #include <exec/memory.h>
  10 #include <dos/dos.h>
  11 #include <proto/exec.h>
  12
  13 #include "Gui.h"
  14 #include "Project.h"
  15 #include "Utility.h"
  16 #include "ProtoTypes.h"
  17 #include "Print.h"
  18 #include "DiskIO.h"
  19
  20 #define  CATCOMP_NUMBERS                        /* Error msg use strings id */
  21 #include "strings.h"
  22
  23 static inline BYTE PWrite(struct IORequest *io, CONST_STRPTR buffer, LONG len)
  24 {
  25     struct IOStdReq *sio = (struct IOStdReq *)io;
  26
  27     sio->io_Command = CMD_WRITE;
  28     sio->io_Data = (APTR)buffer;
  29     sio->io_Length = len;
  30     return (DoIO(io) == 0 && sio->io_Actual == len) ? 1 : 0;
  31 }
  32
  33 /* Print a file
  34  */
  35 BYTE print_file(LINE *svg, unsigned char eol)
  36 {
  37     STRPTR buf;
  38     LONG   i;
  39     BYTE   szeol = szEOL[eol];
  40     LINE *ln;
  41     BYTE retval = 0;
  42     struct IORequest *io;
  43     struct MsgPort *mp;
  44
  45     if ((mp = CreateMsgPort())) {
  46         if ((io = CreateIORequest(mp, sizeof(struct IOStdReq)))) {
  47             if (0 == OpenDevice("printer.device", print_unit(-1), io, 0)) {
  48                 BusyWindow(Wnd);
  49
  50                 for(ln=svg, buf=NULL, i=0; ln; ln=ln->next)
  51                 {
  52                     if (i == 0)
  53                         buf = ln->stream;
  54
  55                     /* An unmodified line (2nd cond. is for deleted lines) */
  56                     if (ln->max == 0 && ln->stream-buf == i) {
  57                         i+=ln->size+szeol;
  58                     } else {
  59                         /* Flush preceding unmodified buffer */
  60                         i -= szeol;
  61                         if( i>=0 && (PWrite(io, buf, i) != 1 ||
  62                                 PWrite(io, &chEOL[eol], szeol) != 1 ) )
  63                         {
  64                                 retval = 0;
  65                                 break;
  66                         }
  67
  68                         /* Writes the modified line */
  69                         if( PWrite(io, ln->stream, ln->size) != 1 || (ln->next != NULL &&
  70                             PWrite(io, &chEOL[eol], szeol) != 1 ) ) {
  71                             retval = 0;
  72                             break;
  73                         }
  74                         i=0;
  75                     }
  76                 }
  77                 /* Flush buffer */
  78                 if( i>szeol && PWrite(io, buf, i-szeol) !=1 ) {
  79                     retval = 0;
  80                 }
  81
  82                 WakeUp(Wnd);
  83
  84                 CloseDevice(io);
  85             }
  86             DeleteIORequest(io);
  87         }
  88         DeleteMsgPort(mp);
  89     }
  90
  91     return retval;
  92 }
  93
  94 /* Get/set current printer.device unit
  95  *   If unit < 0, do not change current unit
  96  * Return:
  97  *   printer unit to be used for printing
  98  *
  99  */
 100 BYTE print_unit(BYTE unit)
 101 {
 102     static BYTE current_unit = 0;
 103
 104     if (unit >= 0)
 105         current_unit = unit;
 106
 107     return current_unit;
 108 }