2344 lines
70 KiB
C
2344 lines
70 KiB
C
|
/*
|
||
|
* Front panel driver for Linux - 20000810 - Willy Tarreau - willy@meta-x.org.
|
||
|
* It includes and LCD display (/dev/lcd), a 4-key keypad (/dev/keypad), and a
|
||
|
* smart card reader (/dev/smartcard).
|
||
|
*
|
||
|
* Updates for this driver may be found here :
|
||
|
*
|
||
|
* http://w.ods.org/linux/kernel/lcdpanel/
|
||
|
*
|
||
|
* the driver skeleton has been stolen from nvram.c which was clearly written.
|
||
|
*
|
||
|
* Changes:
|
||
|
* 2000/08/10
|
||
|
* - keypad now scrolls LCD when not opened
|
||
|
* - released 0.5.1
|
||
|
* 2000/08/10
|
||
|
* - bug fixes
|
||
|
* - released 0.5.2
|
||
|
* 2000/08/10
|
||
|
* - Reposition LCD when opening /dev/keypad (WIP)
|
||
|
* - Released 0.5.3
|
||
|
* 2001/02/04
|
||
|
* - Start of port to kernel 2.4.1
|
||
|
* 2001/03/11
|
||
|
* - implementation of a 24-key keyboard scanner with less electronics
|
||
|
* around, thus allowing to release the IRQ line.
|
||
|
* 2001/03/25
|
||
|
* - the driver now compiles and works with both 2.4.2 and 2.2.18 kernels
|
||
|
* 2001/04/22
|
||
|
* - implementation of KS0074-based serial LCD (load with lcd_enabled=2 and lcd_hwidth=16)
|
||
|
* 2001/04/29
|
||
|
* - added back-light support, released 0.7.1
|
||
|
* 2001/05/01
|
||
|
* - added charset conversion table for ks0074, released 0.7.2
|
||
|
* 2001/05/08
|
||
|
* - start of rewriting towards v0.8
|
||
|
* 2001/10/21
|
||
|
* - replaced linux/malloc.h with linux/slab.h to be 2.4 compliant
|
||
|
* - definition of the multi-layer input system with its naming scheme
|
||
|
* - profile support for simplified configuration
|
||
|
* 2001/10/28
|
||
|
* - smartcard now works for telecards. /dev/smartcard returns the card serial number
|
||
|
* 2001/11/10
|
||
|
* - fix too short sleep for lcd_clear
|
||
|
* 2004/05/09
|
||
|
* - add support for hantronix LCD modules (RS on SELECTIN instead of AUTOLF)
|
||
|
* (load with lcd_enabled=3 or profile=3)
|
||
|
* 2004/06/04
|
||
|
* - changed all parallel LCD functions to be more generic. Now any
|
||
|
* connection of control signal is allowed with lcd_*_pin.
|
||
|
* 2004/07/23
|
||
|
* - cleaned up some code
|
||
|
* - added support for keypads with inverted inputs
|
||
|
* - added support for Nexcom's LCD/Keypad on profile 4
|
||
|
* - added character generator for chars 0-7 : "\e[LG{0-7}{8*2 hexdigits};"
|
||
|
* 2004/07/29 : 0.9.0
|
||
|
* - deprecated lcd_enabled and keypad_enabled in profit of *_type
|
||
|
* - changed configuration so that the user can choose everything at
|
||
|
* kernel compilation time
|
||
|
* 2004/07/31 : 0.9.2
|
||
|
* - fixed a stupid copy-paste bug affecting only the serial LCD
|
||
|
* - moved display geometries to lcd_init() to avoid problems with custom profiles.
|
||
|
* 2004/08/06 : 0.9.3
|
||
|
* - added a system notifier callback to print the system state on the LCD
|
||
|
* during reboots or halts.
|
||
|
*
|
||
|
* 2005/05/20 : 0.9.4
|
||
|
* - first working port on kernel 2.6
|
||
|
*
|
||
|
* 2006/12/18 : 0.9.5
|
||
|
* - fixed a long standing bug in 2.6 causing panics during reboot/kexec
|
||
|
* if the LCD was enabled but not initialized due to lack of parport.
|
||
|
*
|
||
|
* FIXME:
|
||
|
* - the initialization/deinitialization process is very dirty and should
|
||
|
* be rewritten. It may even be buggy.
|
||
|
*
|
||
|
* TODO:
|
||
|
* - document 24 keys keyboard (3 rows of 8 cols, 32 diodes + 2 inputs)
|
||
|
* - make the LCD a part of a virtual screen of Vx*Vy
|
||
|
* - make the inputs list smp-safe
|
||
|
* - change the keyboard to a double mapping : signals -> key_id -> values
|
||
|
* so that applications can change values without knowing signals
|
||
|
*
|
||
|
*/
|
||
|
|
||
|
#include <linux/module.h>
|
||
|
|
||
|
#include <linux/types.h>
|
||
|
#include <linux/errno.h>
|
||
|
#include <linux/signal.h>
|
||
|
#include <linux/sched.h>
|
||
|
#include <linux/spinlock.h>
|
||
|
#include <linux/smp_lock.h>
|
||
|
#include <linux/interrupt.h>
|
||
|
#include <linux/miscdevice.h>
|
||
|
#include <linux/slab.h> // previously <linux/malloc.h>
|
||
|
#include <linux/ioport.h>
|
||
|
#include <linux/fcntl.h>
|
||
|
#include <linux/init.h>
|
||
|
#include <linux/delay.h>
|
||
|
#include <linux/ctype.h>
|
||
|
#include <linux/parport.h>
|
||
|
#include <linux/version.h>
|
||
|
#include <linux/list.h>
|
||
|
#include <linux/notifier.h>
|
||
|
#include <linux/reboot.h>
|
||
|
#include <linux/utsrelease.h>
|
||
|
|
||
|
#include <asm/io.h>
|
||
|
#include <asm/uaccess.h>
|
||
|
#include <asm/system.h>
|
||
|
|
||
|
/* smartcard length */
|
||
|
#define SMARTCARD_BYTES 64
|
||
|
#define LCD_MINOR 156
|
||
|
#define KEYPAD_MINOR 185
|
||
|
#define SMARTCARD_MINOR 186
|
||
|
|
||
|
#define PANEL_VERSION "0.9.5"
|
||
|
|
||
|
#define LCD_MAXBYTES 256 /* max burst write */
|
||
|
|
||
|
#define SMARTCARD_LOGICAL_DETECTOR "S6" /* D6 wired to SELECT = card inserted */
|
||
|
|
||
|
#define KEYPAD_BUFFER 64
|
||
|
#define INPUT_POLL_TIME (HZ/50) /* poll the keyboard this every second */
|
||
|
#define KEYPAD_REP_START (10) /* a key starts to repeat after this times INPUT_POLL_TIME */
|
||
|
#define KEYPAD_REP_DELAY (2) /* a key repeats this times INPUT_POLL_TIME */
|
||
|
|
||
|
#define FLASH_LIGHT_TEMPO (200) /* keep the light on this times INPUT_POLL_TIME for each flash */
|
||
|
|
||
|
/* converts an r_str() input to an active high, bits string : 000BAOSE */
|
||
|
#define PNL_PINPUT(a) ((((unsigned char)(a)) ^ 0x7F) >> 3)
|
||
|
|
||
|
#define PNL_PBUSY 0x80 /* inverted input, active low */
|
||
|
#define PNL_PACK 0x40 /* direct input, active low */
|
||
|
#define PNL_POUTPA 0x20 /* direct input, active high */
|
||
|
#define PNL_PSELECD 0x10 /* direct input, active high */
|
||
|
#define PNL_PERRORP 0x08 /* direct input, active low */
|
||
|
|
||
|
#define PNL_PBIDIR 0x20 /* bi-directional ports */
|
||
|
#define PNL_PINTEN 0x10 /* high to read data in or-ed with data out */
|
||
|
#define PNL_PSELECP 0x08 /* inverted output, active low */
|
||
|
#define PNL_PINITP 0x04 /* direct output, active low */
|
||
|
#define PNL_PAUTOLF 0x02 /* inverted output, active low */
|
||
|
#define PNL_PSTROBE 0x01 /* inverted output */
|
||
|
|
||
|
#define PNL_PD0 0x01
|
||
|
#define PNL_PD1 0x02
|
||
|
#define PNL_PD2 0x04
|
||
|
#define PNL_PD3 0x08
|
||
|
#define PNL_PD4 0x10
|
||
|
#define PNL_PD5 0x20
|
||
|
#define PNL_PD6 0x40
|
||
|
#define PNL_PD7 0x80
|
||
|
|
||
|
#define PIN_NONE 0
|
||
|
#define PIN_STROBE 1
|
||
|
#define PIN_D0 2
|
||
|
#define PIN_D1 3
|
||
|
#define PIN_D2 4
|
||
|
#define PIN_D3 5
|
||
|
#define PIN_D4 6
|
||
|
#define PIN_D5 7
|
||
|
#define PIN_D6 8
|
||
|
#define PIN_D7 9
|
||
|
#define PIN_AUTOLF 14
|
||
|
#define PIN_INITP 16
|
||
|
#define PIN_SELECP 17
|
||
|
#define PIN_NOT_SET 127
|
||
|
|
||
|
/* some smartcard-specific signals */
|
||
|
#define PNL_SC_IO PNL_PD1 /* Warning! inverted output, 0=highZ */
|
||
|
#define PNL_SC_RST PNL_PD2
|
||
|
#define PNL_SC_CLK PNL_PD3
|
||
|
#define PNL_SC_RW PNL_PD4
|
||
|
#define PNL_SC_ENA PNL_PINITP
|
||
|
#define PNL_SC_IOR PNL_PACK
|
||
|
#define PNL_SC_BITS (PNL_SC_IO | PNL_SC_RST | PNL_SC_CLK | PNL_SC_RW)
|
||
|
|
||
|
#define LCD_FLAG_S 0x0001
|
||
|
#define LCD_FLAG_ID 0x0002
|
||
|
#define LCD_FLAG_B 0x0004 /* blink on */
|
||
|
#define LCD_FLAG_C 0x0008 /* cursor on */
|
||
|
#define LCD_FLAG_D 0x0010 /* display on */
|
||
|
#define LCD_FLAG_F 0x0020 /* large font mode */
|
||
|
#define LCD_FLAG_N 0x0040 /* 2-rows mode */
|
||
|
#define LCD_FLAG_L 0x0080 /* backlight enabled */
|
||
|
|
||
|
#define LCD_ESCAPE_LEN 24 /* 24 chars max for an LCD escape command */
|
||
|
#define LCD_ESCAPE_CHAR 27 /* use char 27 for escape command */
|
||
|
|
||
|
/* macros to simplify use of the parallel port */
|
||
|
#define r_ctr(x) (parport_read_control((x)->port))
|
||
|
#define r_dtr(x) (parport_read_data((x)->port))
|
||
|
#define r_str(x) (parport_read_status((x)->port))
|
||
|
#define w_ctr(x,y) do { parport_write_control((x)->port, (y)); } while (0)
|
||
|
#define w_dtr(x,y) do { parport_write_data((x)->port, (y)); } while (0)
|
||
|
|
||
|
/* this defines which bits are to be used and which ones to be ignored */
|
||
|
static __u8 scan_mask_o = 0; /* logical or of the output bits involved in the scan matrix */
|
||
|
static __u8 scan_mask_i = 0; /* logical or of the input bits involved in the scan matrix */
|
||
|
|
||
|
typedef __u64 pmask_t;
|
||
|
|
||
|
enum input_type {
|
||
|
INPUT_TYPE_STD,
|
||
|
INPUT_TYPE_KBD,
|
||
|
};
|
||
|
|
||
|
enum input_state {
|
||
|
INPUT_ST_LOW,
|
||
|
INPUT_ST_RISING,
|
||
|
INPUT_ST_HIGH,
|
||
|
INPUT_ST_FALLING,
|
||
|
};
|
||
|
|
||
|
struct logical_input {
|
||
|
struct list_head list;
|
||
|
pmask_t mask;
|
||
|
pmask_t value;
|
||
|
enum input_type type;
|
||
|
enum input_state state;
|
||
|
__u8 rise_time, fall_time;
|
||
|
__u8 rise_timer, fall_timer, high_timer;
|
||
|
|
||
|
union {
|
||
|
struct { /* this structure is valid when type == INPUT_TYPE_STD */
|
||
|
void(*press_fct)(int);
|
||
|
void(*release_fct)(int);
|
||
|
int press_data;
|
||
|
int release_data;
|
||
|
} std;
|
||
|
struct { /* this structure is valid when type == INPUT_TYPE_KBD */
|
||
|
/* strings can be full-length (ie. non null-terminated) */
|
||
|
char press_str[sizeof(void *) + sizeof (int)];
|
||
|
char repeat_str[sizeof(void *) + sizeof (int)];
|
||
|
char release_str[sizeof(void *) + sizeof (int)];
|
||
|
} kbd;
|
||
|
} u;
|
||
|
};
|
||
|
|
||
|
LIST_HEAD(logical_inputs); /* list of all defined logical inputs */
|
||
|
|
||
|
/* physical contacts history
|
||
|
* Physical contacts are a 45 bits string of 9 groups of 5 bits each.
|
||
|
* The 8 lower groups correspond to output bits 0 to 7, and the 9th group
|
||
|
* corresponds to the ground.
|
||
|
* Within each group, bits are stored in the same order as read on the port :
|
||
|
* BAPSE (busy=4, ack=3, paper empty=2, select=1, error=0).
|
||
|
* So, each __u64 (or pmask_t) is represented like this :
|
||
|
* 0000000000000000000BAPSEBAPSEBAPSEBAPSEBAPSEBAPSEBAPSEBAPSEBAPSE
|
||
|
* <-----unused------><gnd><d07><d06><d05><d04><d03><d02><d01><d00>
|
||
|
*/
|
||
|
static pmask_t phys_read; /* what has just been read from the I/O ports */
|
||
|
static pmask_t phys_read_prev; /* previous phys_read */
|
||
|
static pmask_t phys_curr; /* stabilized phys_read (phys_read|phys_read_prev) */
|
||
|
static pmask_t phys_prev; /* previous phys_curr */
|
||
|
static char inputs_stable = 0; /* 0 means that at least one logical signal needs be computed */
|
||
|
|
||
|
/* these variables are specific to the smartcard */
|
||
|
static __u8 smartcard_data[SMARTCARD_BYTES];
|
||
|
static int smartcard_ptr = 0; /* pointer to half bytes in smartcard_data */
|
||
|
|
||
|
/* these variables are specific to the keypad */
|
||
|
static char keypad_buffer[KEYPAD_BUFFER];
|
||
|
static int keypad_buflen = 0;
|
||
|
static int keypad_start = 0;
|
||
|
static char keypressed = 0;
|
||
|
static wait_queue_head_t keypad_read_wait;
|
||
|
static wait_queue_head_t smartcard_read_wait;
|
||
|
|
||
|
/* lcd-specific variables */
|
||
|
static unsigned long int lcd_flags = 0; /* contains the LCD config state */
|
||
|
static unsigned long int lcd_addr_x = 0; /* contains the LCD X offset */
|
||
|
static unsigned long int lcd_addr_y = 0; /* contains the LCD Y offset */
|
||
|
static char lcd_escape[LCD_ESCAPE_LEN+1]; /* current escape sequence, 0 terminated */
|
||
|
static int lcd_escape_len = -1; /* not in escape state. >=0 = escape cmd len */
|
||
|
|
||
|
static int lcd_height = -1;
|
||
|
static int lcd_width = -1;
|
||
|
static int lcd_hwidth = -1; /* hardware buffer width (usually 64) */
|
||
|
static int lcd_bwidth = -1; /* internal buffer width (usually 40) */
|
||
|
|
||
|
/*
|
||
|
* These are the parallel port pins the LCD control signals are connected to.
|
||
|
* Set this to 0 if the signal is not used. Set it to its opposite value
|
||
|
* (negative) if the signal is negated. -MAXINT is used to indicate that the
|
||
|
* pin has not been explicitly specified.
|
||
|
*
|
||
|
* WARNING! no check will be performed about collisions with keypad/smartcard !
|
||
|
*/
|
||
|
static int lcd_e_pin = PIN_NOT_SET;
|
||
|
static int lcd_rs_pin = PIN_NOT_SET;
|
||
|
static int lcd_rw_pin = PIN_NOT_SET;
|
||
|
static int lcd_bl_pin = PIN_NOT_SET;
|
||
|
static int lcd_cl_pin = PIN_NOT_SET;
|
||
|
static int lcd_da_pin = PIN_NOT_SET;
|
||
|
|
||
|
/*
|
||
|
* Bit masks to convert LCD signals to parallel port outputs.
|
||
|
* _d_ are values for data port, _c_ are for control port.
|
||
|
* [0] = signal OFF, [1] = signal ON, [2] = mask
|
||
|
*/
|
||
|
#define BIT_CLR 0
|
||
|
#define BIT_SET 1
|
||
|
#define BIT_MSK 2
|
||
|
#define BIT_STATES 3
|
||
|
/*
|
||
|
* one entry for each bit on the LCD
|
||
|
*/
|
||
|
#define LCD_BIT_E 0
|
||
|
#define LCD_BIT_RS 1
|
||
|
#define LCD_BIT_RW 2
|
||
|
#define LCD_BIT_BL 3
|
||
|
#define LCD_BIT_CL 4
|
||
|
#define LCD_BIT_DA 5
|
||
|
#define LCD_BITS 6
|
||
|
|
||
|
/*
|
||
|
* each bit can be either connected to a DATA or CTRL port
|
||
|
*/
|
||
|
#define LCD_PORT_C 0
|
||
|
#define LCD_PORT_D 1
|
||
|
#define LCD_PORTS 2
|
||
|
|
||
|
static unsigned char lcd_bits[LCD_PORTS][LCD_BITS][BIT_STATES];
|
||
|
|
||
|
/*
|
||
|
* LCD protocols
|
||
|
*/
|
||
|
#define LCD_PROTO_PARALLEL 0
|
||
|
#define LCD_PROTO_SERIAL 1
|
||
|
|
||
|
/*
|
||
|
* LCD character sets
|
||
|
*/
|
||
|
#define LCD_CHARSET_NORMAL 0
|
||
|
#define LCD_CHARSET_KS0074 1
|
||
|
|
||
|
/*
|
||
|
* LCD types
|
||
|
*/
|
||
|
#define LCD_TYPE_NONE 0
|
||
|
#define LCD_TYPE_OLD 1
|
||
|
#define LCD_TYPE_KS0074 2
|
||
|
#define LCD_TYPE_HANTRONIX 3
|
||
|
#define LCD_TYPE_NEXCOM 4
|
||
|
#define LCD_TYPE_CUSTOM 5
|
||
|
|
||
|
/*
|
||
|
* keypad types
|
||
|
*/
|
||
|
#define KEYPAD_TYPE_NONE 0
|
||
|
#define KEYPAD_TYPE_OLD 1
|
||
|
#define KEYPAD_TYPE_NEW 2
|
||
|
#define KEYPAD_TYPE_NEXCOM 3
|
||
|
|
||
|
/*
|
||
|
* panel profiles
|
||
|
*/
|
||
|
#define PANEL_PROFILE_CUSTOM 0
|
||
|
#define PANEL_PROFILE_OLD 1
|
||
|
#define PANEL_PROFILE_NEW 2
|
||
|
#define PANEL_PROFILE_HANTRONIX 3
|
||
|
#define PANEL_PROFILE_NEXCOM 4
|
||
|
#define PANEL_PROFILE_LARGE 5
|
||
|
|
||
|
/*
|
||
|
* Construct custom config from the kernel's configuration
|
||
|
*/
|
||
|
#define DEFAULT_PROFILE PANEL_PROFILE_LARGE
|
||
|
#define DEFAULT_PARPORT 0
|
||
|
#define DEFAULT_LCD LCD_TYPE_OLD
|
||
|
#define DEFAULT_KEYPAD KEYPAD_TYPE_OLD
|
||
|
#define DEFAULT_SMARTCARD 0
|
||
|
#define DEFAULT_LCD_WIDTH 40
|
||
|
#define DEFAULT_LCD_BWIDTH 40
|
||
|
#define DEFAULT_LCD_HWIDTH 64
|
||
|
#define DEFAULT_LCD_HEIGHT 2
|
||
|
#define DEFAULT_LCD_PROTO LCD_PROTO_PARALLEL
|
||
|
|
||
|
#define DEFAULT_LCD_PIN_E PIN_AUTOLF
|
||
|
#define DEFAULT_LCD_PIN_RS PIN_SELECP
|
||
|
#define DEFAULT_LCD_PIN_RW PIN_INITP
|
||
|
#define DEFAULT_LCD_PIN_SCL PIN_STROBE
|
||
|
#define DEFAULT_LCD_PIN_SDA PIN_D0
|
||
|
#define DEFAULT_LCD_PIN_BL PIN_NOT_SET
|
||
|
#define DEFAULT_LCD_CHARSET LCD_CHARSET_NORMAL
|
||
|
|
||
|
#ifdef CONFIG_PANEL_PROFILE
|
||
|
#undef DEFAULT_PROFILE
|
||
|
#define DEFAULT_PROFILE CONFIG_PANEL_PROFILE
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_PARPORT
|
||
|
#undef DEFAULT_PARPORT
|
||
|
#define DEFAULT_PARPORT CONFIG_PANEL_PARPORT
|
||
|
#endif
|
||
|
|
||
|
#if DEFAULT_PROFILE==0 /* custom */
|
||
|
#ifdef CONFIG_PANEL_KEYPAD
|
||
|
#undef DEFAULT_KEYPAD
|
||
|
#define DEFAULT_KEYPAD CONFIG_PANEL_KEYPAD
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_SMARTCARD
|
||
|
#undef DEFAULT_SMARTCARD
|
||
|
#define DEFAULT_SMARTCARD 1
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD
|
||
|
#undef DEFAULT_LCD
|
||
|
#define DEFAULT_LCD CONFIG_PANEL_LCD
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_WIDTH
|
||
|
#undef DEFAULT_LCD_WIDTH
|
||
|
#define DEFAULT_LCD_WIDTH CONFIG_PANEL_LCD_WIDTH
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_BWIDTH
|
||
|
#undef DEFAULT_LCD_BWIDTH
|
||
|
#define DEFAULT_LCD_BWIDTH CONFIG_PANEL_LCD_BWIDTH
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_HWIDTH
|
||
|
#undef DEFAULT_LCD_HWIDTH
|
||
|
#define DEFAULT_LCD_HWIDTH CONFIG_PANEL_LCD_HWIDTH
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_HEIGHT
|
||
|
#undef DEFAULT_LCD_HEIGHT
|
||
|
#define DEFAULT_LCD_HEIGHT CONFIG_PANEL_LCD_HEIGHT
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PROTO
|
||
|
#undef DEFAULT_LCD_PROTO
|
||
|
#define DEFAULT_LCD_PROTO CONFIG_PANEL_LCD_PROTO
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_E
|
||
|
#undef DEFAULT_LCD_PIN_E
|
||
|
#define DEFAULT_LCD_PIN_E CONFIG_PANEL_LCD_PIN_E
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_RS
|
||
|
#undef DEFAULT_LCD_PIN_RS
|
||
|
#define DEFAULT_LCD_PIN_RS CONFIG_PANEL_LCD_PIN_RS
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_RW
|
||
|
#undef DEFAULT_LCD_PIN_RW
|
||
|
#define DEFAULT_LCD_PIN_RW CONFIG_PANEL_LCD_PIN_RW
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_SCL
|
||
|
#undef DEFAULT_LCD_PIN_SCL
|
||
|
#define DEFAULT_LCD_PIN_SCL CONFIG_PANEL_LCD_PIN_SCL
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_SDA
|
||
|
#undef DEFAULT_LCD_PIN_SDA
|
||
|
#define DEFAULT_LCD_PIN_SDA CONFIG_PANEL_LCD_PIN_SDA
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_PIN_BL
|
||
|
#undef DEFAULT_LCD_PIN_BL
|
||
|
#define DEFAULT_LCD_PIN_BL CONFIG_PANEL_LCD_PIN_BL
|
||
|
#endif
|
||
|
|
||
|
#ifdef CONFIG_PANEL_LCD_CHARSET
|
||
|
#undef DEFAULT_LCD_CHARSET
|
||
|
#define DEFAULT_LCD_CHARSET
|
||
|
#endif
|
||
|
|
||
|
#endif /* DEFAULT_PROFILE == 0 */
|
||
|
|
||
|
/* global variables */
|
||
|
static int smartcard_open_cnt = 0; /* #times opened */
|
||
|
static int keypad_open_cnt = 0; /* #times opened */
|
||
|
static int lcd_open_cnt = 0; /* #times opened */
|
||
|
|
||
|
static int profile = DEFAULT_PROFILE;
|
||
|
static struct pardevice *pprt = NULL;
|
||
|
static int parport = -1;
|
||
|
static int lcd_enabled = -1;
|
||
|
static int lcd_type = -1;
|
||
|
static int lcd_proto = -1;
|
||
|
static int lcd_charset = -1;
|
||
|
static int keypad_enabled = -1;
|
||
|
static int keypad_type = -1;
|
||
|
static int smartcard_enabled = -1;
|
||
|
|
||
|
static int lcd_initialized, keypad_initialized, smartcard_initialized;
|
||
|
|
||
|
static int light_tempo = 0;
|
||
|
|
||
|
static char lcd_must_clear = 0;
|
||
|
static char lcd_left_shift = 0;
|
||
|
static char init_in_progress = 0;
|
||
|
|
||
|
static void(*lcd_write_cmd)(int) = NULL;
|
||
|
static void(*lcd_write_data)(int) = NULL;
|
||
|
static void(*lcd_clear_fast)(void) = NULL;
|
||
|
|
||
|
static spinlock_t pprt_lock = SPIN_LOCK_UNLOCKED;
|
||
|
static struct timer_list scan_timer;
|
||
|
|
||
|
#ifdef MODULE
|
||
|
|
||
|
MODULE_DESCRIPTION("Generic parallel port LCD/Keypad/Smartcard driver");
|
||
|
module_param(parport, int, 0000);MODULE_PARM_DESC(parport, "Parallel port index (0=lpt1, 1=lpt2, ...)");
|
||
|
module_param(lcd_height, int, 0000);MODULE_PARM_DESC(lcd_height, "Number of lines on the LCD");
|
||
|
module_param(lcd_width, int, 0000);MODULE_PARM_DESC(lcd_width, "Number of columns on the LCD");
|
||
|
module_param(lcd_bwidth, int, 0000);MODULE_PARM_DESC(lcd_bwidth, "Internal LCD line width (40)");
|
||
|
module_param(lcd_hwidth, int, 0000);MODULE_PARM_DESC(lcd_hwidth, "LCD line hardware address (64)");
|
||
|
module_param(lcd_enabled, int, 0000);MODULE_PARM_DESC(lcd_enabled, "Deprecated option, use lcd_type instead");
|
||
|
module_param(keypad_enabled, int, 0000);MODULE_PARM_DESC(keypad_enabled, "Deprecated option, use keypad_type instead");
|
||
|
module_param(lcd_type, int, 0000);MODULE_PARM_DESC(lcd_type, "LCD type: 0=none, 1=old //, 2=serial ks0074, 3=hantronix //, 4=nexcom //, 5=compiled-in");
|
||
|
module_param(lcd_proto, int, 0000);MODULE_PARM_DESC(lcd_proto, "LCD communication: 0=parallel (//), 1=serial");
|
||
|
module_param(lcd_charset, int, 0000);MODULE_PARM_DESC(lcd_charset, "LCD character set: 0=standard, 1=KS0074");
|
||
|
module_param(keypad_type, int, 0000);MODULE_PARM_DESC(keypad_type, "Keypad type: 0=none, 1=old 6 keys, 2=new 6+1 keys, 3=nexcom 4 keys");
|
||
|
module_param(smartcard_enabled, int, 0000);MODULE_PARM_DESC(smartcard_enabled, "Smartcard reader: 0=disabled (default), 1=enabled");
|
||
|
module_param(profile, int, 0000); MODULE_PARM_DESC(profile, "1=16x2 old kp; 2=serial 16x2, new kp; 3=16x2 hantronix; 4=16x2 nexcom; default=40x2, old kp");
|
||
|
|
||
|
module_param(lcd_e_pin, int, 0000); MODULE_PARM_DESC(lcd_e_pin, "# of the // port pin connected to LCD 'E' signal, with polarity (-17..17)");
|
||
|
module_param(lcd_rs_pin, int, 0000);MODULE_PARM_DESC(lcd_rs_pin, "# of the // port pin connected to LCD 'RS' signal, with polarity (-17..17)");
|
||
|
module_param(lcd_rw_pin, int, 0000);MODULE_PARM_DESC(lcd_rw_pin, "# of the // port pin connected to LCD 'RW' signal, with polarity (-17..17)");
|
||
|
module_param(lcd_bl_pin, int, 0000);MODULE_PARM_DESC(lcd_bl_pin, "# of the // port pin connected to LCD backlight, with polarity (-17..17)");
|
||
|
module_param(lcd_da_pin, int, 0000);MODULE_PARM_DESC(lcd_da_pin, "# of the // port pin connected to serial LCD 'SDA' signal, with polarity (-17..17)");
|
||
|
module_param(lcd_cl_pin, int, 0000);MODULE_PARM_DESC(lcd_cl_pin, "# of the // port pin connected to serial LCD 'SCL' signal, with polarity (-17..17)");
|
||
|
|
||
|
#endif
|
||
|
|
||
|
static unsigned char *lcd_char_conv = NULL;
|
||
|
|
||
|
/* for some LCD drivers (ks0074) we need a charset conversion table. */
|
||
|
static unsigned char lcd_char_conv_ks0074[256] = {
|
||
|
/* 0 1 2 3 4 5 6 7 8 9 A B C D E F */
|
||
|
/* 0x00 */ 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
|
||
|
/* 0x10 */ 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f,
|
||
|
/* 0x20 */ 0x20, 0x21, 0x22, 0x23, 0xa2, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f,
|
||
|
/* 0x30 */ 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f,
|
||
|
/* 0x40 */ 0xa0, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f,
|
||
|
/* 0x50 */ 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0xfa, 0xfb, 0xfc, 0x1d, 0xc4,
|
||
|
/* 0x60 */ 0x96, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f,
|
||
|
/* 0x70 */ 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a, 0xfd, 0xfe, 0xff, 0xce, 0x20,
|
||
|
/* 0x80 */ 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f,
|
||
|
/* 0x90 */ 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f,
|
||
|
/* 0xA0 */ 0x20, 0x40, 0xb1, 0xa1, 0x24, 0xa3, 0xfe, 0x5f, 0x22, 0xc8, 0x61, 0x14, 0x97, 0x2d, 0xad, 0x96,
|
||
|
/* 0xB0 */ 0x80, 0x8c, 0x82, 0x83, 0x27, 0x8f, 0x86, 0xdd, 0x2c, 0x81, 0x6f, 0x15, 0x8b, 0x8a, 0x84, 0x60,
|
||
|
/* 0xC0 */ 0xe2, 0xe2, 0xe2, 0x5b, 0x5b, 0xae, 0xbc, 0xa9, 0xc5, 0xbf, 0xc6, 0xf1, 0xe3, 0xe3, 0xe3, 0xe3,
|
||
|
/* 0xD0 */ 0x44, 0x5d, 0xa8, 0xe4, 0xec, 0xec, 0x5c, 0x78, 0xab, 0xa6, 0xe5, 0x5e, 0x5e, 0xe6, 0xaa, 0xbe,
|
||
|
/* 0xE0 */ 0x7f, 0xe7, 0xaf, 0x7b, 0x7b, 0xaf, 0xbd, 0xc8, 0xa4, 0xa5, 0xc7, 0xf6, 0xa7, 0xe8, 0x69, 0x69,
|
||
|
/* 0xF0 */ 0xed, 0x7d, 0xa8, 0xe4, 0xec, 0x5c, 0x5c, 0x25, 0xac, 0xa6, 0xea, 0xef, 0x7e, 0xeb, 0xb2, 0x79,
|
||
|
};
|
||
|
|
||
|
char old_keypad_profile[][4][9] = {
|
||
|
{"S0", "Left\n", "Left\n", ""},
|
||
|
{"S1", "Down\n", "Down\n", ""},
|
||
|
{"S2", "Up\n", "Up\n", ""},
|
||
|
{"S3", "Right\n", "Right\n", ""},
|
||
|
{"S4", "Esc\n", "Esc\n", ""},
|
||
|
{"S5", "Ret\n", "Ret\n", ""},
|
||
|
{"","","",""}
|
||
|
};
|
||
|
|
||
|
/* signals, press, repeat, release */
|
||
|
char new_keypad_profile[][4][9] = {
|
||
|
{"S0", "Left\n", "Left\n", ""},
|
||
|
{"S1", "Down\n", "Down\n", ""},
|
||
|
{"S2", "Up\n", "Up\n", ""},
|
||
|
{"S3", "Right\n", "Right\n", ""},
|
||
|
{"S4s5", "", "Esc\n", "Esc\n"},
|
||
|
{"s4S5", "", "Ret\n", "Ret\n"},
|
||
|
{"S4S5", "Help\n", "", ""},
|
||
|
/* add new signals above this line */
|
||
|
{"","","",""}
|
||
|
};
|
||
|
|
||
|
/* signals, press, repeat, release */
|
||
|
char nexcom_keypad_profile[][4][9] = {
|
||
|
{"a-p-e-", "Down\n", "Down\n", ""}, // Down
|
||
|
{"a-p-E-", "Ret\n", "Ret\n", ""}, // Enter
|
||
|
{"a-P-E-", "Esc\n", "Esc\n", ""}, // Esc
|
||
|
{"a-P-e-", "Up\n", "Up\n", ""}, // Up
|
||
|
/* add new signals above this line */
|
||
|
{"","","",""}
|
||
|
};
|
||
|
|
||
|
static char (*keypad_profile)[4][9] = old_keypad_profile;
|
||
|
|
||
|
/* FIXME: this should be converted to a bit array containing signals states */
|
||
|
static struct {
|
||
|
unsigned char e; /* parallel LCD E (data latch on falling edge) */
|
||
|
unsigned char rs; /* parallel LCD RS (0 = cmd, 1 = data) */
|
||
|
unsigned char rw; /* parallel LCD R/W (0 = W, 1 = R) */
|
||
|
unsigned char bl; /* parallel LCD backlight (0 = off, 1 = on) */
|
||
|
unsigned char cl; /* serial LCD clock (latch on rising edge) */
|
||
|
unsigned char da; /* serial LCD data */
|
||
|
} bits;
|
||
|
|
||
|
static void init_scan_timer(void);
|
||
|
|
||
|
/* sets data port bits according to current signals values */
|
||
|
static int set_data_bits(void) {
|
||
|
int val, bit;
|
||
|
|
||
|
val = r_dtr(pprt);
|
||
|
for (bit = 0; bit < LCD_BITS; bit++)
|
||
|
val &= lcd_bits[LCD_PORT_D][bit][BIT_MSK];
|
||
|
|
||
|
val |= lcd_bits[LCD_PORT_D][LCD_BIT_E][bits.e]
|
||
|
| lcd_bits[LCD_PORT_D][LCD_BIT_RS][bits.rs]
|
||
|
| lcd_bits[LCD_PORT_D][LCD_BIT_RW][bits.rw]
|
||
|
| lcd_bits[LCD_PORT_D][LCD_BIT_BL][bits.bl]
|
||
|
| lcd_bits[LCD_PORT_D][LCD_BIT_CL][bits.cl]
|
||
|
| lcd_bits[LCD_PORT_D][LCD_BIT_DA][bits.da];
|
||
|
|
||
|
w_dtr(pprt, val);
|
||
|
return val;
|
||
|
}
|
||
|
|
||
|
/* sets ctrl port bits according to current signals values */
|
||
|
static int set_ctrl_bits(void) {
|
||
|
int val, bit;
|
||
|
|
||
|
val = r_ctr(pprt);
|
||
|
for (bit = 0; bit < LCD_BITS; bit++)
|
||
|
val &= lcd_bits[LCD_PORT_C][bit][BIT_MSK];
|
||
|
|
||
|
val |= lcd_bits[LCD_PORT_C][LCD_BIT_E][bits.e]
|
||
|
| lcd_bits[LCD_PORT_C][LCD_BIT_RS][bits.rs]
|
||
|
| lcd_bits[LCD_PORT_C][LCD_BIT_RW][bits.rw]
|
||
|
| lcd_bits[LCD_PORT_C][LCD_BIT_BL][bits.bl]
|
||
|
| lcd_bits[LCD_PORT_C][LCD_BIT_CL][bits.cl]
|
||
|
| lcd_bits[LCD_PORT_C][LCD_BIT_DA][bits.da];
|
||
|
|
||
|
w_ctr(pprt, val);
|
||
|
return val;
|
||
|
}
|
||
|
|
||
|
/* sets ctrl & data port bits according to current signals values */
|
||
|
static void set_bits(void) {
|
||
|
set_data_bits();
|
||
|
set_ctrl_bits();
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Converts a parallel port pin (from -25 to 25) to data and control ports
|
||
|
* masks, and data and control port bits. The signal will be considered
|
||
|
* unconnected if it's on pin 0 or an invalid pin (<-25 or >25).
|
||
|
*
|
||
|
* Result will be used this way :
|
||
|
* out(dport, in(dport) & d_val[2] | d_val[signal_state])
|
||
|
* out(cport, in(cport) & c_val[2] | c_val[signal_state])
|
||
|
*/
|
||
|
void pin_to_bits(int pin, unsigned char *d_val, unsigned char *c_val) {
|
||
|
int d_bit, c_bit, inv;
|
||
|
|
||
|
d_val[0] = c_val[0] = d_val[1] = c_val[1] = 0;
|
||
|
d_val[2] = c_val[2] = 0xFF;
|
||
|
|
||
|
if (pin == 0)
|
||
|
return;
|
||
|
|
||
|
inv = (pin < 0);
|
||
|
if (inv)
|
||
|
pin = -pin;
|
||
|
|
||
|
d_bit = c_bit = 0;
|
||
|
|
||
|
switch (pin) {
|
||
|
case PIN_STROBE: /* strobe, inverted */
|
||
|
c_bit = PNL_PSTROBE;
|
||
|
inv = !inv;
|
||
|
break;
|
||
|
case PIN_D0 ... PIN_D7: /* D0 - D7 = 2 - 9 */
|
||
|
d_bit = 1 << (pin - 2);
|
||
|
break;
|
||
|
case PIN_AUTOLF: /* autofeed, inverted */
|
||
|
c_bit = PNL_PAUTOLF;
|
||
|
inv = !inv;
|
||
|
break;
|
||
|
case PIN_INITP: /* init, direct */
|
||
|
c_bit = PNL_PINITP;
|
||
|
break;
|
||
|
case PIN_SELECP: /* select_in, inverted */
|
||
|
c_bit = PNL_PSELECP;
|
||
|
inv = !inv;
|
||
|
break;
|
||
|
default: /* unknown pin, ignore */
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
if (c_bit) {
|
||
|
c_val[2] &= ~c_bit;
|
||
|
c_val[!inv] = c_bit;
|
||
|
} else if (d_bit) {
|
||
|
d_val[2] &= ~d_bit;
|
||
|
d_val[!inv] = d_bit;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* sleeps that many milliseconds with a reschedule */
|
||
|
static void long_sleep(int ms) {
|
||
|
|
||
|
if (in_interrupt())
|
||
|
mdelay(ms);
|
||
|
else {
|
||
|
current->state = TASK_INTERRUPTIBLE;
|
||
|
schedule_timeout((ms*HZ+999)/1000);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
/* send a serial byte to the LCD panel. The caller is responsible for locking if needed. */
|
||
|
static void lcd_send_serial(int byte) {
|
||
|
int bit;
|
||
|
|
||
|
/* the data bit is set on D0, and the clock on STROBE.
|
||
|
* LCD reads D0 on STROBE's rising edge.
|
||
|
*/
|
||
|
for (bit = 0; bit < 8; bit++) {
|
||
|
bits.cl = BIT_CLR; /* CLK low */
|
||
|
set_bits();
|
||
|
bits.da = byte & 1;
|
||
|
set_bits();
|
||
|
udelay(2); /* maintain the data during 2 us before CLK up */
|
||
|
bits.cl = BIT_SET; /* CLK high */
|
||
|
set_bits();
|
||
|
udelay(1); /* maintain the strobe during 1 us */
|
||
|
byte >>= 1;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* turn the backlight on or off */
|
||
|
static void lcd_backlight(int on) {
|
||
|
if (lcd_bl_pin == PIN_NONE)
|
||
|
return;
|
||
|
|
||
|
/* The backlight is activated by seting the AUTOFEED line to +5V */
|
||
|
spin_lock(&pprt_lock);
|
||
|
bits.bl = on;
|
||
|
set_bits();
|
||
|
spin_unlock(&pprt_lock);
|
||
|
}
|
||
|
|
||
|
/* send a command to the LCD panel in serial mode */
|
||
|
static void lcd_write_cmd_s(int cmd) {
|
||
|
spin_lock(&pprt_lock);
|
||
|
lcd_send_serial(0x1F); /* R/W=W, RS=0 */
|
||
|
lcd_send_serial(cmd & 0x0F);
|
||
|
lcd_send_serial((cmd >> 4) & 0x0F);
|
||
|
udelay(40); /* the shortest command takes at least 40 us */
|
||
|
spin_unlock(&pprt_lock);
|
||
|
}
|
||
|
|
||
|
/* send data to the LCD panel in serial mode */
|
||
|
static void lcd_write_data_s(int data) {
|
||
|
spin_lock(&pprt_lock);
|
||
|
lcd_send_serial(0x5F); /* R/W=W, RS=1 */
|
||
|
lcd_send_serial(data & 0x0F);
|
||
|
lcd_send_serial((data >> 4) & 0x0F);
|
||
|
udelay(40); /* the shortest data takes at least 40 us */
|
||
|
spin_unlock(&pprt_lock);
|
||
|
}
|
||
|
|
||
|
/* send a command to the LCD panel in 8 bits parallel mode */
|
||
|
static void lcd_write_cmd_p8(int cmd) {
|
||
|
spin_lock(&pprt_lock);
|
||
|
/* present the data to the data port */
|
||
|
w_dtr(pprt, cmd);
|
||
|
udelay(20); /* maintain the data during 20 us before the strobe */
|
||
|
|
||
|
bits.e = BIT_SET ; bits.rs = BIT_CLR ; bits.rw = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(40); /* maintain the strobe during 40 us */
|
||
|
|
||
|
bits.e = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(120); /* the shortest command takes at least 120 us */
|
||
|
spin_unlock(&pprt_lock);
|
||
|
}
|
||
|
|
||
|
/* send data to the LCD panel in 8 bits parallel mode */
|
||
|
static void lcd_write_data_p8(int data) {
|
||
|
spin_lock(&pprt_lock);
|
||
|
/* present the data to the data port */
|
||
|
w_dtr(pprt, data);
|
||
|
udelay(20); /* maintain the data during 20 us before the strobe */
|
||
|
|
||
|
bits.e = BIT_SET ; bits.rs = BIT_SET ; bits.rw = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(40); /* maintain the strobe during 40 us */
|
||
|
|
||
|
bits.e = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(45); /* the shortest data takes at least 45 us */
|
||
|
spin_unlock(&pprt_lock);
|
||
|
}
|
||
|
|
||
|
static void lcd_gotoxy(void) {
|
||
|
lcd_write_cmd(0x80 /* set DDRAM address */
|
||
|
| (lcd_addr_y ? lcd_hwidth : 0)
|
||
|
/* we force the cursor to stay at the end of the line if it wants to go farther */
|
||
|
| ((lcd_addr_x < lcd_bwidth) ? lcd_addr_x & (lcd_hwidth-1) : lcd_bwidth - 1));
|
||
|
}
|
||
|
|
||
|
static void lcd_print(char c) {
|
||
|
if (lcd_addr_x < lcd_bwidth) {
|
||
|
if (lcd_char_conv != NULL)
|
||
|
c = lcd_char_conv[(unsigned char)c];
|
||
|
lcd_write_data(c);
|
||
|
lcd_addr_x++;
|
||
|
}
|
||
|
/* prevents the cursor from wrapping onto the next line */
|
||
|
if (lcd_addr_x == lcd_bwidth) {
|
||
|
lcd_gotoxy();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* fills the display with spaces and resets X/Y */
|
||
|
static void lcd_clear_fast_s(void) {
|
||
|
int pos;
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_gotoxy();
|
||
|
|
||
|
spin_lock(&pprt_lock);
|
||
|
for (pos = 0; pos < lcd_height * lcd_hwidth; pos++) {
|
||
|
lcd_send_serial(0x5F); /* R/W=W, RS=1 */
|
||
|
lcd_send_serial(' ' & 0x0F);
|
||
|
lcd_send_serial((' ' >> 4) & 0x0F);
|
||
|
udelay(40); /* the shortest data takes at least 40 us */
|
||
|
}
|
||
|
spin_unlock(&pprt_lock);
|
||
|
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_gotoxy();
|
||
|
}
|
||
|
|
||
|
/* fills the display with spaces and resets X/Y */
|
||
|
static void lcd_clear_fast_p8(void) {
|
||
|
int pos;
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_gotoxy();
|
||
|
|
||
|
spin_lock(&pprt_lock);
|
||
|
for (pos = 0; pos < lcd_height * lcd_hwidth; pos++) {
|
||
|
/* present the data to the data port */
|
||
|
w_dtr(pprt, ' ');
|
||
|
udelay(20); /* maintain the data during 20 us before the strobe */
|
||
|
|
||
|
bits.e = BIT_SET ; bits.rs = BIT_SET ; bits.rw = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(40); /* maintain the strobe during 40 us */
|
||
|
|
||
|
bits.e = BIT_CLR;
|
||
|
set_ctrl_bits();
|
||
|
|
||
|
udelay(45); /* the shortest data takes at least 45 us */
|
||
|
}
|
||
|
spin_unlock(&pprt_lock);
|
||
|
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_gotoxy();
|
||
|
}
|
||
|
|
||
|
/* clears the display and resets X/Y */
|
||
|
static void lcd_clear_display(void) {
|
||
|
lcd_write_cmd(0x01); /* clear display */
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
/* we must wait a few milliseconds (15) */
|
||
|
long_sleep(15);
|
||
|
}
|
||
|
|
||
|
static void lcd_init_display(void) {
|
||
|
|
||
|
lcd_flags = ((lcd_height > 1) ? LCD_FLAG_N : 0)
|
||
|
| LCD_FLAG_D | LCD_FLAG_C | LCD_FLAG_B;
|
||
|
|
||
|
long_sleep(20); /* wait 20 ms after power-up for the paranoid */
|
||
|
|
||
|
lcd_write_cmd(0x30); /* 8bits, 1 line, small fonts */
|
||
|
long_sleep(10);
|
||
|
lcd_write_cmd(0x30); /* 8bits, 1 line, small fonts */
|
||
|
long_sleep(10);
|
||
|
lcd_write_cmd(0x30); /* 8bits, 1 line, small fonts */
|
||
|
long_sleep(10);
|
||
|
|
||
|
lcd_write_cmd(0x30 /* set font height and lines number */
|
||
|
| ((lcd_flags & LCD_FLAG_F)?4:0)
|
||
|
| ((lcd_flags & LCD_FLAG_N)?8:0)
|
||
|
);
|
||
|
long_sleep(10);
|
||
|
|
||
|
lcd_write_cmd(0x08); /* display off, cursor off, blink off */
|
||
|
long_sleep(10);
|
||
|
|
||
|
lcd_write_cmd(0x08 /* set display mode */
|
||
|
| ((lcd_flags & LCD_FLAG_D)?4:0)
|
||
|
| ((lcd_flags & LCD_FLAG_C)?2:0)
|
||
|
| ((lcd_flags & LCD_FLAG_B)?1:0)
|
||
|
);
|
||
|
|
||
|
lcd_backlight((lcd_flags & LCD_FLAG_L) ? 1 : 0);
|
||
|
|
||
|
long_sleep(10);
|
||
|
|
||
|
lcd_write_cmd(0x06); /* entry mode set : increment, cursor shifting */
|
||
|
|
||
|
lcd_clear_display();
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* These are the file operation function for user access to /dev/lcd
|
||
|
* This function can also be called from inside the kernel, by
|
||
|
* setting file and ppos to NULL.
|
||
|
*
|
||
|
*/
|
||
|
|
||
|
static ssize_t lcd_write(struct file * file,
|
||
|
const char * buf, size_t count, loff_t *ppos ) {
|
||
|
|
||
|
const char *tmp = buf;
|
||
|
char c;
|
||
|
|
||
|
for( ; count-- > 0; (ppos ? (*ppos)++ : 0), ++tmp ) {
|
||
|
if (!in_interrupt() && (((count + 1) & 0x1f) == 0)) {
|
||
|
schedule(); /* let's be a little nice with other processes that need some CPU */
|
||
|
}
|
||
|
if (ppos == NULL && file == NULL)
|
||
|
c = *tmp; /* let's not use get_user() from the kernel ! */
|
||
|
else if (get_user( c, tmp ))
|
||
|
return -EFAULT;
|
||
|
|
||
|
/* first, we'll test if we're in escape mode */
|
||
|
if ((c != '\n') && lcd_escape_len >= 0) { /* yes, let's add this char to the buffer */
|
||
|
lcd_escape[lcd_escape_len++] = c;
|
||
|
lcd_escape[lcd_escape_len] = 0;
|
||
|
}
|
||
|
else {
|
||
|
lcd_escape_len = -1; /* aborts any previous escape sequence */
|
||
|
|
||
|
switch (c) {
|
||
|
case LCD_ESCAPE_CHAR: /* start of an escape sequence */
|
||
|
lcd_escape_len = 0;
|
||
|
lcd_escape[lcd_escape_len] = 0;
|
||
|
break;
|
||
|
case '\b': /* go back one char and clear it */
|
||
|
if (lcd_addr_x > 0) {
|
||
|
if (lcd_addr_x < lcd_bwidth) /* check if we're not at the end of the line */
|
||
|
lcd_write_cmd(0x10); /* back one char */
|
||
|
lcd_addr_x--;
|
||
|
}
|
||
|
lcd_write_data(' '); /* replace with a space */
|
||
|
lcd_write_cmd(0x10); /* back one char again */
|
||
|
break;
|
||
|
case '\014': /* quickly clear the display */
|
||
|
lcd_clear_fast();
|
||
|
break;
|
||
|
case '\n': /* flush the remainder of the current line and go to the
|
||
|
beginning of the next line */
|
||
|
for (; lcd_addr_x<lcd_bwidth; lcd_addr_x++)
|
||
|
lcd_write_data(' ');
|
||
|
lcd_addr_x = 0;
|
||
|
lcd_addr_y = (lcd_addr_y + 1) % lcd_height;
|
||
|
lcd_gotoxy();
|
||
|
break;
|
||
|
case '\r': /* go to the beginning of the same line */
|
||
|
lcd_addr_x = 0;
|
||
|
lcd_gotoxy();
|
||
|
break;
|
||
|
case '\t': /* print a space instead of the tab */
|
||
|
lcd_print(' ');
|
||
|
break;
|
||
|
default : /* simply print this char */
|
||
|
lcd_print(c);
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* now we'll see if we're in an escape mode and if the current
|
||
|
escape sequence can be understood.
|
||
|
*/
|
||
|
if (lcd_escape_len >= 2) { /* minimal length for an escape command */
|
||
|
int processed = 0; /* 1 means the command has been processed */
|
||
|
|
||
|
if (!strcmp(lcd_escape,"[2J")) { /* Clear the display */
|
||
|
lcd_clear_fast(); /* clear display */
|
||
|
processed = 1;
|
||
|
}
|
||
|
else if (!strcmp(lcd_escape,"[H")) { /* Cursor to home */
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_gotoxy();
|
||
|
processed = 1;
|
||
|
}
|
||
|
/* codes starting with ^[[L */
|
||
|
else if ((lcd_escape_len >= 3) &&
|
||
|
(lcd_escape[0]=='[') && (lcd_escape[1]=='L')) { /* LCD special codes */
|
||
|
|
||
|
char *esc = lcd_escape + 2;
|
||
|
int oldflags = lcd_flags;
|
||
|
|
||
|
/* check for display mode flags */
|
||
|
switch (*esc) {
|
||
|
case 'D' : /* Display ON */
|
||
|
lcd_flags |= LCD_FLAG_D;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'd' : /* Display OFF */
|
||
|
lcd_flags &= ~LCD_FLAG_D;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'C' : /* Cursor ON */
|
||
|
lcd_flags |= LCD_FLAG_C;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'c' : /* Cursor OFF */
|
||
|
lcd_flags &= ~LCD_FLAG_C;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'B' : /* Blink ON */
|
||
|
lcd_flags |= LCD_FLAG_B;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'b' : /* Blink OFF */
|
||
|
lcd_flags &= ~LCD_FLAG_B;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case '+' : /* Back light ON */
|
||
|
lcd_flags |= LCD_FLAG_L;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case '-' : /* Back light OFF */
|
||
|
lcd_flags &= ~LCD_FLAG_L;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case '*' : /* flash back light using the keypad timer */
|
||
|
if (scan_timer.function != NULL) {
|
||
|
if (light_tempo == 0 && ((lcd_flags & LCD_FLAG_L) == 0))
|
||
|
lcd_backlight(1);
|
||
|
light_tempo = FLASH_LIGHT_TEMPO;
|
||
|
}
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'f' : /* Small Font */
|
||
|
lcd_flags &= ~LCD_FLAG_F;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'F' : /* Large Font */
|
||
|
lcd_flags |= LCD_FLAG_F;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'n' : /* One Line */
|
||
|
lcd_flags &= ~LCD_FLAG_N;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
case 'N' : /* Two Lines */
|
||
|
lcd_flags |= LCD_FLAG_N;
|
||
|
break;
|
||
|
|
||
|
case 'l' : /* Shift Cursor Left */
|
||
|
if (lcd_addr_x > 0) {
|
||
|
if (lcd_addr_x < lcd_bwidth)
|
||
|
lcd_write_cmd(0x10); /* back one char if not at end of line */
|
||
|
lcd_addr_x--;
|
||
|
}
|
||
|
processed = 1;
|
||
|
break;
|
||
|
|
||
|
case 'r' : /* shift cursor right */
|
||
|
if (lcd_addr_x < lcd_width) {
|
||
|
if (lcd_addr_x < (lcd_bwidth - 1))
|
||
|
lcd_write_cmd(0x14); /* allow the cursor to pass the end of the line */
|
||
|
lcd_addr_x++;
|
||
|
}
|
||
|
processed = 1;
|
||
|
break;
|
||
|
|
||
|
case 'L' : /* shift display left */
|
||
|
lcd_left_shift++;
|
||
|
lcd_write_cmd(0x18);
|
||
|
processed = 1;
|
||
|
break;
|
||
|
|
||
|
case 'R' : /* shift display right */
|
||
|
lcd_left_shift--;
|
||
|
lcd_write_cmd(0x1C);
|
||
|
processed = 1;
|
||
|
break;
|
||
|
|
||
|
case 'k' : { /* kill end of line */
|
||
|
int x;
|
||
|
for (x=lcd_addr_x; x<lcd_bwidth; x++)
|
||
|
lcd_write_data(' ');
|
||
|
lcd_gotoxy(); /* restore cursor position */
|
||
|
processed = 1;
|
||
|
break;
|
||
|
}
|
||
|
case 'I' : /* reinitialize display */
|
||
|
lcd_init_display();
|
||
|
lcd_left_shift = 0;
|
||
|
processed = 1;
|
||
|
break;
|
||
|
|
||
|
case 'G' : /* Generator : LGcxxxxx...xx; */ {
|
||
|
/* must have <c> between '0' and '7', representing the numerical
|
||
|
* ASCII code of the redefined character, and <xx...xx> a sequence
|
||
|
* of 16 hex digits representing 8 bytes for each character. Most
|
||
|
* LCDs will only use 5 lower bits of the 7 first bytes.
|
||
|
*/
|
||
|
|
||
|
unsigned char cgbytes[8];
|
||
|
unsigned char cgaddr;
|
||
|
int cgoffset;
|
||
|
int shift;
|
||
|
char value;
|
||
|
int addr;
|
||
|
|
||
|
if (strchr(esc, ';') == NULL)
|
||
|
break;
|
||
|
|
||
|
esc++;
|
||
|
|
||
|
cgaddr = *(esc++) - '0';
|
||
|
if (cgaddr > 7) {
|
||
|
processed = 1;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
cgoffset = 0;
|
||
|
shift = 0;
|
||
|
value = 0;
|
||
|
while (*esc && cgoffset < 8) {
|
||
|
shift ^= 4;
|
||
|
if (*esc >= '0' && *esc <='9')
|
||
|
value |= (*esc - '0') << shift;
|
||
|
else if (*esc >= 'A' && *esc <='Z')
|
||
|
value |= (*esc - 'A' + 10) << shift;
|
||
|
else if (*esc >= 'a' && *esc <='z')
|
||
|
value |= (*esc - 'a' + 10) << shift;
|
||
|
else {
|
||
|
esc++;
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
if (shift == 0) {
|
||
|
cgbytes[cgoffset++] = value;
|
||
|
value = 0;
|
||
|
}
|
||
|
|
||
|
esc++;
|
||
|
}
|
||
|
|
||
|
lcd_write_cmd(0x40 | (cgaddr * 8));
|
||
|
for (addr = 0; addr < cgoffset; addr++) {
|
||
|
lcd_write_data(cgbytes[addr]);
|
||
|
}
|
||
|
|
||
|
lcd_gotoxy(); /* ensures that we stop writing to CGRAM */
|
||
|
processed = 1;
|
||
|
break;
|
||
|
}
|
||
|
case 'x' : /* gotoxy : LxXXX[yYYY]; */
|
||
|
case 'y' : /* gotoxy : LyYYY[xXXX]; */
|
||
|
if (strchr(esc, ';') == NULL)
|
||
|
break;
|
||
|
|
||
|
while (*esc) {
|
||
|
if (*esc == 'x') {
|
||
|
esc++;
|
||
|
lcd_addr_x = 0;
|
||
|
while (isdigit(*esc)) {
|
||
|
lcd_addr_x = lcd_addr_x*10 + (*esc - '0');
|
||
|
esc++;
|
||
|
}
|
||
|
}
|
||
|
else if (*esc == 'y') {
|
||
|
esc++;
|
||
|
lcd_addr_y = 0;
|
||
|
while (isdigit(*esc)) {
|
||
|
lcd_addr_y = lcd_addr_y*10 + (*esc - '0');
|
||
|
esc++;
|
||
|
}
|
||
|
}
|
||
|
else break;
|
||
|
}
|
||
|
|
||
|
lcd_gotoxy();
|
||
|
processed = 1;
|
||
|
break;
|
||
|
} /* end of switch */
|
||
|
|
||
|
/* Check wether one flag was changed */
|
||
|
if (oldflags != lcd_flags) {
|
||
|
/* check wether one of B,C,D flags was changed */
|
||
|
if ((oldflags ^ lcd_flags) & (LCD_FLAG_B | LCD_FLAG_C | LCD_FLAG_D))
|
||
|
lcd_write_cmd(0x08 /* set display mode */
|
||
|
| ((lcd_flags & LCD_FLAG_D)?4:0)
|
||
|
| ((lcd_flags & LCD_FLAG_C)?2:0)
|
||
|
| ((lcd_flags & LCD_FLAG_B)?1:0)
|
||
|
);
|
||
|
/* check wether one of F,N flags was changed */
|
||
|
else if ((oldflags ^ lcd_flags) & (LCD_FLAG_F | LCD_FLAG_N))
|
||
|
lcd_write_cmd(0x30
|
||
|
| ((lcd_flags & LCD_FLAG_F)?4:0)
|
||
|
| ((lcd_flags & LCD_FLAG_N)?8:0)
|
||
|
);
|
||
|
/* check wether L flag was changed */
|
||
|
else if ((oldflags ^ lcd_flags) & (LCD_FLAG_L)) {
|
||
|
if (lcd_flags & (LCD_FLAG_L))
|
||
|
lcd_backlight(1);
|
||
|
else if (light_tempo == 0) /* switch off the light only when the tempo lighting is gone */
|
||
|
lcd_backlight(0);
|
||
|
}
|
||
|
}
|
||
|
} /* LCD special escape codes */
|
||
|
|
||
|
/* flush the escape sequence if it's been processed or if it is
|
||
|
getting too long. */
|
||
|
if (processed || (lcd_escape_len >= LCD_ESCAPE_LEN))
|
||
|
lcd_escape_len = -1;
|
||
|
} /* escape codes */
|
||
|
}
|
||
|
|
||
|
return( tmp - buf );
|
||
|
}
|
||
|
|
||
|
static int lcd_open( struct inode *inode, struct file *file ) {
|
||
|
if (lcd_open_cnt)
|
||
|
return( -EBUSY ); /* open only once at a time */
|
||
|
|
||
|
if (file->f_mode & FMODE_READ) /* device is write-only */
|
||
|
return ( -EPERM );
|
||
|
|
||
|
if (lcd_must_clear) {
|
||
|
lcd_clear_display();
|
||
|
lcd_must_clear = 0;
|
||
|
}
|
||
|
lcd_open_cnt++;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
static int lcd_release( struct inode *inode, struct file *file ) {
|
||
|
lcd_open_cnt--;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
|
||
|
static struct file_operations lcd_fops = {
|
||
|
write: lcd_write,
|
||
|
open: lcd_open,
|
||
|
release: lcd_release,
|
||
|
};
|
||
|
|
||
|
static struct miscdevice lcd_dev = {
|
||
|
LCD_MINOR,
|
||
|
"lcd",
|
||
|
&lcd_fops
|
||
|
};
|
||
|
|
||
|
|
||
|
|
||
|
/* public function usable from the kernel for any purpose */
|
||
|
void panel_lcd_print(char *s) {
|
||
|
if (lcd_enabled && lcd_initialized)
|
||
|
lcd_write(NULL, s, strlen(s), NULL);
|
||
|
}
|
||
|
|
||
|
|
||
|
/* initialize the LCD driver */
|
||
|
void lcd_init(void) {
|
||
|
switch (lcd_type) {
|
||
|
case LCD_TYPE_OLD : /* parallel mode, 8 bits */
|
||
|
if (lcd_proto < 0) lcd_proto = LCD_PROTO_PARALLEL;
|
||
|
if (lcd_charset < 0) lcd_charset = LCD_CHARSET_NORMAL;
|
||
|
if (lcd_e_pin == PIN_NOT_SET) lcd_e_pin = PIN_STROBE;
|
||
|
if (lcd_rs_pin == PIN_NOT_SET) lcd_rs_pin = PIN_AUTOLF;
|
||
|
|
||
|
if (lcd_width < 0) lcd_width = 40;
|
||
|
if (lcd_bwidth < 0) lcd_bwidth = 40;
|
||
|
if (lcd_hwidth < 0) lcd_hwidth = 64;
|
||
|
if (lcd_height < 0) lcd_height = 2;
|
||
|
break;
|
||
|
case LCD_TYPE_KS0074 : /* serial mode, ks0074 */
|
||
|
if (lcd_proto < 0) lcd_proto = LCD_PROTO_SERIAL;
|
||
|
if (lcd_charset < 0) lcd_charset = LCD_CHARSET_KS0074;
|
||
|
if (lcd_bl_pin == PIN_NOT_SET) lcd_bl_pin = PIN_AUTOLF;
|
||
|
if (lcd_cl_pin == PIN_NOT_SET) lcd_cl_pin = PIN_STROBE;
|
||
|
if (lcd_da_pin == PIN_NOT_SET) lcd_da_pin = PIN_D0;
|
||
|
|
||
|
if (lcd_width < 0) lcd_width = 16;
|
||
|
if (lcd_bwidth < 0) lcd_bwidth = 40;
|
||
|
if (lcd_hwidth < 0) lcd_hwidth = 16;
|
||
|
if (lcd_height < 0) lcd_height = 2;
|
||
|
break;
|
||
|
case LCD_TYPE_NEXCOM : /* parallel mode, 8 bits, generic */
|
||
|
if (lcd_proto < 0) lcd_proto = LCD_PROTO_PARALLEL;
|
||
|
if (lcd_charset < 0) lcd_charset = LCD_CHARSET_NORMAL;
|
||
|
if (lcd_e_pin == PIN_NOT_SET) lcd_e_pin = PIN_AUTOLF;
|
||
|
if (lcd_rs_pin == PIN_NOT_SET) lcd_rs_pin = PIN_SELECP;
|
||
|
if (lcd_rw_pin == PIN_NOT_SET) lcd_rw_pin = PIN_INITP;
|
||
|
|
||
|
if (lcd_width < 0) lcd_width = 16;
|
||
|
if (lcd_bwidth < 0) lcd_bwidth = 40;
|
||
|
if (lcd_hwidth < 0) lcd_hwidth = 64;
|
||
|
if (lcd_height < 0) lcd_height = 2;
|
||
|
break;
|
||
|
case LCD_TYPE_CUSTOM : /* customer-defined */
|
||
|
if (lcd_proto < 0) lcd_proto = DEFAULT_LCD_PROTO;
|
||
|
if (lcd_charset < 0) lcd_charset = DEFAULT_LCD_CHARSET;
|
||
|
/* default geometry will be set later */
|
||
|
break;
|
||
|
case LCD_TYPE_HANTRONIX : /* parallel mode, 8 bits, hantronix-like */
|
||
|
default :
|
||
|
if (lcd_proto < 0) lcd_proto = LCD_PROTO_PARALLEL;
|
||
|
if (lcd_charset < 0) lcd_charset = LCD_CHARSET_NORMAL;
|
||
|
if (lcd_e_pin == PIN_NOT_SET) lcd_e_pin = PIN_STROBE;
|
||
|
if (lcd_rs_pin == PIN_NOT_SET) lcd_rs_pin = PIN_SELECP;
|
||
|
|
||
|
if (lcd_width < 0) lcd_width = 16;
|
||
|
if (lcd_bwidth < 0) lcd_bwidth = 40;
|
||
|
if (lcd_hwidth < 0) lcd_hwidth = 64;
|
||
|
if (lcd_height < 0) lcd_height = 2;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
/* this is used to catch wrong and default values */
|
||
|
if (lcd_width <= 0) lcd_width = DEFAULT_LCD_WIDTH;
|
||
|
if (lcd_bwidth <= 0) lcd_bwidth = DEFAULT_LCD_BWIDTH;
|
||
|
if (lcd_hwidth <= 0) lcd_hwidth = DEFAULT_LCD_HWIDTH;
|
||
|
if (lcd_height <= 0) lcd_height = DEFAULT_LCD_HEIGHT;
|
||
|
|
||
|
if (lcd_proto == LCD_PROTO_SERIAL) { /* SERIAL */
|
||
|
lcd_write_cmd = lcd_write_cmd_s;
|
||
|
lcd_write_data = lcd_write_data_s;
|
||
|
lcd_clear_fast = lcd_clear_fast_s;
|
||
|
|
||
|
if (lcd_cl_pin == PIN_NOT_SET)
|
||
|
lcd_cl_pin = DEFAULT_LCD_PIN_SCL;
|
||
|
if (lcd_da_pin == PIN_NOT_SET)
|
||
|
lcd_da_pin = DEFAULT_LCD_PIN_SDA;
|
||
|
|
||
|
} else { /* PARALLEL */
|
||
|
lcd_write_cmd = lcd_write_cmd_p8;
|
||
|
lcd_write_data = lcd_write_data_p8;
|
||
|
lcd_clear_fast = lcd_clear_fast_p8;
|
||
|
|
||
|
if (lcd_e_pin == PIN_NOT_SET)
|
||
|
lcd_e_pin = DEFAULT_LCD_PIN_E;
|
||
|
if (lcd_rs_pin == PIN_NOT_SET)
|
||
|
lcd_rs_pin = DEFAULT_LCD_PIN_RS;
|
||
|
if (lcd_rw_pin == PIN_NOT_SET)
|
||
|
lcd_rw_pin = DEFAULT_LCD_PIN_RW;
|
||
|
}
|
||
|
|
||
|
if (lcd_bl_pin == PIN_NOT_SET)
|
||
|
lcd_bl_pin = DEFAULT_LCD_PIN_BL;
|
||
|
|
||
|
if (lcd_e_pin == PIN_NOT_SET) lcd_e_pin = PIN_NONE;
|
||
|
if (lcd_rs_pin == PIN_NOT_SET) lcd_rs_pin = PIN_NONE;
|
||
|
if (lcd_rw_pin == PIN_NOT_SET) lcd_rw_pin = PIN_NONE;
|
||
|
if (lcd_bl_pin == PIN_NOT_SET) lcd_bl_pin = PIN_NONE;
|
||
|
if (lcd_cl_pin == PIN_NOT_SET) lcd_cl_pin = PIN_NONE;
|
||
|
if (lcd_da_pin == PIN_NOT_SET) lcd_da_pin = PIN_NONE;
|
||
|
|
||
|
if (lcd_charset < 0)
|
||
|
lcd_charset = DEFAULT_LCD_CHARSET;
|
||
|
|
||
|
if (lcd_charset == LCD_CHARSET_KS0074)
|
||
|
lcd_char_conv = lcd_char_conv_ks0074;
|
||
|
else
|
||
|
lcd_char_conv = NULL;
|
||
|
|
||
|
if (lcd_bl_pin != PIN_NONE)
|
||
|
init_scan_timer();
|
||
|
|
||
|
pin_to_bits(lcd_e_pin, lcd_bits[LCD_PORT_D][LCD_BIT_E], lcd_bits[LCD_PORT_C][LCD_BIT_E]);
|
||
|
pin_to_bits(lcd_rs_pin, lcd_bits[LCD_PORT_D][LCD_BIT_RS], lcd_bits[LCD_PORT_C][LCD_BIT_RS]);
|
||
|
pin_to_bits(lcd_rw_pin, lcd_bits[LCD_PORT_D][LCD_BIT_RW], lcd_bits[LCD_PORT_C][LCD_BIT_RW]);
|
||
|
pin_to_bits(lcd_bl_pin, lcd_bits[LCD_PORT_D][LCD_BIT_BL], lcd_bits[LCD_PORT_C][LCD_BIT_BL]);
|
||
|
pin_to_bits(lcd_cl_pin, lcd_bits[LCD_PORT_D][LCD_BIT_CL], lcd_bits[LCD_PORT_C][LCD_BIT_CL]);
|
||
|
pin_to_bits(lcd_da_pin, lcd_bits[LCD_PORT_D][LCD_BIT_DA], lcd_bits[LCD_PORT_C][LCD_BIT_DA]);
|
||
|
|
||
|
/* before this line, we must NOT send anything to the display.
|
||
|
* Since lcd_init_display() needs to write data, we have to
|
||
|
* enable mark the LCD initialized just before.
|
||
|
*/
|
||
|
lcd_initialized = 1;
|
||
|
lcd_init_display();
|
||
|
|
||
|
/* display a short message */
|
||
|
#ifdef CONFIG_PANEL_CHANGE_MESSAGE
|
||
|
#ifdef CONFIG_PANEL_BOOT_MESSAGE
|
||
|
panel_lcd_print("\x1b[Lc\x1b[Lb\x1b[L*" CONFIG_PANEL_BOOT_MESSAGE);
|
||
|
#endif
|
||
|
#else
|
||
|
panel_lcd_print("\x1b[Lc\x1b[Lb\x1b[L*Linux-" UTS_RELEASE "\nPanel-" PANEL_VERSION);
|
||
|
#endif
|
||
|
lcd_addr_x = lcd_addr_y = 0;
|
||
|
lcd_must_clear = 1; /* clear the display on the next device opening */
|
||
|
lcd_gotoxy();
|
||
|
}
|
||
|
|
||
|
|
||
|
/*
|
||
|
* These are the file operation function for user access to /dev/keypad
|
||
|
*/
|
||
|
|
||
|
static ssize_t keypad_read(struct file * file,
|
||
|
char * buf, size_t count, loff_t *ppos ) {
|
||
|
|
||
|
unsigned i = *ppos;
|
||
|
char *tmp = buf;
|
||
|
|
||
|
if (keypad_buflen == 0) {
|
||
|
if (file->f_flags & O_NONBLOCK)
|
||
|
return -EAGAIN;
|
||
|
|
||
|
//printk(KERN_ERR "keypad_read():1 len=%d", keypad_buflen);
|
||
|
interruptible_sleep_on(&keypad_read_wait);
|
||
|
//printk(KERN_ERR "keypad_read():2 len=%d", keypad_buflen);
|
||
|
if (signal_pending(current))
|
||
|
return -EINTR;
|
||
|
}
|
||
|
|
||
|
//printk(KERN_ERR "keypad_read():3 len=%d", keypad_buflen);
|
||
|
for( ; count-- > 0 && (keypad_buflen > 0); ++i, ++tmp, --keypad_buflen ) {
|
||
|
put_user( keypad_buffer[keypad_start], tmp );
|
||
|
keypad_start = (keypad_start + 1) % KEYPAD_BUFFER;
|
||
|
}
|
||
|
*ppos = i;
|
||
|
//printk(KERN_ERR "keypad_read():4 len=%d", keypad_buflen);
|
||
|
|
||
|
return( tmp - buf );
|
||
|
}
|
||
|
|
||
|
|
||
|
static int keypad_open( struct inode *inode, struct file *file ) {
|
||
|
|
||
|
if (keypad_open_cnt)
|
||
|
return( -EBUSY ); /* open only once at a time */
|
||
|
|
||
|
if (file->f_mode & FMODE_WRITE) /* device is read-only */
|
||
|
return ( -EPERM );
|
||
|
|
||
|
keypad_buflen = 0; /* flush the buffer on opening */
|
||
|
keypad_open_cnt++;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
static int keypad_release( struct inode *inode, struct file *file ) {
|
||
|
keypad_open_cnt--;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
static struct file_operations keypad_fops = {
|
||
|
read: keypad_read, /* read */
|
||
|
open: keypad_open, /* open */
|
||
|
release: keypad_release, /* close */
|
||
|
};
|
||
|
|
||
|
static struct miscdevice keypad_dev = {
|
||
|
KEYPAD_MINOR,
|
||
|
"keypad",
|
||
|
&keypad_fops
|
||
|
};
|
||
|
|
||
|
static void keypad_send_key(char *string, int max_len) {
|
||
|
//printk(KERN_ERR "keypad_send_key(%c,%d):1\n", *string,max_len);
|
||
|
if (init_in_progress)
|
||
|
return;
|
||
|
//printk(KERN_ERR "keypad_send_key(%c,%d):2\n", *string,max_len);
|
||
|
|
||
|
/* send the key to the device only if a process is attached to it. */
|
||
|
if (keypad_open_cnt > 0) {
|
||
|
//printk(KERN_ERR "keypad_send_key(%c,%d):3\n", *string,max_len);
|
||
|
while (max_len-- && keypad_buflen < KEYPAD_BUFFER && *string) {
|
||
|
keypad_buffer[(keypad_start + keypad_buflen++) % KEYPAD_BUFFER] = *string++;
|
||
|
}
|
||
|
//printk(KERN_ERR "keypad_send_key(%d):4\n", *string,max_len);
|
||
|
wake_up_interruptible(&keypad_read_wait);
|
||
|
}
|
||
|
//printk(KERN_ERR "keypad_send_key(%d):5\n", *string,max_len);
|
||
|
}
|
||
|
|
||
|
|
||
|
/* this function scans all the bits involving at least one logical signal, and puts the
|
||
|
* results in the bitfield "phys_read" (one bit per established contact), and sets
|
||
|
* "phys_read_prev" to "phys_read".
|
||
|
*
|
||
|
* Note: to debounce input signals, we will only consider as switched a signal which is
|
||
|
* stable across 2 measures. Signals which are different between two reads will be kept
|
||
|
* as they previously were in their logical form (phys_prev). A signal which has just
|
||
|
* switched will have a 1 in (phys_read ^ phys_read_prev).
|
||
|
*/
|
||
|
static void phys_scan_contacts(void) {
|
||
|
int bit, bitval;
|
||
|
char oldval;
|
||
|
char bitmask;
|
||
|
char gndmask;
|
||
|
|
||
|
phys_prev = phys_curr;
|
||
|
phys_read_prev = phys_read;
|
||
|
phys_read = 0; /* flush all signals */
|
||
|
|
||
|
oldval = r_dtr(pprt) | scan_mask_o; /* keep track of old value, with all outputs disabled */
|
||
|
w_dtr(pprt, oldval & ~scan_mask_o); /* activate all keyboard outputs (active low) */
|
||
|
bitmask = PNL_PINPUT(r_str(pprt)) & scan_mask_i; /* will have a 1 for each bit set to gnd */
|
||
|
w_dtr(pprt, oldval); /* disable all matrix signals */
|
||
|
|
||
|
/* now that all outputs are cleared, the only active input bits are
|
||
|
* directly connected to the ground
|
||
|
*/
|
||
|
gndmask = PNL_PINPUT(r_str(pprt)) & scan_mask_i; /* 1 for each grounded input */
|
||
|
|
||
|
phys_read |= (pmask_t)gndmask << 40; /* grounded inputs are signals 40-44 */
|
||
|
|
||
|
if (bitmask != gndmask) {
|
||
|
/* since clearing the outputs changed some inputs, we know that some
|
||
|
* input signals are currently tied to some outputs. So we'll scan them.
|
||
|
*/
|
||
|
for (bit = 0; bit < 8; bit ++) {
|
||
|
bitval = 1 << bit;
|
||
|
|
||
|
if (!(scan_mask_o & bitval)) /* skip unused bits */
|
||
|
continue;
|
||
|
|
||
|
w_dtr(pprt, oldval & ~bitval); /* enable this output */
|
||
|
bitmask = PNL_PINPUT(r_str(pprt)) & ~gndmask;
|
||
|
phys_read |= (pmask_t) bitmask << (5*bit);
|
||
|
}
|
||
|
w_dtr(pprt, oldval); /* disable all outputs */
|
||
|
}
|
||
|
/* this is easy: use old bits when they are flapping, use new ones when stable */
|
||
|
phys_curr = (phys_prev & (phys_read ^ phys_read_prev)) | (phys_read & ~(phys_read ^ phys_read_prev));
|
||
|
}
|
||
|
|
||
|
static void panel_process_inputs(void) {
|
||
|
struct list_head *item;
|
||
|
struct logical_input *input;
|
||
|
|
||
|
#if 0
|
||
|
printk(KERN_DEBUG "entering panel_process_inputs with pp=%016Lx & pc=%016Lx\n",
|
||
|
phys_prev, phys_curr);
|
||
|
#endif
|
||
|
|
||
|
keypressed = 0;
|
||
|
inputs_stable = 1;
|
||
|
list_for_each(item, &logical_inputs) {
|
||
|
input = list_entry(item, struct logical_input, list);
|
||
|
|
||
|
switch (input->state) {
|
||
|
case INPUT_ST_LOW:
|
||
|
if ((phys_curr & input->mask) != input->value)
|
||
|
break;
|
||
|
/* if all needed ones were already set previously, this means that
|
||
|
* this logical signal has been activated by the releasing of
|
||
|
* another combined signal, so we don't want to match.
|
||
|
* eg: AB -(release B)-> A -(release A)-> 0 : don't match A.
|
||
|
*/
|
||
|
if ((phys_prev & input->mask) == input->value)
|
||
|
break;
|
||
|
input->rise_timer = 0;
|
||
|
input->state = INPUT_ST_RISING;
|
||
|
/* no break here, fall through */
|
||
|
case INPUT_ST_RISING:
|
||
|
if ((phys_curr & input->mask) != input->value) {
|
||
|
input->state = INPUT_ST_LOW;
|
||
|
break;
|
||
|
}
|
||
|
if (input->rise_timer < input->rise_time) {
|
||
|
inputs_stable = 0;
|
||
|
input->rise_timer++;
|
||
|
break;
|
||
|
}
|
||
|
input->high_timer = 0;
|
||
|
input->state = INPUT_ST_HIGH;
|
||
|
/* no break here, fall through */
|
||
|
case INPUT_ST_HIGH:
|
||
|
#if 0
|
||
|
/* FIXME:
|
||
|
* this is an invalid test. It tries to catch transitions from single-key
|
||
|
* to multiple-key, but doesn't take into account the contacts polarity.
|
||
|
* The only solution to the problem is to parse keys from the most complex
|
||
|
* to the simplest combinations, and mark them as 'caught' once a combination
|
||
|
* matches, then unmatch it for all other ones.
|
||
|
*/
|
||
|
|
||
|
/* try to catch dangerous transitions cases :
|
||
|
* someone adds a bit, so this signal was a false
|
||
|
* positive resulting from a transition. We should invalidate
|
||
|
* the signal immediately and not call the release function.
|
||
|
* eg: 0 -(press A)-> A -(press B)-> AB : don't match A's release.
|
||
|
*/
|
||
|
if (((phys_prev & input->mask) == input->value)
|
||
|
&& ((phys_curr & input->mask) > input->value)) {
|
||
|
input->state = INPUT_ST_LOW; /* invalidate */
|
||
|
break;
|
||
|
}
|
||
|
//else
|
||
|
#endif
|
||
|
|
||
|
if ((phys_curr & input->mask) == input->value) {
|
||
|
if ((input->type == INPUT_TYPE_STD) && (input->high_timer == 0)) {
|
||
|
input->high_timer++;
|
||
|
if (input->u.std.press_fct != NULL)
|
||
|
input->u.std.press_fct(input->u.std.press_data);
|
||
|
}
|
||
|
else if (input->type == INPUT_TYPE_KBD) {
|
||
|
keypressed = 1; /* will turn on the light */
|
||
|
|
||
|
if (input->high_timer == 0) {
|
||
|
if (input->u.kbd.press_str[0])
|
||
|
keypad_send_key(input->u.kbd.press_str, sizeof(input->u.kbd.press_str));
|
||
|
}
|
||
|
|
||
|
if (input->u.kbd.repeat_str[0]) {
|
||
|
if (input->high_timer >= KEYPAD_REP_START) {
|
||
|
input->high_timer -= KEYPAD_REP_DELAY;
|
||
|
keypad_send_key(input->u.kbd.repeat_str, sizeof(input->u.kbd.repeat_str));
|
||
|
}
|
||
|
inputs_stable = 0; /* we will need to come back here soon */
|
||
|
}
|
||
|
|
||
|
if (input->high_timer < 255) {
|
||
|
input->high_timer++;
|
||
|
}
|
||
|
}
|
||
|
break;
|
||
|
}
|
||
|
else {
|
||
|
/* else signal falling down. Let's fall through. */
|
||
|
input->state = INPUT_ST_FALLING;
|
||
|
input->fall_timer = 0;
|
||
|
}
|
||
|
/* no break here, fall through */
|
||
|
case INPUT_ST_FALLING:
|
||
|
#if 0
|
||
|
/* FIXME !!! same comment as above */
|
||
|
if (((phys_prev & input->mask) == input->value)
|
||
|
&& ((phys_curr & input->mask) > input->value)) {
|
||
|
input->state = INPUT_ST_LOW; /* invalidate */
|
||
|
break;
|
||
|
}
|
||
|
//else
|
||
|
#endif
|
||
|
|
||
|
if ((phys_curr & input->mask) == input->value) {
|
||
|
if (input->type == INPUT_TYPE_KBD) {
|
||
|
keypressed = 1; /* will turn on the light */
|
||
|
|
||
|
if (input->u.kbd.repeat_str[0]) {
|
||
|
if (input->high_timer >= KEYPAD_REP_START)
|
||
|
input->high_timer -= KEYPAD_REP_DELAY;
|
||
|
keypad_send_key(input->u.kbd.repeat_str, sizeof(input->u.kbd.repeat_str));
|
||
|
inputs_stable = 0; /* we will need to come back here soon */
|
||
|
}
|
||
|
|
||
|
if (input->high_timer < 255) {
|
||
|
input->high_timer++;
|
||
|
}
|
||
|
}
|
||
|
input->state = INPUT_ST_HIGH;
|
||
|
break;
|
||
|
}
|
||
|
else if (input->fall_timer >= input->fall_time) {
|
||
|
/* call release event */
|
||
|
if (input->type == INPUT_TYPE_STD) {
|
||
|
if (input->u.std.release_fct != NULL)
|
||
|
input->u.std.release_fct(input->u.std.release_data);
|
||
|
}
|
||
|
else if (input->type == INPUT_TYPE_KBD) {
|
||
|
if (input->u.kbd.release_str[0])
|
||
|
keypad_send_key(input->u.kbd.release_str, sizeof(input->u.kbd.release_str));
|
||
|
}
|
||
|
|
||
|
input->state = INPUT_ST_LOW;
|
||
|
break;
|
||
|
}
|
||
|
else {
|
||
|
input->fall_timer++;
|
||
|
inputs_stable = 0;
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static void panel_scan_timer(void) {
|
||
|
if ((keypad_enabled && keypad_initialized)
|
||
|
|| (smartcard_enabled && smartcard_enabled)) {
|
||
|
|
||
|
if (spin_trylock(&pprt_lock)) {
|
||
|
phys_scan_contacts();
|
||
|
spin_unlock(&pprt_lock); /* no need for the parport anymore */
|
||
|
}
|
||
|
|
||
|
if (!inputs_stable || phys_curr != phys_prev) {
|
||
|
panel_process_inputs();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (lcd_enabled && lcd_initialized) {
|
||
|
if (keypressed) {
|
||
|
if (light_tempo == 0 && ((lcd_flags & LCD_FLAG_L) == 0))
|
||
|
lcd_backlight(1);
|
||
|
light_tempo = FLASH_LIGHT_TEMPO;
|
||
|
}
|
||
|
else if (light_tempo > 0) {
|
||
|
light_tempo--;
|
||
|
if (light_tempo == 0 && ((lcd_flags & LCD_FLAG_L) == 0))
|
||
|
lcd_backlight(0);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
mod_timer(&scan_timer, jiffies + INPUT_POLL_TIME);
|
||
|
}
|
||
|
|
||
|
/* send a high / low clock impulse of <duration> microseconds high and low */
|
||
|
static void smartcard_send_clock(int duration) {
|
||
|
int old;
|
||
|
|
||
|
w_dtr(pprt, (old = r_dtr(pprt)) | PNL_SC_CLK);
|
||
|
udelay(duration);
|
||
|
w_dtr(pprt, (old & ~PNL_SC_CLK));
|
||
|
udelay(duration);
|
||
|
}
|
||
|
|
||
|
static void smartcard_insert(int dummy) {
|
||
|
int ofs;
|
||
|
|
||
|
spin_lock(&pprt_lock);
|
||
|
w_dtr(pprt, (r_dtr(pprt) & ~PNL_SC_BITS));
|
||
|
w_ctr(pprt, (r_ctr(pprt) | PNL_SC_ENA));
|
||
|
|
||
|
udelay(30); /* ensure the rst is low at least 30 us */
|
||
|
|
||
|
smartcard_send_clock(100); /* reset address counter */
|
||
|
|
||
|
w_dtr(pprt, r_dtr(pprt) | PNL_SC_RST);
|
||
|
udelay(30); /* ensure the rst is high at least 30 us */
|
||
|
|
||
|
for (ofs = 0; ofs < SMARTCARD_BYTES; ofs++) {
|
||
|
int bit, byte;
|
||
|
byte = 0;
|
||
|
for (bit = 128; bit > 0; bit >>= 1) {
|
||
|
if (!(r_str(pprt) & PNL_SC_IOR))
|
||
|
byte |= bit;
|
||
|
smartcard_send_clock(15); /* 15 us are enough for data */
|
||
|
}
|
||
|
smartcard_data[ofs] = byte;
|
||
|
}
|
||
|
|
||
|
w_dtr(pprt, (r_dtr(pprt) & ~PNL_SC_BITS));
|
||
|
w_ctr(pprt, (r_ctr(pprt) & ~PNL_SC_ENA));
|
||
|
|
||
|
spin_unlock(&pprt_lock);
|
||
|
|
||
|
printk(KERN_INFO "Panel: smart card inserted : %02x%02x%02x%02x%1x\n",
|
||
|
smartcard_data[2], smartcard_data[3], smartcard_data[4],
|
||
|
smartcard_data[5], smartcard_data[6] >> 4);
|
||
|
keypad_send_key("CardIn\n", 7);
|
||
|
}
|
||
|
|
||
|
static void smartcard_remove(int dummy) {
|
||
|
printk(KERN_INFO "Panel: smart card removed : %02x%02x%02x%02x%1x\n",
|
||
|
smartcard_data[2], smartcard_data[3], smartcard_data[4],
|
||
|
smartcard_data[5], smartcard_data[6] >> 4);
|
||
|
memset(smartcard_data, 0, sizeof(smartcard_data));
|
||
|
keypad_send_key("CardOut\n", 8);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* These are the file operation function for user access to /dev/smartcard
|
||
|
*/
|
||
|
|
||
|
static ssize_t smartcard_read(struct file * file,
|
||
|
char * buf, size_t count, loff_t *ppos ) {
|
||
|
|
||
|
unsigned i = *ppos;
|
||
|
char *tmp = buf;
|
||
|
|
||
|
for( ; count-- > 0 && (smartcard_ptr < 9); ++i, ++tmp, ++smartcard_ptr ) {
|
||
|
if (smartcard_ptr & 1)
|
||
|
put_user( '0' + (smartcard_data[2 + (smartcard_ptr >> 1)] & 0xF), tmp );
|
||
|
else
|
||
|
put_user( '0' + (smartcard_data[2 + (smartcard_ptr >> 1)] >> 4), tmp );
|
||
|
}
|
||
|
*ppos = i;
|
||
|
|
||
|
return( tmp - buf );
|
||
|
}
|
||
|
|
||
|
|
||
|
static int smartcard_open( struct inode *inode, struct file *file ) {
|
||
|
|
||
|
if (smartcard_open_cnt)
|
||
|
return( -EBUSY ); /* open only once at a time */
|
||
|
|
||
|
if (file->f_mode & FMODE_WRITE) /* device is read-only */
|
||
|
return ( -EPERM );
|
||
|
|
||
|
smartcard_ptr = 0; /* flush the buffer on opening */
|
||
|
smartcard_open_cnt++;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
static int smartcard_release( struct inode *inode, struct file *file ) {
|
||
|
smartcard_open_cnt--;
|
||
|
return( 0 );
|
||
|
}
|
||
|
|
||
|
static struct file_operations smartcard_fops = {
|
||
|
read: smartcard_read, /* read */
|
||
|
open: smartcard_open, /* open */
|
||
|
release: smartcard_release, /* close */
|
||
|
};
|
||
|
|
||
|
static struct miscdevice smartcard_dev = {
|
||
|
SMARTCARD_MINOR,
|
||
|
"smartcard",
|
||
|
&smartcard_fops
|
||
|
};
|
||
|
|
||
|
static void init_scan_timer(void) {
|
||
|
if (scan_timer.function != NULL)
|
||
|
return; /* already started */
|
||
|
|
||
|
init_timer(&scan_timer);
|
||
|
scan_timer.expires = jiffies + INPUT_POLL_TIME;
|
||
|
scan_timer.data = 0;
|
||
|
scan_timer.function = (void *)&panel_scan_timer;
|
||
|
add_timer(&scan_timer);
|
||
|
}
|
||
|
|
||
|
/* converts a name of the form "({BbAaPpSsEe}{01234567-})*" to a series of bits.
|
||
|
* if <omask> or <imask> are non-null, they will be or'ed with the bits corresponding
|
||
|
* to out and in bits respectively.
|
||
|
* returns 1 if ok, 0 if error (in which case, nothing is written).
|
||
|
*/
|
||
|
static int input_name2mask(char *name, pmask_t *mask, pmask_t *value, char *imask, char *omask) {
|
||
|
static char sigtab[10]="EeSsPpAaBb";
|
||
|
char im, om;
|
||
|
pmask_t m, v;
|
||
|
|
||
|
om = im = m = v = 0ULL;
|
||
|
while (*name) {
|
||
|
int in, out, bit, neg;
|
||
|
for (in = 0; (in < sizeof(sigtab)) && (sigtab[in] != *name); in++);
|
||
|
if (in >= sizeof(sigtab))
|
||
|
return 0; /* input name not found */
|
||
|
neg = (in & 1); /* odd (lower) names are negated */
|
||
|
in >>= 1;
|
||
|
im |= (1 << in);
|
||
|
|
||
|
name++;
|
||
|
if (isdigit(*name)) {
|
||
|
out = *name - '0';
|
||
|
om |= (1 << out);
|
||
|
}
|
||
|
else if (*name == '-')
|
||
|
out = 8;
|
||
|
else
|
||
|
return 0; /* unknown bit name */
|
||
|
|
||
|
bit = (out * 5) + in;
|
||
|
|
||
|
m |= 1ULL << bit;
|
||
|
if (!neg)
|
||
|
v |= 1ULL << bit;
|
||
|
name++;
|
||
|
}
|
||
|
*mask = m;
|
||
|
*value = v;
|
||
|
if (imask)
|
||
|
*imask |= im;
|
||
|
if (omask)
|
||
|
*omask |= om;
|
||
|
return 1;
|
||
|
}
|
||
|
|
||
|
/* tries to bind a key to the signal name <name>. The key will send the
|
||
|
* strings <press>, <repeat>, <release> for these respective events.
|
||
|
* Returns the pointer to the new key if ok, NULL if the key could not be bound.
|
||
|
*/
|
||
|
static struct logical_input *panel_bind_key(char *name, char *press, char *repeat, char *release) {
|
||
|
struct logical_input *key;
|
||
|
|
||
|
key = (struct logical_input*)kmalloc(sizeof(struct logical_input), GFP_KERNEL);
|
||
|
if (!key) {
|
||
|
printk(KERN_ERR "panel: not enough memory\n");
|
||
|
return NULL;
|
||
|
}
|
||
|
memset(key, 0, sizeof(struct logical_input));
|
||
|
if (!input_name2mask(name, &key->mask, &key->value, &scan_mask_i, &scan_mask_o))
|
||
|
return NULL;
|
||
|
key->type = INPUT_TYPE_KBD;
|
||
|
key->state = INPUT_ST_LOW;
|
||
|
key->rise_time = 1;
|
||
|
key->fall_time = 1;
|
||
|
|
||
|
#if 0
|
||
|
printk(KERN_DEBUG "bind: <%s> : m=%016Lx v=%016Lx\n", name, key->mask, key->value);
|
||
|
#endif
|
||
|
strncpy(key->u.kbd.press_str, press, sizeof(key->u.kbd.press_str));
|
||
|
strncpy(key->u.kbd.repeat_str, repeat, sizeof(key->u.kbd.repeat_str));
|
||
|
strncpy(key->u.kbd.release_str, release, sizeof(key->u.kbd.release_str));
|
||
|
list_add(&key->list, &logical_inputs);
|
||
|
return key;
|
||
|
}
|
||
|
|
||
|
/* tries to bind a callback function to the signal name <name>. The function
|
||
|
* <press_fct> will be called with the <press_data> arg when the signal is
|
||
|
* activated, and so on for <release_fct>/<release_data>
|
||
|
* Returns the pointer to the new signal if ok, NULL if the signal could not be bound.
|
||
|
*/
|
||
|
static struct logical_input *panel_bind_callback(char *name,
|
||
|
void (*press_fct)(int), int press_data,
|
||
|
void (*release_fct)(int), int release_data) {
|
||
|
struct logical_input *callback;
|
||
|
|
||
|
callback = (struct logical_input*)kmalloc(sizeof(struct logical_input), GFP_KERNEL);
|
||
|
if (!callback) {
|
||
|
printk(KERN_ERR "panel: not enough memory\n");
|
||
|
return NULL;
|
||
|
}
|
||
|
memset(callback, 0, sizeof(struct logical_input));
|
||
|
if (!input_name2mask(name, &callback->mask, &callback->value, &scan_mask_i, &scan_mask_o))
|
||
|
return NULL;
|
||
|
callback->type = INPUT_TYPE_STD;
|
||
|
callback->state = INPUT_ST_LOW;
|
||
|
callback->rise_time = 1;
|
||
|
callback->fall_time = 1;
|
||
|
callback->u.std.press_fct = press_fct;
|
||
|
callback->u.std.press_data = press_data;
|
||
|
callback->u.std.release_fct = release_fct;
|
||
|
callback->u.std.release_data = release_data;
|
||
|
list_add(&callback->list, &logical_inputs);
|
||
|
return callback;
|
||
|
}
|
||
|
|
||
|
static void keypad_init(void) {
|
||
|
int keynum;
|
||
|
init_waitqueue_head(&keypad_read_wait);
|
||
|
keypad_buflen = 0; /* flushes any eventual noisy keystroke */
|
||
|
|
||
|
/* Let's create all known keys */
|
||
|
|
||
|
for (keynum = 0; keypad_profile[keynum][0][0]; keynum++) {
|
||
|
panel_bind_key(keypad_profile[keynum][0],
|
||
|
keypad_profile[keynum][1],
|
||
|
keypad_profile[keynum][2],
|
||
|
keypad_profile[keynum][3]);
|
||
|
}
|
||
|
|
||
|
init_scan_timer();
|
||
|
keypad_initialized = 1;
|
||
|
}
|
||
|
|
||
|
|
||
|
static void smartcard_init(void) {
|
||
|
init_waitqueue_head(&smartcard_read_wait);
|
||
|
|
||
|
panel_bind_callback(SMARTCARD_LOGICAL_DETECTOR, &smartcard_insert, 0, &smartcard_remove, 0);
|
||
|
init_scan_timer();
|
||
|
smartcard_enabled = 1;
|
||
|
}
|
||
|
|
||
|
|
||
|
/**************************************************/
|
||
|
/* device initialization */
|
||
|
/**************************************************/
|
||
|
|
||
|
#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,0)
|
||
|
#define INIT_FUNC static int __init panel_init_module
|
||
|
#define CLEANUP_FUNC static void __exit panel_cleanup_module
|
||
|
#elif LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
|
||
|
#define INIT_FUNC static int __init panel_init_module
|
||
|
#define CLEANUP_FUNC static void panel_cleanup_module
|
||
|
#else
|
||
|
#define INIT_FUNC int init_module
|
||
|
#define CLEANUP_FUNC int cleanup_module
|
||
|
#endif
|
||
|
|
||
|
#ifndef MODULE
|
||
|
/* called when compiled into the kernel */
|
||
|
#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
|
||
|
static int __init panel_setup(char *str)
|
||
|
#else
|
||
|
__initfunc(void panel_setup(char *str, int *ints))
|
||
|
#endif
|
||
|
{
|
||
|
int dummy;
|
||
|
int *where;
|
||
|
int helpdisplayed = 0;
|
||
|
|
||
|
if (!str)
|
||
|
return 0;
|
||
|
|
||
|
while (*str) {
|
||
|
where = NULL;
|
||
|
|
||
|
/* let's parse each of the command line parameters of the following form :
|
||
|
panel=[parport:x],[lcd_height:x],[lcd_width:x],[lcd_bwidth:x],[lcd_hwidth:x]
|
||
|
*/
|
||
|
if (!strncmp(str, "parport:", 8)) {
|
||
|
str += 8;
|
||
|
where = &parport;
|
||
|
}
|
||
|
else if (!strncmp(str, "disabled", 8)) {
|
||
|
return 0;
|
||
|
}
|
||
|
else if (!strncmp(str, "lcd_height:", 11)) {
|
||
|
str += 11;
|
||
|
where = &lcd_height;
|
||
|
}
|
||
|
else if (!strncmp(str, "lcd_width:", 10)) {
|
||
|
str += 10;
|
||
|
where = &lcd_width;
|
||
|
}
|
||
|
else if (!strncmp(str, "lcd_bwidth:", 11)) {
|
||
|
str += 11;
|
||
|
where = &lcd_bwidth;
|
||
|
}
|
||
|
else if (!strncmp(str, "lcd_hwidth:", 11)) {
|
||
|
str += 11;
|
||
|
where = &lcd_hwidth;
|
||
|
}
|
||
|
else if (!strncmp(str, "lcd_enabled:", 12)) {
|
||
|
str += 12;
|
||
|
where = &lcd_enabled;
|
||
|
}
|
||
|
else if (!strncmp(str, "keypad_enabled:", 15)) {
|
||
|
str += 15;
|
||
|
where = &keypad_enabled;
|
||
|
}
|
||
|
else if (!strncmp(str, "smartcard_enabled:", 18)) {
|
||
|
str += 18;
|
||
|
where = &smartcard_enabled;
|
||
|
}
|
||
|
else if (!strncmp(str, "profile:", 8)) {
|
||
|
str += 8;
|
||
|
where = &profile;
|
||
|
}
|
||
|
else if (!helpdisplayed) {
|
||
|
helpdisplayed = 1;
|
||
|
printk(KERN_ERR "Panel version " PANEL_VERSION ": invalid argument. Known arguments are :\n"
|
||
|
" parport:, lcd_{height,width,bwidth,enabled}:, keypad_enabled:\n");
|
||
|
}
|
||
|
|
||
|
/* see if we need to read a number */
|
||
|
if (where != NULL) {
|
||
|
dummy = 0;
|
||
|
while (isdigit(*str)) {
|
||
|
dummy = (dummy*10) + (*str - '0');
|
||
|
str++;
|
||
|
}
|
||
|
*where = dummy;
|
||
|
}
|
||
|
|
||
|
/* look for next arg */
|
||
|
while (*str && (*str != ','))
|
||
|
str++;
|
||
|
while (*str == ',')
|
||
|
str++;
|
||
|
}
|
||
|
return 1;
|
||
|
}
|
||
|
|
||
|
#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
|
||
|
__setup("panel=", panel_setup );
|
||
|
#else
|
||
|
__setup("panel", panel_setup );
|
||
|
#endif
|
||
|
|
||
|
#endif /* !MODULE */
|
||
|
|
||
|
static int panel_notify_sys(struct notifier_block *this, unsigned long code, void *unused) {
|
||
|
if (lcd_enabled && lcd_initialized) {
|
||
|
switch(code) {
|
||
|
case SYS_DOWN:
|
||
|
panel_lcd_print("\x0cReloading\nSystem...\x1b[Lc\x1b[Lb\x1b[L+");
|
||
|
break;
|
||
|
case SYS_HALT:
|
||
|
panel_lcd_print("\x0cSystem Halted.\x1b[Lc\x1b[Lb\x1b[L+");
|
||
|
break;
|
||
|
case SYS_POWER_OFF:
|
||
|
panel_lcd_print("\x0cPower off.\x1b[Lc\x1b[Lb\x1b[L+");
|
||
|
break;
|
||
|
default:
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
return NOTIFY_DONE;
|
||
|
}
|
||
|
|
||
|
static struct notifier_block panel_notifier = {
|
||
|
panel_notify_sys,
|
||
|
NULL,
|
||
|
0
|
||
|
};
|
||
|
|
||
|
|
||
|
static void panel_attach (struct parport *port)
|
||
|
{
|
||
|
if (port->number != parport)
|
||
|
return;
|
||
|
|
||
|
if (pprt) {
|
||
|
printk(KERN_ERR "panel_attach(): port->number=%d parport=%d, already registered !\n", port->number, parport);
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
pprt = parport_register_device(port, "panel",
|
||
|
NULL, NULL, /* pf, kf */
|
||
|
NULL,
|
||
|
/*PARPORT_DEV_EXCL*/
|
||
|
0,
|
||
|
(void *)&pprt);
|
||
|
|
||
|
if (parport_claim(pprt)) {
|
||
|
printk(KERN_ERR "Panel: could not claim access to parport%d. Aborting.\n", parport);
|
||
|
//parport_unregister_device(pprt);
|
||
|
//parport_unregister_driver(&panel_driver);
|
||
|
//return -EIO;
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
/* turns IRQ off */
|
||
|
// port->ops->disable_irq(port);
|
||
|
|
||
|
/* must init LCD first, just in case an IRQ from the keypad is generated at keypad init */
|
||
|
if (lcd_enabled) {
|
||
|
lcd_init();
|
||
|
misc_register( &lcd_dev );
|
||
|
}
|
||
|
|
||
|
if (keypad_enabled) {
|
||
|
keypad_init();
|
||
|
misc_register( &keypad_dev );
|
||
|
}
|
||
|
|
||
|
if (smartcard_enabled) {
|
||
|
smartcard_init();
|
||
|
misc_register( &smartcard_dev );
|
||
|
}
|
||
|
}
|
||
|
|
||
|
static void panel_detach (struct parport *port)
|
||
|
{
|
||
|
if (port->number != parport)
|
||
|
return;
|
||
|
|
||
|
if (!pprt) {
|
||
|
printk(KERN_ERR "panel_detach(): port->number=%d parport=%d, nothing to unregister.\n",
|
||
|
port->number, parport);
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
if (smartcard_enabled && smartcard_initialized) {
|
||
|
misc_deregister( &smartcard_dev );
|
||
|
}
|
||
|
|
||
|
if (keypad_enabled && keypad_initialized) {
|
||
|
misc_deregister( &keypad_dev );
|
||
|
}
|
||
|
|
||
|
if (lcd_enabled && lcd_initialized) {
|
||
|
misc_deregister( &lcd_dev );
|
||
|
}
|
||
|
|
||
|
parport_release(pprt);
|
||
|
parport_unregister_device(pprt);
|
||
|
pprt = NULL;
|
||
|
}
|
||
|
|
||
|
static struct parport_driver panel_driver = {
|
||
|
.name = "panel",
|
||
|
.attach = panel_attach,
|
||
|
.detach = panel_detach,
|
||
|
};
|
||
|
|
||
|
/* init function */
|
||
|
int panel_init (void) {
|
||
|
/* for backwards compatibility */
|
||
|
if (keypad_type < 0)
|
||
|
keypad_type = keypad_enabled;
|
||
|
|
||
|
if (lcd_type < 0)
|
||
|
lcd_type = lcd_enabled;
|
||
|
|
||
|
if (parport < 0)
|
||
|
parport = DEFAULT_PARPORT;
|
||
|
|
||
|
/* take care of an eventual profile */
|
||
|
switch (profile) {
|
||
|
case PANEL_PROFILE_CUSTOM: /* custom profile */
|
||
|
if (keypad_type < 0) keypad_type = DEFAULT_KEYPAD;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = DEFAULT_SMARTCARD;
|
||
|
if (lcd_type < 0) lcd_type = DEFAULT_LCD;
|
||
|
break;
|
||
|
case PANEL_PROFILE_OLD: /* 8 bits, 2*16, old keypad */
|
||
|
if (keypad_type < 0) keypad_type = KEYPAD_TYPE_OLD;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = 0;
|
||
|
if (lcd_type < 0) lcd_type = LCD_TYPE_OLD;
|
||
|
if (lcd_width < 0) lcd_width = 16;
|
||
|
if (lcd_hwidth < 0) lcd_hwidth = 16;
|
||
|
break;
|
||
|
case PANEL_PROFILE_NEW: /* serial, 2*16, new keypad */
|
||
|
if (keypad_type < 0) keypad_type = KEYPAD_TYPE_NEW;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = 1;
|
||
|
if (lcd_type < 0) lcd_type = LCD_TYPE_KS0074;
|
||
|
break;
|
||
|
case PANEL_PROFILE_HANTRONIX: /* 8 bits, 2*16 hantronix-like, no keypad */
|
||
|
if (keypad_type < 0) keypad_type = KEYPAD_TYPE_NONE;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = 0;
|
||
|
if (lcd_type < 0) lcd_type = LCD_TYPE_HANTRONIX;
|
||
|
break;
|
||
|
case PANEL_PROFILE_NEXCOM: /* generic 8 bits, 2*16, nexcom keypad, eg. Nexcom. */
|
||
|
if (keypad_type < 0) keypad_type = KEYPAD_TYPE_NEXCOM;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = 0;
|
||
|
if (lcd_type < 0) lcd_type = LCD_TYPE_NEXCOM;
|
||
|
break;
|
||
|
case PANEL_PROFILE_LARGE: /* 8 bits, 2*40, old keypad */
|
||
|
if (keypad_type < 0) keypad_type = KEYPAD_TYPE_OLD;
|
||
|
if (smartcard_enabled < 0) smartcard_enabled = 0;
|
||
|
if (lcd_type < 0) lcd_type = LCD_TYPE_OLD;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
lcd_enabled = (lcd_type > 0);
|
||
|
keypad_enabled = (keypad_type > 0);
|
||
|
|
||
|
switch (keypad_type) {
|
||
|
case KEYPAD_TYPE_OLD:
|
||
|
keypad_profile = old_keypad_profile;
|
||
|
break;
|
||
|
case KEYPAD_TYPE_NEW:
|
||
|
keypad_profile = new_keypad_profile;
|
||
|
break;
|
||
|
case KEYPAD_TYPE_NEXCOM:
|
||
|
keypad_profile = nexcom_keypad_profile;
|
||
|
break;
|
||
|
default:
|
||
|
keypad_profile = NULL;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
/* tells various subsystems about the fact that we are initializing */
|
||
|
init_in_progress = 1;
|
||
|
|
||
|
if (parport_register_driver(&panel_driver)) {
|
||
|
printk(KERN_ERR "Panel: could not register with parport. Aborting.\n");
|
||
|
return -EIO;
|
||
|
}
|
||
|
|
||
|
// The parport can be asynchronously registered later.
|
||
|
//if (pprt == NULL) {
|
||
|
// printk(KERN_ERR "Panel: could not register parport%d. Aborting.\n", parport);
|
||
|
// parport_unregister_driver(&panel_driver);
|
||
|
// return -ENODEV; /* port not found */
|
||
|
//}
|
||
|
|
||
|
|
||
|
if (!lcd_enabled && !keypad_enabled && !smartcard_enabled) { /* no device enabled, let's release the parport */
|
||
|
if (pprt) {
|
||
|
parport_release(pprt);
|
||
|
parport_unregister_device(pprt);
|
||
|
}
|
||
|
parport_unregister_driver(&panel_driver);
|
||
|
printk(KERN_ERR "Panel driver version " PANEL_VERSION " disabled.\n");
|
||
|
return -ENODEV;
|
||
|
}
|
||
|
|
||
|
register_reboot_notifier(&panel_notifier);
|
||
|
|
||
|
if (pprt)
|
||
|
printk(KERN_INFO "Panel driver version " PANEL_VERSION " registered on parport%d (io=0x%lx).\n",
|
||
|
parport, pprt->port->base);
|
||
|
else
|
||
|
printk(KERN_INFO "Panel driver version " PANEL_VERSION " not yet registered\n");
|
||
|
/* tells various subsystems about the fact that initialization is finished */
|
||
|
init_in_progress = 0;
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
|
||
|
#if defined(MODULE) || (LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0))
|
||
|
INIT_FUNC (void) {
|
||
|
return panel_init();
|
||
|
}
|
||
|
|
||
|
CLEANUP_FUNC (void) {
|
||
|
unregister_reboot_notifier(&panel_notifier);
|
||
|
|
||
|
if (scan_timer.function != NULL) {
|
||
|
del_timer(&scan_timer);
|
||
|
}
|
||
|
|
||
|
if (keypad_enabled) {
|
||
|
misc_deregister( &keypad_dev );
|
||
|
}
|
||
|
|
||
|
if (smartcard_enabled) {
|
||
|
misc_deregister( &smartcard_dev );
|
||
|
}
|
||
|
|
||
|
if (lcd_enabled) {
|
||
|
panel_lcd_print("\x0cLCD driver " PANEL_VERSION "\nunloaded.\x1b[Lc\x1b[Lb\x1b[L-");
|
||
|
misc_deregister( &lcd_dev );
|
||
|
}
|
||
|
|
||
|
/* TODO: free all input signals */
|
||
|
|
||
|
parport_release(pprt);
|
||
|
parport_unregister_device(pprt);
|
||
|
parport_unregister_driver(&panel_driver);
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
|
||
|
module_init(panel_init_module);
|
||
|
module_exit(panel_cleanup_module);
|
||
|
MODULE_AUTHOR("Willy Tarreau");
|
||
|
MODULE_LICENSE("GPL");
|
||
|
#endif
|
||
|
|
||
|
/*
|
||
|
* Local variables:
|
||
|
* c-indent-level: 4
|
||
|
* tab-width: 8
|
||
|
* End:
|
||
|
*/
|
||
|
|