NetBSD/sys/dev/pci/maxiradio.c

/* $NetBSD: maxiradio.c,v 1.1 2002/01/01 21:51:40 augustss Exp $ */
/* $OpenBSD: maxiradio.c,v 1.2 2001/12/05 10:27:06 mickey Exp $ */
/* $RuOBSD: maxiradio.c,v 1.5 2001/10/18 16:51:36 pva Exp $ */

/*
 * Copyright (c) 2001 Maxim Tsyplakov <tm@oganer.net>
 * 		      Vladimir Popov <jumbo@narod.ru>
 * 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 AUTHORS ``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 AUTHORS 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.
 */

/* Guillemot Maxi Radio FM2000 PCI Radio Card Device Driver */

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

#include <machine/bus.h>

#include <dev/pci/pcireg.h>
#include <dev/pci/pcivar.h>
#include <dev/pci/pcidevs.h>

#include <dev/ic/tea5757.h>
#include <dev/radio_if.h>

int	mr_match(struct device *, struct cfdata *, void *);
void	mr_attach(struct device *, struct device *, void *);

int     mr_get_info(void *, struct radio_info *);
int     mr_set_info(void *, struct radio_info *);
int     mr_search(void *, int);

/* config base I/O address ? */
#define PCI_CBIO 0x6400	

#define MAXIRADIO_CAPS	RADIO_CAPS_DETECT_SIGNAL |			\
			RADIO_CAPS_SET_MONO |				\
			RADIO_CAPS_HW_SEARCH |				\
			RADIO_CAPS_HW_AFC |				\
			RADIO_CAPS_LOCK_SENSITIVITY
#if 0
			RADIO_CAPS_DETECT_STEREO |
#endif /* 0 */

#define MAXIRADIO_MUTE		0x00
#define MAXIRADIO_UNMUTE	0x10

#define MAXIRADIO_SIGNAL	0x08

#define MR_WREN_ON		(1 << 2)
#define MR_WREN_OFF		(0 << 2)

#define MR_DATA_ON		(1 << 1)
#define MR_DATA_OFF		(0 << 1)

#define MR_CLCK_ON		(1 << 0)
#define MR_CLCK_OFF		(0 << 0)

#define MR_READ_CLOCK_LOW	(MR_WREN_OFF | MR_DATA_ON | MR_CLCK_OFF)
#define MR_READ_CLOCK_HIGH	(MR_WREN_OFF | MR_DATA_ON | MR_CLCK_ON)

/* define our interface to the high-level radio driver */

struct radio_hw_if mr_hw_if = {
	NULL, /* open */
	NULL, /* close */
	mr_get_info,
	mr_set_info,
	mr_search
};

struct mr_softc {
	struct device	sc_dev;

	int	mute;
	u_int8_t	vol;
	u_int32_t	freq;
	u_int32_t	stereo;
	u_int32_t	lock;

	struct tea5757_t	tea;
};

struct cfattach mr_ca = {
	sizeof(struct mr_softc), mr_match, mr_attach
};

void	mr_set_mute(struct mr_softc *);
void	mr_write_bit(bus_space_tag_t, bus_space_handle_t, bus_size_t, int);
void	mr_init(bus_space_tag_t, bus_space_handle_t, bus_size_t, u_int32_t);
void	mr_rset(bus_space_tag_t, bus_space_handle_t, bus_size_t, u_int32_t);
int	mr_state(bus_space_tag_t, bus_space_handle_t);
u_int32_t	mr_hardware_read(bus_space_tag_t, bus_space_handle_t,
		bus_size_t);

int
mr_match(struct device *parent, struct cfdata *cf, void *aux)
{
	struct pci_attach_args *pa = aux;

	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_GUILLEMOT &&
	    PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_GUILLEMOT_MAXIRADIO)
		return (1);
	return (0);
}

void
mr_attach(struct device *parent, struct device *self, void *aux)
{
	struct mr_softc *sc = (struct mr_softc *)self;
	struct pci_attach_args *pa = aux;
	pci_chipset_tag_t pc = pa->pa_pc;
	bus_size_t iosize;
	pcireg_t csr;
	char devinfo[256];
	
	pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo);
	printf(": %s (rev. 0x%02x)\n", devinfo, PCI_REVISION(pa->pa_class));

	/* Map I/O registers */
	if (pci_mapreg_map(pa, PCI_CBIO, PCI_MAPREG_TYPE_IO, 0,
			   &sc->tea.iot, &sc->tea.ioh, NULL, &iosize)) {
		printf(": can't map i/o space\n");
		return;
	}

#if 0
XXXX
	if (pci_io_find(pc, pa->pa_tag, PCI_CBIO, &iobase, &iosize)) {
		printf (": can't find i/o base\n");
		return;
	}

	if (bus_space_map(sc->tea.iot = pa->pa_iot, iobase, iosize,
			  0, &sc->tea.ioh)) {
		printf(": can't map i/o space\n");
		return;
	}
