[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / pcmcia / vrc4173_cardu.c

/*
 * FILE NAME
 *	drivers/pcmcia/vrc4173_cardu.c
 *
 * BRIEF MODULE DESCRIPTION
 * 	NEC VRC4173 CARDU driver for Socket Services
 *	(This device doesn't support CardBus. it is supporting only 16bit PC Card.)
 *
 * Copyright 2002,2003 Yoichi Yuasa <yuasa@linux-mips.org>
 *
 *  This program is free software; you can redistribute it and/or modify it
 *  under the terms of the GNU General Public License as published by the
 *  Free Software Foundation; either version 2 of the License, or (at your
 *  option) any later version.
 *
 *  THIS SOFTWARE IS PROVIDED ``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.
 *
 *  You should have received a copy of the GNU General Public License along
 *  with this program; if not, write to the Free Software Foundation, Inc.,
 *  675 Mass Ave, Cambridge, MA 02139, USA.
 */
#include <linux/init.h>
#include <linux/module.h>
#include <linux/pci.h>
#include <linux/spinlock.h>
#include <linux/types.h>

#include <asm/io.h>

#include <pcmcia/ss.h>

#include "vrc4173_cardu.h"

MODULE_DESCRIPTION("NEC VRC4173 CARDU driver for Socket Services");
MODULE_AUTHOR("Yoichi Yuasa <yuasa@linux-mips.org>");
MODULE_LICENSE("GPL");

static int vrc4173_cardu_slots;

static vrc4173_socket_t cardu_sockets[CARDU_MAX_SOCKETS];

extern struct socket_info_t *pcmcia_register_socket (int slot,
                                                     struct pccard_operations *vtable,
                                                     int use_bus_pm);
extern void pcmcia_unregister_socket(struct socket_info_t *s);

static inline uint8_t exca_readb(vrc4173_socket_t *socket, uint16_t offset)
{
	return readb(socket->base + EXCA_REGS_BASE + offset);
}

static inline uint16_t exca_readw(vrc4173_socket_t *socket, uint16_t offset)
{
	uint16_t val;

	val = readb(socket->base + EXCA_REGS_BASE + offset);
	val |= (u16)readb(socket->base + EXCA_REGS_BASE + offset + 1) << 8;

	return val;
}

static inline void exca_writeb(vrc4173_socket_t *socket, uint16_t offset, uint8_t val)
{
	writeb(val, socket->base + EXCA_REGS_BASE + offset);
}

static inline void exca_writew(vrc4173_socket_t *socket, uint8_t offset, uint16_t val)
{
	writeb((u8)val, socket->base + EXCA_REGS_BASE + offset);
	writeb((u8)(val >> 8), socket->base + EXCA_REGS_BASE + offset + 1);
}

static inline uint32_t cardbus_socket_readl(vrc4173_socket_t *socket, u16 offset)
{
	return readl(socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
}

static inline void cardbus_socket_writel(vrc4173_socket_t *socket, u16 offset, uint32_t val)
{
	writel(val, socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
}

static void cardu_pciregs_init(struct pci_dev *dev)
{
	u32 syscnt;
	u16 brgcnt;
	u8 devcnt;

	pci_write_config_dword(dev, 0x1c, 0x10000000);
	pci_write_config_dword(dev, 0x20, 0x17fff000);
	pci_write_config_dword(dev, 0x2c, 0);
	pci_write_config_dword(dev, 0x30, 0xfffc);

	pci_read_config_word(dev, BRGCNT, &brgcnt);
	brgcnt &= ~IREQ_INT;
	pci_write_config_word(dev, BRGCNT, brgcnt);

	pci_read_config_dword(dev, SYSCNT, &syscnt);
	syscnt &= ~(BAD_VCC_REQ_DISB|PCPCI_EN|CH_ASSIGN_MASK|SUB_ID_WR_EN|PCI_CLK_RIN);
	syscnt |= (CH_ASSIGN_NODMA|ASYN_INT_MODE);
	pci_write_config_dword(dev, SYSCNT, syscnt);

	pci_read_config_byte(dev, DEVCNT, &devcnt);
	devcnt &= ~(ZOOM_VIDEO_EN|SR_PCI_INT_SEL_MASK|PCI_INT_MODE|IRQ_MODE);
	devcnt |= (SR_PCI_INT_SEL_NONE|IFG);
	pci_write_config_byte(dev, DEVCNT, devcnt);

	pci_write_config_byte(dev, CHIPCNT, S_PREF_DISB);

	pci_write_config_byte(dev, SERRDIS, 0);
}

static int cardu_init(unsigned int slot)
{
	vrc4173_socket_t *socket = &cardu_sockets[slot];

	cardu_pciregs_init(socket->dev);

	/* CARD_SC bits are cleared by reading CARD_SC. */
	exca_writeb(socket, GLO_CNT, 0);

	socket->cap.features |= SS_CAP_PCCARD | SS_CAP_PAGE_REGS;
	socket->cap.irq_mask = 0;
	socket->cap.map_size = 0x1000;
	socket->cap.pci_irq  = socket->dev->irq;
	socket->events = 0;
	spin_lock_init(socket->event_lock);

	/* Enable PC Card status interrupts */
	exca_writeb(socket, CARD_SCI, CARD_DT_EN|RDY_EN|BAT_WAR_EN|BAT_DEAD_EN);

	return 0;
}

static int cardu_register_callback(unsigned int sock,
                                           void (*handler)(void *, unsigned int),
                                           void * info)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];

	socket->handler = handler;
	socket->info = info;

	return 0;
}

static int cardu_inquire_socket(unsigned int sock, socket_cap_t *cap)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];

	*cap = socket->cap;

	return 0;
}

