WebSVN – HelenOS – Diff – /branches/dynload/kernel/genarch/src/drivers/z8530/z8530.c


/*
 * Copyright (c) 2009 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup genarch
 * @{
 */
/**
 * @file
 * @brief   Zilog 8530 serial port driver.
 */
 
#include <genarch/kbd/z8530.h>
#include <genarch/kbd/key.h>
#include <genarch/kbd/scanc.h>
#include <genarch/kbd/scanc_sun.h>
#include <arch/drivers/kbd.h>
#include <console/console.h>
#include <console/chardev.h>
 
#include <ddi/irq.h>
#include <arch/asm.h>
#include <mm/slab.h>
 
static inline void z8530_write(ioport8_t *ctl, uint8_t reg, uint8_t val)
{
    /*
     * Registers 8-15 will automatically issue the Point High
     * command as their bit 3 is 1.
     */
    pio_write_8(ctl, reg);  /* select register */
    pio_write_8(ctl, val);  /* write value */
}
 
static inline uint8_t z8530_read(ioport8_t *ctl, uint8_t reg)
{
    /*
     * Registers 8-15 will automatically issue the Point High
     * command as their bit 3 is 1.
     */
    pio_write_8(ctl, reg);  /* select register */
    return pio_read_8(ctl);
}
 
/*
 * These codes read from z8530 data register are silently ignored.
 */
#define IGNORE_CODE 0x7f        /* all keys up */
 
static void z8530_suspend(chardev_t *);
static void z8530_resume(chardev_t *);
 
static chardev_operations_t ops = {
    .suspend = z8530_suspend,
    .resume = z8530_resume,
};
 
/** Initialize z8530. */
bool
z8530_init(z8530_t *dev, devno_t devno, inr_t inr, cir_t cir, void *cir_arg)
{
    z8530_instance_t *instance;
 
    chardev_initialize("z8530_kbd", &kbrd, &ops);
    stdin = &kbrd;
 
    instance = malloc(sizeof(z8530_instance_t), FRAME_ATOMIC);
    if (!instance)
        return false;
 
    instance->devno = devno;
    instance->z8530 = dev;
 
    irq_initialize(&instance->irq);
    instance->irq.devno = devno;
    instance->irq.inr = inr;
    instance->irq.claim = z8530_claim;
    instance->irq.handler = z8530_irq_handler;
    instance->irq.instance = instance;
    instance->irq.cir = cir;
    instance->irq.cir_arg = cir_arg;
    irq_register(&instance->irq);
 
    (void) z8530_read(&dev->ctl_a, RR8);
 
    /*
     * Clear any pending TX interrupts or we never manage
     * to set FHC UART interrupt state to idle.
     */
    z8530_write(&dev->ctl_a, WR0, WR0_TX_IP_RST);
 
    /* interrupt on all characters */
    z8530_write(&dev->ctl_a, WR1, WR1_IARCSC);
 
    /* 8 bits per character and enable receiver */
    z8530_write(&dev->ctl_a, WR3, WR3_RX8BITSCH | WR3_RX_ENABLE);
   
    /* Master Interrupt Enable. */
    z8530_write(&dev->ctl_a, WR9, WR9_MIE);
 
 
 
 
 
 
 
 
 
 
 
    return true;
}
 
/* Called from getc(). */
void z8530_resume(chardev_t *d)
{
}
 
/* Called from getc(). */
void z8530_suspend(chardev_t *d)
{
}
 
irq_ownership_t z8530_claim(irq_t *irq)
{
    z8530_instance_t *instance = irq->instance;
    z8530_t *dev = instance->z8530;
 
    return (z8530_read(&dev->ctl_a, RR0) & RR0_RCA);
}
 
void z8530_irq_handler(irq_t *irq)
{
    z8530_instance_t *instance = irq->instance;
    z8530_t *dev = instance->z8530;
    uint8_t x;
 
    if (z8530_read(&dev->ctl_a, RR0) & RR0_RCA) {
        x = z8530_read(&dev->ctl_a, RR8);
        if (x != IGNORE_CODE) {
            if (x & KEY_RELEASE)
                key_released(x ^ KEY_RELEASE);
            else
                key_pressed(x);
        }
    }
}
 
/** @}
 */
 

