BSD 4_4 release
[unix-history] / usr / src / old / vfilters / vcat / vcat.c
index c71030a..b612267 100644 (file)
@@ -1,4 +1,46 @@
-/*     vcat.c  4.3     83/04/29        */
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#ifndef lint
+char copyright[] =
+"@(#) Copyright (c) 1983 Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)vcat.c     5.6 (Berkeley) 2/15/91";
+#endif /* not lint */
+
 /*
  * Cat Simulator for Versatec and Varian
  */ 
 /*
  * Cat Simulator for Versatec and Varian
  */ 
@@ -23,16 +65,10 @@ int pltmode[] = {VPLOT};
 #define CONVERT(n)             (n*(200./432.))
 #define RECONVERT(n)           (n*(432./200.))
 
 #define CONVERT(n)             (n*(200./432.))
 #define RECONVERT(n)           (n*(432./200.))
 
-#define VA_RASTER_LENGTH       2112
-#define VP_RASTER_LENGTH       7040
-#define VA_BYTES_PER_LINE      (VA_RASTER_LENGTH/8)
-#define VP_BYTES_PER_LINE      (VP_RASTER_LENGTH/8)
 #define NLINES                 110
 #define NLINES                 110
-#define VA_BUFFER_SIZE         (NLINES*VA_BYTES_PER_LINE)
-#define VP_BUFFER_SIZE         (NLINES*VP_BYTES_PER_LINE)
 
 
-char   buffer[VP_BUFFER_SIZE]; /* Big line buffers  */
-char   *buf0p = &buffer[0];    /* Zero origin in circular buffer  */
+char   buffer[NLINES * 880];   /* Big enough for versatec */
+char   *buf0p = &buffer[0];    /* Zero origin in circular buffer */
 
 char   *calloc();
 char   *nalloc();
 
 char   *calloc();
 char   *nalloc();
@@ -73,16 +109,13 @@ struct point_sizes {
        0, 0
 };
 
        0, 0
 };
 
-#define VA_FFLINES     2200
-#define VP_FFLINES     650
-#define VP_EOTLINES    1400
-
 int    lines;
 
 int    lines;
 
-int    vc = 1;         /* varian/versatec output file descriptor */
-int    varian;         /* 0 for versatec, 1 for varian. */
-int    BYTES_PER_LINE; /* VA_BYTES_PER_LINE or VP_BYTES_PER_LINE. */
-int    BUFFER_SIZE;    /* VA_BUFFER_SIZE or VP_BUFFER_SIZE. */
+int    vc = 1;                 /* varian/versatec output file descriptor */
+int    varian;                 /* 0 for versatec, 1 for varian. */
+int    BYTES_PER_LINE = 880;   /* number of bytes per raster line. */
+int    PAGE_LINES = 2400;      /* number of raster lines per page. */
+int    BUFFER_SIZE = NLINES * 880;     /* buffer size. */
 int    cfnum = -1;
 int    cpsize = 10;
 int    cfont = 1;
 int    cfnum = -1;
 int    cpsize = 10;
 int    cfont = 1;
