Amiga ISO Collection/AmigaUtilCD1.iso/Fax/AVMA&GPFax-V1,33Sources.LHA/faxrender.c

C/C++ Source or Header | 1994-05-26 | 5.2 KB | 242 lines

/* $Id: render.c,v 1.2 1993/06/11 16:29:21 Rhialto Exp $
 * $Log: render.c,v $
 * Revision 1.2  1993/06/11  16:29:21  Rhialto
 * First real RCS checkin
 *
 */

/*
 *  RENDER.C
 *
 *  David Berezowski - March/88.
 *  Modified for DICE - May/91    Matthew Dillon
 *  Modified for ElCheapoFax April 1993 Olaf 'Rhialto' Seibert.
 *
 *  Copyright (c) 1988  Commodore-Amiga, Inc.
 *  (c)Copyright 1991 Matthew Dillon
 *  (c)Copyright 1993 Olaf Seibert
 */

#include <string.h>
#include <devices/printer.h>
#include <devices/prtbase.h>
#include <intuition/preferences.h>

#include "faxdefs.h"

#include <stdio.h>

extern struct PrinterData* PD;
extern struct PrinterExtendedData* PED;

extern void Transfer(PrtInfo *, UWORD, UBYTE *);
extern void OpenFaxFile(int);
extern void CloseFaxFile(void);
extern int endPageOnClose(void);
extern void setStatus(char*);
extern void setFileName(char*);

void finalizeDoChar(void);

char* pd_PrintBuf = 0;

int NoFormFeed;
int ped_NumRows = 16;
int currentPage = 1;
int FaxFine = 1;

void *FaxHandle = 0;

long Render(long ct, long x, long y, long status) {
    static long LineBufSize, TotalBufSize;
    static int XSize;

    long err;

    err = PDERR_NOERR;

    switch(status) {
    case 5: /* Pre-Master Initialization */
    /*
     *    ct    - 0 or pointer to IODRPReq structure.
     *    x    - io_Special flag from IODRPReq.
     *    y    - 0.
     */

    /* select density */
      /* SetDensity(x & SPECIAL_DENSITYMASK);*/
//      printf("Pre-Master Init\n");
    break;
    case 0:    /* Master Initialization */
    /*
     *    ct    - pointer to IODRPReq structure.
     *    x    - width of printed picture in pixels.
     *    y    - height of printed picture in pixels.
     */
    XSize = x;
    if (XSize != LINE_BITS) {
        XSize = LINE_BITS;
    }
    NoFormFeed = (((struct IODRPReq *)ct)->io_Special & SPECIAL_NOFORMFEED)
             != 0;
    pd_PrintBuf = NULL;

    LineBufSize = (XSize + 7) / 8;
    TotalBufSize = PED->ped_NumRows * LineBufSize;
    pd_PrintBuf = AllocMem(TotalBufSize, MEMF_PUBLIC);
    if (pd_PrintBuf == NULL) {
      err = PDERR_BUFFERMEMORY;
      break;
    }
    break;
    case 1: /* Scale, Dither and Render */
        /*
         *        ct        - pointer to PrtInfo structure.
         *        x        - 0.
         *        y        - row # (0 to Height - 1).
         */
#define pi ((struct PrtInfo *)ct)
    if (pi->pi_xpos >= XSize) {
        pi->pi_xpos = 0;
    }
    Transfer((struct PrtInfo *)ct, y, pd_PrintBuf + LineBufSize * (y % PED->ped_NumRows));
    break;
    case 2: /* Dump Buffer to Printer */
    /*
     *    ct    - 0.
     *    x    - 0.
     *    y    - # of rows sent (1 to peMd_NumRows).
     */
    {
        int         offset;

        if (!FaxHandle) {
          /* only open fax file when someone tries to write to it */
          OpenFaxFile(0);
        }

        if (FaxHandle) {
          for (offset = 0; y > 0; offset += LineBufSize, y--) {
        tofax(FaxHandle, pd_PrintBuf + offset, XSize);
          }
        }
    }
    break;
    case 3:    /* Clear and Init Buffer */
    /*
     *    ct    - 0.
     *    x    - 0.
     *    y    - 0.
     */
    memset(pd_PrintBuf, 0, TotalBufSize);
    break;
    case 4: /* Close Down */
    /*
     *    ct    - error code.
     *    x    - io_Special flag from IODRPReq.
     *    y    - 0.
     */

    if (pd_PrintBuf != NULL) {
        FreeMem(pd_PrintBuf, TotalBufSize);
        pd_PrintBuf = NULL;
    }
        if (endPageOnClose()) {
      CloseFaxFile();
    } else {
      setStatus("Render Closed");
    }
    break;
    }
    return(err);
}

char lastFaxFile[256];
#define ESC        "\33"
#define CSI        "\233"

void OpenFaxFile(int startFromTextPrint) {
    char tmp[256];
    FILE* seq;
    static int sequence;
    char* filename = tmp;

    if (currentPage == 1) {
      /* only do these things once per session -- as signified by
     an open printer */

      sequence = 1;

      seq = fopen("faxout:seq", "r");
      if (seq) {
    fscanf(seq, "%d", &sequence);
    fclose(seq);
      }

      sprintf(lastFaxFile, "fax%d", sequence);

      /* update sequence */
      seq = fopen("faxout:seq", "w");
      if (seq) {
    sequence++;
    fprintf(seq, "%d", sequence);
    fclose(seq);
      } else {
    /* danger!  couldn't write to sequence file! */
      }
    }

    sprintf(filename, "faxout:%s.%03d", lastFaxFile, currentPage);
    setFileName(filename);

    if (startFromTextPrint) {
      if (PD->pd_Preferences.PrintQuality & LETTER) {
    FaxFine = 1;
    setStatus("Opened page for text (Fine)");
      } else {
    FaxFine = 0;
    setStatus("Opened page for text (Standard)");
      }
    } else {
      FaxFine = PED->ped_YDotsInch > Y_DPI/2;
      if (FaxFine)
    setStatus("Opened page for graphics (Fine)");
      else
    setStatus("Opened page for graphics (Standard)");
    }
//    printf("FaxFine = %d\n", FaxFine);

    if (filename)
    FaxHandle = faxout_open(filename, 0 /* 0 == output header */);
    if (FaxHandle) {
//      printf("Opened %s\n", filename);
      /* this is generated by a program, so it is *clean* */

      faxout_begin_page(FaxHandle, FaxFine, 0);
    }

    /* reset, set x offset */
    sprintf(tmp, ESC"c" CSI"%dx", 0);
    WinWrite(tmp);
    return;
}

void DeleteLastFaxFile(void) {
//  printf("Deleting last faxfile %s\n", lastFaxFile);
  unlink(lastFaxFile);
}

void CloseFaxFile(void) {
  finalizeDoChar();
  if (FaxHandle) {
    setFileName("");
    setStatus("Closed page");
//    printf("Closed %s\n", lastFaxFile);
    faxout_end_page(FaxHandle);
    faxout_close(FaxHandle);
    FaxHandle = NULL;
    currentPage++;
  }
}