/********************************************************************* * * 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 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 #include #include #include #include #include #include #include #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 = { Q_NULL, IRDA_MA600_DONGLE, ma600_open, ma600_close, ma600_reset, ma600_change_speed, }; 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 MOD_INC_USE_COUNT; } static void ma600_close(dongle_t *self) { IRDA_DEBUG(2, "%s()\n", __FUNCTION__); /* Power off dongle */ self->set_dtr_rts(self->dev, FALSE, FALSE); MOD_DEC_USE_COUNT; } 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: 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: 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: 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"); /* * Function init_module (void) * * Initialize MA600 module * */ module_init(ma600_init); /* * Function cleanup_module (void) * * Cleanup MA600 module * */ module_exit(ma600_cleanup);