@@ -318,7 +351,7 @@ char spectab[128] = {
        '{',    /*{*/
        '}',    /*}*/
        '\'',   /*' acute accent*/
        '{',    /*{*/
        '}',    /*}*/
        '\'',   /*' acute accent*/
-       '\`',   /*` grave accent*/
+       '`',    /*` grave accent*/
        '^',    /*^*/
        '#',    /*sharp*/
        '\036', /*left hand*/
        '^',    /*^*/
        '#',    /*sharp*/
        '\036', /*left hand*/
@@ -345,19 +378,18 @@ main(argc, argv)
        char *hostarg = NULL;
        char *acctfile = NULL;
 
        char *hostarg = NULL;
        char *acctfile = NULL;
 
-       varian = 1;     /* Default is the varian */
-       BYTES_PER_LINE = VA_BYTES_PER_LINE;
-       BUFFER_SIZE = VA_BUFFER_SIZE;
-
-       if (argv[0][strlen(argv[0])-1] == 'W') { /* Wide: the versatec. */
-               varian = 0;
-               BYTES_PER_LINE = VP_BYTES_PER_LINE;
-               BUFFER_SIZE = VP_BUFFER_SIZE;
-       }
-
        while (--argc) {
                if (*(*++argv) == '-')
                        switch (argv[0][1]) {
        while (--argc) {
                if (*(*++argv) == '-')
                        switch (argv[0][1]) {
+                       case 'x':
+                               BYTES_PER_LINE = atoi(&argv[0][2]) / 8;
+                               BUFFER_SIZE = NLINES * BYTES_PER_LINE;
+                               varian = BYTES_PER_LINE == 264;
+                               break;
+
+                       case 'y':
+                               PAGE_LINES = atoi(&argv[0][2]);
+                               break;
 
                        case 'n':
                                if (argc > 1) {
 
                        case 'n':
                                if (argc > 1) {
@@ -372,10 +404,6 @@ main(argc, argv)
                                        hostarg = *++argv;
                                }
                                break;
                                        hostarg = *++argv;
                                }
                                break;
-
-                       default:
-                               fprintf(stderr, "usage: vcat[W] [-n name] [-h host] [accounting file]\n");
-                               exit(2);
                        }
                else
                        acctfile = *argv;
                        }
                else
                        acctfile = *argv;
@@ -577,7 +605,7 @@ account(who, from, acctfile)
         * Varian accounting is done by 8.5 inch pages;
         * Versatec accounting is by the (12 inch) foot.
         */
         * Varian accounting is done by 8.5 inch pages;
         * Versatec accounting is by the (12 inch) foot.
         */
-       fprintf(a, "t%6.2f\t", (lines / 200.0) / (varian ? 8.5 : 12.0));
+       fprintf(a, "t%6.2f\t", (double)lines / (double)PAGE_LINES);
        if (from != NULL)
                fprintf(a, "%s:", from);
        fprintf(a, "%s\n", who);
        if (from != NULL)
                fprintf(a, "%s:", from);
        fprintf(a, "%s\n", who);
@@ -796,7 +824,7 @@ slop_lines(nlines)
        if (rlines < nlines) {
                if (write(vc, buf0p, BYTES_PER_LINE * rlines) < 0)
                        exit(1);
        if (rlines < nlines) {
                if (write(vc, buf0p, BYTES_PER_LINE * rlines) < 0)
                        exit(1);
-               clear(buf0p, rlines * BYTES_PER_LINE);
+               bzero(buf0p, rlines * BYTES_PER_LINE);
                buf0p = buffer;
                nlines -= rlines;
                xpos -= rlines;
                buf0p = buffer;
                nlines -= rlines;
                xpos -= rlines;
@@ -804,7 +832,7 @@ slop_lines(nlines)
        }
        if (write(vc, buf0p, BYTES_PER_LINE * nlines) < 0)
                exit(1);
        }
        if (write(vc, buf0p, BYTES_PER_LINE * nlines) < 0)
                exit(1);
-       clear(buf0p, BYTES_PER_LINE * nlines);
+       bzero(buf0p, BYTES_PER_LINE * nlines);
        buf0p += BYTES_PER_LINE * nlines;
        if (buf0p >= &buffer[BUFFER_SIZE])
                buf0p -= BUFFER_SIZE;
        buf0p += BYTES_PER_LINE * nlines;
        if (buf0p >= &buffer[BUFFER_SIZE])
                buf0p -= BUFFER_SIZE;
@@ -813,14 +841,6 @@ slop_lines(nlines)
        /* ioctl(vc, VSETSTATE, pltmode);  WHY? */
 }
 
        /* ioctl(vc, VSETSTATE, pltmode);  WHY? */
 }
 
-/*ARGSUSED*/
-clear(lp, nbytes)
-       int *lp;
-       int nbytes;
-{
-       asm("movc5 $0,(sp),$0,8(ap),*4(ap)");
-}
-
 char *
 nalloc(i, j)
        int i, j;
 char *
 nalloc(i, j)
        int i, j;