Initial import

1 files changed, 363 insertions, 0 deletions

diff --git a/drivers/isdn/sc/command.c b/drivers/isdn/sc/command.c
new file mode 100644
index 000000000..4a4e66152
--- /dev/null
+++ b/drivers/isdn/sc/command.c
@@ -0,0 +1,363 @@
+/* $Id: command.c,v 1.4.10.1 2001/09/23 22:24:59 kai Exp $
+ *
+ * Copyright (C) 1996  SpellCaster Telecommunications Inc.
+ *
+ * This software may be used and distributed according to the terms
+ * of the GNU General Public License, incorporated herein by reference.
+ *
+ * For more information, please contact gpl-info@spellcast.com or write:
+ *
+ *     SpellCaster Telecommunications Inc.
+ *     5621 Finch Avenue East, Unit #3
+ *     Scarborough, Ontario  Canada
+ *     M1B 2T9
+ *     +1 (416) 297-8565
+ *     +1 (416) 297-6433 Facsimile
+ */
+
+#include <linux/module.h>
+#include "includes.h"		/* This must be first */
+#include "hardware.h"
+#include "message.h"
+#include "card.h"
+#include "scioc.h"
+
+static int dial(int card, unsigned long channel, setup_parm setup);
+static int hangup(int card, unsigned long channel);
+static int answer(int card, unsigned long channel);
+static int clreaz(int card, unsigned long channel);
+static int seteaz(int card, unsigned long channel, char *);
+static int setl2(int card, unsigned long arg);
+static int setl3(int card, unsigned long arg);
+static int acceptb(int card, unsigned long channel);
+
+#ifdef DEBUG
+/*
+ * Translate command codes to strings
+ */
+static char *commands[] = { "ISDN_CMD_IOCTL",
+			    "ISDN_CMD_DIAL",
+			    "ISDN_CMD_ACCEPTB",
+			    "ISDN_CMD_ACCEPTB",
+			    "ISDN_CMD_HANGUP",
+			    "ISDN_CMD_CLREAZ",
+			    "ISDN_CMD_SETEAZ",
+			    NULL,
+			    NULL,
+			    NULL,
+			    "ISDN_CMD_SETL2",
+			    NULL,
+			    "ISDN_CMD_SETL3",
+			    NULL,
+			    NULL,
+			    NULL,
+			    NULL,
+			    NULL, };
+
+/*
+ * Translates ISDN4Linux protocol codes to strings for debug messages
+ */
+static char *l3protos[] = { "ISDN_PROTO_L3_TRANS" };
+static char *l2protos[] = { "ISDN_PROTO_L2_X75I",
+			    "ISDN_PROTO_L2_X75UI",
+			    "ISDN_PROTO_L2_X75BUI",
+			    "ISDN_PROTO_L2_HDLC",
+			    "ISDN_PROTO_L2_TRANS" };
+#endif
+
+int get_card_from_id(int driver)
+{
+	int i;
+
+	for (i = 0; i < cinst; i++) {
+		if (sc_adapter[i]->driverId == driver)
+			return i;
+	}
+	return -ENODEV;
+}
+
+/*
+ * command
+ */
+
+int command(isdn_ctrl *cmd)
+{
+	int card;
+
+	card = get_card_from_id(cmd->driver);
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	/*
+	 * Dispatch the command
+	 */
+	switch (cmd->command) {
+	case ISDN_CMD_IOCTL:
+	{
+		unsigned long	cmdptr;
+		scs_ioctl	ioc;
+
+		memcpy(&cmdptr, cmd->parm.num, sizeof(unsigned long));
+		if (copy_from_user(&ioc, (scs_ioctl __user *)cmdptr,
+				   sizeof(scs_ioctl))) {
+			pr_debug("%s: Failed to verify user space 0x%lx\n",
+				 sc_adapter[card]->devicename, cmdptr);
+			return -EFAULT;
+		}
+		return sc_ioctl(card, &ioc);
+	}
+	case ISDN_CMD_DIAL:
+		return dial(card, cmd->arg, cmd->parm.setup);
+	case ISDN_CMD_HANGUP:
+		return hangup(card, cmd->arg);
+	case ISDN_CMD_ACCEPTD:
+		return answer(card, cmd->arg);
+	case ISDN_CMD_ACCEPTB:
+		return acceptb(card, cmd->arg);
+	case ISDN_CMD_CLREAZ:
+		return clreaz(card, cmd->arg);
+	case ISDN_CMD_SETEAZ:
+		return seteaz(card, cmd->arg, cmd->parm.num);
+	case ISDN_CMD_SETL2:
+		return setl2(card, cmd->arg);
+	case ISDN_CMD_SETL3:
+		return setl3(card, cmd->arg);
+	default:
+		return -EINVAL;
+	}
+	return 0;
+}
+
+/*
+ * start the onboard firmware
+ */
+int startproc(int card)
+{
+	int status;
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	/*
+	 * send start msg
+	 */
+	status = sendmessage(card, CMPID, cmReqType2,
+			     cmReqClass0,
+			     cmReqStartProc,
+			     0, 0, NULL);
+	pr_debug("%s: Sent startProc\n", sc_adapter[card]->devicename);
+
+	return status;
+}
+
+
+/*
+ * Dials the number passed in
+ */
+static int dial(int card, unsigned long channel, setup_parm setup)
+{
+	int status;
+	char Phone[48];
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	/*extract ISDN number to dial from eaz/msn string*/
+	strcpy(Phone, setup.phone);
+
+	/*send the connection message*/
+	status = sendmessage(card, CEPID, ceReqTypePhy,
+			     ceReqClass1,
+			     ceReqPhyConnect,
+			     (unsigned char)channel + 1,
+			     strlen(Phone),
+			     (unsigned int *)Phone);
+
+	pr_debug("%s: Dialing %s on channel %lu\n",
+		 sc_adapter[card]->devicename, Phone, channel + 1);
+
+	return status;
+}
+
+/*
+ * Answer an incoming call
+ */
+static int answer(int card, unsigned long channel)
+{
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	if (setup_buffers(card, channel + 1)) {
+		hangup(card, channel + 1);
+		return -ENOBUFS;
+	}
+
+	indicate_status(card, ISDN_STAT_BCONN, channel, NULL);
+	pr_debug("%s: Answered incoming call on channel %lu\n",
+		 sc_adapter[card]->devicename, channel + 1);
+	return 0;
+}
+
+/*
+ * Hangup up the call on specified channel
+ */
+static int hangup(int card, unsigned long channel)
+{
+	int status;
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	status = sendmessage(card, CEPID, ceReqTypePhy,
+			     ceReqClass1,
+			     ceReqPhyDisconnect,
+			     (unsigned char)channel + 1,
+			     0,
+			     NULL);
+	pr_debug("%s: Sent HANGUP message to channel %lu\n",
+		 sc_adapter[card]->devicename, channel + 1);
+	return status;
+}
+
+/*
+ * Set the layer 2 protocol (X.25, HDLC, Raw)
+ */
+static int setl2(int card, unsigned long arg)
+{
+	int status = 0;
+	int protocol, channel;
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+	protocol = arg >> 8;
+	channel = arg & 0xff;
+	sc_adapter[card]->channel[channel].l2_proto = protocol;
+
+	/*
+	 * check that the adapter is also set to the correct protocol
+	 */
+	pr_debug("%s: Sending GetFrameFormat for channel %d\n",
+		 sc_adapter[card]->devicename, channel + 1);
+	status = sendmessage(card, CEPID, ceReqTypeCall,
+			     ceReqClass0,
+			     ceReqCallGetFrameFormat,
+			     (unsigned char)channel + 1,
+			     1,
+			     (unsigned int *)protocol);
+	if (status)
+		return status;
+	return 0;
+}
+
+/*
+ * Set the layer 3 protocol
+ */
+static int setl3(int card, unsigned long channel)
+{
+	int protocol = channel >> 8;
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	sc_adapter[card]->channel[channel].l3_proto = protocol;
+	return 0;
+}
+
+static int acceptb(int card, unsigned long channel)
+{
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	if (setup_buffers(card, channel + 1))
+	{
+		hangup(card, channel + 1);
+		return -ENOBUFS;
+	}
+
+	pr_debug("%s: B-Channel connection accepted on channel %lu\n",
+		 sc_adapter[card]->devicename, channel + 1);
+	indicate_status(card, ISDN_STAT_BCONN, channel, NULL);
+	return 0;
+}
+
+static int clreaz(int card, unsigned long arg)
+{
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	strcpy(sc_adapter[card]->channel[arg].eazlist, "");
+	sc_adapter[card]->channel[arg].eazclear = 1;
+	pr_debug("%s: EAZ List cleared for channel %lu\n",
+		 sc_adapter[card]->devicename, arg + 1);
+	return 0;
+}
+
+static int seteaz(int card, unsigned long arg, char *num)
+{
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	strcpy(sc_adapter[card]->channel[arg].eazlist, num);
+	sc_adapter[card]->channel[arg].eazclear = 0;
+	pr_debug("%s: EAZ list for channel %lu set to: %s\n",
+		 sc_adapter[card]->devicename, arg + 1,
+		 sc_adapter[card]->channel[arg].eazlist);
+	return 0;
+}
+
+int reset(int card)
+{
+	unsigned long flags;
+
+	if (!IS_VALID_CARD(card)) {
+		pr_debug("Invalid param: %d is not a valid card id\n", card);
+		return -ENODEV;
+	}
+
+	indicate_status(card, ISDN_STAT_STOP, 0, NULL);
+
+	if (sc_adapter[card]->EngineUp) {
+		del_timer(&sc_adapter[card]->stat_timer);
+	}
+
+	sc_adapter[card]->EngineUp = 0;
+
+	spin_lock_irqsave(&sc_adapter[card]->lock, flags);
+	init_timer(&sc_adapter[card]->reset_timer);
+	sc_adapter[card]->reset_timer.function = sc_check_reset;
+	sc_adapter[card]->reset_timer.data = card;
+	sc_adapter[card]->reset_timer.expires = jiffies + CHECKRESET_TIME;
+	add_timer(&sc_adapter[card]->reset_timer);
+	spin_unlock_irqrestore(&sc_adapter[card]->lock, flags);
+
+	outb(0x1, sc_adapter[card]->ioport[SFT_RESET]);
+
+	pr_debug("%s: Adapter Reset\n", sc_adapter[card]->devicename);
+	return 0;
+}
+
+void flushreadfifo(int card)
+{
+	while (inb(sc_adapter[card]->ioport[FIFO_STATUS]) & RF_HAS_DATA)
+		inb(sc_adapter[card]->ioport[FIFO_READ]);
+}