sonypi.c

linux和2410结合开发 用他可以生成2410所需的zImage文件

/* 
 * Sony Programmable I/O Control Device driver for VAIO
 *
 * Copyright (C) 2001 Stelian Pop <[e-mail]>, Alc魐e
 *
 * Copyright (C) 2001 Michael Ashley <[e-mail]>
 *
 * Copyright (C) 2001 Junichi Morita <[e-mail]>
 *
 * Copyright (C) 2000 Takaya Kinjo <[e-mail]>
 *
 * Copyright (C) 2000 Andrew Tridgell <[e-mail]>
 *
 * Earlier work by Werner Almesberger, Paul `Rusty' Russell and Paul Mackerras.
 *
 * 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 program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * 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/config.h>
#include <linux/module.h>
#include <linux/pci.h>
#include <linux/sched.h>
#include <linux/init.h>
#include <linux/miscdevice.h>
#include <linux/poll.h>
#include <linux/delay.h>
#include <asm/uaccess.h>
#include <asm/io.h>
#include <asm/system.h>

#include "sonypi.h"
#include <linux/sonypi.h>

static struct sonypi_device sonypi_device;
static int minor = -1;
static int verbose; /* = 0 */
static int fnkeyinit; /* = 0 */
static int camera; /* = 0 */
static int compat; /* = 0 */

/* Inits the queue */
static inline void sonypi_initq(void) {
        sonypi_device.queue.head = sonypi_device.queue.tail = 0;
	sonypi_device.queue.len = 0;
	sonypi_device.queue.s_lock = (spinlock_t)SPIN_LOCK_UNLOCKED;
	init_waitqueue_head(&sonypi_device.queue.proc_list);
}

/* Pulls an event from the queue */
static inline unsigned char sonypi_pullq(void) {
        unsigned char result;
	unsigned long flags;

	spin_lock_irqsave(&sonypi_device.queue.s_lock, flags);
	if (!sonypi_device.queue.len) {
		spin_unlock_irqrestore(&sonypi_device.queue.s_lock, flags);
		return 0;
	}
	result = sonypi_device.queue.buf[sonypi_device.queue.head];
        sonypi_device.queue.head++;
	sonypi_device.queue.head &= (SONYPI_BUF_SIZE - 1);
	sonypi_device.queue.len--;
	spin_unlock_irqrestore(&sonypi_device.queue.s_lock, flags);
        return result;
}

/* Pushes an event into the queue */
static inline void sonypi_pushq(unsigned char event) {
	unsigned long flags;

	spin_lock_irqsave(&sonypi_device.queue.s_lock, flags);
	if (sonypi_device.queue.len == SONYPI_BUF_SIZE) {
		/* remove the first element */
        	sonypi_device.queue.head++;
		sonypi_device.queue.head &= (SONYPI_BUF_SIZE - 1);
		sonypi_device.queue.len--;
	}
	sonypi_device.queue.buf[sonypi_device.queue.tail] = event;
	sonypi_device.queue.tail++;
	sonypi_device.queue.tail &= (SONYPI_BUF_SIZE - 1);
	sonypi_device.queue.len++;

	kill_fasync(&sonypi_device.queue.fasync, SIGIO, POLL_IN);
	wake_up_interruptible(&sonypi_device.queue.proc_list);
	spin_unlock_irqrestore(&sonypi_device.queue.s_lock, flags);
}

/* Tests if the queue is empty */
static inline int sonypi_emptyq(void) {
        int result;
	unsigned long flags;

	spin_lock_irqsave(&sonypi_device.queue.s_lock, flags);
        result = (sonypi_device.queue.len == 0);
	spin_unlock_irqrestore(&sonypi_device.queue.s_lock, flags);
        return result;
}

static void sonypi_ecrset(u8 addr, u8 value) {

	wait_on_command(1, inb_p(SONYPI_CST_IOPORT) & 3);
	outb_p(0x81, SONYPI_CST_IOPORT);
	wait_on_command(0, inb_p(SONYPI_CST_IOPORT) & 2);
	outb_p(addr, SONYPI_DATA_IOPORT);
	wait_on_command(0, inb_p(SONYPI_CST_IOPORT) & 2);
	outb_p(value, SONYPI_DATA_IOPORT);
	wait_on_command(0, inb_p(SONYPI_CST_IOPORT) & 2);
}

static u8 sonypi_ecrget(u8 addr) {

	wait_on_command(1, inb_p(SONYPI_CST_IOPORT) & 3);
	outb_p(0x80, SONYPI_CST_IOPORT);
	wait_on_command(0, inb_p(SONYPI_CST_IOPORT) & 2);
	outb_p(addr, SONYPI_DATA_IOPORT);
	wait_on_command(0, inb_p(SONYPI_CST_IOPORT) & 2);
	return inb_p(SONYPI_DATA_IOPORT);
}

static u16 sonypi_ecrget16(u8 addr) {
	return sonypi_ecrget(addr) | (sonypi_ecrget(addr + 1) << 8);
}

