/* $NetBSD: radio.c,v 1.31 2021/08/07 16:19:08 thorpej Exp $ */
/* $OpenBSD: radio.c,v 1.2 2001/12/05 10:27:06 mickey Exp $ */
/* $RuOBSD: radio.c,v 1.7 2001/12/04 06:03:05 tm Exp $ */

/*
* Copyright (c) 2001 Maxim Tsyplakov <[email protected]>
* 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 ``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 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.
*/

/* This is the /dev/radio driver from OpenBSD */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: radio.c,v 1.31 2021/08/07 16:19:08 thorpej Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/proc.h>
#include <sys/errno.h>
#include <sys/ioctl.h>
#include <sys/device.h>
#include <sys/vnode.h>
#include <sys/radioio.h>
#include <sys/conf.h>

#include <dev/radio_if.h>

#include "ioconf.h"

struct radio_softc {
       void            *hw_hdl;        /* hardware driver handle */
       device_t        sc_dev;         /* hardware device struct */
       const struct radio_hw_if *hw_if; /* hardware interface */
};

static int      radioprobe(device_t, cfdata_t, void *);
static void     radioattach(device_t, device_t, void *);
static int      radioprint(void *, const char *);
static int      radiodetach(device_t, int);

CFATTACH_DECL_NEW(radio, sizeof(struct radio_softc),
   radioprobe, radioattach, radiodetach, NULL);

static dev_type_open(radioopen);
static dev_type_close(radioclose);
static dev_type_ioctl(radioioctl);

const struct cdevsw radio_cdevsw = {
       .d_open = radioopen,
       .d_close = radioclose,
       .d_read = noread,
       .d_write = nowrite,
       .d_ioctl = radioioctl,
       .d_stop = nostop,
       .d_tty = notty,
       .d_poll = nopoll,
       .d_mmap = nommap,
       .d_kqfilter = nokqfilter,
       .d_discard = nodiscard,
       .d_flag = D_OTHER,
};

static int
radioprobe(device_t parent, cfdata_t match, void *aux)
{
       return (1);
}

static void
radioattach(device_t parent, device_t self, void *aux)
{
       struct radio_softc *sc = device_private(self);
       struct radio_attach_args *sa = aux;
       const struct radio_hw_if *hwp = sa->hwif;
       void  *hdlp = sa->hdl;

       aprint_naive("\n");
       aprint_normal("\n");
       sc->hw_if = hwp;
       sc->hw_hdl = hdlp;
       sc->sc_dev = self;
}

static int
radioopen(dev_t dev, int flags, int fmt, struct lwp *l)
{
       int     unit;
       struct radio_softc *sc;

       unit = RADIOUNIT(dev);
       sc = device_lookup_private(&radio_cd, unit);
       if (sc == NULL || sc->hw_if == NULL)
               return (ENXIO);

       if (sc->hw_if->open != NULL)
               return (sc->hw_if->open(sc->hw_hdl, flags, fmt, l->l_proc));
       else
               return (0);
}

static int
radioclose(dev_t dev, int flags, int fmt, struct lwp *l)
{
       struct radio_softc *sc;

       sc = device_lookup_private(&radio_cd, RADIOUNIT(dev));

       if (sc->hw_if->close != NULL)
               return (sc->hw_if->close(sc->hw_hdl, flags, fmt, l->l_proc));
       else
               return (0);
}

static int
radioioctl(dev_t dev, u_long cmd, void *data, int flags,
   struct lwp *l)
{
       struct radio_softc *sc;
       int unit, error;

       unit = RADIOUNIT(dev);
       sc = device_lookup_private(&radio_cd, unit);
       if (sc == NULL || sc->hw_if == NULL)
               return (ENXIO);

       error = EOPNOTSUPP;
       switch (cmd) {
       case RIOCGINFO:
               if (sc->hw_if->get_info)
                       error = (sc->hw_if->get_info)(sc->hw_hdl,
                                       (struct radio_info *)data);
               break;
       case RIOCSINFO:
               if (sc->hw_if->set_info)
                       error = (sc->hw_if->set_info)(sc->hw_hdl,
                               (struct radio_info *)data);
               break;
       case RIOCSSRCH:
               if (sc->hw_if->search)
                       error = (sc->hw_if->search)(sc->hw_hdl,
                                       *(int *)data);
               break;
       default:
               error = EINVAL;
       }

       return (error);
}

/*
* Called from hardware driver. This is where the MI radio driver gets
* probed/attached to the hardware driver
*/
device_t
radio_attach_mi(const struct radio_hw_if *rhwp, void *hdlp, device_t dev)
{
       struct radio_attach_args arg;

       arg.hwif = rhwp;
       arg.hdl = hdlp;
       return (config_found(dev, &arg, radioprint, CFARGS_NONE));
}

static int
radioprint(void *aux, const char *pnp)
{
       if (pnp != NULL)
               aprint_normal("radio at %s", pnp);
       return (UNCONF);
}

static int
radiodetach(device_t self, int flags)
{
       int maj, mn;

       /* locate the major number */
       maj = cdevsw_lookup_major(&radio_cdevsw);

       /* Nuke the vnodes for any open instances (calls close). */
       mn = device_unit(self);
       vdevgone(maj, mn, mn, VCHR);

       return (0);
}