static int cardu_get_status(unsigned int sock, u_int *value)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint32_t state;
	uint8_t status;
	u_int val = 0;

	status = exca_readb(socket, IF_STATUS);
	if (status & CARD_PWR) val |= SS_POWERON;
	if (status & READY) val |= SS_READY;
	if (status & CARD_WP) val |= SS_WRPROT;
	if ((status & (CARD_DETECT1|CARD_DETECT2)) == (CARD_DETECT1|CARD_DETECT2))
		val |= SS_DETECT;
	if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
		if (status & STSCHG) val |= SS_STSCHG;
	} else {
		status &= BV_DETECT_MASK;
		if (status != BV_DETECT_GOOD) {
			if (status == BV_DETECT_WARN) val |= SS_BATWARN;
			else val |= SS_BATDEAD;
		}
	}

	state = cardbus_socket_readl(socket, SKT_PRE_STATE);
	if (state & VOL_3V_CARD_DT) val |= SS_3VCARD;
	if (state & VOL_XV_CARD_DT) val |= SS_XVCARD;
	if (state & CB_CARD_DT) val |= SS_CARDBUS;
	if (!(state &
	      (VOL_YV_CARD_DT|VOL_XV_CARD_DT|VOL_3V_CARD_DT|VOL_5V_CARD_DT|CCD20|CCD10)))
		val |= SS_PENDING;

	*value = val;

	return 0;
}

static inline uint8_t set_Vcc_value(u_char Vcc)
{
	switch (Vcc) {
	case 33:
		return VCC_3V;
	case 50:
		return VCC_5V;
	}

	return VCC_0V;
}

static inline uint8_t set_Vpp_value(u_char Vpp)
{
	switch (Vpp) {
	case 33:
	case 50:
		return VPP_VCC;
	case 120:
		return VPP_12V;
	}

	return VPP_0V;
}

static int cardu_set_socket(unsigned int sock, socket_state_t *state)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint8_t val;

	if (((state->Vpp == 33) || (state->Vpp == 50)) && (state->Vpp != state->Vcc))
			return -EINVAL;

	val = set_Vcc_value(state->Vcc);
	val |= set_Vpp_value(state->Vpp);
	if (state->flags & SS_OUTPUT_ENA) val |= CARD_OUT_EN;
	exca_writeb(socket, PWR_CNT, val);

	val = exca_readb(socket, INT_GEN_CNT) & CARD_REST0;
	if (state->flags & SS_RESET) val &= ~CARD_REST0;
	else val |= CARD_REST0;
	if (state->flags & SS_IOCARD) val |= CARD_TYPE_IO;
	exca_writeb(socket, INT_GEN_CNT, val);

	return 0;
}

static int cardu_get_io_map(unsigned int sock, struct pccard_io_map *io)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint8_t ioctl, window;
	u_char map;

	map = io->map;
	if (map > 1)
		return -EINVAL;

	io->start = exca_readw(socket, IO_WIN_SA(map));
	io->stop = exca_readw(socket, IO_WIN_EA(map));

	ioctl = exca_readb(socket, IO_WIN_CNT);
	window = exca_readb(socket, ADR_WIN_EN);
	io->flags  = (window & IO_WIN_EN(map)) ? MAP_ACTIVE : 0;
	if (ioctl & IO_WIN_DATA_AUTOSZ(map))
		io->flags |= MAP_AUTOSZ;
	else if (ioctl & IO_WIN_DATA_16BIT(map))
		io->flags |= MAP_16BIT;

	return 0;
}

static int cardu_set_io_map(unsigned int sock, struct pccard_io_map *io)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint16_t ioctl;
	uint8_t window, enable;
	u_char map;

	map = io->map;
	if (map > 1)
		return -EINVAL;

	window = exca_readb(socket, ADR_WIN_EN);
	enable = IO_WIN_EN(map);

	if (window & enable) {
		window &= ~enable;
		exca_writeb(socket, ADR_WIN_EN, window);
	}

	exca_writew(socket, IO_WIN_SA(map), io->start);
	exca_writew(socket, IO_WIN_EA(map), io->stop);

	ioctl = exca_readb(socket, IO_WIN_CNT) & ~IO_WIN_CNT_MASK(map);
	if (io->flags & MAP_AUTOSZ) ioctl |= IO_WIN_DATA_AUTOSZ(map);
	else if (io->flags & MAP_16BIT) ioctl |= IO_WIN_DATA_16BIT(map);
	exca_writeb(socket, IO_WIN_CNT, ioctl);

	if (io->flags & MAP_ACTIVE)
		exca_writeb(socket, ADR_WIN_EN, window | enable);

	return 0;
}

