355 lines
8.8 KiB
C
355 lines
8.8 KiB
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);
|
||
|
|
|