1 /*
2  * Driver for ST5481 USB ISDN modem
3  *
4  * Author       Frode Isaksen
5  * Copyright    2001 by Frode Isaksen      <fisaksen@bewan.com>
6  *              2001 by Kai Germaschewski  <kai.germaschewski@gmx.de>
7  *
8  * This software may be used and distributed according to the terms
9  * of the GNU General Public License, incorporated herein by reference.
10  *
11  */
12 
13 #include <linux/init.h>
14 #include <linux/gfp.h>
15 #include <linux/usb.h>
16 #include <linux/netdevice.h>
17 #include <linux/bitrev.h>
18 #include "st5481.h"
19 
B_L1L2(struct st5481_bcs * bcs,int pr,void * arg)20 static inline void B_L1L2(struct st5481_bcs *bcs, int pr, void *arg)
21 {
22 	struct hisax_if *ifc = (struct hisax_if *) &bcs->b_if;
23 
24 	ifc->l1l2(ifc, pr, arg);
25 }
26 
27 /*
28  * Encode and transmit next frame.
29  */
usb_b_out(struct st5481_bcs * bcs,int buf_nr)30 static void usb_b_out(struct st5481_bcs *bcs,int buf_nr)
31 {
32 	struct st5481_b_out *b_out = &bcs->b_out;
33 	struct st5481_adapter *adapter = bcs->adapter;
34 	struct urb *urb;
35 	unsigned int packet_size,offset;
36 	int len,buf_size,bytes_sent;
37 	int i;
38 	struct sk_buff *skb;
39 
40 	if (test_and_set_bit(buf_nr, &b_out->busy)) {
41 		DBG(4,"ep %d urb %d busy",(bcs->channel+1)*2,buf_nr);
42 		return;
43 	}
44 	urb = b_out->urb[buf_nr];
45 
46 	// Adjust isoc buffer size according to flow state
47 	if(b_out->flow_event & (OUT_DOWN | OUT_UNDERRUN)) {
48 		buf_size = NUM_ISO_PACKETS_B*SIZE_ISO_PACKETS_B_OUT + B_FLOW_ADJUST;
49 		packet_size = SIZE_ISO_PACKETS_B_OUT + B_FLOW_ADJUST;
50 		DBG(4,"B%d,adjust flow,add %d bytes",bcs->channel+1,B_FLOW_ADJUST);
51 	} else if(b_out->flow_event & OUT_UP){
52 		buf_size = NUM_ISO_PACKETS_B*SIZE_ISO_PACKETS_B_OUT - B_FLOW_ADJUST;
53 		packet_size = SIZE_ISO_PACKETS_B_OUT - B_FLOW_ADJUST;
54 		DBG(4,"B%d,adjust flow,remove %d bytes",bcs->channel+1,B_FLOW_ADJUST);
55 	} else {
56 		buf_size = NUM_ISO_PACKETS_B*SIZE_ISO_PACKETS_B_OUT;
57 		packet_size = 8;
58 	}
59 	b_out->flow_event = 0;
60 
61 	len = 0;
62 	while (len < buf_size) {
63 		if ((skb = b_out->tx_skb)) {
64 			DBG_SKB(0x100, skb);
65 			DBG(4,"B%d,len=%d",bcs->channel+1,skb->len);
66 
67 			if (bcs->mode == L1_MODE_TRANS) {
68 				bytes_sent = buf_size - len;
69 				if (skb->len < bytes_sent)
70 					bytes_sent = skb->len;
71 				{	/* swap tx bytes to get hearable audio data */
72 					register unsigned char *src  = skb->data;
73 					register unsigned char *dest = urb->transfer_buffer+len;
74 					register unsigned int count;
75 					for (count = 0; count < bytes_sent; count++)
76 						*dest++ = bitrev8(*src++);
77 				}
78 				len += bytes_sent;
79 			} else {
80 				len += isdnhdlc_encode(&b_out->hdlc_state,
81 						       skb->data, skb->len, &bytes_sent,
82 						       urb->transfer_buffer+len, buf_size-len);
83 			}
84 
85 			skb_pull(skb, bytes_sent);
86 
87 			if (!skb->len) {
88 				// Frame sent
89 				b_out->tx_skb = NULL;
90 				B_L1L2(bcs, PH_DATA | CONFIRM, (void *)(unsigned long) skb->truesize);
91 				dev_kfree_skb_any(skb);
92 
93 /* 				if (!(bcs->tx_skb = skb_dequeue(&bcs->sq))) { */
94 /* 					st5481B_sched_event(bcs, B_XMTBUFREADY); */
95 /* 				} */
96 			}
97 		} else {
98 			if (bcs->mode == L1_MODE_TRANS) {
99 				memset(urb->transfer_buffer+len, 0xff, buf_size-len);
100 				len = buf_size;
101 			} else {
102 				// Send flags
103 				len += isdnhdlc_encode(&b_out->hdlc_state,
104 						       NULL, 0, &bytes_sent,
105 						       urb->transfer_buffer+len, buf_size-len);
106 			}
107 		}
108 	}
109 
110 	// Prepare the URB
111 	for (i = 0, offset = 0; offset < len; i++) {
112 		urb->iso_frame_desc[i].offset = offset;
113 		urb->iso_frame_desc[i].length = packet_size;
114 		offset += packet_size;
115 		packet_size = SIZE_ISO_PACKETS_B_OUT;
116 	}
117 	urb->transfer_buffer_length = len;
118 	urb->number_of_packets = i;
119 	urb->dev = adapter->usb_dev;
120 
121 	DBG_ISO_PACKET(0x200,urb);
122 
123 	SUBMIT_URB(urb, GFP_NOIO);
124 }
125 
126 /*
127  * Start transferring (flags or data) on the B channel, since
128  * FIFO counters has been set to a non-zero value.
129  */
st5481B_start_xfer(void * context)130 static void st5481B_start_xfer(void *context)
131 {
132 	struct st5481_bcs *bcs = context;
133 
134 	DBG(4,"B%d",bcs->channel+1);
135 
136 	// Start transmitting (flags or data) on B channel
137 
138 	usb_b_out(bcs,0);
139 	usb_b_out(bcs,1);
140 }
141 
142 /*
143  * If the adapter has only 2 LEDs, the green
144  * LED will blink with a rate depending
145  * on the number of channels opened.
146  */
led_blink(struct st5481_adapter * adapter)147 static void led_blink(struct st5481_adapter *adapter)
148 {
149 	u_char leds = adapter->leds;
150 
151 	// 50 frames/sec for each channel
152 	if (++adapter->led_counter % 50) {
153 		return;
154 	}
155 
156 	if (adapter->led_counter % 100) {
157 		leds |= GREEN_LED;
158 	} else {
159 		leds &= ~GREEN_LED;
160 	}
161 
162 	st5481_usb_device_ctrl_msg(adapter, GPIO_OUT, leds, NULL, NULL);
163 }
164 
usb_b_out_complete(struct urb * urb)165 static void usb_b_out_complete(struct urb *urb)
166 {
167 	struct st5481_bcs *bcs = urb->context;
168 	struct st5481_b_out *b_out = &bcs->b_out;
169 	struct st5481_adapter *adapter = bcs->adapter;
170 	int buf_nr;
171 
172 	buf_nr = get_buf_nr(b_out->urb, urb);
173 	test_and_clear_bit(buf_nr, &b_out->busy);
174 
175 	if (unlikely(urb->status < 0)) {
176 		switch (urb->status) {
177 			case -ENOENT:
178 			case -ESHUTDOWN:
179 			case -ECONNRESET:
180 				DBG(4,"urb killed status %d", urb->status);
181 				return; // Give up
182 			default:
183 				WARNING("urb status %d",urb->status);
184 				if (b_out->busy == 0) {
185 					st5481_usb_pipe_reset(adapter, (bcs->channel+1)*2 | USB_DIR_OUT, NULL, NULL);
186 				}
187 				break;
188 		}
189 	}
190 
191 	usb_b_out(bcs,buf_nr);
192 
193 	if (adapter->number_of_leds == 2)
194 		led_blink(adapter);
195 }
196 
197 /*
198  * Start or stop the transfer on the B channel.
199  */
st5481B_mode(struct st5481_bcs * bcs,int mode)200 static void st5481B_mode(struct st5481_bcs *bcs, int mode)
201 {
202 	struct st5481_b_out *b_out = &bcs->b_out;
203 	struct st5481_adapter *adapter = bcs->adapter;
204 
205 	DBG(4,"B%d,mode=%d", bcs->channel + 1, mode);
206 
207 	if (bcs->mode == mode)
208 		return;
209 
210 	bcs->mode = mode;
211 
212 	// Cancel all USB transfers on this B channel
213 	usb_unlink_urb(b_out->urb[0]);
214 	usb_unlink_urb(b_out->urb[1]);
215 	b_out->busy = 0;
216 
217 	st5481_in_mode(&bcs->b_in, mode);
218 	if (bcs->mode != L1_MODE_NULL) {
219 		// Open the B channel
220 		if (bcs->mode != L1_MODE_TRANS) {
221 			u32 features = HDLC_BITREVERSE;
222 			if (bcs->mode == L1_MODE_HDLC_56K)
223 				features |= HDLC_56KBIT;
224 			isdnhdlc_out_init(&b_out->hdlc_state, features);
225 		}
226 		st5481_usb_pipe_reset(adapter, (bcs->channel+1)*2, NULL, NULL);
227 
228 		// Enable B channel interrupts
229 		st5481_usb_device_ctrl_msg(adapter, FFMSK_B1+(bcs->channel*2),
230 				    OUT_UP+OUT_DOWN+OUT_UNDERRUN, NULL, NULL);
231 
232 		// Enable B channel FIFOs
233 		st5481_usb_device_ctrl_msg(adapter, OUT_B1_COUNTER+(bcs->channel*2), 32, st5481B_start_xfer, bcs);
234 		if (adapter->number_of_leds == 4) {
235 			if (bcs->channel == 0) {
236 				adapter->leds |= B1_LED;
237 			} else {
238 				adapter->leds |= B2_LED;
239 			}
240 		}
241 	} else {
242 		// Disble B channel interrupts
243 		st5481_usb_device_ctrl_msg(adapter, FFMSK_B1+(bcs->channel*2), 0, NULL, NULL);
244 
245 		// Disable B channel FIFOs
246 		st5481_usb_device_ctrl_msg(adapter, OUT_B1_COUNTER+(bcs->channel*2), 0, NULL, NULL);
247 
248 		if (adapter->number_of_leds == 4) {
249 			if (bcs->channel == 0) {
250 				adapter->leds &= ~B1_LED;
251 			} else {
252 				adapter->leds &= ~B2_LED;
253 			}
254 		} else {
255 			st5481_usb_device_ctrl_msg(adapter, GPIO_OUT, adapter->leds, NULL, NULL);
256 		}
257 		if (b_out->tx_skb) {
258 			dev_kfree_skb_any(b_out->tx_skb);
259 			b_out->tx_skb = NULL;
260 		}
261 
262 	}
263 }
264 
st5481_setup_b_out(struct st5481_bcs * bcs)265 static int st5481_setup_b_out(struct st5481_bcs *bcs)
266 {
267 	struct usb_device *dev = bcs->adapter->usb_dev;
268 	struct usb_interface *intf;
269 	struct usb_host_interface *altsetting = NULL;
270 	struct usb_host_endpoint *endpoint;
271   	struct st5481_b_out *b_out = &bcs->b_out;
272 
273 	DBG(4,"");
274 
275 	intf = usb_ifnum_to_if(dev, 0);
276 	if (intf)
277 		altsetting = usb_altnum_to_altsetting(intf, 3);
278 	if (!altsetting)
279 		return -ENXIO;
280 
281 	// Allocate URBs and buffers for the B channel out
282 	endpoint = &altsetting->endpoint[EP_B1_OUT - 1 + bcs->channel * 2];
283 
284 	DBG(4,"endpoint address=%02x,packet size=%d",
285 	    endpoint->desc.bEndpointAddress, le16_to_cpu(endpoint->desc.wMaxPacketSize));
286 
287 	// Allocate memory for 8000bytes/sec + extra bytes if underrun
288 	return st5481_setup_isocpipes(b_out->urb, dev,
289 				      usb_sndisocpipe(dev, endpoint->desc.bEndpointAddress),
290 				      NUM_ISO_PACKETS_B, SIZE_ISO_PACKETS_B_OUT,
291 				      NUM_ISO_PACKETS_B * SIZE_ISO_PACKETS_B_OUT + B_FLOW_ADJUST,
292 				      usb_b_out_complete, bcs);
293 }
294 
st5481_release_b_out(struct st5481_bcs * bcs)295 static void st5481_release_b_out(struct st5481_bcs *bcs)
296 {
297 	struct st5481_b_out *b_out = &bcs->b_out;
298 
299 	DBG(4,"");
300 
301 	st5481_release_isocpipes(b_out->urb);
302 }
303 
st5481_setup_b(struct st5481_bcs * bcs)304 int st5481_setup_b(struct st5481_bcs *bcs)
305 {
306 	int retval;
307 
308 	DBG(4,"");
309 
310 	retval = st5481_setup_b_out(bcs);
311 	if (retval)
312 		goto err;
313 	bcs->b_in.bufsize = HSCX_BUFMAX;
314 	bcs->b_in.num_packets = NUM_ISO_PACKETS_B;
315 	bcs->b_in.packet_size = SIZE_ISO_PACKETS_B_IN;
316 	bcs->b_in.ep = (bcs->channel ? EP_B2_IN : EP_B1_IN) | USB_DIR_IN;
317 	bcs->b_in.counter = bcs->channel ? IN_B2_COUNTER : IN_B1_COUNTER;
318 	bcs->b_in.adapter = bcs->adapter;
319 	bcs->b_in.hisax_if = &bcs->b_if.ifc;
320 	retval = st5481_setup_in(&bcs->b_in);
321 	if (retval)
322 		goto err_b_out;
323 
324 
325 	return 0;
326 
327  err_b_out:
328 	st5481_release_b_out(bcs);
329  err:
330 	return retval;
331 }
332 
333 /*
334  * Release buffers and URBs for the B channels
335  */
st5481_release_b(struct st5481_bcs * bcs)336 void st5481_release_b(struct st5481_bcs *bcs)
337 {
338 	DBG(4,"");
339 
340 	st5481_release_in(&bcs->b_in);
341 	st5481_release_b_out(bcs);
342 }
343 
344 /*
345  * st5481_b_l2l1 is the entry point for upper layer routines that want to
346  * transmit on the B channel.  PH_DATA | REQUEST is a normal packet that
347  * we either start transmitting (if idle) or queue (if busy).
348  * PH_PULL | REQUEST can be called to request a callback message
349  * (PH_PULL | CONFIRM)
350  * once the link is idle.  After a "pull" callback, the upper layer
351  * routines can use PH_PULL | INDICATION to send data.
352  */
st5481_b_l2l1(struct hisax_if * ifc,int pr,void * arg)353 void st5481_b_l2l1(struct hisax_if *ifc, int pr, void *arg)
354 {
355 	struct st5481_bcs *bcs = ifc->priv;
356 	struct sk_buff *skb = arg;
357 	long mode;
358 
359 	DBG(4, "");
360 
361 	switch (pr) {
362 	case PH_DATA | REQUEST:
363 		BUG_ON(bcs->b_out.tx_skb);
364 		bcs->b_out.tx_skb = skb;
365 		break;
366 	case PH_ACTIVATE | REQUEST:
367 		mode = (long) arg;
368 		DBG(4,"B%d,PH_ACTIVATE_REQUEST %ld", bcs->channel + 1, mode);
369 		st5481B_mode(bcs, mode);
370 		B_L1L2(bcs, PH_ACTIVATE | INDICATION, NULL);
371 		break;
372 	case PH_DEACTIVATE | REQUEST:
373 		DBG(4,"B%d,PH_DEACTIVATE_REQUEST", bcs->channel + 1);
374 		st5481B_mode(bcs, L1_MODE_NULL);
375 		B_L1L2(bcs, PH_DEACTIVATE | INDICATION, NULL);
376 		break;
377 	default:
378 		WARNING("pr %#x\n", pr);
379 	}
380 }
381