[deliverable/linux.git] / drivers / net / irda / ma600.c

/*********************************************************************
 *                
 * Filename:      ma600.c
 * Version:       0.1
 * Description:   Implementation of the MA600 dongle
 * Status:        Experimental.
 * Author:        Leung <95Etwl@alumni.ee.ust.hk> http://www.engsvr.ust/~eetwl95
 * Created at:    Sat Jun 10 20:02:35 2000
 * Modified at:   
 * Modified by:   
 *
 * Note: very thanks to Mr. Maru Wang <maru@mobileaction.com.tw> for providing 
 *       information on the MA600 dongle
 * 
 *     Copyright (c) 2000 Leung, All Rights Reserved.
 *      
 *     This program is free software; you can redistribute it and/or 
 *     modify it under the terms of the GNU General Public License as 
 *     published by the Free Software Foundation; either version 2 of 
 *     the License, or (at your option) any later version.
 *  
 *     This program is distributed in the hope that it will be useful,
 *     but WITHOUT ANY WARRANTY; without even the implied warranty of
 *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 *     GNU General Public License for more details.
 * 
 *     You should have received a copy of the GNU General Public License 
 *     along with this program; if not, write to the Free Software 
 *     Foundation, Inc., 59 Temple Place, Suite 330, Boston, 
 *     MA 02111-1307 USA
 *     
 ********************************************************************/

/* define this macro for release version */
//#define NDEBUG

#include <linux/module.h>
#include <linux/delay.h>
#include <linux/tty.h>
#include <linux/init.h>

#include <net/irda/irda.h>
#include <net/irda/irda_device.h>

#ifndef NDEBUG
	#undef IRDA_DEBUG
	#define IRDA_DEBUG(n, args...) (printk(KERN_DEBUG args))

	#undef ASSERT
	#define ASSERT(expr, func) \
	if(!(expr)) { \
	        printk( "Assertion failed! %s,%s,%s,line=%d\n",\
        	#expr,__FILE__,__FUNCTION__,__LINE__); \
	        func}
#endif

/* convert hex value to ascii hex */
static const char hexTbl[] = "0123456789ABCDEF";


static void ma600_open(dongle_t *self, struct qos_info *qos);
static void ma600_close(dongle_t *self);
static int  ma600_change_speed(struct irda_task *task);
static int  ma600_reset(struct irda_task *task);

/* control byte for MA600 */
#define MA600_9600	0x00
#define MA600_19200	0x01
#define MA600_38400	0x02
#define MA600_57600	0x03
#define MA600_115200	0x04
#define MA600_DEV_ID1	0x05
#define MA600_DEV_ID2	0x06
#define MA600_2400	0x08

static struct dongle_reg dongle = {
	.type = IRDA_MA600_DONGLE,
	.open = ma600_open,
	.close = ma600_close,
	.reset = ma600_reset,
	.change_speed = ma600_change_speed,
	.owner = THIS_MODULE,
};

static int __init ma600_init(void)
{
	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
	return irda_device_register_dongle(&dongle);
}

static void __exit ma600_cleanup(void)
{
	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
	irda_device_unregister_dongle(&dongle);
}

/*
	Power on:
		(0) Clear RTS and DTR for 1 second
		(1) Set RTS and DTR for 1 second
		(2) 9600 bps now
	Note: assume RTS, DTR are clear before
*/
static void ma600_open(dongle_t *self, struct qos_info *qos)
{
	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);

	qos->baud_rate.bits &= IR_2400|IR_9600|IR_19200|IR_38400
				|IR_57600|IR_115200;
	qos->min_turn_time.bits = 0x01;		/* Needs at least 1 ms */	
	irda_qos_bits_to_value(qos);

	//self->set_dtr_rts(self->dev, FALSE, FALSE);
	// should wait 1 second

	self->set_dtr_rts(self->dev, TRUE, TRUE);
	// should wait 1 second
}