static int cardu_get_mem_map(unsigned int sock, struct pccard_mem_map *mem)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint32_t start, stop, offset, page;
	uint8_t window;
	u_char map;

	map = mem->map;
	if (map > 4)
		return -EINVAL;

	window = exca_readb(socket, ADR_WIN_EN);
	mem->flags = (window & MEM_WIN_EN(map)) ? MAP_ACTIVE : 0;

	start = exca_readw(socket, MEM_WIN_SA(map));
	mem->flags |= (start & MEM_WIN_DSIZE) ? MAP_16BIT : 0;
	start = (start & 0x0fff) << 12;

	stop = exca_readw(socket, MEM_WIN_EA(map));
	stop = ((stop & 0x0fff) << 12) + 0x0fff;

	offset = exca_readw(socket, MEM_WIN_OA(map));
	mem->flags |= (offset & MEM_WIN_WP) ? MAP_WRPROT : 0;
	mem->flags |= (offset & MEM_WIN_REGSET) ? MAP_ATTRIB : 0;
	offset = ((offset & 0x3fff) << 12) + start;
	mem->card_start = offset & 0x03ffffff;

	page = exca_readb(socket, MEM_WIN_SAU(map)) << 24;
	mem->sys_start = start + page;
	mem->sys_stop = start + page;

	return 0;
}

static int cardu_set_mem_map(unsigned int sock, struct pccard_mem_map *mem)
{
	vrc4173_socket_t *socket = &cardu_sockets[sock];
	uint16_t value;
	uint8_t window, enable;
	u_long sys_start, sys_stop, card_start;
	u_char map;

	map = mem->map;
	sys_start = mem->sys_start;
	sys_stop = mem->sys_stop;
	card_start = mem->card_start;

	if (map > 4 || sys_start > sys_stop || ((sys_start ^ sys_stop) >> 24) ||
	    (card_start >> 26))
		return -EINVAL;

	window = exca_readb(socket, ADR_WIN_EN);
	enable = MEM_WIN_EN(map);
	if (window & enable) {
		window &= ~enable;
		exca_writeb(socket, ADR_WIN_EN, window);
	}

	exca_writeb(socket, MEM_WIN_SAU(map), sys_start >> 24);

	value = (sys_start >> 12) & 0x0fff;
	if (mem->flags & MAP_16BIT) value |= MEM_WIN_DSIZE;
	exca_writew(socket, MEM_WIN_SA(map), value);

	value = (sys_stop >> 12) & 0x0fff;
	exca_writew(socket, MEM_WIN_EA(map), value);

	value = ((card_start - sys_start) >> 12) & 0x3fff;
	if (mem->flags & MAP_WRPROT) value |= MEM_WIN_WP;
	if (mem->flags & MAP_ATTRIB) value |= MEM_WIN_REGSET;
	exca_writew(socket, MEM_WIN_OA(map), value);

	if (mem->flags & MAP_ACTIVE)
		exca_writeb(socket, ADR_WIN_EN, window | enable);

	return 0;
}

static void cardu_proc_setup(unsigned int sock, struct proc_dir_entry *base)
{
}

static struct pccard_operations cardu_operations = {
	.init			= cardu_init,
	.register_callback	= cardu_register_callback,
	.inquire_socket		= cardu_inquire_socket,
	.get_status		= cardu_get_status,
	.set_socket		= cardu_set_socket,
	.get_io_map		= cardu_get_io_map,
	.set_io_map		= cardu_set_io_map,
	.get_mem_map		= cardu_get_mem_map,
	.set_mem_map		= cardu_set_mem_map,
	.proc_setup		= cardu_proc_setup,
};

static void cardu_bh(void *data)
{
	vrc4173_socket_t *socket = (vrc4173_socket_t *)data;
	uint16_t events;

	spin_lock_irq(&socket->event_lock);
	events = socket->events;
	socket->events = 0;
	spin_unlock_irq(&socket->event_lock);

	if (socket->handler)
		socket->handler(socket->info, events);
}

static uint16_t get_events(vrc4173_socket_t *socket)
{
	uint16_t events = 0;
	uint8_t csc, status;

	status = exca_readb(socket, IF_STATUS);
	csc = exca_readb(socket, CARD_SC);
	if ((csc & CARD_DT_CHG) &&
	    ((status & (CARD_DETECT1|CARD_DETECT2)) == (CARD_DETECT1|CARD_DETECT2)))
		events |= SS_DETECT;

	if ((csc & RDY_CHG) && (status & READY))
		events |= SS_READY;

	if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
		if ((csc & BAT_DEAD_ST_CHG) && (status & STSCHG))
			events |= SS_STSCHG;
	} else {
		if (csc & (BAT_WAR_CHG|BAT_DEAD_ST_CHG)) {
			if ((status & BV_DETECT_MASK) != BV_DETECT_GOOD) {
				if (status == BV_DETECT_WARN) events |= SS_BATWARN;
				else events |= SS_BATDEAD;
			}
		}
	}

	return events;
}

static void cardu_interrupt(int irq, void *dev_id)
{
	vrc4173_socket_t *socket = (vrc4173_socket_t *)dev_id;
	uint16_t events;

	INIT_WORK(&socket->tq_work, cardu_bh, socket);

	events = get_events(socket);
	if (events) {
		spin_lock(&socket->event_lock);
		socket->events |= events;
		spin_unlock(&socket->event_lock);
		schedule_work(&socket->tq_work);
	}
}

