123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147 |
- /* Copyright (C) 1999 Aladdin Enterprises. All rights reserved.
-
- This software is provided AS-IS with no warranty, either express or
- implied.
-
- This software is distributed under license and may not be copied,
- modified or distributed except as expressly authorized under the terms
- of the license contained in the file LICENSE in this distribution.
-
- For more information about licensing, please refer to
- http://www.ghostscript.com/licensing/. For information on
- commercial licensing, go to http://www.artifex.com/licensing/ or
- contact Artifex Software, Inc., 101 Lucas Valley Road #110,
- San Rafael, CA 94903, U.S.A., +1(415)492-9861.
- */
- /* $Id: gdevcslw.c,v 1.5 2004/08/10 13:02:36 stefan Exp $ */
- /* CoStar LabelWriter II, II Plus driver for Ghostscript */
- /* Contributed by Mike McCauley mikem@open.com.au */
- #include "gdevprn.h"
- /* We round up the LINE_SIZE to a multiple of a ulong for faster scanning. */
- typedef ulong word;
- #define W sizeof(word)
- /* Printer types */
- #define LW 0
- /* The device descriptors */
- private dev_proc_print_page(coslw_print_page);
- const gx_device_printer gs_coslw2p_device =
- prn_device(prn_std_procs, "coslw2p",
- 200, 400, /* 2 inches wide */
- 128, 128, /* 5 dots per mm */
- 0, 0, 0, 0,
- 1, coslw_print_page);
- const gx_device_printer gs_coslwxl_device =
- prn_device(prn_std_procs, "coslwxl",
- 200, 400, /* 2 inches wide */
- 204, 204, /* 8 dots per mm */
- 0, 0, 0, 0,
- 1, coslw_print_page);
- /* ------ Internal routines ------ */
- /* Send the page to the printer. */
- private int
- coslw_print_page(gx_device_printer * pdev, FILE * prn_stream)
- {
- int line_size = gdev_mem_bytes_per_scan_line((gx_device *) pdev);
- int line_size_words = (line_size + W - 1) / W;
- uint storage_size_words = line_size_words * 8; /* data, out_row, out_row_alt, prev_row */
- word *storage = (ulong *) gs_malloc(pdev->memory, storage_size_words, W,
- "coslw_print_page");
- word *data_words;
- #define data ((byte *)data_words)
- byte *out_data;
- int num_rows = dev_print_scan_lines(pdev);
- int bytes_per_line = 0;
- int out_count;
- int code = 0;
- if (storage == 0) /* can't allocate working area */
- return_error(gs_error_VMerror);
- data_words = storage;
- /* Clear temp storage */
- memset(data, 0, storage_size_words * W);
- /* Initialize printer. */
- if (pdev->PageCount == 0) {
- }
- /* Put out per-page initialization. */
- /* End raster graphics, position cursor at top. */
- /* Send each scan line in turn */
- {
- int lnum;
- int num_blank_lines = 0;
- word rmask = ~(word) 0 << (-pdev->width & (W * 8 - 1));
- /* Transfer raster graphics. */
- for (lnum = 0; lnum < num_rows; lnum++) {
- register word *end_data =
- data_words + line_size_words;
- code = gdev_prn_copy_scan_lines(pdev, lnum,
- (byte *) data, line_size);
- if (code < 0)
- break;
- /* Mask off 1-bits beyond the line width. */
- end_data[-1] &= rmask;
- /* Remove trailing 0s. */
- while (end_data > data_words && end_data[-1] == 0)
- end_data--;
- if (end_data == data_words) { /* Blank line */
- num_blank_lines++;
- continue;
- }
- /* We've reached a non-blank line. */
- /* Put out a spacing command if necessary. */
- while (num_blank_lines > 0)
- {
- int this_blank = 255;
- if (num_blank_lines < this_blank)
- this_blank = num_blank_lines;
- fprintf(prn_stream, "\033f\001%c", this_blank);
- num_blank_lines -= this_blank;
- }
- /* Perhaps add compression here later? */
- out_data = data;
- out_count = (byte *) end_data - data;
- /* For 2 inch model, max width is 56 bytes */
- if (out_count > 56)
- out_count = 56;
- /* Possible change the bytes per line */
- if (bytes_per_line != out_count)
- {
- fprintf(prn_stream, "\033D%c", out_count);
- bytes_per_line = out_count;
- }
- /* Transfer the data */
- fputs("\026", prn_stream);
- fwrite(out_data, sizeof(byte), out_count, prn_stream);
- }
- }
- /* eject page */
- fputs("\033E", prn_stream);
- /* free temporary storage */
- gs_free(pdev->memory, (char *)storage, storage_size_words, W, "coslw_print_page");
- return code;
- }
|