static void ma600_close(dongle_t *self)
{
	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);

	/* Power off dongle */
	self->set_dtr_rts(self->dev, FALSE, FALSE);
}

static __u8 get_control_byte(__u32 speed)
{
	__u8 byte;

	switch (speed) {
	default:
	case 115200:
		byte = MA600_115200;
		break;
	case 57600:
		byte = MA600_57600;
		break;
	case 38400:
		byte = MA600_38400;
		break;
	case 19200:
		byte = MA600_19200;
		break;
	case 9600:
		byte = MA600_9600;
		break;
	case 2400:
		byte = MA600_2400;
		break;
	}

	return byte;
}

/*
 * Function ma600_change_speed (dev, state, speed)
 *
 *    Set the speed for the MA600 type dongle. Warning, this 
 *    function must be called with a process context!
 *
 *    Algorithm
 *    1. Reset
 *    2. clear RTS, set DTR and wait for 1ms
 *    3. send Control Byte to the MA600 through TXD to set new baud rate
 *       wait until the stop bit of Control Byte is sent (for 9600 baud rate, 
 *       it takes about 10 msec)
 *    4. set RTS, set DTR (return to NORMAL Operation)
 *    5. wait at least 10 ms, new setting (baud rate, etc) takes effect here 
 *       after
 */
static int ma600_change_speed(struct irda_task *task)
{
	dongle_t *self = (dongle_t *) task->instance;
	__u32 speed = (__u32) task->param;
	static __u8 byte;
	__u8 byte_echo;
	int ret = 0;
	
	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);

	ASSERT(task != NULL, return -1;);

	if (self->speed_task && self->speed_task != task) {
		IRDA_DEBUG(0, "%s(), busy!\n", __FUNCTION__);
		return msecs_to_jiffies(10);
	} else {
		self->speed_task = task;
	}

	switch (task->state) {
	case IRDA_TASK_INIT:
	case IRDA_TASK_CHILD_INIT:
		/* 
		 * Need to reset the dongle and go to 9600 bps before
                 * programming 
		 */
		if (irda_task_execute(self, ma600_reset, NULL, task, 
				      (void *) speed)) {
			/* Dongle need more time to reset */
			irda_task_next_state(task, IRDA_TASK_CHILD_WAIT);
	
			/* give 1 second to finish */
			ret = msecs_to_jiffies(1000);
		} else {
			irda_task_next_state(task, IRDA_TASK_CHILD_DONE);
		}
		break;

	case IRDA_TASK_CHILD_WAIT:
		IRDA_WARNING("%s(), resetting dongle timed out!\n",
			     __FUNCTION__);
		ret = -1;
		break;

	case IRDA_TASK_CHILD_DONE:
		/* Set DTR, Clear RTS */
		self->set_dtr_rts(self->dev, TRUE, FALSE);
	
		ret = msecs_to_jiffies(1);		/* Sleep 1 ms */
		irda_task_next_state(task, IRDA_TASK_WAIT);
		break;

	case IRDA_TASK_WAIT:
		speed = (__u32) task->param;
		byte = get_control_byte(speed);

		/* Write control byte */
		self->write(self->dev, &byte, sizeof(byte));
		
		irda_task_next_state(task, IRDA_TASK_WAIT1);

		/* Wait at least 10 ms */
		ret = msecs_to_jiffies(15);
		break;

	case IRDA_TASK_WAIT1:
		/* Read control byte echo */
		self->read(self->dev, &byte_echo, sizeof(byte_echo));

		if(byte != byte_echo) {
			/* if control byte != echo, I don't know what to do */
			printk(KERN_WARNING "%s() control byte written != read!\n", __FUNCTION__);
			printk(KERN_WARNING "control byte = 0x%c%c\n", 
			       hexTbl[(byte>>4)&0x0f], hexTbl[byte&0x0f]);
			printk(KERN_WARNING "byte echo = 0x%c%c\n", 
			       hexTbl[(byte_echo>>4) & 0x0f], 
			       hexTbl[byte_echo & 0x0f]);
		#ifndef NDEBUG
		} else {
			IRDA_DEBUG(2, "%s() control byte write read OK\n", __FUNCTION__);
		#endif
		}

		/* Set DTR, Set RTS */
		self->set_dtr_rts(self->dev, TRUE, TRUE);

		irda_task_next_state(task, IRDA_TASK_WAIT2);

		/* Wait at least 10 ms */
		ret = msecs_to_jiffies(10);
		break;

	case IRDA_TASK_WAIT2:
		irda_task_next_state(task, IRDA_TASK_DONE);
		self->speed_task = NULL;
		break;

	default:
		IRDA_ERROR("%s(), unknown state %d\n",
			   __FUNCTION__, task->state);
		irda_task_next_state(task, IRDA_TASK_DONE);
		self->speed_task = NULL;
		ret = -1;
		break;
	}
	return ret;
}

