sonypi.c

来自「Linux Kernel 2.6.9 for OMAP1710」· C语言 代码 · 共 965 行 · 第 1/2 页

/*
 * Sony Programmable I/O Control Device driver for VAIO
 *
 * Copyright (C) 2001-2003 Stelian Pop <[e-mail]>
 *
 * Copyright (C) 2001-2002 Alc魐e <www.alcove.com>
 *
 * 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/input.h>
#include <linux/pci.h>
#include <linux/sched.h>
#include <linux/init.h>
#include <linux/interrupt.h>
#include <linux/miscdevice.h>
#include <linux/poll.h>
#include <linux/delay.h>
#include <linux/wait.h>
#include <linux/acpi.h>
#include <linux/dmi.h>
#include <linux/sysdev.h>

#include <asm/uaccess.h>
#include <asm/io.h>
#include <asm/system.h>

static int verbose; /* = 0 */

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

static struct sonypi_device sonypi_device;
static int minor = -1;
static int fnkeyinit; /* = 0 */
static int camera; /* = 0 */
static int compat; /* = 0 */
static int useinput = 1;
static unsigned long mask = 0xffffffff;

/* 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 = 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 int ec_read16(u8 addr, u16 *value) {
	u8 val_lb, val_hb;
	if (sonypi_ec_read(addr, &val_lb))
		return -1;
	if (sonypi_ec_read(addr + 1, &val_hb))
		return -1;
	*value = val_lb | (val_hb << 8);
	return 0;
}

/* Initializes the device - this comes from the AML code in the ACPI bios */
static void 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 sonypi_type2_srs(void) {
	if (sonypi_ec_write(SONYPI_SHIB, (sonypi_device.ioport1 & 0xFF00) >> 8))
		printk(KERN_WARNING "ec_write failed\n");
	if (sonypi_ec_write(SONYPI_SLOB,  sonypi_device.ioport1 & 0x00FF))
		printk(KERN_WARNING "ec_write failed\n");
	if (sonypi_ec_write(SONYPI_SIRQ,  sonypi_device.bits))
		printk(KERN_WARNING "ec_write failed\n");
	udelay(10);
}

/* Disables the device - this comes from the AML code in the ACPI bios */
static void 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 sonypi_type2_dis(void) {
	if (sonypi_ec_write(SONYPI_SHIB, 0))
		printk(KERN_WARNING "ec_write failed\n");
	if (sonypi_ec_write(SONYPI_SLOB, 0))
		printk(KERN_WARNING "ec_write failed\n");
	if (sonypi_ec_write(SONYPI_SIRQ, 0))
		printk(KERN_WARNING "ec_write failed\n");
}

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

	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2, ITERATIONS_LONG);
	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, ITERATIONS_LONG);
	outb(dev, sonypi_device.ioport2);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2, ITERATIONS_LONG);
	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, ITERATIONS_LONG);
	outb(dev, sonypi_device.ioport2);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2, ITERATIONS_LONG);
	outb(fn, sonypi_device.ioport1);
	wait_on_command(0, inb_p(sonypi_device.ioport2) & 2, ITERATIONS_LONG);
	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), ITERATIONS_SHORT);
}

/* 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)) {
			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)
			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;
	if (sonypi_device.bluetooth_power == state) 
		return;
	
	sonypi_call2(0x96, state);
	sonypi_call1(0x82);
	sonypi_device.bluetooth_power = state;
}

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

	v1 = inb_p(sonypi_device.ioport1);
	v2 = inb_p(sonypi_device.ioport1 + sonypi_device.evtype_offset);

	for (i = 0; sonypi_eventtypes[i].model; i++) {
		if (sonypi_device.model != sonypi_eventtypes[i].model)
			continue;
		if ((v2 & sonypi_eventtypes[i].data) != sonypi_eventtypes[i].data)
			continue;
		if (! (mask & sonypi_eventtypes[i].mask))
			continue;
		for (j = 0; sonypi_eventtypes[i].events[j].event; j++) {
			if (v1 == sonypi_eventtypes[i].events[j].data) {
				event = sonypi_eventtypes[i].events[j].event;
				goto found;
			}
		}
	}

	if (verbose)
		printk(KERN_WARNING 
		       "sonypi: unknown event port1=0x%02x,port2=0x%02x\n",v1,v2);
	/* We need to return IRQ_HANDLED here because there *are*
	 * events belonging to the sonypi device we don't know about, 
	 * but we still don't want those to pollute the logs... */
	return IRQ_HANDLED;

found:
	if (verbose > 1)
		printk(KERN_INFO 
		       "sonypi: event port1=0x%02x,port2=0x%02x\n", v1, v2);

