Clean up deleted files.
This commit is contained in:
mycroft
parent
5f76c23bdf
commit
7dc4b7410f
@ -1,437 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright (c) 1990 William F. Jolitz, TeleMuse
|
|
||||||
* 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 software is a component of "386BSD" developed by
|
|
||||||
* William F. Jolitz, TeleMuse.
|
|
||||||
* 4. Neither the name of the developer nor the name "386BSD"
|
|
||||||
* may be used to endorse or promote products derived from this software
|
|
||||||
* without specific prior written permission.
|
|
||||||
*
|
|
||||||
* THIS SOFTWARE IS A COMPONENT OF 386BSD DEVELOPED BY WILLIAM F. JOLITZ
|
|
||||||
* AND IS INTENDED FOR RESEARCH AND EDUCATIONAL PURPOSES ONLY. THIS
|
|
||||||
* SOFTWARE SHOULD NOT BE CONSIDERED TO BE A COMMERCIAL PRODUCT.
|
|
||||||
* THE DEVELOPER URGES THAT USERS WHO REQUIRE A COMMERCIAL PRODUCT
|
|
||||||
* NOT MAKE USE OF THIS WORK.
|
|
||||||
*
|
|
||||||
* FOR USERS WHO WISH TO UNDERSTAND THE 386BSD SYSTEM DEVELOPED
|
|
||||||
* BY WILLIAM F. JOLITZ, WE RECOMMEND THE USER STUDY WRITTEN
|
|
||||||
* REFERENCES SUCH AS THE "PORTING UNIX TO THE 386" SERIES
|
|
||||||
* (BEGINNING JANUARY 1991 "DR. DOBBS JOURNAL", USA AND BEGINNING
|
|
||||||
* JUNE 1991 "UNIX MAGAZIN", GERMANY) BY WILLIAM F. JOLITZ AND
|
|
||||||
* LYNNE GREER JOLITZ, AS WELL AS OTHER BOOKS ON UNIX AND THE
|
|
||||||
* ON-LINE 386BSD USER MANUAL BEFORE USE. A BOOK DISCUSSING THE INTERNALS
|
|
||||||
* OF 386BSD ENTITLED "386BSD FROM THE INSIDE OUT" WILL BE AVAILABLE LATE 1992.
|
|
||||||
*
|
|
||||||
* THIS SOFTWARE IS PROVIDED BY THE DEVELOPER ``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 DEVELOPER 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.
|
|
||||||
*
|
|
||||||
* $Id: lpa.c,v 1.7 1994/02/09 21:13:45 mycroft Exp $
|
|
||||||
*/
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Device Driver for AT parallel printer port
|
|
||||||
* Written by William Jolitz 12/18/90
|
|
||||||
* Modified to run without interrupts
|
|
||||||
* 92-08-19 Wolfgang Stanglmeier <wolf@dentaro.GUN.de>
|
|
||||||
* Slight cleanup and reorganization, try to handle restarted syscalls
|
|
||||||
* 92-09-08 Andy Valencia <jtk@netcom.com>
|
|
||||||
* 93-04-08 Rodney W. Grimes <rgrimes@agora.rain.com>
|
|
||||||
* Converted to driver name lpa, shares lptreg.h with lpt.c, fixed probe
|
|
||||||
* so that it returns IO_LPTSIZE. Added dummy lpaioctl. Added my new
|
|
||||||
* probe code from lpt.c, as the one in here was crud.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "lpa.h"
|
|
||||||
#if NLPA > 0
|
|
||||||
|
|
||||||
#include <sys/param.h>
|
|
||||||
#include <sys/buf.h>
|
|
||||||
#include <sys/systm.h>
|
|
||||||
#include <sys/ioctl.h>
|
|
||||||
#include <sys/tty.h>
|
|
||||||
#include <sys/proc.h>
|
|
||||||
#include <sys/user.h>
|
|
||||||
#include <sys/uio.h>
|
|
||||||
#include <sys/kernel.h>
|
|
||||||
#include <sys/malloc.h>
|
|
||||||
|
|
||||||
#include <machine/pio.h>
|
|
||||||
|
|
||||||
#include <i386/isa/isa.h>
|
|
||||||
#include <i386/isa/isa_device.h>
|
|
||||||
#include <i386/isa/lptreg.h>
|
|
||||||
|
|
||||||
/* internal used flags */
|
|
||||||
#define OPEN (0x01) /* device is open */
|
|
||||||
#define INIT (0x02) /* device in open procedure */
|
|
||||||
|
|
||||||
/* flags from minor device */
|
|
||||||
#define LPA_PRIME (0x20) /* prime printer on open */
|
|
||||||
#define LPA_ERROR (0x10) /* log error conditions */
|
|
||||||
|
|
||||||
#define LPA_FLAG(x) ((x) & 0xfc)
|
|
||||||
#define LPA_UNIT(x) ((x) & 0x03)
|
|
||||||
|
|
||||||
/* Printer Ready condition */
|
|
||||||
#define LPS_INVERT (LPS_NBSY | LPS_NACK | LPS_SEL | LPS_NERR)
|
|
||||||
#define LPS_MASK (LPS_NBSY | LPS_NACK | LPS_OUT | LPS_SEL | LPS_NERR)
|
|
||||||
#define NOT_READY() ((inb(sc->sc_stat)^LPS_INVERT)&LPS_MASK)
|
|
||||||
|
|
||||||
/* tsleep priority */
|
|
||||||
#define LPPRI ((PZERO+8) | PCATCH)
|
|
||||||
|
|
||||||
/* debug flags */
|
|
||||||
#ifndef DEBUG
|
|
||||||
#define lprintf
|
|
||||||
#else
|
|
||||||
#define lprintf if (lpaflag) printf
|
|
||||||
int lpaflag = 1;
|
|
||||||
#endif
|
|
||||||
|
|
||||||
int lpaprobe(), lpaattach();
|
|
||||||
struct isa_driver lpadriver = {lpaprobe, lpaattach, "lpa"};
|
|
||||||
|
|
||||||
/*
|
|
||||||
* copy usermode data into sysmode buffer
|
|
||||||
*/
|
|
||||||
#define BUFSIZE 1024
|
|
||||||
|
|
||||||
/*
|
|
||||||
** Waittimes
|
|
||||||
*/
|
|
||||||
#define TIMEOUT (hz*16) /* Timeout while open device */
|
|
||||||
#define LONG (hz* 1) /* Timesteps while open */
|
|
||||||
|
|
||||||
#define MAX_SPIN 255 /* max loop counter for busy wait */
|
|
||||||
|
|
||||||
struct lpa_softc {
|
|
||||||
char *sc_cp; /* current data to print */
|
|
||||||
int sc_count; /* bytes queued in sc_inbuf */
|
|
||||||
short sc_data; /* printer data port */
|
|
||||||
short sc_stat; /* printer control port */
|
|
||||||
short sc_ctrl; /* printer status port */
|
|
||||||
u_char sc_flags; /* flags (open and internal) */
|
|
||||||
u_char sc_unit; /* unit-number */
|
|
||||||
u_char sc_smax; /* current max busy loop cnt */
|
|
||||||
char /* buffer for data */
|
|
||||||
*sc_inbuf;
|
|
||||||
} lpa_sc[NLPA];
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Internal routine to lpaprobe to do port tests of one byte value
|
|
||||||
*/
|
|
||||||
int
|
|
||||||
lpa_port_test(short port, u_char data, u_char mask)
|
|
||||||
{
|
|
||||||
int temp, timeout;
|
|
||||||
|
|
||||||
data = data & mask;
|
|
||||||
outb(port, data);
|
|
||||||
timeout = 100;
|
|
||||||
do
|
|
||||||
temp = inb(port) & mask;
|
|
||||||
while (temp != data && --timeout);
|
|
||||||
lprintf("Port 0x%x\tout=%x\tin=%x\n", port, data, temp);
|
|
||||||
return (temp == data);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* New lpaprobe routine written by Rodney W. Grimes, 3/25/1993
|
|
||||||
*
|
|
||||||
* Logic:
|
|
||||||
* 1) You should be able to write to and read back the same value
|
|
||||||
* to the data port. Do an alternating zeros, alternating ones,
|
|
||||||
* walking zero, and walking one test to check for stuck bits.
|
|
||||||
*
|
|
||||||
* 2) You should be able to write to and read back the same value
|
|
||||||
* to the control port lower 5 bits, the upper 3 bits are reserved
|
|
||||||
* per the IBM PC technical reference manauls and different boards
|
|
||||||
* do different things with them. Do an alternating zeros, alternating
|
|
||||||
* ones, walking zero, and walking one test to check for stuck bits.
|
|
||||||
*
|
|
||||||
* Some printers drag the strobe line down when the are powered off
|
|
||||||
* so this bit has been masked out of the control port test.
|
|
||||||
*
|
|
||||||
* XXX Some printers may not like a fast pulse on init or strobe, I
|
|
||||||
* don't know at this point, if that becomes a problem these bits
|
|
||||||
* should be turned off in the mask byte for the control port test.
|
|
||||||
*
|
|
||||||
* 3) Set the data and control ports to a value of 0
|
|
||||||
*/
|
|
||||||
|
|
||||||
int
|
|
||||||
lpaprobe(struct isa_device *dvp)
|
|
||||||
{
|
|
||||||
int status;
|
|
||||||
short port;
|
|
||||||
u_char data;
|
|
||||||
u_char mask;
|
|
||||||
int i;
|
|
||||||
|
|
||||||
status = IO_LPTSIZE;
|
|
||||||
|
|
||||||
port = dvp->id_iobase + lpt_data;
|
|
||||||
mask = 0xff;
|
|
||||||
while (mask != 0)
|
|
||||||
{
|
|
||||||
data = 0x55; /* Alternating zeros */
|
|
||||||
if (!lpa_port_test(port, data, mask)) status = 0;
|
|
||||||
|
|
||||||
data = 0xaa; /* Alternating ones */
|
|
||||||
if (!lpa_port_test(port, data, mask)) status = 0;
|
|
||||||
|
|
||||||
for (i = 0; i < 8; i++) /* Walking zero */
|
|
||||||
{
|
|
||||||
data = ~(1 << i);
|
|
||||||
if (!lpa_port_test(port, data, mask)) status = 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (i = 0; i < 8; i++) /* Walking one */
|
|
||||||
{
|
|
||||||
data = (1 << i);
|
|
||||||
if (!lpa_port_test(port, data, mask)) status = 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (port == dvp->id_iobase + lpt_data)
|
|
||||||
{
|
|
||||||
port = dvp->id_iobase + lpt_control;
|
|
||||||
mask = 0x1e;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
mask = 0;
|
|
||||||
}
|
|
||||||
outb(dvp->id_iobase+lpt_data, 0);
|
|
||||||
outb(dvp->id_iobase+lpt_control, 0);
|
|
||||||
return (status);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* lpaattach()
|
|
||||||
* Install device
|
|
||||||
*/
|
|
||||||
lpaattach(isdp)
|
|
||||||
struct isa_device *isdp;
|
|
||||||
{
|
|
||||||
struct lpa_softc *sc;
|
|
||||||
|
|
||||||
sc = lpa_sc + isdp->id_unit;
|
|
||||||
sc->sc_unit = isdp->id_unit;
|
|
||||||
sc->sc_data = isdp->id_iobase + lpt_data;
|
|
||||||
sc->sc_stat = isdp->id_iobase + lpt_status;
|
|
||||||
sc->sc_ctrl = isdp->id_iobase + lpt_control;
|
|
||||||
outb(sc->sc_ctrl, LPC_NINIT);
|
|
||||||
return (1);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* lpaopen()
|
|
||||||
* New open on device.
|
|
||||||
*
|
|
||||||
* We forbid all but first open
|
|
||||||
*/
|
|
||||||
lpaopen(dev, flag)
|
|
||||||
dev_t dev;
|
|
||||||
int flag;
|
|
||||||
{
|
|
||||||
struct lpa_softc *sc;
|
|
||||||
int delay; /* slept time in 1/hz seconds of tsleep */
|
|
||||||
int err;
|
|
||||||
u_char sta, unit;
|
|
||||||
|
|
||||||
unit= LPA_UNIT(minor(dev));
|
|
||||||
sta = LPA_FLAG(minor(dev));
|
|
||||||
|
|
||||||
/* minor number out of limits ? */
|
|
||||||
if (unit >= NLPA)
|
|
||||||
return (ENXIO);
|
|
||||||
sc = lpa_sc + unit;
|
|
||||||
|
|
||||||
/* Attached ? */
|
|
||||||
if (!sc->sc_ctrl) { /* not attached */
|
|
||||||
return(ENXIO);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Printer busy ? */
|
|
||||||
if (sc->sc_flags) { /* too late .. */
|
|
||||||
return(EBUSY);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Have memory for buffer? */
|
|
||||||
sc->sc_inbuf = malloc(BUFSIZE, M_DEVBUF, M_WAITOK);
|
|
||||||
if (sc->sc_inbuf == 0)
|
|
||||||
return(ENOMEM);
|
|
||||||
|
|
||||||
/* Init printer */
|
|
||||||
sc->sc_flags = sta | INIT;
|
|
||||||
if (sc->sc_flags & LPA_PRIME) {
|
|
||||||
outb(sc->sc_ctrl, 0);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Select printer */
|
|
||||||
outb(sc->sc_ctrl, LPC_SEL|LPC_NINIT);
|
|
||||||
|
|
||||||
/* and wait for ready .. */
|
|
||||||
for (delay=0; NOT_READY(); delay+= LONG) {
|
|
||||||
if (delay >= TIMEOUT) { /* too long waited .. */
|
|
||||||
sc->sc_flags = 0;
|
|
||||||
return (EBUSY);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* sleep a moment */
|
|
||||||
if ((err = tsleep ((caddr_t)sc, LPPRI, "lpa: open", LONG)) !=
|
|
||||||
EWOULDBLOCK) {
|
|
||||||
sc->sc_flags = 0;
|
|
||||||
return (EBUSY);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Printer ready .. set variables */
|
|
||||||
sc->sc_flags |= OPEN;
|
|
||||||
sc->sc_count = 0;
|
|
||||||
|
|
||||||
return(0);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* pushbytes()
|
|
||||||
* Workhorse for actually spinning and writing bytes to printer
|
|
||||||
*/
|
|
||||||
static
|
|
||||||
pushbytes(sc)
|
|
||||||
struct lpa_softc *sc;
|
|
||||||
{
|
|
||||||
int spin, err, tic;
|
|
||||||
char ch;
|
|
||||||
|
|
||||||
/* loop for every character .. */
|
|
||||||
while (sc->sc_count > 0) {
|
|
||||||
/* printer data */
|
|
||||||
ch = *(sc->sc_cp);
|
|
||||||
sc->sc_cp += 1;
|
|
||||||
sc->sc_count -= 1;
|
|
||||||
outb(sc->sc_data, ch);
|
|
||||||
|
|
||||||
/* Busy wait for printer ready .. */
|
|
||||||
spin = tic = 0;
|
|
||||||
while (NOT_READY()) {
|
|
||||||
if (++spin >= sc->sc_smax) {
|
|
||||||
/*
|
|
||||||
* Now sleep, every cycle a
|
|
||||||
* little longer ..
|
|
||||||
*/
|
|
||||||
tic = tic + tic + 1;
|
|
||||||
err = tsleep((caddr_t)sc, LPPRI, "lpa: write", tic);
|
|
||||||
if (err != EWOULDBLOCK) {
|
|
||||||
return (err);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* strobe */
|
|
||||||
outb(sc->sc_ctrl, LPC_NINIT|LPC_SEL|LPC_STB);
|
|
||||||
outb(sc->sc_ctrl, LPC_NINIT|LPC_SEL);
|
|
||||||
|
|
||||||
/* Adapt busy-wait length... */
|
|
||||||
if (spin >= sc->sc_smax) { /* was sleep wait */
|
|
||||||
if (sc->sc_smax<MAX_SPIN)
|
|
||||||
sc->sc_smax++;
|
|
||||||
}
|
|
||||||
if (spin*2 < sc->sc_smax) {
|
|
||||||
sc->sc_smax--;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return(0);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* lpaclose()
|
|
||||||
* Close on lp. Try to flush data in buffer out.
|
|
||||||
*/
|
|
||||||
lpaclose(dev, flag)
|
|
||||||
dev_t dev;
|
|
||||||
int flag;
|
|
||||||
{
|
|
||||||
struct lpa_softc *sc = lpa_sc + LPA_UNIT(minor(dev));
|
|
||||||
|
|
||||||
/* If there's queued data, try to flush it */
|
|
||||||
(void)pushbytes(sc);
|
|
||||||
|
|
||||||
/* really close .. quite simple :-) */
|
|
||||||
outb(sc->sc_ctrl, LPC_NINIT);
|
|
||||||
sc->sc_flags = 0;
|
|
||||||
free(sc->sc_inbuf, M_DEVBUF);
|
|
||||||
sc->sc_inbuf = 0; /* Sanity */
|
|
||||||
return(0);
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
|
||||||
* lpawrite()
|
|
||||||
* Copy from user's buffer, then print
|
|
||||||
*/
|
|
||||||
lpawrite(dev, uio)
|
|
||||||
dev_t dev;
|
|
||||||
struct uio *uio;
|
|
||||||
{
|
|
||||||
struct lpa_softc *sc = lpa_sc + LPA_UNIT(minor(dev));
|
|
||||||
int err;
|
|
||||||
|
|
||||||
/* Write out old bytes from interrupted syscall */
|
|
||||||
if (sc->sc_count > 0) {
|
|
||||||
err = pushbytes(sc);
|
|
||||||
if (err)
|
|
||||||
return(err);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* main loop */
|
|
||||||
while ((sc->sc_count = MIN(BUFSIZE, uio->uio_resid)) > 0) {
|
|
||||||
/* get from user-space */
|
|
||||||
sc->sc_cp = sc->sc_inbuf;
|
|
||||||
uiomove(sc->sc_inbuf, sc->sc_count, uio);
|
|
||||||
err = pushbytes(sc);
|
|
||||||
if (err)
|
|
||||||
return(err);
|
|
||||||
}
|
|
||||||
return(0);
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
lpaioctl(dev_t dev, int cmd, caddr_t data, int flag, struct proc *p)
|
|
||||||
{
|
|
||||||
int error;
|
|
||||||
|
|
||||||
error = 0;
|
|
||||||
switch (cmd) {
|
|
||||||
#ifdef THISISASAMPLE
|
|
||||||
case XXX:
|
|
||||||
dothis; andthis; andthat;
|
|
||||||
error=x;
|
|
||||||
break;
|
|
||||||
#endif /* THISISASAMPLE */
|
|
||||||
default:
|
|
||||||
error = ENODEV;
|
|
||||||
}
|
|
||||||
|
|
||||||
return(error);
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif /* NLPA > 0 */
|
|
||||||
Loading…
Reference in New Issue
Block a user