/* * Dummy Zaptel Driver for Zapata Telephony interface * * Required: usb-uhci module and kernel > 2.4.4 OR kernel > 2.6.0 * * Written by Robert Pleh * 2.6 version by Tony Hoyle * Unified by Mark Spencer * Converted to use RTC on i386 by Tony Mountifield * * Copyright (C) 2002, Hermes Softlab * Copyright (C) 2004, Digium, Inc. * * 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., 675 Mass Ave, Cambridge, MA 02139, USA. * */ #include #ifndef VERSION_CODE # define VERSION_CODE(vers,rel,seq) ( ((vers)<<16) | ((rel)<<8) | (seq) ) #endif #if LINUX_VERSION_CODE < VERSION_CODE(2,4,5) # error "This kernel is too old: not supported by this file" #endif /* * NOTE: (only applies to kernel 2.6) * If using an i386 architecture without a PC real-time clock, * the #define USE_RTC should be commented out. */ #if defined(__i386__) || defined(__x86_64__) #if LINUX_VERSION_CODE >= VERSION_CODE(2,6,13) #define USE_RTC #else #if 0 #define USE_RTC #endif #endif #endif #include #include #include #include #include #ifdef STANDALONE_ZAPATA #include "zaptel.h" #else #include #endif #ifndef LINUX26 #include #include #include #endif #ifdef LINUX26 #ifdef USE_RTC #include #endif #include #endif #include "ztdummy.h" #ifndef LINUX_VERSION_CODE # include #endif #ifndef VERSION_CODE # define VERSION_CODE(vers,rel,seq) ( ((vers)<<16) | ((rel)<<8) | (seq) ) #endif #if LINUX_VERSION_CODE < VERSION_CODE(2,4,5) # error "This kernel is too old: not supported by this file" #endif static struct ztdummy *ztd; static int debug = 0; #ifdef LINUX26 #ifndef USE_RTC /* New 2.6 kernel timer stuff */ static struct timer_list timer; #if HZ != 1000 #warning This module will not be usable since the kernel HZ setting is not 1000 ticks per second. #endif #endif #else #if LINUX_VERSION_CODE < VERSION_CODE(2,4,5) # error "This kernel is too old: not supported by this file" #endif /* Old UCHI stuff */ static uhci_desc_t *td; static uhci_t *s; static int check_int = 0; static int monitor = 0; /* exported kernel symbols */ extern int insert_td (uhci_t *s, uhci_desc_t *qh, uhci_desc_t* new, int flags); extern int alloc_td (uhci_t *s, uhci_desc_t ** new, int flags); extern int insert_td_horizontal (uhci_t *s, uhci_desc_t *td, uhci_desc_t* new); extern int unlink_td (uhci_t *s, uhci_desc_t *element, int phys_unlink); extern void fill_td (uhci_desc_t *td, int status, int info, __u32 buffer); extern void uhci_interrupt (int irq, void *__uhci, struct pt_regs *regs); extern int delete_desc (uhci_t *s, uhci_desc_t *element); extern uhci_t **uhci_devices; #endif #ifdef LINUX26 #ifdef USE_RTC /* rtc_interrupt - called at 1024Hz from hook in RTC handler */ static void ztdummy_rtc_interrupt(void *private_data) { struct ztdummy *ztd = private_data; unsigned int ticks; atomic_inc(&ztd->ticks); ticks = atomic_read(&ztd->ticks); if (ticks == 42 || ticks == 85) { /* skip it */ } else if (ticks >= 128) { /* skip and restart count */ atomic_set(&ztd->ticks, 0); } else { /* zaptel timing - called in 125 of every 128 interrupts = 1000Hz */ zt_receive(&ztd->span); zt_transmit(&ztd->span); } } #else /* use kernel system tick timer if PC architecture RTC is not available */ static void ztdummy_timer(unsigned long param) { zt_receive(&ztd->span); zt_transmit(&ztd->span); timer.expires = jiffies + 1; add_timer(&timer); } #endif #else static void ztdummy_interrupt(int irq, void *dev_id, struct pt_regs *regs) { unsigned short status; unsigned int io_addr = s->io_addr; status = inw (io_addr + USBSTS); if (status != 0) { /* interrupt from our USB port */ zt_receive(&ztd->span); zt_transmit(&ztd->span); if (monitor && (check_int==0)) { /* for testing if interrupt gets triggered*/ check_int = 1; printk("ztdummy: interrupt triggered \n"); } } return; } #endif static int ztdummy_initialize(struct ztdummy *ztd) { /* Zapata stuff */ sprintf(ztd->span.name, "ZTDUMMY/1"); sprintf(ztd->span.desc, "%s %d", ztd->span.name, 1); sprintf(ztd->chan.name, "ZTDUMMY/%d/%d", 1, 0); ztd->chan.chanpos = 1; ztd->span.chans = &ztd->chan; ztd->span.channels = 0; /* no channels on our span */ ztd->span.deflaw = ZT_LAW_MULAW; init_waitqueue_head(&ztd->span.maintq); ztd->span.pvt = ztd; ztd->chan.pvt = ztd; if (zt_register(&ztd->span, 0)) { return -1; } return 0; } int init_module(void) { #ifdef LINUX26 #ifdef USE_RTC int err; #endif #else int irq; #ifdef DEFINE_SPINLOCK DEFINE_SPINLOCK(mylock); #else spinlock_t mylock = SPIN_LOCK_UNLOCKED; #endif if (uhci_devices==NULL){ printk ("ztdummy: Uhci_devices pointer error.\n"); return -ENODEV; } s=*uhci_devices; /* uhci device */ if (s==NULL){ printk ("ztdummy: No uhci_device found.\n"); return -ENODEV; } #endif #if defined(LINUX26) && !defined(USE_RTC) if (HZ != 1000) { printk("ztdummy: This module requires the kernel HZ setting to be 1000 ticks per second\n"); return -ENODEV; } #endif /* defined(LINUX26) && !defined(USE_RTC) */ ztd = kmalloc(sizeof(struct ztdummy), GFP_KERNEL); if (ztd == NULL) { printk("ztdummy: Unable to allocate memory\n"); return -ENOMEM; } memset(ztd, 0x0, sizeof(struct ztdummy)); if (ztdummy_initialize(ztd)) { printk("ztdummy: Unable to intialize zaptel driver\n"); kfree(ztd); return -ENODEV; } #ifdef LINUX26 #ifdef USE_RTC atomic_set(&ztd->ticks, 0); ztd->rtc_task.func = ztdummy_rtc_interrupt; ztd->rtc_task.private_data = ztd; err = rtc_register(&ztd->rtc_task); if (err < 0) { printk("ztdummy: Unable to register zaptel rtc driver\n"); zt_unregister(&ztd->span); kfree(ztd); return err; } rtc_control(&ztd->rtc_task, RTC_IRQP_SET, 1024); /* 1024 Hz */ rtc_control(&ztd->rtc_task, RTC_PIE_ON, 0); #else init_timer(&timer); timer.function = ztdummy_timer; timer.expires = jiffies + 1; add_timer(&timer); #endif #else irq=s->irq; spin_lock_irq(&mylock); free_irq(s->irq, s); /* remove uhci_interrupt temporaly */ if (request_irq (irq, ztdummy_interrupt, SA_SHIRQ, "ztdummy", ztd)) { spin_unlock_irq(&mylock); err("Our request_irq %d failed!",irq); kfree(ztd); return -EIO; } /* we add our handler first, to assure, that our handler gets called first */ if (request_irq (irq, uhci_interrupt, SA_SHIRQ, s->uhci_pci->driver->name, s)) { spin_unlock_irq(&mylock); err("Original request_irq %d failed!",irq); } spin_unlock_irq(&mylock); /* add td to usb host controller interrupt queue */ alloc_td(s, &td, 0); fill_td(td, TD_CTRL_IOC, 0, 0); insert_td_horizontal(s, s->int_chain[0], td); /* use int_chain[0] to get 1ms interrupts */ #endif if (debug) printk("ztdummy: init() finished\n"); return 0; } void cleanup_module(void) { #ifdef LINUX26 #ifdef USE_RTC rtc_control(&ztd->rtc_task, RTC_PIE_OFF, 0); rtc_unregister(&ztd->rtc_task); #else del_timer(&timer); #endif #else free_irq(s->irq, ztd); /* disable interrupts */ #endif zt_unregister(&ztd->span); kfree(ztd); #ifndef LINUX26 unlink_td(s, td, 1); delete_desc(s, td); #endif if (debug) printk("ztdummy: cleanup() finished\n"); } #ifdef LINUX26 module_param(debug, int, 0600); #else MODULE_PARM(debug, "i"); #endif #ifndef LINUX26 MODULE_PARM(monitor, "i"); #endif MODULE_DESCRIPTION("Dummy Zaptel Driver"); MODULE_AUTHOR("Robert Pleh "); #ifdef MODULE_LICENSE MODULE_LICENSE("GPL"); #endif