FreeBSD/Linux Kernel Cross Reference
sys/dev/mvme/lpt_pcctwo.c

     /*      $NetBSD: lpt_pcctwo.c,v 1.12 2009/03/14 15:36:19 dsl Exp $      */
     
     /*-
      * Copyright (c) 1999, 2002 The NetBSD Foundation, Inc.
      * All rights reserved.
      *
      * This code is derived from software contributed to The NetBSD Foundation
      * by Steve C. Woodford.
      *
     * 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.
     *
     * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. 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 FOUNDATION 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.
     */
    
    /*
     * Device Driver back-end for the PCCChip2's parallel printer port
     */
    
    #include <sys/cdefs.h>
    __KERNEL_RCSID(0, "$NetBSD: lpt_pcctwo.c,v 1.12 2009/03/14 15:36:19 dsl Exp $");
    
    #include <sys/param.h>
    #include <sys/kernel.h>
    #include <sys/systm.h>
    #include <sys/device.h>
    #include <sys/syslog.h>
    
    #include <sys/cpu.h>
    #include <sys/bus.h>
    
    #include <dev/mvme/lptvar.h>
    #include <dev/mvme/pcctworeg.h>
    #include <dev/mvme/pcctwovar.h>
    
    /*
     * Autoconfig stuff
     */
    int lpt_pcctwo_match(device_t, cfdata_t , void *);
    void lpt_pcctwo_attach(device_t, device_t, void *);
    
    CFATTACH_DECL_NEW(lpt_pcctwo, sizeof(struct lpt_softc),
        lpt_pcctwo_match, lpt_pcctwo_attach, NULL, NULL);
    
    extern struct cfdriver lpt_cd;
    
    
    int lpt_pcctwo_intr(void *);
    void lpt_pcctwo_open(struct lpt_softc *, int);
    void lpt_pcctwo_close(struct lpt_softc *);
    void lpt_pcctwo_iprime(struct lpt_softc *);
    void lpt_pcctwo_speed(struct lpt_softc *, int);
    int lpt_pcctwo_notrdy(struct lpt_softc *, int);
    void lpt_pcctwo_wr_data(struct lpt_softc *, u_char);
    
    struct lpt_funcs lpt_pcctwo_funcs = {
            lpt_pcctwo_open,
            lpt_pcctwo_close,
            lpt_pcctwo_iprime,
            lpt_pcctwo_speed,
            lpt_pcctwo_notrdy,
            lpt_pcctwo_wr_data
    };
    
    /* ARGSUSED */
    int
    lpt_pcctwo_match(device_t parent, cfdata_t cf, void *args)
    {
            struct pcctwo_attach_args *pa;
    
            pa = args;
    
            if (strcmp(pa->pa_name, lpt_cd.cd_name))
                    return (0);
    
    #ifdef MVME68K
            if (machineid != MVME_167 && machineid != MVME_177)
                    return (0);
    #endif
    
    #ifdef MVME88K
            if (machineid != MVME_187)
                    return (0);
   #endif
   
           pa->pa_ipl = cf->pcctwocf_ipl;
   
           return (1);
   }
   
   /* ARGSUSED */
   void
   lpt_pcctwo_attach(device_t parent, device_t self, void *args)
   {
           struct pcctwo_attach_args *pa;
           struct lpt_softc *sc;
   
           pa = (struct pcctwo_attach_args *) args;
           sc = device_private(self);
           sc->sc_dev = self;
   
           /* The printer registers are part of the PCCChip2's own registers. */
           sc->sc_bust = pa->pa_bust;
           bus_space_map(pa->pa_bust, pa->pa_offset, PCC2REG_SIZE, 0,
               &sc->sc_bush);
   
           sc->sc_ipl = pa->pa_ipl & PCCTWO_ICR_LEVEL_MASK;
           sc->sc_laststatus = 0;
           sc->sc_funcs = &lpt_pcctwo_funcs;
   
           aprint_normal(": PCCchip2 Parallel Printer\n");
   
           /*
            * Disable interrupts until device is opened
            */
           pcc2_reg_write(sc, PCC2REG_PRT_ACK_ICSR, 0);
           pcc2_reg_write(sc, PCC2REG_PRT_FAULT_ICSR, 0);
           pcc2_reg_write(sc, PCC2REG_PRT_SEL_ICSR, 0);
           pcc2_reg_write(sc, PCC2REG_PRT_PE_ICSR, 0);
           pcc2_reg_write(sc, PCC2REG_PRT_BUSY_ICSR, 0);
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL, 0);
   
           /*
            * Main attachment code
            */
           lpt_attach_subr(sc);
   
           /* Register the event counter */
           evcnt_attach_dynamic(&sc->sc_evcnt, EVCNT_TYPE_INTR,
               pcctwointr_evcnt(sc->sc_ipl), "printer", device_xname(sc->sc_dev));
   
           /*
            * Hook into the printer interrupt
            */
           pcctwointr_establish(PCCTWOV_PRT_ACK, lpt_pcctwo_intr, sc->sc_ipl, sc,
               &sc->sc_evcnt);
   }
   
   /*
    * Handle printer interrupts
    */
   int
   lpt_pcctwo_intr(void *arg)
   {
           struct lpt_softc *sc;
           int i;
   
           sc = (struct lpt_softc *) arg;
   
           /* is printer online and ready for output */
           if (lpt_pcctwo_notrdy(sc, 0) || lpt_pcctwo_notrdy(sc, 1))
                   return (0);
   
           i = lpt_intr(sc);
   
           if (pcc2_reg_read(sc, PCC2REG_PRT_INPUT_STATUS) & PCCTWO_PRT_IN_SR_PINT)
                   pcc2_reg_write(sc, PCC2REG_PRT_ACK_ICSR,
                       sc->sc_icr | PCCTWO_ICR_ICLR);
   
           return (i);
   }
   
   void
   lpt_pcctwo_open(struct lpt_softc *sc, int int_ena)
   {
           int sps;
   
           pcc2_reg_write(sc, PCC2REG_PRT_ACK_ICSR,
               PCCTWO_ICR_ICLR | PCCTWO_ICR_EDGE);
   
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL,
               pcc2_reg_read(sc, PCC2REG_PRT_CONTROL) | PCCTWO_PRT_CTRL_DOEN);
   
           if (int_ena == 0) {
                   sps = splhigh();
                   sc->sc_icr = sc->sc_ipl | PCCTWO_ICR_EDGE;
                   pcc2_reg_write(sc, PCC2REG_PRT_ACK_ICSR, sc->sc_icr);
                   splx(sps);
           }
   }
   
   void
   lpt_pcctwo_close(struct lpt_softc *sc)
   {
   
           pcc2_reg_write(sc, PCC2REG_PRT_ACK_ICSR,
               PCCTWO_ICR_ICLR | PCCTWO_ICR_EDGE);
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL, 0);
   }
   
   void
   lpt_pcctwo_iprime(struct lpt_softc *sc)
   {
   
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL,
               pcc2_reg_read(sc, PCC2REG_PRT_CONTROL) | PCCTWO_PRT_CTRL_INP);
   
           delay(100);
   
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL,
               pcc2_reg_read(sc, PCC2REG_PRT_CONTROL) & ~PCCTWO_PRT_CTRL_INP);
   
           delay(100);
   }
   
   void
   lpt_pcctwo_speed(struct lpt_softc *sc, int speed)
   {
           u_int8_t reg;
   
           reg = pcc2_reg_read(sc, PCC2REG_PRT_CONTROL);
   
           if (speed == LPT_STROBE_FAST)
                   reg |= PCCTWO_PRT_CTRL_FAST;
           else
                   reg &= ~PCCTWO_PRT_CTRL_FAST;
   
           pcc2_reg_write(sc, PCC2REG_PRT_CONTROL, reg);
   }
   
   int
   lpt_pcctwo_notrdy(struct lpt_softc *sc, int err)
   {
           u_int8_t status;
           u_int8_t new;
   
   #define LPS_INVERT      (PCCTWO_PRT_IN_SR_SEL)
   #define LPS_MASK        (PCCTWO_PRT_IN_SR_SEL | PCCTWO_PRT_IN_SR_FLT | \
                            PCCTWO_PRT_IN_SR_BSY | PCCTWO_PRT_IN_SR_PE)
   
           status = pcc2_reg_read(sc, PCC2REG_PRT_INPUT_STATUS) ^ LPS_INVERT;
           status &= LPS_MASK;
   
           if (err) {
                   new = status & ~sc->sc_laststatus;
                   sc->sc_laststatus = status;
   
                   if (new & PCCTWO_PRT_IN_SR_SEL)
                           log(LOG_NOTICE, "%s: offline\n",
                               device_xname(sc->sc_dev));
                   else if (new & PCCTWO_PRT_IN_SR_PE)
                           log(LOG_NOTICE, "%s: out of paper\n",
                               device_xname(sc->sc_dev));
                   else if (new & PCCTWO_PRT_IN_SR_FLT)
                           log(LOG_NOTICE, "%s: output error\n",
                               device_xname(sc->sc_dev));
           }
   
           return (status);
   }
   
   void
   lpt_pcctwo_wr_data(struct lpt_softc *sc, u_char data)
   {
   
           pcc2_reg_write16(sc, PCC2REG_PRT_DATA, (u_int16_t) data);
   }

Cache object: 924b116fdfd89a651747d658eae97012