/*
 * Function ma600_reset (driver)
 *
 *      This function resets the ma600 dongle. Warning, this function 
 *      must be called with a process context!! 
 *
 *      Algorithm:
 *    	  0. DTR=0, RTS=1 and wait 10 ms
 *    	  1. DTR=1, RTS=1 and wait 10 ms
 *        2. 9600 bps now
 */
int ma600_reset(struct irda_task *task)
{
	dongle_t *self = (dongle_t *) task->instance;
	int ret = 0;

	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);

	ASSERT(task != NULL, return -1;);

	if (self->reset_task && self->reset_task != task) {
		IRDA_DEBUG(0, "%s(), busy!\n", __FUNCTION__);
		return msecs_to_jiffies(10);
	} else
		self->reset_task = task;
	
	switch (task->state) {
	case IRDA_TASK_INIT:
		/* Clear DTR and Set RTS */
		self->set_dtr_rts(self->dev, FALSE, TRUE);
		irda_task_next_state(task, IRDA_TASK_WAIT1);
		ret = msecs_to_jiffies(10);		/* Sleep 10 ms */
		break;
	case IRDA_TASK_WAIT1:
		/* Set DTR and RTS */
		self->set_dtr_rts(self->dev, TRUE, TRUE);
		irda_task_next_state(task, IRDA_TASK_WAIT2);
		ret = msecs_to_jiffies(10);		/* Sleep 10 ms */
		break;
	case IRDA_TASK_WAIT2:
		irda_task_next_state(task, IRDA_TASK_DONE);
		self->reset_task = NULL;
		break;
	default:
		IRDA_ERROR("%s(), unknown state %d\n",
			   __FUNCTION__, task->state);
		irda_task_next_state(task, IRDA_TASK_DONE);		
		self->reset_task = NULL;
		ret = -1;
	}
	return ret;
}

MODULE_AUTHOR("Leung <95Etwl@alumni.ee.ust.hk> http://www.engsvr.ust/~eetwl95");
MODULE_DESCRIPTION("MA600 dongle driver version 0.1");
MODULE_LICENSE("GPL");
MODULE_ALIAS("irda-dongle-11"); /* IRDA_MA600_DONGLE */
		
/*
 * Function init_module (void)
 *
 *    Initialize MA600 module
 *
 */
module_init(ma600_init);

/*
 * Function cleanup_module (void)
 *
 *    Cleanup MA600 module
 *
 */
