FreeBSD/Linux Kernel Cross Reference
sys/dev/ppbus/pps_ppbus.c

     /* $NetBSD: pps_ppbus.c,v 1.14 2008/06/11 19:28:52 cegger Exp $ */
     
     /*
      * ported to timecounters by Frank Kardel 2006
      *
      * Copyright (c) 2004
      *      Matthias Drochner.  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.
     *
     * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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.
     */
    
    #include <sys/cdefs.h>
    __KERNEL_RCSID(0, "$NetBSD: pps_ppbus.c,v 1.14 2008/06/11 19:28:52 cegger Exp $");
    
    #include "opt_ntp.h"
    
    #include <sys/param.h>
    #include <sys/systm.h>
    #include <sys/conf.h>
    #include <sys/proc.h>
    #include <sys/ioctl.h>
    #include <sys/timepps.h>
    
    #include <dev/ppbus/ppbus_base.h>
    #include <dev/ppbus/ppbus_device.h>
    #include <dev/ppbus/ppbus_io.h>
    #include <dev/ppbus/ppbus_var.h>
    
    struct pps_softc {
            struct ppbus_device_softc pps_dev;
            device_t ppbus;
            int busy;
            struct pps_state pps_state;     /* pps state */
    };
    
    static int pps_probe(device_t, cfdata_t, void *);
    static void pps_attach(device_t, device_t, void *);
    CFATTACH_DECL_NEW(pps, sizeof(struct pps_softc), pps_probe, pps_attach,
            NULL, NULL);
    extern struct cfdriver pps_cd;
    
    static dev_type_open(ppsopen);
    static dev_type_close(ppsclose);
    static dev_type_ioctl(ppsioctl);
    const struct cdevsw pps_cdevsw = {
            ppsopen, ppsclose, noread, nowrite, ppsioctl,
            nostop, notty, nopoll, nommap, nokqfilter, D_OTHER
    };
    
    static void ppsintr(void *arg);
    
    static int
    pps_probe(device_t parent, cfdata_t match, void *aux)
    {
            struct ppbus_attach_args *args = aux;
    
            /* we need an interrupt */
            if (!(args->capabilities & PPBUS_HAS_INTR))
                    return 0;
    
            return 1;
    }
    
    static void
    pps_attach(device_t parent, device_t self, void *aux)
    {
            struct pps_softc *sc = device_private(self);
    
            sc->ppbus = parent;
            sc->pps_dev.sc_dev = self;
    
            printf("\n");
    }
    
    static int
    ppsopen(dev_t dev, int flags, int fmt, struct lwp *l)
    {
            struct pps_softc *sc;
            int res, weg = 0;
    
           sc = device_lookup_private(&pps_cd, minor(dev));
           if (!sc)
                   return (ENXIO);
   
           if (sc->busy)
                   return (0);
   
           if (ppbus_request_bus(sc->ppbus, sc->pps_dev.sc_dev,
                                 PPBUS_WAIT|PPBUS_INTR, 0))
                   return (EINTR);
   
           ppbus_write_ivar(sc->ppbus, PPBUS_IVAR_IEEE, &weg);
   
           /* attach the interrupt handler */
           /* XXX priority should be set here */
           res = ppbus_add_handler(sc->ppbus, ppsintr, sc);
           if (res) {
                   ppbus_release_bus(sc->ppbus, sc->pps_dev.sc_dev,
                                     PPBUS_WAIT, 0);
                   return (res);
           }
   
           ppbus_set_mode(sc->ppbus, PPBUS_PS2, 0);
           ppbus_wctr(sc->ppbus, IRQENABLE | PCD | nINIT | SELECTIN);
   
           mutex_spin_enter(&timecounter_lock);
           memset((void *)&sc->pps_state, 0, sizeof(sc->pps_state));
           sc->pps_state.ppscap = PPS_CAPTUREASSERT;
           pps_init(&sc->pps_state);
           mutex_spin_exit(&timecounter_lock);
   
           sc->busy = 1;
   
           return (0);
   }
   
   static int
   ppsclose(dev_t dev, int flags, int fmt, struct lwp *l)
   {
           struct pps_softc *sc = device_lookup_private(&pps_cd, minor(dev));
           device_t ppbus = sc->ppbus;
   
           sc->busy = 0;
           mutex_spin_enter(&timecounter_lock);
           sc->pps_state.ppsparam.mode = 0;
           mutex_spin_exit(&timecounter_lock);
   
           ppbus_wdtr(ppbus, 0);
           ppbus_wctr(ppbus, 0);
   
           ppbus_remove_handler(ppbus, ppsintr);
           ppbus_set_mode(ppbus, PPBUS_COMPATIBLE, 0);
           ppbus_release_bus(ppbus, sc->pps_dev.sc_dev, PPBUS_WAIT, 0);
           return (0);
   }
   
   static void
   ppsintr(void *arg)
   {
           struct pps_softc *sc = arg;
           device_t ppbus = sc->ppbus;
   
           mutex_spin_enter(&timecounter_lock);
           pps_capture(&sc->pps_state);
           if (!(ppbus_rstr(ppbus) & nACK)) {
                   mutex_spin_exit(&timecounter_lock);
                   return;
           }
           if (sc->pps_state.ppsparam.mode & PPS_ECHOASSERT) 
                   ppbus_wctr(ppbus, IRQENABLE | AUTOFEED);
           pps_event(&sc->pps_state, PPS_CAPTUREASSERT);
           if (sc->pps_state.ppsparam.mode & PPS_ECHOASSERT) 
                   ppbus_wctr(ppbus, IRQENABLE);
           mutex_spin_exit(&timecounter_lock);
   }
   
   static int
   ppsioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l)
   {
           struct pps_softc *sc = device_lookup_private(&pps_cd, minor(dev));
           int error = 0;
   
           switch (cmd) {
           case PPS_IOC_CREATE:
           case PPS_IOC_DESTROY:
           case PPS_IOC_GETPARAMS:
           case PPS_IOC_SETPARAMS:
           case PPS_IOC_GETCAP:
           case PPS_IOC_FETCH:
   #ifdef PPS_SYNC
           case PPS_IOC_KCBIND:
   #endif
                   mutex_spin_enter(&timecounter_lock);
                   error = pps_ioctl(cmd, data, &sc->pps_state);
                   mutex_spin_exit(&timecounter_lock);
                   break;
   
           default:
                   error = EPASSTHROUGH;
                   break;
           }
           return (error);
   }

Cache object: 802d2836aa8f624360691c53091d6ee8