static int vrc4173_cardu_probe(struct pci_dev *dev,
                                         const struct pci_device_id *ent)
{
	vrc4173_socket_t *socket;
	unsigned long start, len, flags;
	int slot, err, ret;

	slot = vrc4173_cardu_slots++;
	socket = &cardu_sockets[slot];
	if (socket->noprobe != 0)
		return -EBUSY;

	sprintf(socket->name, "NEC VRC4173 CARDU%1d", slot+1);

	if ((err = pci_enable_device(dev)) < 0)
		return err;

	start = pci_resource_start(dev, 0);
	if (start == 0) {
		ret = -ENODEV;
		goto disable;
	}

	len = pci_resource_len(dev, 0);
	if (len == 0) {
		ret = -ENODEV;
		goto disable;
	}

	flags = pci_resource_flags(dev, 0);
	if ((flags & IORESOURCE_MEM) == 0) {
		ret = -EBUSY;
		goto disable;
	}

	err = pci_request_regions(dev, socket->name);
	if (err < 0) {
		ret = err;
		goto disable;
	}

	socket->base = ioremap(start, len);
	if (socket->base == NULL) {
		ret = -ENODEV;
		goto release;
	}

	socket->dev = dev;

	socket->pcmcia_socket = pcmcia_register_socket(slot, &cardu_operations, 1);
	if (socket->pcmcia_socket == NULL) {
		ret =  -ENOMEM;
		goto unmap;
	}

	if (request_irq(dev->irq, cardu_interrupt, IRQF_SHARED, socket->name, socket) < 0) {
		ret = -EBUSY;
		goto unregister;
	}

	printk(KERN_INFO "%s at %#08lx, IRQ %d\n", socket->name, start, dev->irq);

	return 0;

unregister:
	pcmcia_unregister_socket(socket->pcmcia_socket);
	socket->pcmcia_socket = NULL;
unmap:
	iounmap(socket->base);
	socket->base = NULL;
release:
	pci_release_regions(dev);
disable:
	pci_disable_device(dev);
	return ret;
}

static int vrc4173_cardu_setup(char *options)
{
	if (options == NULL || *options == '\0')
		return 1;

	if (strncmp(options, "cardu1:", 7) == 0) {
		options += 7;
		if (*options != '\0') {
			if (strncmp(options, "noprobe", 7) == 0) {
				cardu_sockets[CARDU1].noprobe = 1;
				options += 7;
			}

			if (*options != ',')
				return 1;
		} else
			return 1;
	}

	if (strncmp(options, "cardu2:", 7) == 0) {
		options += 7;
		if ((*options != '\0') && (strncmp(options, "noprobe", 7) == 0))
			cardu_sockets[CARDU2].noprobe = 1;
	}

	return 1;
}

__setup("vrc4173_cardu=", vrc4173_cardu_setup);

static DEFINE_PCI_DEVICE_TABLE(vrc4173_cardu_id_table) = {
	{ PCI_DEVICE(PCI_VENDOR_ID_NEC, PCI_DEVICE_ID_NEC_NAPCCARD) },
        {0, }
};

static struct pci_driver vrc4173_cardu_driver = {
	.name		= "NEC VRC4173 CARDU",
	.probe		= vrc4173_cardu_probe,
	.id_table	= vrc4173_cardu_id_table,
};

static int vrc4173_cardu_init(void)
{
	vrc4173_cardu_slots = 0;

	return pci_register_driver(&vrc4173_cardu_driver);
}

static void vrc4173_cardu_exit(void)
{
	pci_unregister_driver(&vrc4173_cardu_driver);
}

module_init(vrc4173_cardu_init);
module_exit(vrc4173_cardu_exit);
MODULE_DEVICE_TABLE(pci, vrc4173_cardu_id_table);
Commit	Line	Data
1da177e4 LT	1	/*
	2	* FILE NAME
	3	* drivers/pcmcia/vrc4173_cardu.c
	4	*
	5	* BRIEF MODULE DESCRIPTION
	6	* NEC VRC4173 CARDU driver for Socket Services
	7	* (This device doesn't support CardBus. it is supporting only 16bit PC Card.)
	8	*
ada8e951	9	* Copyright 2002,2003 Yoichi Yuasa <yuasa@linux-mips.org>
1da177e4 LT	10	*
	11	* This program is free software; you can redistribute it and/or modify it
	12	* under the terms of the GNU General Public License as published by the
	13	* Free Software Foundation; either version 2 of the License, or (at your
	14	* option) any later version.
	15	*
	16	* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
	17	* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
	18	* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
	19	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
	20	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
	21	* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
	22	* OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
	23	* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
	24	* TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
	25	* USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
	26	*
	27	* You should have received a copy of the GNU General Public License along
	28	* with this program; if not, write to the Free Software Foundation, Inc.,
	29	* 675 Mass Ave, Cambridge, MA 02139, USA.
	30	*/
	31	#include <linux/init.h>
	32	#include <linux/module.h>
	33	#include <linux/pci.h>
	34	#include <linux/spinlock.h>
	35	#include <linux/types.h>
	36
	37	#include <asm/io.h>
	38
	39	#include <pcmcia/ss.h>
	40
	41	#include "vrc4173_cardu.h"
	42
	43	MODULE_DESCRIPTION("NEC VRC4173 CARDU driver for Socket Services");