module_exit(ma600_cleanup);
Commit	Line	Data
1da177e4 LT	1	/*********************************************************************
	2	*
	3	* Filename: ma600.c
	4	* Version: 0.1
	5	* Description: Implementation of the MA600 dongle
	6	* Status: Experimental.
	7	* Author: Leung <95Etwl@alumni.ee.ust.hk> http://www.engsvr.ust/~eetwl95
	8	* Created at: Sat Jun 10 20:02:35 2000
	9	* Modified at:
	10	* Modified by:
	11	*
	12	* Note: very thanks to Mr. Maru Wang <maru@mobileaction.com.tw> for providing
	13	* information on the MA600 dongle
	14	*
	15	* Copyright (c) 2000 Leung, All Rights Reserved.
	16	*
	17	* This program is free software; you can redistribute it and/or
	18	* modify it under the terms of the GNU General Public License as
	19	* published by the Free Software Foundation; either version 2 of
	20	* the License, or (at your option) any later version.
	21	*
	22	* This program is distributed in the hope that it will be useful,
	23	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	24	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	25	* GNU General Public License for more details.
	26	*
	27	* You should have received a copy of the GNU General Public License
	28	* along with this program; if not, write to the Free Software
	29	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	30	* MA 02111-1307 USA
	31	*
	32	********************************************************************/
	33
	34	/* define this macro for release version */
	35	//#define NDEBUG
	36
	37	#include <linux/module.h>
	38	#include <linux/delay.h>
	39	#include <linux/tty.h>
	40	#include <linux/init.h>
	41
	42	#include <net/irda/irda.h>
	43	#include <net/irda/irda_device.h>
	44
	45	#ifndef NDEBUG
	46	#undef IRDA_DEBUG
	47	#define IRDA_DEBUG(n, args...) (printk(KERN_DEBUG args))
	48
	49	#undef ASSERT
	50	#define ASSERT(expr, func) \
	51	if(!(expr)) { \
	52	printk( "Assertion failed! %s,%s,%s,line=%d\n",\
	53	#expr,__FILE__,__FUNCTION__,__LINE__); \
	54	func}
	55	#endif
	56
	57	/* convert hex value to ascii hex */
	58	static const char hexTbl[] = "0123456789ABCDEF";
	59
	60
	61	static void ma600_open(dongle_t self, struct qos_info qos);
	62	static void ma600_close(dongle_t *self);
	63	static int ma600_change_speed(struct irda_task *task);
	64	static int ma600_reset(struct irda_task *task);
65
66	/* control byte for MA600 */
67	#define MA600_9600 0x00
68	#define MA600_19200 0x01
69	#define MA600_38400 0x02
70	#define MA600_57600 0x03
71	#define MA600_115200 0x04
72	#define MA600_DEV_ID1 0x05
73	#define MA600_DEV_ID2 0x06
74	#define MA600_2400 0x08
75
76	static struct dongle_reg dongle = {
77	.type = IRDA_MA600_DONGLE,
78	.open = ma600_open,
79	.close = ma600_close,
80	.reset = ma600_reset,
81	.change_speed = ma600_change_speed,
82	.owner = THIS_MODULE,
83	};
84
85	static int __init ma600_init(void)
86	{
87	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
88	return irda_device_register_dongle(&dongle);
89	}
90
91	static void __exit ma600_cleanup(void)
92	{
93	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
94	irda_device_unregister_dongle(&dongle);
95	}
96
97	/*
98	Power on:
99	(0) Clear RTS and DTR for 1 second
100	(1) Set RTS and DTR for 1 second
101	(2) 9600 bps now
102	Note: assume RTS, DTR are clear before
103	*/
104	static void ma600_open(dongle_t self, struct qos_info qos)
105	{
106	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
107
108	qos->baud_rate.bits &= IR_2400\|IR_9600\|IR_19200\|IR_38400
109	\|IR_57600\|IR_115200;
110	qos->min_turn_time.bits = 0x01; /* Needs at least 1 ms */
111	irda_qos_bits_to_value(qos);
112
113	//self->set_dtr_rts(self->dev, FALSE, FALSE);
114	// should wait 1 second
115
116	self->set_dtr_rts(self->dev, TRUE, TRUE);
117	// should wait 1 second
118	}
119
120	static void ma600_close(dongle_t *self)
121	{
122	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
123
124	/* Power off dongle */
125	self->set_dtr_rts(self->dev, FALSE, FALSE);
126	}
127
128	static __u8 get_control_byte(__u32 speed)
129	{
130	__u8 byte;
131
132	switch (speed) {
133	default:
134	case 115200:
135	byte = MA600_115200;
136	break;
137	case 57600:
138	byte = MA600_57600;
139	break;
140	case 38400:
141	byte = MA600_38400;
142	break;
143	case 19200:
144	byte = MA600_19200;
145	break;
146	case 9600:
147	byte = MA600_9600;
148	break;
149	case 2400:
150	byte = MA600_2400;
151	break;
152	}
153
154	return byte;
155	}
156
157	/*
158	* Function ma600_change_speed (dev, state, speed)
159	*
160	* Set the speed for the MA600 type dongle. Warning, this
161	* function must be called with a process context!
162	*
163	* Algorithm
164	* 1. Reset
165	* 2. clear RTS, set DTR and wait for 1ms
166	* 3. send Control Byte to the MA600 through TXD to set new baud rate
167	* wait until the stop bit of Control Byte is sent (for 9600 baud rate,
168	* it takes about 10 msec)
169	* 4. set RTS, set DTR (return to NORMAL Operation)
170	* 5. wait at least 10 ms, new setting (baud rate, etc) takes effect here
171	* after
172	*/
173	static int ma600_change_speed(struct irda_task *task)
174	{
175	dongle_t self = (dongle_t ) task->instance;
176	__u32 speed = (__u32) task->param;
177	static __u8 byte;
178	__u8 byte_echo;
179	int ret = 0;
180
181	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
182
183	ASSERT(task != NULL, return -1;);
184
185	if (self->speed_task && self->speed_task != task) {
186	IRDA_DEBUG(0, "%s(), busy!\n", __FUNCTION__);
187	return msecs_to_jiffies(10);
188	} else {
189	self->speed_task = task;
190	}
191
192	switch (task->state) {
193	case IRDA_TASK_INIT:
194	case IRDA_TASK_CHILD_INIT:
195	/*
196	* Need to reset the dongle and go to 9600 bps before
197	* programming
198	*/
199	if (irda_task_execute(self, ma600_reset, NULL, task,
200	(void *) speed)) {
201	/* Dongle need more time to reset */
202	irda_task_next_state(task, IRDA_TASK_CHILD_WAIT);
203
204	/* give 1 second to finish */
205	ret = msecs_to_jiffies(1000);
206	} else {
207	irda_task_next_state(task, IRDA_TASK_CHILD_DONE);
208	}
209	break;
210
211	case IRDA_TASK_CHILD_WAIT:
212	IRDA_WARNING("%s(), resetting dongle timed out!\n",
213	__FUNCTION__);
214	ret = -1;
215	break;
216
217	case IRDA_TASK_CHILD_DONE:
218	/* Set DTR, Clear RTS */
219	self->set_dtr_rts(self->dev, TRUE, FALSE);
220
221	ret = msecs_to_jiffies(1); /* Sleep 1 ms */
222	irda_task_next_state(task, IRDA_TASK_WAIT);
223	break;
224
225	case IRDA_TASK_WAIT:
226	speed = (__u32) task->param;
227	byte = get_control_byte(speed);
228
229	/* Write control byte */
230	self->write(self->dev, &byte, sizeof(byte));
231
232	irda_task_next_state(task, IRDA_TASK_WAIT1);
233
234	/* Wait at least 10 ms */
235	ret = msecs_to_jiffies(15);
236	break;
237
238	case IRDA_TASK_WAIT1:
239	/* Read control byte echo */
240	self->read(self->dev, &byte_echo, sizeof(byte_echo));
241
242	if(byte != byte_echo) {
243	/* if control byte != echo, I don't know what to do */
244	printk(KERN_WARNING "%s() control byte written != read!\n", __FUNCTION__);
245	printk(KERN_WARNING "control byte = 0x%c%c\n",
246	hexTbl[(byte>>4)&0x0f], hexTbl[byte&0x0f]);
247	printk(KERN_WARNING "byte echo = 0x%c%c\n",
248	hexTbl[(byte_echo>>4) & 0x0f],
249	hexTbl[byte_echo & 0x0f]);
250	#ifndef NDEBUG
251	} else {
252	IRDA_DEBUG(2, "%s() control byte write read OK\n", __FUNCTION__);
253	#endif
254	}
255
256	/* Set DTR, Set RTS */
257	self->set_dtr_rts(self->dev, TRUE, TRUE);
258
259	irda_task_next_state(task, IRDA_TASK_WAIT2);
260
261	/* Wait at least 10 ms */
262	ret = msecs_to_jiffies(10);
263	break;
264
265	case IRDA_TASK_WAIT2:
266	irda_task_next_state(task, IRDA_TASK_DONE);
267	self->speed_task = NULL;
268	break;
269
270	default:
271	IRDA_ERROR("%s(), unknown state %d\n",
272	__FUNCTION__, task->state);
273	irda_task_next_state(task, IRDA_TASK_DONE);
274	self->speed_task = NULL;
275	ret = -1;
276	break;
277	}
278	return ret;
279	}
280
281	/*
282	* Function ma600_reset (driver)
283	*
284	* This function resets the ma600 dongle. Warning, this function
285	* must be called with a process context!!
286	*
287	* Algorithm:
288	* 0. DTR=0, RTS=1 and wait 10 ms
289	* 1. DTR=1, RTS=1 and wait 10 ms
290	* 2. 9600 bps now
291	*/
292	int ma600_reset(struct irda_task *task)
293	{
294	dongle_t self = (dongle_t ) task->instance;
295	int ret = 0;
296
297	IRDA_DEBUG(2, "%s()\n", __FUNCTION__);
298
299	ASSERT(task != NULL, return -1;);
300
301	if (self->reset_task && self->reset_task != task) {
302	IRDA_DEBUG(0, "%s(), busy!\n", __FUNCTION__);
303	return msecs_to_jiffies(10);
304	} else
305	self->reset_task = task;
306
307	switch (task->state) {
308	case IRDA_TASK_INIT:
309	/* Clear DTR and Set RTS */
310	self->set_dtr_rts(self->dev, FALSE, TRUE);
311	irda_task_next_state(task, IRDA_TASK_WAIT1);
312	ret = msecs_to_jiffies(10); /* Sleep 10 ms */
313	break;
314	case IRDA_TASK_WAIT1:
315	/* Set DTR and RTS */
316	self->set_dtr_rts(self->dev, TRUE, TRUE);
317	irda_task_next_state(task, IRDA_TASK_WAIT2);
318	ret = msecs_to_jiffies(10); /* Sleep 10 ms */
319	break;
320	case IRDA_TASK_WAIT2:
321	irda_task_next_state(task, IRDA_TASK_DONE);
322	self->reset_task = NULL;
323	break;
324	default:
325	IRDA_ERROR("%s(), unknown state %d\n",
326	__FUNCTION__, task->state);
327	irda_task_next_state(task, IRDA_TASK_DONE);
328	self->reset_task = NULL;
329	ret = -1;
330	}
331	return ret;
332	}
333
334	MODULE_AUTHOR("Leung <95Etwl@alumni.ee.ust.hk> http://www.engsvr.ust/~eetwl95");
335	MODULE_DESCRIPTION("MA600 dongle driver version 0.1");
336	MODULE_LICENSE("GPL");
337	MODULE_ALIAS("irda-dongle-11"); /* IRDA_MA600_DONGLE */
338
339	/*
340	* Function init_module (void)
341	*
342	* Initialize MA600 module
343	*
344	*/
345	module_init(ma600_init);
346
347	/*
348	* Function cleanup_module (void)
349	*
350	* Cleanup MA600 module
351	*
352	*/
353	module_exit(ma600_cleanup);
354