/* Initializes the device - this comes from the AML code in the ACPI bios */
static void __devinit sonypi_type1_srs(void) {
	u32 v;

	pci_read_config_dword(sonypi_device.dev, SONYPI_G10A, &v);
	v = (v & 0xFFFF0000) | ((u32)sonypi_device.ioport1);
	pci_write_config_dword(sonypi_device.dev, SONYPI_G10A, v);

	pci_read_config_dword(sonypi_device.dev, SONYPI_G10A, &v);
	v = (v & 0xFFF0FFFF) | 
	    (((u32)sonypi_device.ioport1 ^ sonypi_device.ioport2) << 16);
	pci_write_config_dword(sonypi_device.dev, SONYPI_G10A, v);

	v = inl(SONYPI_IRQ_PORT);
	v &= ~(((u32)0x3) << SONYPI_IRQ_SHIFT);
	v |= (((u32)sonypi_device.bits) << SONYPI_IRQ_SHIFT);
	outl(v, SONYPI_IRQ_PORT);

	pci_read_config_dword(sonypi_device.dev, SONYPI_G10A, &v);
	v = (v & 0xFF1FFFFF) | 0x00C00000;
	pci_write_config_dword(sonypi_device.dev, SONYPI_G10A, v);
}

static void __devinit sonypi_type2_srs(void) {
	sonypi_ecrset(SONYPI_SHIB, (sonypi_device.ioport1 & 0xFF00) >> 8);
	sonypi_ecrset(SONYPI_SLOB,  sonypi_device.ioport1 & 0x00FF);
	sonypi_ecrset(SONYPI_SIRQ,  sonypi_device.bits);
	udelay(10);
}

/* Disables the device - this comes from the AML code in the ACPI bios */
static void __devexit sonypi_type1_dis(void) {
	u32 v;

	pci_read_config_dword(sonypi_device.dev, SONYPI_G10A, &v);
	v = v & 0xFF3FFFFF;
	pci_write_config_dword(sonypi_device.dev, SONYPI_G10A, v);

	v = inl(SONYPI_IRQ_PORT);
	v |= (0x3 << SONYPI_IRQ_SHIFT);
	outl(v, SONYPI_IRQ_PORT);
}

static void __devexit sonypi_type2_dis(void) {
	sonypi_ecrset(SONYPI_SHIB, 0);
	sonypi_ecrset(SONYPI_SLOB, 0);
	sonypi_ecrset(SONYPI_SIRQ, 0);
}

static u8 sonypi_call1(u8 dev) {
	u8 v1, v2;

	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(dev, sonypi_device.ioport2);
	v1 = inb_p(sonypi_device.ioport2);
	v2 = inb_p(sonypi_device.ioport1);
	return v2;
}

static u8 sonypi_call2(u8 dev, u8 fn) {
	u8 v1;

	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(dev, sonypi_device.ioport2);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(fn, sonypi_device.ioport1);
	v1 = inb_p(sonypi_device.ioport1);
	return v1;
}

static u8 sonypi_call3(u8 dev, u8 fn, u8 v) {
	u8 v1;

	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(dev, sonypi_device.ioport2);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(fn, sonypi_device.ioport1);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2);
	outb(v, sonypi_device.ioport1);
	v1 = inb_p(sonypi_device.ioport1);
	return v1;
}

static u8 sonypi_read(u8 fn) {
	u8 v1, v2;
	int n = 100;

	while (n--) {
		v1 = sonypi_call2(0x8f, fn);
		v2 = sonypi_call2(0x8f, fn);
		if (v1 == v2 && v1 != 0xff)
			return v1;
	}
	return 0xff;
}

/* Set brightness, hue etc */
static void sonypi_set(u8 fn, u8 v) {
	
	wait_on_command(0, sonypi_call3(0x90, fn, v));
}

/* Tests if the camera is ready */
static int sonypi_camera_ready(void) {
	u8 v;

	v = sonypi_call2(0x8f, SONYPI_CAMERA_STATUS);
	return (v != 0xff && (v & SONYPI_CAMERA_STATUS_READY));
}

/* Turns the camera off */
static void sonypi_camera_off(void) {

	sonypi_set(SONYPI_CAMERA_PICTURE, SONYPI_CAMERA_MUTE_MASK);

	if (!sonypi_device.camera_power)
		return;

	sonypi_call2(0x91, 0); 
	sonypi_device.camera_power = 0;
}

/* Turns the camera on */
static void sonypi_camera_on(void) {
	int i, j;

	if (sonypi_device.camera_power)
		return;

	for (j = 5; j > 0; j--) {

		while (sonypi_call2(0x91, 0x1) != 0) {
			set_current_state(TASK_UNINTERRUPTIBLE);
			schedule_timeout(1);
		}
		sonypi_call1(0x93);

		for (i = 400; i > 0; i--) {
			if (sonypi_camera_ready())
				break;
			set_current_state(TASK_UNINTERRUPTIBLE);
			schedule_timeout(1);
		}
		if (i != 0)
			break;
	}
	
	if (j == 0) {
		printk(KERN_WARNING "sonypi: failed to power on camera\n");
		return;
	}

	sonypi_set(0x10, 0x5a);
	sonypi_device.camera_power = 1;
}