ada8e951	44	MODULE_AUTHOR("Yoichi Yuasa <yuasa@linux-mips.org>");
1da177e4 LT	45	MODULE_LICENSE("GPL");
	46
	47	static int vrc4173_cardu_slots;
	48
	49	static vrc4173_socket_t cardu_sockets[CARDU_MAX_SOCKETS];
	50
	51	extern struct socket_info_t *pcmcia_register_socket (int slot,
	52	struct pccard_operations *vtable,
	53	int use_bus_pm);
	54	extern void pcmcia_unregister_socket(struct socket_info_t *s);
	55
	56	static inline uint8_t exca_readb(vrc4173_socket_t *socket, uint16_t offset)
	57	{
	58	return readb(socket->base + EXCA_REGS_BASE + offset);
	59	}
	60
	61	static inline uint16_t exca_readw(vrc4173_socket_t *socket, uint16_t offset)
	62	{
	63	uint16_t val;
	64
	65	val = readb(socket->base + EXCA_REGS_BASE + offset);
	66	val \|= (u16)readb(socket->base + EXCA_REGS_BASE + offset + 1) << 8;
	67
	68	return val;
	69	}
	70
	71	static inline void exca_writeb(vrc4173_socket_t *socket, uint16_t offset, uint8_t val)
	72	{
	73	writeb(val, socket->base + EXCA_REGS_BASE + offset);
	74	}
	75
	76	static inline void exca_writew(vrc4173_socket_t *socket, uint8_t offset, uint16_t val)
	77	{
	78	writeb((u8)val, socket->base + EXCA_REGS_BASE + offset);
	79	writeb((u8)(val >> 8), socket->base + EXCA_REGS_BASE + offset + 1);
	80	}
	81
	82	static inline uint32_t cardbus_socket_readl(vrc4173_socket_t *socket, u16 offset)
	83	{
	84	return readl(socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
	85	}
	86
	87	static inline void cardbus_socket_writel(vrc4173_socket_t *socket, u16 offset, uint32_t val)
	88	{
	89	writel(val, socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
	90	}
	91
	92	static void cardu_pciregs_init(struct pci_dev *dev)
	93	{
	94	u32 syscnt;
	95	u16 brgcnt;
	96	u8 devcnt;
	97
	98	pci_write_config_dword(dev, 0x1c, 0x10000000);
	99	pci_write_config_dword(dev, 0x20, 0x17fff000);
	100	pci_write_config_dword(dev, 0x2c, 0);
	101	pci_write_config_dword(dev, 0x30, 0xfffc);
	102
	103	pci_read_config_word(dev, BRGCNT, &brgcnt);
	104	brgcnt &= ~IREQ_INT;
	105	pci_write_config_word(dev, BRGCNT, brgcnt);
	106
	107	pci_read_config_dword(dev, SYSCNT, &syscnt);
	108	syscnt &= ~(BAD_VCC_REQ_DISB\|PCPCI_EN\|CH_ASSIGN_MASK\|SUB_ID_WR_EN\|PCI_CLK_RIN);
109	syscnt \|= (CH_ASSIGN_NODMA\|ASYN_INT_MODE);
110	pci_write_config_dword(dev, SYSCNT, syscnt);
111
112	pci_read_config_byte(dev, DEVCNT, &devcnt);
113	devcnt &= ~(ZOOM_VIDEO_EN\|SR_PCI_INT_SEL_MASK\|PCI_INT_MODE\|IRQ_MODE);
114	devcnt \|= (SR_PCI_INT_SEL_NONE\|IFG);
115	pci_write_config_byte(dev, DEVCNT, devcnt);
116
117	pci_write_config_byte(dev, CHIPCNT, S_PREF_DISB);
118
119	pci_write_config_byte(dev, SERRDIS, 0);
120	}
121
122	static int cardu_init(unsigned int slot)
123	{
124	vrc4173_socket_t *socket = &cardu_sockets[slot];
125
126	cardu_pciregs_init(socket->dev);
127
128	/* CARD_SC bits are cleared by reading CARD_SC. */
129	exca_writeb(socket, GLO_CNT, 0);
130
131	socket->cap.features \|= SS_CAP_PCCARD \| SS_CAP_PAGE_REGS;
132	socket->cap.irq_mask = 0;
133	socket->cap.map_size = 0x1000;
134	socket->cap.pci_irq = socket->dev->irq;
135	socket->events = 0;
136	spin_lock_init(socket->event_lock);
137
138	/* Enable PC Card status interrupts */
139	exca_writeb(socket, CARD_SCI, CARD_DT_EN\|RDY_EN\|BAT_WAR_EN\|BAT_DEAD_EN);
140
141	return 0;
142	}
143
144	static int cardu_register_callback(unsigned int sock,
145	void (handler)(void , unsigned int),
146	void * info)
147	{
148	vrc4173_socket_t *socket = &cardu_sockets[sock];
149
150	socket->handler = handler;
151	socket->info = info;
152
153	return 0;
154	}
155
156	static int cardu_inquire_socket(unsigned int sock, socket_cap_t *cap)
157	{
158	vrc4173_socket_t *socket = &cardu_sockets[sock];
159
160	*cap = socket->cap;
161
162	return 0;
163	}
164
165	static int cardu_get_status(unsigned int sock, u_int *value)
166	{
167	vrc4173_socket_t *socket = &cardu_sockets[sock];
168	uint32_t state;
169	uint8_t status;
170	u_int val = 0;
171
172	status = exca_readb(socket, IF_STATUS);
173	if (status & CARD_PWR) val \|= SS_POWERON;
174	if (status & READY) val \|= SS_READY;
175	if (status & CARD_WP) val \|= SS_WRPROT;
176	if ((status & (CARD_DETECT1\|CARD_DETECT2)) == (CARD_DETECT1\|CARD_DETECT2))
177	val \|= SS_DETECT;
178	if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
179	if (status & STSCHG) val \|= SS_STSCHG;
180	} else {
181	status &= BV_DETECT_MASK;
182	if (status != BV_DETECT_GOOD) {
183	if (status == BV_DETECT_WARN) val \|= SS_BATWARN;
184	else val \|= SS_BATDEAD;
185	}
186	}
187
188	state = cardbus_socket_readl(socket, SKT_PRE_STATE);
189	if (state & VOL_3V_CARD_DT) val \|= SS_3VCARD;
190	if (state & VOL_XV_CARD_DT) val \|= SS_XVCARD;
191	if (state & CB_CARD_DT) val \|= SS_CARDBUS;
192	if (!(state &
193	(VOL_YV_CARD_DT\|VOL_XV_CARD_DT\|VOL_3V_CARD_DT\|VOL_5V_CARD_DT\|CCD20\|CCD10)))
194	val \|= SS_PENDING;
195
196	*value = val;
197
198	return 0;
199	}
200
1da177e4 LT	201	static inline uint8_t set_Vcc_value(u_char Vcc)
	202	{
	203	switch (Vcc) {
	204	case 33:
	205	return VCC_3V;
	206	case 50:
	207	return VCC_5V;
	208	}
	209
	210	return VCC_0V;
	211	}
	212
	213	static inline uint8_t set_Vpp_value(u_char Vpp)
	214	{
	215	switch (Vpp) {
	216	case 33:
	217	case 50:
	218	return VPP_VCC;
	219	case 120:
	220	return VPP_12V;
	221	}
	222
	223	return VPP_0V;
	224	}
	225
	226	static int cardu_set_socket(unsigned int sock, socket_state_t *state)
	227	{
	228	vrc4173_socket_t *socket = &cardu_sockets[sock];
	229	uint8_t val;
	230
	231	if (((state->Vpp == 33) \|\| (state->Vpp == 50)) && (state->Vpp != state->Vcc))
	232	return -EINVAL;
	233
	234	val = set_Vcc_value(state->Vcc);
	235	val \|= set_Vpp_value(state->Vpp);
	236	if (state->flags & SS_OUTPUT_ENA) val \|= CARD_OUT_EN;
	237	exca_writeb(socket, PWR_CNT, val);
	238
	239	val = exca_readb(socket, INT_GEN_CNT) & CARD_REST0;
	240	if (state->flags & SS_RESET) val &= ~CARD_REST0;
	241	else val \|= CARD_REST0;
	242	if (state->flags & SS_IOCARD) val \|= CARD_TYPE_IO;
	243	exca_writeb(socket, INT_GEN_CNT, val);
	244
	245	return 0;
	246	}
	247
	248	static int cardu_get_io_map(unsigned int sock, struct pccard_io_map *io)
	249	{
	250	vrc4173_socket_t *socket = &cardu_sockets[sock];
	251	uint8_t ioctl, window;
	252	u_char map;
	253
	254	map = io->map;
	255	if (map > 1)
	256	return -EINVAL;
	257
	258	io->start = exca_readw(socket, IO_WIN_SA(map));
	259	io->stop = exca_readw(socket, IO_WIN_EA(map));
	260
	261	ioctl = exca_readb(socket, IO_WIN_CNT);
	262	window = exca_readb(socket, ADR_WIN_EN);
	263	io->flags = (window & IO_WIN_EN(map)) ? MAP_ACTIVE : 0;
	264	if (ioctl & IO_WIN_DATA_AUTOSZ(map))
265	io->flags \|= MAP_AUTOSZ;
266	else if (ioctl & IO_WIN_DATA_16BIT(map))
267	io->flags \|= MAP_16BIT;
268
269	return 0;
270	}
271
272	static int cardu_set_io_map(unsigned int sock, struct pccard_io_map *io)
273	{
274	vrc4173_socket_t *socket = &cardu_sockets[sock];
275	uint16_t ioctl;
276	uint8_t window, enable;
277	u_char map;
278
279	map = io->map;
280	if (map > 1)
281	return -EINVAL;
282
283	window = exca_readb(socket, ADR_WIN_EN);
284	enable = IO_WIN_EN(map);
285
286	if (window & enable) {
287	window &= ~enable;
288	exca_writeb(socket, ADR_WIN_EN, window);
289	}
290
291	exca_writew(socket, IO_WIN_SA(map), io->start);
292	exca_writew(socket, IO_WIN_EA(map), io->stop);
293
294	ioctl = exca_readb(socket, IO_WIN_CNT) & ~IO_WIN_CNT_MASK(map);
295	if (io->flags & MAP_AUTOSZ) ioctl \|= IO_WIN_DATA_AUTOSZ(map);
296	else if (io->flags & MAP_16BIT) ioctl \|= IO_WIN_DATA_16BIT(map);
297	exca_writeb(socket, IO_WIN_CNT, ioctl);
298
299	if (io->flags & MAP_ACTIVE)
300	exca_writeb(socket, ADR_WIN_EN, window \| enable);
301
302	return 0;
303	}
304
305	static int cardu_get_mem_map(unsigned int sock, struct pccard_mem_map *mem)
306	{
307	vrc4173_socket_t *socket = &cardu_sockets[sock];
308	uint32_t start, stop, offset, page;
309	uint8_t window;
310	u_char map;
311
312	map = mem->map;
313	if (map > 4)
314	return -EINVAL;
315
316	window = exca_readb(socket, ADR_WIN_EN);
317	mem->flags = (window & MEM_WIN_EN(map)) ? MAP_ACTIVE : 0;
318
319	start = exca_readw(socket, MEM_WIN_SA(map));
320	mem->flags \|= (start & MEM_WIN_DSIZE) ? MAP_16BIT : 0;
321	start = (start & 0x0fff) << 12;
322
323	stop = exca_readw(socket, MEM_WIN_EA(map));
324	stop = ((stop & 0x0fff) << 12) + 0x0fff;
325
326	offset = exca_readw(socket, MEM_WIN_OA(map));
327	mem->flags \|= (offset & MEM_WIN_WP) ? MAP_WRPROT : 0;
328	mem->flags \|= (offset & MEM_WIN_REGSET) ? MAP_ATTRIB : 0;
329	offset = ((offset & 0x3fff) << 12) + start;
330	mem->card_start = offset & 0x03ffffff;
331
332	page = exca_readb(socket, MEM_WIN_SAU(map)) << 24;
333	mem->sys_start = start + page;
334	mem->sys_stop = start + page;
335
336	return 0;
337	}
338
339	static int cardu_set_mem_map(unsigned int sock, struct pccard_mem_map *mem)
340	{
341	vrc4173_socket_t *socket = &cardu_sockets[sock];
342	uint16_t value;
343	uint8_t window, enable;
344	u_long sys_start, sys_stop, card_start;
345	u_char map;
346
347	map = mem->map;
348	sys_start = mem->sys_start;
349	sys_stop = mem->sys_stop;
350	card_start = mem->card_start;
351
352	if (map > 4 \|\| sys_start > sys_stop \|\| ((sys_start ^ sys_stop) >> 24) \|\|
353	(card_start >> 26))
354	return -EINVAL;
355
356	window = exca_readb(socket, ADR_WIN_EN);
357	enable = MEM_WIN_EN(map);
358	if (window & enable) {
359	window &= ~enable;
360	exca_writeb(socket, ADR_WIN_EN, window);
361	}
362
363	exca_writeb(socket, MEM_WIN_SAU(map), sys_start >> 24);
364
365	value = (sys_start >> 12) & 0x0fff;
366	if (mem->flags & MAP_16BIT) value \|= MEM_WIN_DSIZE;
367	exca_writew(socket, MEM_WIN_SA(map), value);
368
369	value = (sys_stop >> 12) & 0x0fff;
370	exca_writew(socket, MEM_WIN_EA(map), value);
371
372	value = ((card_start - sys_start) >> 12) & 0x3fff;
373	if (mem->flags & MAP_WRPROT) value \|= MEM_WIN_WP;
374	if (mem->flags & MAP_ATTRIB) value \|= MEM_WIN_REGSET;
375	exca_writew(socket, MEM_WIN_OA(map), value);
376
377	if (mem->flags & MAP_ACTIVE)
378	exca_writeb(socket, ADR_WIN_EN, window \| enable);
379
380	return 0;
381	}
382
383	static void cardu_proc_setup(unsigned int sock, struct proc_dir_entry *base)
384	{
385	}
386
387	static struct pccard_operations cardu_operations = {
388	.init = cardu_init,
389	.register_callback = cardu_register_callback,
390	.inquire_socket = cardu_inquire_socket,
391	.get_status = cardu_get_status,
1da177e4 LT	392	.set_socket = cardu_set_socket,
	393	.get_io_map = cardu_get_io_map,
	394	.set_io_map = cardu_set_io_map,
	395	.get_mem_map = cardu_get_mem_map,
	396	.set_mem_map = cardu_set_mem_map,
	397	.proc_setup = cardu_proc_setup,
	398	};
	399
	400	static void cardu_bh(void *data)
	401	{
	402	vrc4173_socket_t socket = (vrc4173_socket_t )data;
	403	uint16_t events;
	404
	405	spin_lock_irq(&socket->event_lock);
	406	events = socket->events;
	407	socket->events = 0;
	408	spin_unlock_irq(&socket->event_lock);
	409
	410	if (socket->handler)
	411	socket->handler(socket->info, events);
	412	}
	413
	414	static uint16_t get_events(vrc4173_socket_t *socket)
	415	{
	416	uint16_t events = 0;
	417	uint8_t csc, status;
	418
	419	status = exca_readb(socket, IF_STATUS);
	420	csc = exca_readb(socket, CARD_SC);
	421	if ((csc & CARD_DT_CHG) &&
	422	((status & (CARD_DETECT1\|CARD_DETECT2)) == (CARD_DETECT1\|CARD_DETECT2)))
	423	events \|= SS_DETECT;
	424
	425	if ((csc & RDY_CHG) && (status & READY))
	426	events \|= SS_READY;
	427
	428	if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
	429	if ((csc & BAT_DEAD_ST_CHG) && (status & STSCHG))
	430	events \|= SS_STSCHG;
	431	} else {
	432	if (csc & (BAT_WAR_CHG\|BAT_DEAD_ST_CHG)) {
	433	if ((status & BV_DETECT_MASK) != BV_DETECT_GOOD) {
	434	if (status == BV_DETECT_WARN) events \|= SS_BATWARN;
	435	else events \|= SS_BATDEAD;
	436	}
	437	}
	438	}
	439
	440	return events;
	441	}
	442