Rev 3961	Rev 3982
1	/*	1	/*
2	* Copyright (c) 2001-2004 Jakub Jermar	2	* Copyright (c) 2009 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/** @addtogroup genarch	29	/** @addtogroup genarch
30	* @{	30	* @{
31	*/	31	*/
32	/**	32	/**
33	* @file	33	* @file
34	* @brief Zilog 8530 serial port driver.	34	* @brief Zilog 8530 serial port driver.
35	*/	35	*/
36		36
37	#include <genarch/kbd/z8530.h>	37	#include <genarch/kbd/z8530.h>
38	#include <genarch/kbd/key.h>	38	#include <genarch/kbd/key.h>
39	#include <genarch/kbd/scanc.h>	39	#include <genarch/kbd/scanc.h>
40	#include <genarch/kbd/scanc_sun.h>	40	#include <genarch/kbd/scanc_sun.h>
41	#include <arch/drivers/kbd.h>	41	#include <arch/drivers/kbd.h>
42	#include <console/console.h>	42	#include <console/console.h>
43	#include <console/chardev.h>	43	#include <console/chardev.h>
44	#include <sysinfo/sysinfo.h>	-
45	#include <ddi/irq.h>	44	#include <ddi/irq.h>
46	#include <arch/asm.h>	45	#include <arch/asm.h>
47	#include <mm/slab.h>	46	#include <mm/slab.h>
48		47
49	static inline void z8530_write(ioport8_t *ctl, uint8_t reg, uint8_t val)	48	static inline void z8530_write(ioport8_t *ctl, uint8_t reg, uint8_t val)
50	{	49	{
51	/*	50	/*
52	* Registers 8-15 will automatically issue the Point High	51	* Registers 8-15 will automatically issue the Point High
53	* command as their bit 3 is 1.	52	* command as their bit 3 is 1.
54	*/	53	*/
55	pio_write_8(ctl, reg); /* select register */	54	pio_write_8(ctl, reg); /* select register */
56	pio_write_8(ctl, val); /* write value */	55	pio_write_8(ctl, val); /* write value */
57	}	56	}
58		57
59	static inline uint8_t z8530_read(ioport8_t *ctl, uint8_t reg)	58	static inline uint8_t z8530_read(ioport8_t *ctl, uint8_t reg)
60	{	59	{
61	/*	60	/*
62	* Registers 8-15 will automatically issue the Point High	61	* Registers 8-15 will automatically issue the Point High
63	* command as their bit 3 is 1.	62	* command as their bit 3 is 1.
64	*/	63	*/
65	pio_write_8(ctl, reg); /* select register */	64	pio_write_8(ctl, reg); /* select register */
66	return pio_read_8(ctl);	65	return pio_read_8(ctl);
67	}	66	}
68		67
69	/*	68	/*
70	* These codes read from z8530 data register are silently ignored.	69	* These codes read from z8530 data register are silently ignored.
71	*/	70	*/
72	#define IGNORE_CODE 0x7f /* all keys up */	71	#define IGNORE_CODE 0x7f /* all keys up */
73		72
74	static void z8530_suspend(chardev_t *);	73	static void z8530_suspend(chardev_t *);
75	static void z8530_resume(chardev_t *);	74	static void z8530_resume(chardev_t *);
76		75
77	static chardev_operations_t ops = {	76	static chardev_operations_t ops = {
78	.suspend = z8530_suspend,	77	.suspend = z8530_suspend,
79	.resume = z8530_resume,	78	.resume = z8530_resume,
80	};	79	};
81		80
82	/** Initialize z8530. */	81	/** Initialize z8530. */
83	bool	82	bool
84	z8530_init(z8530_t dev, devno_t devno, inr_t inr, cir_t cir, void cir_arg)	83	z8530_init(z8530_t dev, devno_t devno, inr_t inr, cir_t cir, void cir_arg)
85	{	84	{
86	z8530_instance_t *instance;	85	z8530_instance_t *instance;
87		86
88	chardev_initialize("z8530_kbd", &kbrd, &ops);	87	chardev_initialize("z8530_kbd", &kbrd, &ops);
89	stdin = &kbrd;	88	stdin = &kbrd;
90		89
91	instance = malloc(sizeof(z8530_instance_t), FRAME_ATOMIC);	90	instance = malloc(sizeof(z8530_instance_t), FRAME_ATOMIC);
92	if (!instance)	91	if (!instance)
93	return false;	92	return false;
94		93
95	instance->devno = devno;	94	instance->devno = devno;
96	instance->z8530 = dev;	95	instance->z8530 = dev;
97		96
98	irq_initialize(&instance->irq);	97	irq_initialize(&instance->irq);
99	instance->irq.devno = devno;	98	instance->irq.devno = devno;
100	instance->irq.inr = inr;	99	instance->irq.inr = inr;
101	instance->irq.claim = z8530_claim;	100	instance->irq.claim = z8530_claim;
102	instance->irq.handler = z8530_irq_handler;	101	instance->irq.handler = z8530_irq_handler;
103	instance->irq.instance = instance;	102	instance->irq.instance = instance;
104	instance->irq.cir = cir;	103	instance->irq.cir = cir;
105	instance->irq.cir_arg = cir_arg;	104	instance->irq.cir_arg = cir_arg;
106	irq_register(&instance->irq);	105	irq_register(&instance->irq);
107		106
108	(void) z8530_read(&dev->ctl_a, RR8);	107	(void) z8530_read(&dev->ctl_a, RR8);
109		108
110	/*	109	/*
111	* Clear any pending TX interrupts or we never manage	110	* Clear any pending TX interrupts or we never manage
112	* to set FHC UART interrupt state to idle.	111	* to set FHC UART interrupt state to idle.
113	*/	112	*/
114	z8530_write(&dev->ctl_a, WR0, WR0_TX_IP_RST);	113	z8530_write(&dev->ctl_a, WR0, WR0_TX_IP_RST);
115		114
116	/* interrupt on all characters */	115	/* interrupt on all characters */
117	z8530_write(&dev->ctl_a, WR1, WR1_IARCSC);	116	z8530_write(&dev->ctl_a, WR1, WR1_IARCSC);
118		117
119	/* 8 bits per character and enable receiver */	118	/* 8 bits per character and enable receiver */
120	z8530_write(&dev->ctl_a, WR3, WR3_RX8BITSCH \| WR3_RX_ENABLE);	119	z8530_write(&dev->ctl_a, WR3, WR3_RX8BITSCH \| WR3_RX_ENABLE);
121		120
122	/* Master Interrupt Enable. */	121	/* Master Interrupt Enable. */
123	z8530_write(&dev->ctl_a, WR9, WR9_MIE);	122	z8530_write(&dev->ctl_a, WR9, WR9_MIE);
124		123
125	/*	-
126	* This is the necessary evil until the userspace drivers are entirely	-
127	* self-sufficient.	-
128	*/	-
129	sysinfo_set_item_val("kbd", NULL, true);	-
130	sysinfo_set_item_val("kbd.type", NULL, KBD_Z8530);	-
131	sysinfo_set_item_val("kbd.devno", NULL, devno);	-
132	sysinfo_set_item_val("kbd.inr", NULL, inr);	-
133	sysinfo_set_item_val("kbd.address.virtual", NULL, (uintptr_t) dev);	-
134		-
135	return true;	124	return true;
136	}	125	}
137		126
138	/* Called from getc(). */	127	/* Called from getc(). */
139	void z8530_resume(chardev_t *d)	128	void z8530_resume(chardev_t *d)
140	{	129	{
141	}	130	}
142		131
143	/* Called from getc(). */	132	/* Called from getc(). */
144	void z8530_suspend(chardev_t *d)	133	void z8530_suspend(chardev_t *d)
145	{	134	{
146	}	135	}
147		136
148	irq_ownership_t z8530_claim(irq_t *irq)	137	irq_ownership_t z8530_claim(irq_t *irq)
149	{	138	{
150	z8530_instance_t *instance = irq->instance;	139	z8530_instance_t *instance = irq->instance;
151	z8530_t *dev = instance->z8530;	140	z8530_t *dev = instance->z8530;
152		141
153	return (z8530_read(&dev->ctl_a, RR0) & RR0_RCA);	142	return (z8530_read(&dev->ctl_a, RR0) & RR0_RCA);
154	}	143	}
155		144
156	void z8530_irq_handler(irq_t *irq)	145	void z8530_irq_handler(irq_t *irq)
157	{	146	{
158	z8530_instance_t *instance = irq->instance;	147	z8530_instance_t *instance = irq->instance;
159	z8530_t *dev = instance->z8530;	148	z8530_t *dev = instance->z8530;
160	uint8_t x;	149	uint8_t x;
161		150
162	if (z8530_read(&dev->ctl_a, RR0) & RR0_RCA) {	151	if (z8530_read(&dev->ctl_a, RR0) & RR0_RCA) {
163	x = z8530_read(&dev->ctl_a, RR8);	152	x = z8530_read(&dev->ctl_a, RR8);
164	if (x != IGNORE_CODE) {	153	if (x != IGNORE_CODE) {
165	if (x & KEY_RELEASE)	154	if (x & KEY_RELEASE)
166	key_released(x ^ KEY_RELEASE);	155	key_released(x ^ KEY_RELEASE);
167	else	156	else
168	key_pressed(x);	157	key_pressed(x);
169	}	158	}
170	}	159	}
171	}	160	}
172		161
173	/** @}	162	/** @}
174	*/	163	*/
175		164

Subversion Repositories HelenOS

(root)/branches/dynload/kernel/genarch/src/drivers/z8530/z8530.c @ 4669 – Rev 3961 → 3982