#endif

	/* Enable the card */
	csr = pci_conf_read(pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
	pci_conf_write(pc, pa->pa_tag, PCI_COMMAND_STATUS_REG,
	    csr | PCI_COMMAND_MASTER_ENABLE);
	
	sc->freq = MIN_FM_FREQ;
	sc->vol = 0;
	sc->mute = 0;
	sc->stereo = TEA5757_STEREO;
	sc->lock = TEA5757_S030;
	sc->tea.offset = 0;
	sc->tea.init = mr_init;
	sc->tea.rset = mr_rset;
	sc->tea.write_bit = mr_write_bit;
	sc->tea.read = mr_hardware_read;
	
	radio_attach_mi(&mr_hw_if, sc, &sc->sc_dev);
}

int
mr_get_info(void *v, struct radio_info *ri)
{
	struct mr_softc *sc = v;

	ri->mute = sc->mute;
	ri->volume = sc->vol ? 255 : 0;
	ri->stereo = sc->stereo == TEA5757_STEREO ? 1 : 0;
	ri->caps = MAXIRADIO_CAPS;
	ri->rfreq = 0;
	ri->lock = tea5757_decode_lock(sc->lock);

	ri->freq = sc->freq = tea5757_decode_freq(mr_hardware_read(sc->tea.iot,
				sc->tea.ioh, sc->tea.offset));

	ri->info = mr_state(sc->tea.iot, sc->tea.ioh);

	return (0);
}

int
mr_set_info(void *v, struct radio_info *ri)
{
	struct mr_softc *sc = v;

	sc->mute = ri->mute ? 1 : 0;
	sc->vol = ri->volume ? 255 : 0;
	sc->stereo = ri->stereo ? TEA5757_STEREO: TEA5757_MONO;
	sc->lock = tea5757_encode_lock(ri->lock);
	ri->freq = sc->freq = tea5757_set_freq(&sc->tea,
			sc->lock, sc->stereo, ri->freq);
	mr_set_mute(sc);

	return (0);
}

int
mr_search(void *v, int f)
{
	struct mr_softc *sc = v;

	tea5757_search(&sc->tea, sc->lock, sc->stereo, f);
	mr_set_mute(sc);

	return (0);
}

void
mr_set_mute(struct mr_softc *sc)
{
	int mute;

	mute = (sc->mute || !sc->vol) ? MAXIRADIO_MUTE : MAXIRADIO_UNMUTE;
	bus_space_write_1(sc->tea.iot, sc->tea.ioh, 0, mute);
}

void
mr_write_bit(bus_space_tag_t iot, bus_space_handle_t ioh, bus_size_t off,
		int bit)
{
	u_int8_t data;

	data = bit ? MR_DATA_ON : MR_DATA_OFF;
	bus_space_write_1(iot, ioh, off, MR_WREN_ON | MR_CLCK_OFF | data);
	DELAY(5);
	bus_space_write_1(iot, ioh, off, MR_WREN_ON | MR_CLCK_ON  | data);
	DELAY(5);
	bus_space_write_1(iot, ioh, off, MR_WREN_ON | MR_CLCK_OFF | data);
	DELAY(5);
}

void
mr_init(bus_space_tag_t iot, bus_space_handle_t ioh, bus_size_t off, u_int32_t d)
{
	bus_space_write_1(iot, ioh, off, MR_WREN_ON | MR_DATA_ON | MR_CLCK_OFF);
}

void
mr_rset(bus_space_tag_t iot, bus_space_handle_t ioh, bus_size_t off, u_int32_t d)
{
	bus_space_write_1(iot, ioh, off, MAXIRADIO_UNMUTE);
}

/* COMPLETELY UNTESTED */
u_int32_t
mr_hardware_read(bus_space_tag_t iot, bus_space_handle_t ioh, bus_size_t off)
{
	u_int32_t reg = 0ul;
	int i;

	bus_space_write_1(iot, ioh, off, MR_READ_CLOCK_LOW);
	DELAY(5);

	i = 24;
	while (i--) {
		bus_space_write_1(iot, ioh, off, MR_READ_CLOCK_HIGH);
		DELAY(5);
		bus_space_write_1(iot, ioh, off, MR_READ_CLOCK_LOW);
		DELAY(5);
		reg |= bus_space_read_1(iot, ioh, off) & MR_DATA_ON ? 1 : 0;
		reg <<= 1;
	}

	reg >>= 1;

	return (reg & (TEA5757_DATA | TEA5757_FREQ));
}

int
mr_state(bus_space_tag_t iot, bus_space_handle_t ioh)
{
	/* XXX: where is a stereo bit ? */
	return bus_space_read_1(iot, ioh, 0) & MAXIRADIO_SIGNAL ?
		(0 << 1) : (1 << 1);
}