7d12e780	443	static void cardu_interrupt(int irq, void *dev_id)
1da177e4 LT	444	{
	445	vrc4173_socket_t socket = (vrc4173_socket_t )dev_id;
	446	uint16_t events;
	447
	448	INIT_WORK(&socket->tq_work, cardu_bh, socket);
	449
	450	events = get_events(socket);
	451	if (events) {
	452	spin_lock(&socket->event_lock);
	453	socket->events \|= events;
	454	spin_unlock(&socket->event_lock);
	455	schedule_work(&socket->tq_work);
	456	}
	457	}
	458
34cdf25a	459	static int vrc4173_cardu_probe(struct pci_dev *dev,
1da177e4 LT	460	const struct pci_device_id *ent)
	461	{
	462	vrc4173_socket_t *socket;
	463	unsigned long start, len, flags;
1ab488de	464	int slot, err, ret;
1da177e4 LT	465
	466	slot = vrc4173_cardu_slots++;
	467	socket = &cardu_sockets[slot];
	468	if (socket->noprobe != 0)
	469	return -EBUSY;
	470
	471	sprintf(socket->name, "NEC VRC4173 CARDU%1d", slot+1);
	472
	473	if ((err = pci_enable_device(dev)) < 0)
	474	return err;
	475
	476	start = pci_resource_start(dev, 0);
1ab488de RR	477	if (start == 0) {
	478	ret = -ENODEV;
	479	goto disable;
	480	}
1da177e4 LT	481
1da177e4 LT	482	len = pci_resource_len(dev, 0);
1ab488de RR	483	if (len == 0) {
	484	ret = -ENODEV;
	485	goto disable;
	486	}
1da177e4	487
1ab488de RR	488	flags = pci_resource_flags(dev, 0);
	489	if ((flags & IORESOURCE_MEM) == 0) {
	490	ret = -EBUSY;
	491	goto disable;
	492	}
1da177e4	493
1ab488de RR	494	err = pci_request_regions(dev, socket->name);
	495	if (err < 0) {
	496	ret = err;
	497	goto disable;
	498	}
1da177e4 LT	499
1da177e4 LT	500	socket->base = ioremap(start, len);
1ab488de RR	501	if (socket->base == NULL) {
	502	ret = -ENODEV;
	503	goto release;
	504	}
1da177e4 LT	505
	506	socket->dev = dev;
	507
	508	socket->pcmcia_socket = pcmcia_register_socket(slot, &cardu_operations, 1);
	509	if (socket->pcmcia_socket == NULL) {
1ab488de RR	510	ret = -ENOMEM;
1ab488de RR	511	goto unmap;
1da177e4 LT	512	}
1da177e4 LT	513
dace1453	514	if (request_irq(dev->irq, cardu_interrupt, IRQF_SHARED, socket->name, socket) < 0) {
1ab488de RR	515	ret = -EBUSY;
1ab488de RR	516	goto unregister;
1da177e4 LT	517	}
	518
	519	printk(KERN_INFO "%s at %#08lx, IRQ %d\n", socket->name, start, dev->irq);
	520
	521	return 0;
1ab488de RR	522
	523	unregister:
	524	pcmcia_unregister_socket(socket->pcmcia_socket);
	525	socket->pcmcia_socket = NULL;
	526	unmap:
	527	iounmap(socket->base);
	528	socket->base = NULL;
	529	release:
	530	pci_release_regions(dev);
	531	disable:
	532	pci_disable_device(dev);
	533	return ret;
1da177e4 LT	534	}
1da177e4 LT	535
34cdf25a	536	static int vrc4173_cardu_setup(char *options)
1da177e4 LT	537	{
1da177e4 LT	538	if (options == NULL \|\| *options == '\0')
9b41046c	539	return 1;
1da177e4 LT	540
	541	if (strncmp(options, "cardu1:", 7) == 0) {
	542	options += 7;
	543	if (*options != '\0') {
	544	if (strncmp(options, "noprobe", 7) == 0) {
	545	cardu_sockets[CARDU1].noprobe = 1;
	546	options += 7;
	547	}
	548
	549	if (*options != ',')
9b41046c	550	return 1;
1da177e4	551	} else
9b41046c	552	return 1;
1da177e4 LT	553	}
	554
	555	if (strncmp(options, "cardu2:", 7) == 0) {
	556	options += 7;
	557	if ((*options != '\0') && (strncmp(options, "noprobe", 7) == 0))
	558	cardu_sockets[CARDU2].noprobe = 1;
	559	}
	560
9b41046c	561	return 1;
1da177e4 LT	562	}
	563
	564	__setup("vrc4173_cardu=", vrc4173_cardu_setup);
	565
