/* * Copyright by Vladimir N. Silyaev 2000 * * 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. * * $vmFreeBSD: vmware/vmnet-only/freebsd/vmnet.c,v 1.14 2000/01/23 22:29:50 vsilyaev Exp $ */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include "rtc.h" #ifdef MODULE_DEPEND MODULE_DEPEND(rtc, linux, 1, 1, 1); #endif #define CDEV_MAJOR 202 #if defined(CDEV_MAJOR_) && CDEV_MAJOR != CDEV_MAJOR_ #error "CDEV_MAJOR != CDEV_MAJOR_" #endif #define DEVICE_NAME "rtc" enum rtc_log_level {Lenter=0, Lexit=1, Linfo, Lwarning, Lfail}; #define DEBUG 0 #if DEBUG #define DEB(x) x #define DLog(level, fmt, args...) printf("%s: " fmt "\n", __FUNCTION__ , ##args) #else /* !DEBUG */ #define DEB(x) #define DLog(level, fmt, args...) #endif /* DEBUG */ struct rtc_softc { dev_t dev; /* Back reference to device */ struct { int freq; struct { int opened:1; int enabled:1; } flags; } var; }; static struct rtc_softc *rtc_sc=NULL; static d_open_t rtc_open; static d_close_t rtc_close; static d_ioctl_t rtc_ioctl; static d_poll_t rtc_poll; static int rtc_modeevent(module_t mod, int cmd, void *arg); static struct cdevsw rtc_cdevsw = { /* open */ rtc_open, /* close */ rtc_close, /* read */ noread, /* write */ nowrite, /* ioctl */ rtc_ioctl, /* poll */ rtc_poll, /* mmap */ nommap, /* strategy */ nostrategy, /* name */ DEVICE_NAME, /* maj */ CDEV_MAJOR, /* dump */ nodump, /* psize */ nopsize, /* flags */ 0, /* bmaj */ -1 }; /* * Now declare the module to the system. * IMPORTANT: Must be before netgraph node declaration. */ DEV_MODULE(rtc, rtc_modeevent, 0); /* -=-=-=-=-=-=-=-=-= attach/detach device stuff -=-=-=-=-=-=-=-=-= */ static struct rtc_softc * rtc_attach(dev_t dev) { struct rtc_softc *sc; int unit; unit = lminor(dev); DLog(Lenter, "%d %p", unit, dev); if (dev->si_drv1) { DLog(Lexit, "old %p, %p", dev, dev->si_drv1); return dev->si_drv1; } if (rtc_sc!=NULL) return NULL; dev = make_dev(&rtc_cdevsw, minor(dev), UID_ROOT, GID_WHEEL, 0600, DEVICE_NAME); if (dev==NULL) return (NULL); MALLOC(sc, struct rtc_softc*, sizeof(*sc), M_DEVBUF, M_WAITOK); if (sc==NULL) return NULL; bzero(sc, sizeof(*sc)); rtc_sc = sc; dev->si_drv1 = sc; /* Link together */ sc->dev = dev; DLog(Lexit, "new %p,%p", dev, sc); return sc; } static int rtc_detach(struct rtc_softc *sc) { int error=0; if (sc == NULL) { return error; } if (sc->var.flags.opened) { return EBUSY; } destroy_dev(sc->dev); FREE(sc, M_DEVBUF); return error; } /* -=-=-=-=-=-=-=-=-= character device stuff -=-=-=-=-=-=-=-=-= */ int rtc_open(dev_t dev, int oflag, int otyp, struct proc *p) { struct rtc_softc *sc; sc = rtc_attach(dev); if (sc==NULL) return (EAGAIN); if (sc->var.flags.opened) return (EBUSY); bzero(&sc->var, sizeof(sc->var)); sc->var.flags.opened = 1; return 0; } int rtc_close(dev_t dev, int fflag, int otyp, struct proc *p) { struct rtc_softc *sc = (struct rtc_softc *) dev->si_drv1; sc->var.flags.opened = 0; return 0; } int rtc_ioctl(dev_t dev, u_long cmd, caddr_t arg, int mode, struct proc *p) { struct rtc_softc *sc = (struct rtc_softc *) dev->si_drv1; int error=0; DLog(Lenter, "cmd 0x%04lx", cmd); switch (cmd) { case RTCIO_IRQP_SET: sc->var.freq = *(int *)arg; DLog(Linfo, "Set RTC freq %d", sc->var.freq); break; case RTCIO_PIE_ON: sc->var.flags.enabled = 1; DLog(Linfo, "Enable interrupts"); break; default: DLog(Lfail, "Unknown IOCTL 0x%04lx", cmd); error = EINVAL; break; } DLog(Lenter, "result %d", error); return (error); } int rtc_poll(dev_t dev, int events, struct proc *p) { struct rtc_softc *sc = (struct rtc_softc *) dev->si_drv1; int revents = 0; int delay; if (!sc->var.flags.enabled) return 0; delay = 1000000/sc->var.freq; if (events) { DLog(Linfo, "Delay for %d usec", delay); DELAY(delay); revents = events; } return revents; } /* -=-=-=-=-=-=-=-=-= module load/unload stuff -=-=-=-=-=-=-=-=-= */ static int init_module(void) { int error; error = cdevsw_add(&rtc_cdevsw); if (error) return error; return error; } static int cleanup_module(void) { int error; struct rtc_softc *sc; sc = rtc_sc; if ( (error=rtc_detach(sc)) !=0) { DLog(Lfail, "%p busy", sc); return error; } error = cdevsw_remove(&rtc_cdevsw); DLog(Linfo, "return %d", error); return error; } static int rtc_modeevent(module_t mod, int cmd, void *arg) { int error = 0; switch (cmd) { case MOD_LOAD: error = init_module(); break; case MOD_UNLOAD: /* fall through */ case MOD_SHUTDOWN: error = cleanup_module(); break; default: /* we only understand load/unload */ error = EINVAL; break; } return (error); }