#ifdef SONYPI_USE_INPUT
	if (useinput) {
		struct input_dev *jog_dev = &sonypi_device.jog_dev;
		if (event == SONYPI_EVENT_JOGDIAL_PRESSED)
			input_report_key(jog_dev, BTN_MIDDLE, 1);
		else if (event == SONYPI_EVENT_ANYBUTTON_RELEASED)
			input_report_key(jog_dev, BTN_MIDDLE, 0);
		else if ((event == SONYPI_EVENT_JOGDIAL_UP) ||
			 (event == SONYPI_EVENT_JOGDIAL_UP_PRESSED))
			input_report_rel(jog_dev, REL_WHEEL, 1);
		else if ((event == SONYPI_EVENT_JOGDIAL_DOWN) ||
			 (event == SONYPI_EVENT_JOGDIAL_DOWN_PRESSED))
			input_report_rel(jog_dev, REL_WHEEL, -1);
		input_sync(jog_dev);
	}
#endif /* SONYPI_USE_INPUT */
	sonypi_pushq(event);
	return IRQ_HANDLED;
}

/* 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);
			break;
		case SONYPI_COMMAND_GETCAMERACONTRAST:
			ret = sonypi_read(SONYPI_CAMERA_CONTRAST);
			break;
		case SONYPI_COMMAND_SETCAMERACONTRAST:
			sonypi_set(SONYPI_CAMERA_CONTRAST, value);
			break;
		case SONYPI_COMMAND_GETCAMERAHUE:
			ret = sonypi_read(SONYPI_CAMERA_HUE);
			break;
		case SONYPI_COMMAND_SETCAMERAHUE:
			sonypi_set(SONYPI_CAMERA_HUE, value);
			break;
		case SONYPI_COMMAND_GETCAMERACOLOR:
			ret = sonypi_read(SONYPI_CAMERA_COLOR);
			break;
		case SONYPI_COMMAND_SETCAMERACOLOR:
			sonypi_set(SONYPI_CAMERA_COLOR, value);
			break;
		case SONYPI_COMMAND_GETCAMERASHARPNESS:
			ret = sonypi_read(SONYPI_CAMERA_SHARPNESS);
			break;
		case SONYPI_COMMAND_SETCAMERASHARPNESS:
			sonypi_set(SONYPI_CAMERA_SHARPNESS, value);
			break;
		case SONYPI_COMMAND_GETCAMERAPICTURE:
			ret = sonypi_read(SONYPI_CAMERA_PICTURE);
			break;
		case SONYPI_COMMAND_SETCAMERAPICTURE:
			sonypi_set(SONYPI_CAMERA_PICTURE, value);
			break;
		case SONYPI_COMMAND_GETCAMERAAGC:
			ret = sonypi_read(SONYPI_CAMERA_AGC);
			break;
		case SONYPI_COMMAND_SETCAMERAAGC:
			sonypi_set(SONYPI_CAMERA_AGC, value);
			break;
		case SONYPI_COMMAND_GETCAMERADIRECTION:
			ret = sonypi_read(SONYPI_CAMERA_STATUS);
			ret &= SONYPI_DIRECTION_BACKWARDS;
			break;
		case SONYPI_COMMAND_GETCAMERAROMVERSION:
			ret = sonypi_read(SONYPI_CAMERA_ROMVERSION);
			break;
		case SONYPI_COMMAND_GETCAMERAREVISION:
			ret = sonypi_read(SONYPI_CAMERA_REVISION);
			break;
	}
	up(&sonypi_device.lock);
	return ret;
}

static int sonypi_misc_fasync(int fd, struct file *filp, int on) {
	int retval;

	retval = fasync_helper(fd, filp, on, &sonypi_device.queue.fasync);
	if (retval < 0)
		return retval;
	return 0;
}

static int sonypi_misc_release(struct inode * inode, struct file * file) {
	sonypi_misc_fasync(-1, file, 0);
	down(&sonypi_device.lock);
	sonypi_device.open_count--;
	up(&sonypi_device.lock);
	return 0;
}

static int sonypi_misc_open(struct inode * inode, struct file * file) {
	down(&sonypi_device.lock);
	/* Flush input queue on first open */
	if (!sonypi_device.open_count)
		sonypi_initq();
	sonypi_device.open_count++;
	up(&sonypi_device.lock);
	return 0;
}

static ssize_t sonypi_misc_read(struct file * file, char __user * buf,
			size_t count, loff_t *pos)
{
	DECLARE_WAITQUEUE(wait, current);
	ssize_t i = count;
	unsigned char c;

	if (sonypi_emptyq()) {
		if (file->f_flags & O_NONBLOCK)
			return -EAGAIN;
		add_wait_queue(&sonypi_device.queue.proc_list, &wait);
repeat:
		set_current_state(TASK_INTERRUPTIBLE);
		if (sonypi_emptyq() && !signal_pending(current)) {
			schedule();
			goto repeat;
		}