2b2c5d8c AL	566	static DEFINE_PCI_DEVICE_TABLE(vrc4173_cardu_id_table) = {
2b2c5d8c AL	567	{ PCI_DEVICE(PCI_VENDOR_ID_NEC, PCI_DEVICE_ID_NEC_NAPCCARD) },
1da177e4 LT	568	{0, }
	569	};
	570
	571	static struct pci_driver vrc4173_cardu_driver = {
	572	.name = "NEC VRC4173 CARDU",
	573	.probe = vrc4173_cardu_probe,
	574	.id_table = vrc4173_cardu_id_table,
	575	};
	576
34cdf25a	577	static int vrc4173_cardu_init(void)
1da177e4 LT	578	{
	579	vrc4173_cardu_slots = 0;
	580
93b47684	581	return pci_register_driver(&vrc4173_cardu_driver);
1da177e4 LT	582	}
1da177e4 LT	583
e765a02c	584	static void vrc4173_cardu_exit(void)
1da177e4 LT	585	{
	586	pci_unregister_driver(&vrc4173_cardu_driver);
	587	}
	588
	589	module_init(vrc4173_cardu_init);
	590	module_exit(vrc4173_cardu_exit);
	591	MODULE_DEVICE_TABLE(pci, vrc4173_cardu_id_table);