/* sets the bluetooth subsystem power state */
static void sonypi_setbluetoothpower(u8 state) {

	state = (state != 0);
	if (sonypi_device.bluetooth_power && state) 
		return;
	if (!sonypi_device.bluetooth_power && !state) 
		return;
	
	sonypi_call2(0x96, state);
	sonypi_call1(0x93);
	sonypi_device.bluetooth_power = state;
}

/* Interrupt handler: some event is available */
void sonypi_irq(int irq, void *dev_id, struct pt_regs *regs) {
	u8 v1, v2, event = 0;
	int i;
	u8 sonypi_jogger_ev, sonypi_fnkey_ev;
	u8 sonypi_capture_ev, sonypi_bluetooth_ev;

	if (sonypi_device.model == SONYPI_DEVICE_MODEL_TYPE2) {
		sonypi_jogger_ev = SONYPI_TYPE2_JOGGER_EV;
		sonypi_fnkey_ev = SONYPI_TYPE2_FNKEY_EV;
		sonypi_capture_ev = SONYPI_TYPE2_CAPTURE_EV;
		sonypi_bluetooth_ev = SONYPI_TYPE2_BLUETOOTH_EV;
	}
	else {
		sonypi_jogger_ev = SONYPI_TYPE1_JOGGER_EV;
		sonypi_fnkey_ev = SONYPI_TYPE1_FNKEY_EV;
		sonypi_capture_ev = SONYPI_TYPE1_CAPTURE_EV;
		sonypi_bluetooth_ev = SONYPI_TYPE1_BLUETOOTH_EV;
	}

	v1 = inb_p(sonypi_device.ioport1);
	v2 = inb_p(sonypi_device.ioport2);

	if ((v2 & SONYPI_TYPE1_PKEY_EV) == SONYPI_TYPE1_PKEY_EV) {
		for (i = 0; sonypi_pkeyev[i].event; i++)
			if (sonypi_pkeyev[i].data == v1) {
				event = sonypi_pkeyev[i].event;
				goto found;
			}
	}
	if ((v2 & sonypi_jogger_ev) == sonypi_jogger_ev) {
		for (i = 0; sonypi_joggerev[i].event; i++)
			if (sonypi_joggerev[i].data == v1) {
				event = sonypi_joggerev[i].event;
				goto found;
			}
	}
	if ((v2 & sonypi_capture_ev) == sonypi_capture_ev) {
		for (i = 0; sonypi_captureev[i].event; i++)
			if (sonypi_captureev[i].data == v1) {
				event = sonypi_captureev[i].event;
				goto found;
			}
	}
	if ((v2 & sonypi_fnkey_ev) == sonypi_fnkey_ev) {
		for (i = 0; sonypi_fnkeyev[i].event; i++)
			if (sonypi_fnkeyev[i].data == v1) {
				event = sonypi_fnkeyev[i].event;
				goto found;
			}
	}
	if ((v2 & sonypi_bluetooth_ev) == sonypi_bluetooth_ev) {
		for (i = 0; sonypi_blueev[i].event; i++)
			if (sonypi_blueev[i].data == v1) {
				event = sonypi_blueev[i].event;
				goto found;
			}
	}
	if ((v2 & SONYPI_BACK_EV) == SONYPI_BACK_EV) {
		for (i = 0; sonypi_backev[i].event; i++)
			if (sonypi_backev[i].data == v1) {
				event = sonypi_backev[i].event;
				goto found;
			}
	}
	if ((v2 & SONYPI_LID_EV) == SONYPI_LID_EV) {
		for (i = 0; sonypi_lidev[i].event; i++)
			if (sonypi_lidev[i].data == v1) {
				event = sonypi_lidev[i].event;
				goto found;
			}
	}
	if (verbose)
		printk(KERN_WARNING 
		       "sonypi: unknown event port1=0x%02x,port2=0x%02x\n",v1,v2);
	return;

found:
	sonypi_pushq(event);
}

/* External camera command (exported to the motion eye v4l driver) */
u8 sonypi_camera_command(int command, u8 value) {
	u8 ret = 0;

	if (!camera)
		return 0;

	down(&sonypi_device.lock);

	switch(command) {
		case SONYPI_COMMAND_GETCAMERA:
			ret = sonypi_camera_ready();
			break;
		case SONYPI_COMMAND_SETCAMERA:
			if (value)
				sonypi_camera_on();
			else
				sonypi_camera_off();
			break;
		case SONYPI_COMMAND_GETCAMERABRIGHTNESS:
			ret = sonypi_read(SONYPI_CAMERA_BRIGHTNESS);
			break;
		case SONYPI_COMMAND_SETCAMERABRIGHTNESS:
			sonypi_set(SONYPI_CAMERA_BRIGHTNESS, value);