xref: /openbmc/linux/drivers/net/wan/ixp4xx_hss.c (revision 7fe2f639)
1 /*
2  * Intel IXP4xx HSS (synchronous serial port) driver for Linux
3  *
4  * Copyright (C) 2007-2008 Krzysztof Hałasa <khc@pm.waw.pl>
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of version 2 of the GNU General Public License
8  * as published by the Free Software Foundation.
9  */
10 
11 #include <linux/bitops.h>
12 #include <linux/cdev.h>
13 #include <linux/dma-mapping.h>
14 #include <linux/dmapool.h>
15 #include <linux/fs.h>
16 #include <linux/hdlc.h>
17 #include <linux/io.h>
18 #include <linux/kernel.h>
19 #include <linux/platform_device.h>
20 #include <linux/poll.h>
21 #include <linux/slab.h>
22 #include <mach/npe.h>
23 #include <mach/qmgr.h>
24 
25 #define DEBUG_DESC		0
26 #define DEBUG_RX		0
27 #define DEBUG_TX		0
28 #define DEBUG_PKT_BYTES		0
29 #define DEBUG_CLOSE		0
30 
31 #define DRV_NAME		"ixp4xx_hss"
32 
33 #define PKT_EXTRA_FLAGS		0 /* orig 1 */
34 #define PKT_NUM_PIPES		1 /* 1, 2 or 4 */
35 #define PKT_PIPE_FIFO_SIZEW	4 /* total 4 dwords per HSS */
36 
37 #define RX_DESCS		16 /* also length of all RX queues */
38 #define TX_DESCS		16 /* also length of all TX queues */
39 
40 #define POOL_ALLOC_SIZE		(sizeof(struct desc) * (RX_DESCS + TX_DESCS))
41 #define RX_SIZE			(HDLC_MAX_MRU + 4) /* NPE needs more space */
42 #define MAX_CLOSE_WAIT		1000 /* microseconds */
43 #define HSS_COUNT		2
44 #define FRAME_SIZE		256 /* doesn't matter at this point */
45 #define FRAME_OFFSET		0
46 #define MAX_CHANNELS		(FRAME_SIZE / 8)
47 
48 #define NAPI_WEIGHT		16
49 
50 /* Queue IDs */
51 #define HSS0_CHL_RXTRIG_QUEUE	12	/* orig size = 32 dwords */
52 #define HSS0_PKT_RX_QUEUE	13	/* orig size = 32 dwords */
53 #define HSS0_PKT_TX0_QUEUE	14	/* orig size = 16 dwords */
54 #define HSS0_PKT_TX1_QUEUE	15
55 #define HSS0_PKT_TX2_QUEUE	16
56 #define HSS0_PKT_TX3_QUEUE	17
57 #define HSS0_PKT_RXFREE0_QUEUE	18	/* orig size = 16 dwords */
58 #define HSS0_PKT_RXFREE1_QUEUE	19
59 #define HSS0_PKT_RXFREE2_QUEUE	20
60 #define HSS0_PKT_RXFREE3_QUEUE	21
61 #define HSS0_PKT_TXDONE_QUEUE	22	/* orig size = 64 dwords */
62 
63 #define HSS1_CHL_RXTRIG_QUEUE	10
64 #define HSS1_PKT_RX_QUEUE	0
65 #define HSS1_PKT_TX0_QUEUE	5
66 #define HSS1_PKT_TX1_QUEUE	6
67 #define HSS1_PKT_TX2_QUEUE	7
68 #define HSS1_PKT_TX3_QUEUE	8
69 #define HSS1_PKT_RXFREE0_QUEUE	1
70 #define HSS1_PKT_RXFREE1_QUEUE	2
71 #define HSS1_PKT_RXFREE2_QUEUE	3
72 #define HSS1_PKT_RXFREE3_QUEUE	4
73 #define HSS1_PKT_TXDONE_QUEUE	9
74 
75 #define NPE_PKT_MODE_HDLC		0
76 #define NPE_PKT_MODE_RAW		1
77 #define NPE_PKT_MODE_56KMODE		2
78 #define NPE_PKT_MODE_56KENDIAN_MSB	4
79 
80 /* PKT_PIPE_HDLC_CFG_WRITE flags */
81 #define PKT_HDLC_IDLE_ONES		0x1 /* default = flags */
82 #define PKT_HDLC_CRC_32			0x2 /* default = CRC-16 */
83 #define PKT_HDLC_MSB_ENDIAN		0x4 /* default = LE */
84 
85 
86 /* hss_config, PCRs */
87 /* Frame sync sampling, default = active low */
88 #define PCR_FRM_SYNC_ACTIVE_HIGH	0x40000000
89 #define PCR_FRM_SYNC_FALLINGEDGE	0x80000000
90 #define PCR_FRM_SYNC_RISINGEDGE		0xC0000000
91 
92 /* Frame sync pin: input (default) or output generated off a given clk edge */
93 #define PCR_FRM_SYNC_OUTPUT_FALLING	0x20000000
94 #define PCR_FRM_SYNC_OUTPUT_RISING	0x30000000
95 
96 /* Frame and data clock sampling on edge, default = falling */
97 #define PCR_FCLK_EDGE_RISING		0x08000000
98 #define PCR_DCLK_EDGE_RISING		0x04000000
99 
100 /* Clock direction, default = input */
101 #define PCR_SYNC_CLK_DIR_OUTPUT		0x02000000
102 
103 /* Generate/Receive frame pulses, default = enabled */
104 #define PCR_FRM_PULSE_DISABLED		0x01000000
105 
106  /* Data rate is full (default) or half the configured clk speed */
107 #define PCR_HALF_CLK_RATE		0x00200000
108 
109 /* Invert data between NPE and HSS FIFOs? (default = no) */
110 #define PCR_DATA_POLARITY_INVERT	0x00100000
111 
112 /* TX/RX endianness, default = LSB */
113 #define PCR_MSB_ENDIAN			0x00080000
114 
115 /* Normal (default) / open drain mode (TX only) */
116 #define PCR_TX_PINS_OPEN_DRAIN		0x00040000
117 
118 /* No framing bit transmitted and expected on RX? (default = framing bit) */
119 #define PCR_SOF_NO_FBIT			0x00020000
120 
121 /* Drive data pins? */
122 #define PCR_TX_DATA_ENABLE		0x00010000
123 
124 /* Voice 56k type: drive the data pins low (default), high, high Z */
125 #define PCR_TX_V56K_HIGH		0x00002000
126 #define PCR_TX_V56K_HIGH_IMP		0x00004000
127 
128 /* Unassigned type: drive the data pins low (default), high, high Z */
129 #define PCR_TX_UNASS_HIGH		0x00000800
130 #define PCR_TX_UNASS_HIGH_IMP		0x00001000
131 
132 /* T1 @ 1.544MHz only: Fbit dictated in FIFO (default) or high Z */
133 #define PCR_TX_FB_HIGH_IMP		0x00000400
134 
135 /* 56k data endiannes - which bit unused: high (default) or low */
136 #define PCR_TX_56KE_BIT_0_UNUSED	0x00000200
137 
138 /* 56k data transmission type: 32/8 bit data (default) or 56K data */
139 #define PCR_TX_56KS_56K_DATA		0x00000100
140 
141 /* hss_config, cCR */
142 /* Number of packetized clients, default = 1 */
143 #define CCR_NPE_HFIFO_2_HDLC		0x04000000
144 #define CCR_NPE_HFIFO_3_OR_4HDLC	0x08000000
145 
146 /* default = no loopback */
147 #define CCR_LOOPBACK			0x02000000
148 
149 /* HSS number, default = 0 (first) */
150 #define CCR_SECOND_HSS			0x01000000
151 
152 
153 /* hss_config, clkCR: main:10, num:10, denom:12 */
154 #define CLK42X_SPEED_EXP	((0x3FF << 22) | (  2 << 12) |   15) /*65 KHz*/
155 
156 #define CLK42X_SPEED_512KHZ	((  130 << 22) | (  2 << 12) |   15)
157 #define CLK42X_SPEED_1536KHZ	((   43 << 22) | ( 18 << 12) |   47)
158 #define CLK42X_SPEED_1544KHZ	((   43 << 22) | ( 33 << 12) |  192)
159 #define CLK42X_SPEED_2048KHZ	((   32 << 22) | ( 34 << 12) |   63)
160 #define CLK42X_SPEED_4096KHZ	((   16 << 22) | ( 34 << 12) |  127)
161 #define CLK42X_SPEED_8192KHZ	((    8 << 22) | ( 34 << 12) |  255)
162 
163 #define CLK46X_SPEED_512KHZ	((  130 << 22) | ( 24 << 12) |  127)
164 #define CLK46X_SPEED_1536KHZ	((   43 << 22) | (152 << 12) |  383)
165 #define CLK46X_SPEED_1544KHZ	((   43 << 22) | ( 66 << 12) |  385)
166 #define CLK46X_SPEED_2048KHZ	((   32 << 22) | (280 << 12) |  511)
167 #define CLK46X_SPEED_4096KHZ	((   16 << 22) | (280 << 12) | 1023)
168 #define CLK46X_SPEED_8192KHZ	((    8 << 22) | (280 << 12) | 2047)
169 
170 /*
171  * HSS_CONFIG_CLOCK_CR register consists of 3 parts:
172  *     A (10 bits), B (10 bits) and C (12 bits).
173  * IXP42x HSS clock generator operation (verified with an oscilloscope):
174  * Each clock bit takes 7.5 ns (1 / 133.xx MHz).
175  * The clock sequence consists of (C - B) states of 0s and 1s, each state is
176  * A bits wide. It's followed by (B + 1) states of 0s and 1s, each state is
177  * (A + 1) bits wide.
178  *
179  * The resulting average clock frequency (assuming 33.333 MHz oscillator) is:
180  * freq = 66.666 MHz / (A + (B + 1) / (C + 1))
181  * minimum freq = 66.666 MHz / (A + 1)
182  * maximum freq = 66.666 MHz / A
183  *
184  * Example: A = 2, B = 2, C = 7, CLOCK_CR register = 2 << 22 | 2 << 12 | 7
185  * freq = 66.666 MHz / (2 + (2 + 1) / (7 + 1)) = 28.07 MHz (Mb/s).
186  * The clock sequence is: 1100110011 (5 doubles) 000111000 (3 triples).
187  * The sequence takes (C - B) * A + (B + 1) * (A + 1) = 5 * 2 + 3 * 3 bits
188  * = 19 bits (each 7.5 ns long) = 142.5 ns (then the sequence repeats).
189  * The sequence consists of 4 complete clock periods, thus the average
190  * frequency (= clock rate) is 4 / 142.5 ns = 28.07 MHz (Mb/s).
191  * (max specified clock rate for IXP42x HSS is 8.192 Mb/s).
192  */
193 
194 /* hss_config, LUT entries */
195 #define TDMMAP_UNASSIGNED	0
196 #define TDMMAP_HDLC		1	/* HDLC - packetized */
197 #define TDMMAP_VOICE56K		2	/* Voice56K - 7-bit channelized */
198 #define TDMMAP_VOICE64K		3	/* Voice64K - 8-bit channelized */
199 
200 /* offsets into HSS config */
201 #define HSS_CONFIG_TX_PCR	0x00 /* port configuration registers */
202 #define HSS_CONFIG_RX_PCR	0x04
203 #define HSS_CONFIG_CORE_CR	0x08 /* loopback control, HSS# */
204 #define HSS_CONFIG_CLOCK_CR	0x0C /* clock generator control */
205 #define HSS_CONFIG_TX_FCR	0x10 /* frame configuration registers */
206 #define HSS_CONFIG_RX_FCR	0x14
207 #define HSS_CONFIG_TX_LUT	0x18 /* channel look-up tables */
208 #define HSS_CONFIG_RX_LUT	0x38
209 
210 
211 /* NPE command codes */
212 /* writes the ConfigWord value to the location specified by offset */
213 #define PORT_CONFIG_WRITE		0x40
214 
215 /* triggers the NPE to load the contents of the configuration table */
216 #define PORT_CONFIG_LOAD		0x41
217 
218 /* triggers the NPE to return an HssErrorReadResponse message */
219 #define PORT_ERROR_READ			0x42
220 
221 /* triggers the NPE to reset internal status and enable the HssPacketized
222    operation for the flow specified by pPipe */
223 #define PKT_PIPE_FLOW_ENABLE		0x50
224 #define PKT_PIPE_FLOW_DISABLE		0x51
225 #define PKT_NUM_PIPES_WRITE		0x52
226 #define PKT_PIPE_FIFO_SIZEW_WRITE	0x53
227 #define PKT_PIPE_HDLC_CFG_WRITE		0x54
228 #define PKT_PIPE_IDLE_PATTERN_WRITE	0x55
229 #define PKT_PIPE_RX_SIZE_WRITE		0x56
230 #define PKT_PIPE_MODE_WRITE		0x57
231 
232 /* HDLC packet status values - desc->status */
233 #define ERR_SHUTDOWN		1 /* stop or shutdown occurrence */
234 #define ERR_HDLC_ALIGN		2 /* HDLC alignment error */
235 #define ERR_HDLC_FCS		3 /* HDLC Frame Check Sum error */
236 #define ERR_RXFREE_Q_EMPTY	4 /* RX-free queue became empty while receiving
237 				     this packet (if buf_len < pkt_len) */
238 #define ERR_HDLC_TOO_LONG	5 /* HDLC frame size too long */
239 #define ERR_HDLC_ABORT		6 /* abort sequence received */
240 #define ERR_DISCONNECTING	7 /* disconnect is in progress */
241 
242 
243 #ifdef __ARMEB__
244 typedef struct sk_buff buffer_t;
245 #define free_buffer dev_kfree_skb
246 #define free_buffer_irq dev_kfree_skb_irq
247 #else
248 typedef void buffer_t;
249 #define free_buffer kfree
250 #define free_buffer_irq kfree
251 #endif
252 
253 struct port {
254 	struct device *dev;
255 	struct npe *npe;
256 	struct net_device *netdev;
257 	struct napi_struct napi;
258 	struct hss_plat_info *plat;
259 	buffer_t *rx_buff_tab[RX_DESCS], *tx_buff_tab[TX_DESCS];
260 	struct desc *desc_tab;	/* coherent */
261 	u32 desc_tab_phys;
262 	unsigned int id;
263 	unsigned int clock_type, clock_rate, loopback;
264 	unsigned int initialized, carrier;
265 	u8 hdlc_cfg;
266 	u32 clock_reg;
267 };
268 
269 /* NPE message structure */
270 struct msg {
271 #ifdef __ARMEB__
272 	u8 cmd, unused, hss_port, index;
273 	union {
274 		struct { u8 data8a, data8b, data8c, data8d; };
275 		struct { u16 data16a, data16b; };
276 		struct { u32 data32; };
277 	};
278 #else
279 	u8 index, hss_port, unused, cmd;
280 	union {
281 		struct { u8 data8d, data8c, data8b, data8a; };
282 		struct { u16 data16b, data16a; };
283 		struct { u32 data32; };
284 	};
285 #endif
286 };
287 
288 /* HDLC packet descriptor */
289 struct desc {
290 	u32 next;		/* pointer to next buffer, unused */
291 
292 #ifdef __ARMEB__
293 	u16 buf_len;		/* buffer length */
294 	u16 pkt_len;		/* packet length */
295 	u32 data;		/* pointer to data buffer in RAM */
296 	u8 status;
297 	u8 error_count;
298 	u16 __reserved;
299 #else
300 	u16 pkt_len;		/* packet length */
301 	u16 buf_len;		/* buffer length */
302 	u32 data;		/* pointer to data buffer in RAM */
303 	u16 __reserved;
304 	u8 error_count;
305 	u8 status;
306 #endif
307 	u32 __reserved1[4];
308 };
309 
310 
311 #define rx_desc_phys(port, n)	((port)->desc_tab_phys +		\
312 				 (n) * sizeof(struct desc))
313 #define rx_desc_ptr(port, n)	(&(port)->desc_tab[n])
314 
315 #define tx_desc_phys(port, n)	((port)->desc_tab_phys +		\
316 				 ((n) + RX_DESCS) * sizeof(struct desc))
317 #define tx_desc_ptr(port, n)	(&(port)->desc_tab[(n) + RX_DESCS])
318 
319 /*****************************************************************************
320  * global variables
321  ****************************************************************************/
322 
323 static int ports_open;
324 static struct dma_pool *dma_pool;
325 static spinlock_t npe_lock;
326 
327 static const struct {
328 	int tx, txdone, rx, rxfree;
329 }queue_ids[2] = {{HSS0_PKT_TX0_QUEUE, HSS0_PKT_TXDONE_QUEUE, HSS0_PKT_RX_QUEUE,
330 		  HSS0_PKT_RXFREE0_QUEUE},
331 		 {HSS1_PKT_TX0_QUEUE, HSS1_PKT_TXDONE_QUEUE, HSS1_PKT_RX_QUEUE,
332 		  HSS1_PKT_RXFREE0_QUEUE},
333 };
334 
335 /*****************************************************************************
336  * utility functions
337  ****************************************************************************/
338 
339 static inline struct port* dev_to_port(struct net_device *dev)
340 {
341 	return dev_to_hdlc(dev)->priv;
342 }
343 
344 #ifndef __ARMEB__
345 static inline void memcpy_swab32(u32 *dest, u32 *src, int cnt)
346 {
347 	int i;
348 	for (i = 0; i < cnt; i++)
349 		dest[i] = swab32(src[i]);
350 }
351 #endif
352 
353 /*****************************************************************************
354  * HSS access
355  ****************************************************************************/
356 
357 static void hss_npe_send(struct port *port, struct msg *msg, const char* what)
358 {
359 	u32 *val = (u32*)msg;
360 	if (npe_send_message(port->npe, msg, what)) {
361 		printk(KERN_CRIT "HSS-%i: unable to send command [%08X:%08X]"
362 		       " to %s\n", port->id, val[0], val[1],
363 		       npe_name(port->npe));
364 		BUG();
365 	}
366 }
367 
368 static void hss_config_set_lut(struct port *port)
369 {
370 	struct msg msg;
371 	int ch;
372 
373 	memset(&msg, 0, sizeof(msg));
374 	msg.cmd = PORT_CONFIG_WRITE;
375 	msg.hss_port = port->id;
376 
377 	for (ch = 0; ch < MAX_CHANNELS; ch++) {
378 		msg.data32 >>= 2;
379 		msg.data32 |= TDMMAP_HDLC << 30;
380 
381 		if (ch % 16 == 15) {
382 			msg.index = HSS_CONFIG_TX_LUT + ((ch / 4) & ~3);
383 			hss_npe_send(port, &msg, "HSS_SET_TX_LUT");
384 
385 			msg.index += HSS_CONFIG_RX_LUT - HSS_CONFIG_TX_LUT;
386 			hss_npe_send(port, &msg, "HSS_SET_RX_LUT");
387 		}
388 	}
389 }
390 
391 static void hss_config(struct port *port)
392 {
393 	struct msg msg;
394 
395 	memset(&msg, 0, sizeof(msg));
396 	msg.cmd = PORT_CONFIG_WRITE;
397 	msg.hss_port = port->id;
398 	msg.index = HSS_CONFIG_TX_PCR;
399 	msg.data32 = PCR_FRM_PULSE_DISABLED | PCR_MSB_ENDIAN |
400 		PCR_TX_DATA_ENABLE | PCR_SOF_NO_FBIT;
401 	if (port->clock_type == CLOCK_INT)
402 		msg.data32 |= PCR_SYNC_CLK_DIR_OUTPUT;
403 	hss_npe_send(port, &msg, "HSS_SET_TX_PCR");
404 
405 	msg.index = HSS_CONFIG_RX_PCR;
406 	msg.data32 ^= PCR_TX_DATA_ENABLE | PCR_DCLK_EDGE_RISING;
407 	hss_npe_send(port, &msg, "HSS_SET_RX_PCR");
408 
409 	memset(&msg, 0, sizeof(msg));
410 	msg.cmd = PORT_CONFIG_WRITE;
411 	msg.hss_port = port->id;
412 	msg.index = HSS_CONFIG_CORE_CR;
413 	msg.data32 = (port->loopback ? CCR_LOOPBACK : 0) |
414 		(port->id ? CCR_SECOND_HSS : 0);
415 	hss_npe_send(port, &msg, "HSS_SET_CORE_CR");
416 
417 	memset(&msg, 0, sizeof(msg));
418 	msg.cmd = PORT_CONFIG_WRITE;
419 	msg.hss_port = port->id;
420 	msg.index = HSS_CONFIG_CLOCK_CR;
421 	msg.data32 = port->clock_reg;
422 	hss_npe_send(port, &msg, "HSS_SET_CLOCK_CR");
423 
424 	memset(&msg, 0, sizeof(msg));
425 	msg.cmd = PORT_CONFIG_WRITE;
426 	msg.hss_port = port->id;
427 	msg.index = HSS_CONFIG_TX_FCR;
428 	msg.data16a = FRAME_OFFSET;
429 	msg.data16b = FRAME_SIZE - 1;
430 	hss_npe_send(port, &msg, "HSS_SET_TX_FCR");
431 
432 	memset(&msg, 0, sizeof(msg));
433 	msg.cmd = PORT_CONFIG_WRITE;
434 	msg.hss_port = port->id;
435 	msg.index = HSS_CONFIG_RX_FCR;
436 	msg.data16a = FRAME_OFFSET;
437 	msg.data16b = FRAME_SIZE - 1;
438 	hss_npe_send(port, &msg, "HSS_SET_RX_FCR");
439 
440 	hss_config_set_lut(port);
441 
442 	memset(&msg, 0, sizeof(msg));
443 	msg.cmd = PORT_CONFIG_LOAD;
444 	msg.hss_port = port->id;
445 	hss_npe_send(port, &msg, "HSS_LOAD_CONFIG");
446 
447 	if (npe_recv_message(port->npe, &msg, "HSS_LOAD_CONFIG") ||
448 	    /* HSS_LOAD_CONFIG for port #1 returns port_id = #4 */
449 	    msg.cmd != PORT_CONFIG_LOAD || msg.data32) {
450 		printk(KERN_CRIT "HSS-%i: HSS_LOAD_CONFIG failed\n",
451 		       port->id);
452 		BUG();
453 	}
454 
455 	/* HDLC may stop working without this - check FIXME */
456 	npe_recv_message(port->npe, &msg, "FLUSH_IT");
457 }
458 
459 static void hss_set_hdlc_cfg(struct port *port)
460 {
461 	struct msg msg;
462 
463 	memset(&msg, 0, sizeof(msg));
464 	msg.cmd = PKT_PIPE_HDLC_CFG_WRITE;
465 	msg.hss_port = port->id;
466 	msg.data8a = port->hdlc_cfg; /* rx_cfg */
467 	msg.data8b = port->hdlc_cfg | (PKT_EXTRA_FLAGS << 3); /* tx_cfg */
468 	hss_npe_send(port, &msg, "HSS_SET_HDLC_CFG");
469 }
470 
471 static u32 hss_get_status(struct port *port)
472 {
473 	struct msg msg;
474 
475 	memset(&msg, 0, sizeof(msg));
476 	msg.cmd = PORT_ERROR_READ;
477 	msg.hss_port = port->id;
478 	hss_npe_send(port, &msg, "PORT_ERROR_READ");
479 	if (npe_recv_message(port->npe, &msg, "PORT_ERROR_READ")) {
480 		printk(KERN_CRIT "HSS-%i: unable to read HSS status\n",
481 		       port->id);
482 		BUG();
483 	}
484 
485 	return msg.data32;
486 }
487 
488 static void hss_start_hdlc(struct port *port)
489 {
490 	struct msg msg;
491 
492 	memset(&msg, 0, sizeof(msg));
493 	msg.cmd = PKT_PIPE_FLOW_ENABLE;
494 	msg.hss_port = port->id;
495 	msg.data32 = 0;
496 	hss_npe_send(port, &msg, "HSS_ENABLE_PKT_PIPE");
497 }
498 
499 static void hss_stop_hdlc(struct port *port)
500 {
501 	struct msg msg;
502 
503 	memset(&msg, 0, sizeof(msg));
504 	msg.cmd = PKT_PIPE_FLOW_DISABLE;
505 	msg.hss_port = port->id;
506 	hss_npe_send(port, &msg, "HSS_DISABLE_PKT_PIPE");
507 	hss_get_status(port); /* make sure it's halted */
508 }
509 
510 static int hss_load_firmware(struct port *port)
511 {
512 	struct msg msg;
513 	int err;
514 
515 	if (port->initialized)
516 		return 0;
517 
518 	if (!npe_running(port->npe) &&
519 	    (err = npe_load_firmware(port->npe, npe_name(port->npe),
520 				     port->dev)))
521 		return err;
522 
523 	/* HDLC mode configuration */
524 	memset(&msg, 0, sizeof(msg));
525 	msg.cmd = PKT_NUM_PIPES_WRITE;
526 	msg.hss_port = port->id;
527 	msg.data8a = PKT_NUM_PIPES;
528 	hss_npe_send(port, &msg, "HSS_SET_PKT_PIPES");
529 
530 	msg.cmd = PKT_PIPE_FIFO_SIZEW_WRITE;
531 	msg.data8a = PKT_PIPE_FIFO_SIZEW;
532 	hss_npe_send(port, &msg, "HSS_SET_PKT_FIFO");
533 
534 	msg.cmd = PKT_PIPE_MODE_WRITE;
535 	msg.data8a = NPE_PKT_MODE_HDLC;
536 	/* msg.data8b = inv_mask */
537 	/* msg.data8c = or_mask */
538 	hss_npe_send(port, &msg, "HSS_SET_PKT_MODE");
539 
540 	msg.cmd = PKT_PIPE_RX_SIZE_WRITE;
541 	msg.data16a = HDLC_MAX_MRU; /* including CRC */
542 	hss_npe_send(port, &msg, "HSS_SET_PKT_RX_SIZE");
543 
544 	msg.cmd = PKT_PIPE_IDLE_PATTERN_WRITE;
545 	msg.data32 = 0x7F7F7F7F; /* ??? FIXME */
546 	hss_npe_send(port, &msg, "HSS_SET_PKT_IDLE");
547 
548 	port->initialized = 1;
549 	return 0;
550 }
551 
552 /*****************************************************************************
553  * packetized (HDLC) operation
554  ****************************************************************************/
555 
556 static inline void debug_pkt(struct net_device *dev, const char *func,
557 			     u8 *data, int len)
558 {
559 #if DEBUG_PKT_BYTES
560 	int i;
561 
562 	printk(KERN_DEBUG "%s: %s(%i)", dev->name, func, len);
563 	for (i = 0; i < len; i++) {
564 		if (i >= DEBUG_PKT_BYTES)
565 			break;
566 		printk("%s%02X", !(i % 4) ? " " : "", data[i]);
567 	}
568 	printk("\n");
569 #endif
570 }
571 
572 
573 static inline void debug_desc(u32 phys, struct desc *desc)
574 {
575 #if DEBUG_DESC
576 	printk(KERN_DEBUG "%X: %X %3X %3X %08X %X %X\n",
577 	       phys, desc->next, desc->buf_len, desc->pkt_len,
578 	       desc->data, desc->status, desc->error_count);
579 #endif
580 }
581 
582 static inline int queue_get_desc(unsigned int queue, struct port *port,
583 				 int is_tx)
584 {
585 	u32 phys, tab_phys, n_desc;
586 	struct desc *tab;
587 
588 	if (!(phys = qmgr_get_entry(queue)))
589 		return -1;
590 
591 	BUG_ON(phys & 0x1F);
592 	tab_phys = is_tx ? tx_desc_phys(port, 0) : rx_desc_phys(port, 0);
593 	tab = is_tx ? tx_desc_ptr(port, 0) : rx_desc_ptr(port, 0);
594 	n_desc = (phys - tab_phys) / sizeof(struct desc);
595 	BUG_ON(n_desc >= (is_tx ? TX_DESCS : RX_DESCS));
596 	debug_desc(phys, &tab[n_desc]);
597 	BUG_ON(tab[n_desc].next);
598 	return n_desc;
599 }
600 
601 static inline void queue_put_desc(unsigned int queue, u32 phys,
602 				  struct desc *desc)
603 {
604 	debug_desc(phys, desc);
605 	BUG_ON(phys & 0x1F);
606 	qmgr_put_entry(queue, phys);
607 	/* Don't check for queue overflow here, we've allocated sufficient
608 	   length and queues >= 32 don't support this check anyway. */
609 }
610 
611 
612 static inline void dma_unmap_tx(struct port *port, struct desc *desc)
613 {
614 #ifdef __ARMEB__
615 	dma_unmap_single(&port->netdev->dev, desc->data,
616 			 desc->buf_len, DMA_TO_DEVICE);
617 #else
618 	dma_unmap_single(&port->netdev->dev, desc->data & ~3,
619 			 ALIGN((desc->data & 3) + desc->buf_len, 4),
620 			 DMA_TO_DEVICE);
621 #endif
622 }
623 
624 
625 static void hss_hdlc_set_carrier(void *pdev, int carrier)
626 {
627 	struct net_device *netdev = pdev;
628 	struct port *port = dev_to_port(netdev);
629 	unsigned long flags;
630 
631 	spin_lock_irqsave(&npe_lock, flags);
632 	port->carrier = carrier;
633 	if (!port->loopback) {
634 		if (carrier)
635 			netif_carrier_on(netdev);
636 		else
637 			netif_carrier_off(netdev);
638 	}
639 	spin_unlock_irqrestore(&npe_lock, flags);
640 }
641 
642 static void hss_hdlc_rx_irq(void *pdev)
643 {
644 	struct net_device *dev = pdev;
645 	struct port *port = dev_to_port(dev);
646 
647 #if DEBUG_RX
648 	printk(KERN_DEBUG "%s: hss_hdlc_rx_irq\n", dev->name);
649 #endif
650 	qmgr_disable_irq(queue_ids[port->id].rx);
651 	napi_schedule(&port->napi);
652 }
653 
654 static int hss_hdlc_poll(struct napi_struct *napi, int budget)
655 {
656 	struct port *port = container_of(napi, struct port, napi);
657 	struct net_device *dev = port->netdev;
658 	unsigned int rxq = queue_ids[port->id].rx;
659 	unsigned int rxfreeq = queue_ids[port->id].rxfree;
660 	int received = 0;
661 
662 #if DEBUG_RX
663 	printk(KERN_DEBUG "%s: hss_hdlc_poll\n", dev->name);
664 #endif
665 
666 	while (received < budget) {
667 		struct sk_buff *skb;
668 		struct desc *desc;
669 		int n;
670 #ifdef __ARMEB__
671 		struct sk_buff *temp;
672 		u32 phys;
673 #endif
674 
675 		if ((n = queue_get_desc(rxq, port, 0)) < 0) {
676 #if DEBUG_RX
677 			printk(KERN_DEBUG "%s: hss_hdlc_poll"
678 			       " napi_complete\n", dev->name);
679 #endif
680 			napi_complete(napi);
681 			qmgr_enable_irq(rxq);
682 			if (!qmgr_stat_empty(rxq) &&
683 			    napi_reschedule(napi)) {
684 #if DEBUG_RX
685 				printk(KERN_DEBUG "%s: hss_hdlc_poll"
686 				       " napi_reschedule succeeded\n",
687 				       dev->name);
688 #endif
689 				qmgr_disable_irq(rxq);
690 				continue;
691 			}
692 #if DEBUG_RX
693 			printk(KERN_DEBUG "%s: hss_hdlc_poll all done\n",
694 			       dev->name);
695 #endif
696 			return received; /* all work done */
697 		}
698 
699 		desc = rx_desc_ptr(port, n);
700 #if 0 /* FIXME - error_count counts modulo 256, perhaps we should use it */
701 		if (desc->error_count)
702 			printk(KERN_DEBUG "%s: hss_hdlc_poll status 0x%02X"
703 			       " errors %u\n", dev->name, desc->status,
704 			       desc->error_count);
705 #endif
706 		skb = NULL;
707 		switch (desc->status) {
708 		case 0:
709 #ifdef __ARMEB__
710 			if ((skb = netdev_alloc_skb(dev, RX_SIZE)) != NULL) {
711 				phys = dma_map_single(&dev->dev, skb->data,
712 						      RX_SIZE,
713 						      DMA_FROM_DEVICE);
714 				if (dma_mapping_error(&dev->dev, phys)) {
715 					dev_kfree_skb(skb);
716 					skb = NULL;
717 				}
718 			}
719 #else
720 			skb = netdev_alloc_skb(dev, desc->pkt_len);
721 #endif
722 			if (!skb)
723 				dev->stats.rx_dropped++;
724 			break;
725 		case ERR_HDLC_ALIGN:
726 		case ERR_HDLC_ABORT:
727 			dev->stats.rx_frame_errors++;
728 			dev->stats.rx_errors++;
729 			break;
730 		case ERR_HDLC_FCS:
731 			dev->stats.rx_crc_errors++;
732 			dev->stats.rx_errors++;
733 			break;
734 		case ERR_HDLC_TOO_LONG:
735 			dev->stats.rx_length_errors++;
736 			dev->stats.rx_errors++;
737 			break;
738 		default:	/* FIXME - remove printk */
739 			printk(KERN_ERR "%s: hss_hdlc_poll: status 0x%02X"
740 			       " errors %u\n", dev->name, desc->status,
741 			       desc->error_count);
742 			dev->stats.rx_errors++;
743 		}
744 
745 		if (!skb) {
746 			/* put the desc back on RX-ready queue */
747 			desc->buf_len = RX_SIZE;
748 			desc->pkt_len = desc->status = 0;
749 			queue_put_desc(rxfreeq, rx_desc_phys(port, n), desc);
750 			continue;
751 		}
752 
753 		/* process received frame */
754 #ifdef __ARMEB__
755 		temp = skb;
756 		skb = port->rx_buff_tab[n];
757 		dma_unmap_single(&dev->dev, desc->data,
758 				 RX_SIZE, DMA_FROM_DEVICE);
759 #else
760 		dma_sync_single_for_cpu(&dev->dev, desc->data,
761 					RX_SIZE, DMA_FROM_DEVICE);
762 		memcpy_swab32((u32 *)skb->data, (u32 *)port->rx_buff_tab[n],
763 			      ALIGN(desc->pkt_len, 4) / 4);
764 #endif
765 		skb_put(skb, desc->pkt_len);
766 
767 		debug_pkt(dev, "hss_hdlc_poll", skb->data, skb->len);
768 
769 		skb->protocol = hdlc_type_trans(skb, dev);
770 		dev->stats.rx_packets++;
771 		dev->stats.rx_bytes += skb->len;
772 		netif_receive_skb(skb);
773 
774 		/* put the new buffer on RX-free queue */
775 #ifdef __ARMEB__
776 		port->rx_buff_tab[n] = temp;
777 		desc->data = phys;
778 #endif
779 		desc->buf_len = RX_SIZE;
780 		desc->pkt_len = 0;
781 		queue_put_desc(rxfreeq, rx_desc_phys(port, n), desc);
782 		received++;
783 	}
784 #if DEBUG_RX
785 	printk(KERN_DEBUG "hss_hdlc_poll: end, not all work done\n");
786 #endif
787 	return received;	/* not all work done */
788 }
789 
790 
791 static void hss_hdlc_txdone_irq(void *pdev)
792 {
793 	struct net_device *dev = pdev;
794 	struct port *port = dev_to_port(dev);
795 	int n_desc;
796 
797 #if DEBUG_TX
798 	printk(KERN_DEBUG DRV_NAME ": hss_hdlc_txdone_irq\n");
799 #endif
800 	while ((n_desc = queue_get_desc(queue_ids[port->id].txdone,
801 					port, 1)) >= 0) {
802 		struct desc *desc;
803 		int start;
804 
805 		desc = tx_desc_ptr(port, n_desc);
806 
807 		dev->stats.tx_packets++;
808 		dev->stats.tx_bytes += desc->pkt_len;
809 
810 		dma_unmap_tx(port, desc);
811 #if DEBUG_TX
812 		printk(KERN_DEBUG "%s: hss_hdlc_txdone_irq free %p\n",
813 		       dev->name, port->tx_buff_tab[n_desc]);
814 #endif
815 		free_buffer_irq(port->tx_buff_tab[n_desc]);
816 		port->tx_buff_tab[n_desc] = NULL;
817 
818 		start = qmgr_stat_below_low_watermark(port->plat->txreadyq);
819 		queue_put_desc(port->plat->txreadyq,
820 			       tx_desc_phys(port, n_desc), desc);
821 		if (start) { /* TX-ready queue was empty */
822 #if DEBUG_TX
823 			printk(KERN_DEBUG "%s: hss_hdlc_txdone_irq xmit"
824 			       " ready\n", dev->name);
825 #endif
826 			netif_wake_queue(dev);
827 		}
828 	}
829 }
830 
831 static int hss_hdlc_xmit(struct sk_buff *skb, struct net_device *dev)
832 {
833 	struct port *port = dev_to_port(dev);
834 	unsigned int txreadyq = port->plat->txreadyq;
835 	int len, offset, bytes, n;
836 	void *mem;
837 	u32 phys;
838 	struct desc *desc;
839 
840 #if DEBUG_TX
841 	printk(KERN_DEBUG "%s: hss_hdlc_xmit\n", dev->name);
842 #endif
843 
844 	if (unlikely(skb->len > HDLC_MAX_MRU)) {
845 		dev_kfree_skb(skb);
846 		dev->stats.tx_errors++;
847 		return NETDEV_TX_OK;
848 	}
849 
850 	debug_pkt(dev, "hss_hdlc_xmit", skb->data, skb->len);
851 
852 	len = skb->len;
853 #ifdef __ARMEB__
854 	offset = 0; /* no need to keep alignment */
855 	bytes = len;
856 	mem = skb->data;
857 #else
858 	offset = (int)skb->data & 3; /* keep 32-bit alignment */
859 	bytes = ALIGN(offset + len, 4);
860 	if (!(mem = kmalloc(bytes, GFP_ATOMIC))) {
861 		dev_kfree_skb(skb);
862 		dev->stats.tx_dropped++;
863 		return NETDEV_TX_OK;
864 	}
865 	memcpy_swab32(mem, (u32 *)((int)skb->data & ~3), bytes / 4);
866 	dev_kfree_skb(skb);
867 #endif
868 
869 	phys = dma_map_single(&dev->dev, mem, bytes, DMA_TO_DEVICE);
870 	if (dma_mapping_error(&dev->dev, phys)) {
871 #ifdef __ARMEB__
872 		dev_kfree_skb(skb);
873 #else
874 		kfree(mem);
875 #endif
876 		dev->stats.tx_dropped++;
877 		return NETDEV_TX_OK;
878 	}
879 
880 	n = queue_get_desc(txreadyq, port, 1);
881 	BUG_ON(n < 0);
882 	desc = tx_desc_ptr(port, n);
883 
884 #ifdef __ARMEB__
885 	port->tx_buff_tab[n] = skb;
886 #else
887 	port->tx_buff_tab[n] = mem;
888 #endif
889 	desc->data = phys + offset;
890 	desc->buf_len = desc->pkt_len = len;
891 
892 	wmb();
893 	queue_put_desc(queue_ids[port->id].tx, tx_desc_phys(port, n), desc);
894 
895 	if (qmgr_stat_below_low_watermark(txreadyq)) { /* empty */
896 #if DEBUG_TX
897 		printk(KERN_DEBUG "%s: hss_hdlc_xmit queue full\n", dev->name);
898 #endif
899 		netif_stop_queue(dev);
900 		/* we could miss TX ready interrupt */
901 		if (!qmgr_stat_below_low_watermark(txreadyq)) {
902 #if DEBUG_TX
903 			printk(KERN_DEBUG "%s: hss_hdlc_xmit ready again\n",
904 			       dev->name);
905 #endif
906 			netif_wake_queue(dev);
907 		}
908 	}
909 
910 #if DEBUG_TX
911 	printk(KERN_DEBUG "%s: hss_hdlc_xmit end\n", dev->name);
912 #endif
913 	return NETDEV_TX_OK;
914 }
915 
916 
917 static int request_hdlc_queues(struct port *port)
918 {
919 	int err;
920 
921 	err = qmgr_request_queue(queue_ids[port->id].rxfree, RX_DESCS, 0, 0,
922 				 "%s:RX-free", port->netdev->name);
923 	if (err)
924 		return err;
925 
926 	err = qmgr_request_queue(queue_ids[port->id].rx, RX_DESCS, 0, 0,
927 				 "%s:RX", port->netdev->name);
928 	if (err)
929 		goto rel_rxfree;
930 
931 	err = qmgr_request_queue(queue_ids[port->id].tx, TX_DESCS, 0, 0,
932 				 "%s:TX", port->netdev->name);
933 	if (err)
934 		goto rel_rx;
935 
936 	err = qmgr_request_queue(port->plat->txreadyq, TX_DESCS, 0, 0,
937 				 "%s:TX-ready", port->netdev->name);
938 	if (err)
939 		goto rel_tx;
940 
941 	err = qmgr_request_queue(queue_ids[port->id].txdone, TX_DESCS, 0, 0,
942 				 "%s:TX-done", port->netdev->name);
943 	if (err)
944 		goto rel_txready;
945 	return 0;
946 
947 rel_txready:
948 	qmgr_release_queue(port->plat->txreadyq);
949 rel_tx:
950 	qmgr_release_queue(queue_ids[port->id].tx);
951 rel_rx:
952 	qmgr_release_queue(queue_ids[port->id].rx);
953 rel_rxfree:
954 	qmgr_release_queue(queue_ids[port->id].rxfree);
955 	printk(KERN_DEBUG "%s: unable to request hardware queues\n",
956 	       port->netdev->name);
957 	return err;
958 }
959 
960 static void release_hdlc_queues(struct port *port)
961 {
962 	qmgr_release_queue(queue_ids[port->id].rxfree);
963 	qmgr_release_queue(queue_ids[port->id].rx);
964 	qmgr_release_queue(queue_ids[port->id].txdone);
965 	qmgr_release_queue(queue_ids[port->id].tx);
966 	qmgr_release_queue(port->plat->txreadyq);
967 }
968 
969 static int init_hdlc_queues(struct port *port)
970 {
971 	int i;
972 
973 	if (!ports_open)
974 		if (!(dma_pool = dma_pool_create(DRV_NAME, NULL,
975 						 POOL_ALLOC_SIZE, 32, 0)))
976 			return -ENOMEM;
977 
978 	if (!(port->desc_tab = dma_pool_alloc(dma_pool, GFP_KERNEL,
979 					      &port->desc_tab_phys)))
980 		return -ENOMEM;
981 	memset(port->desc_tab, 0, POOL_ALLOC_SIZE);
982 	memset(port->rx_buff_tab, 0, sizeof(port->rx_buff_tab)); /* tables */
983 	memset(port->tx_buff_tab, 0, sizeof(port->tx_buff_tab));
984 
985 	/* Setup RX buffers */
986 	for (i = 0; i < RX_DESCS; i++) {
987 		struct desc *desc = rx_desc_ptr(port, i);
988 		buffer_t *buff;
989 		void *data;
990 #ifdef __ARMEB__
991 		if (!(buff = netdev_alloc_skb(port->netdev, RX_SIZE)))
992 			return -ENOMEM;
993 		data = buff->data;
994 #else
995 		if (!(buff = kmalloc(RX_SIZE, GFP_KERNEL)))
996 			return -ENOMEM;
997 		data = buff;
998 #endif
999 		desc->buf_len = RX_SIZE;
1000 		desc->data = dma_map_single(&port->netdev->dev, data,
1001 					    RX_SIZE, DMA_FROM_DEVICE);
1002 		if (dma_mapping_error(&port->netdev->dev, desc->data)) {
1003 			free_buffer(buff);
1004 			return -EIO;
1005 		}
1006 		port->rx_buff_tab[i] = buff;
1007 	}
1008 
1009 	return 0;
1010 }
1011 
1012 static void destroy_hdlc_queues(struct port *port)
1013 {
1014 	int i;
1015 
1016 	if (port->desc_tab) {
1017 		for (i = 0; i < RX_DESCS; i++) {
1018 			struct desc *desc = rx_desc_ptr(port, i);
1019 			buffer_t *buff = port->rx_buff_tab[i];
1020 			if (buff) {
1021 				dma_unmap_single(&port->netdev->dev,
1022 						 desc->data, RX_SIZE,
1023 						 DMA_FROM_DEVICE);
1024 				free_buffer(buff);
1025 			}
1026 		}
1027 		for (i = 0; i < TX_DESCS; i++) {
1028 			struct desc *desc = tx_desc_ptr(port, i);
1029 			buffer_t *buff = port->tx_buff_tab[i];
1030 			if (buff) {
1031 				dma_unmap_tx(port, desc);
1032 				free_buffer(buff);
1033 			}
1034 		}
1035 		dma_pool_free(dma_pool, port->desc_tab, port->desc_tab_phys);
1036 		port->desc_tab = NULL;
1037 	}
1038 
1039 	if (!ports_open && dma_pool) {
1040 		dma_pool_destroy(dma_pool);
1041 		dma_pool = NULL;
1042 	}
1043 }
1044 
1045 static int hss_hdlc_open(struct net_device *dev)
1046 {
1047 	struct port *port = dev_to_port(dev);
1048 	unsigned long flags;
1049 	int i, err = 0;
1050 
1051 	if ((err = hdlc_open(dev)))
1052 		return err;
1053 
1054 	if ((err = hss_load_firmware(port)))
1055 		goto err_hdlc_close;
1056 
1057 	if ((err = request_hdlc_queues(port)))
1058 		goto err_hdlc_close;
1059 
1060 	if ((err = init_hdlc_queues(port)))
1061 		goto err_destroy_queues;
1062 
1063 	spin_lock_irqsave(&npe_lock, flags);
1064 	if (port->plat->open)
1065 		if ((err = port->plat->open(port->id, dev,
1066 					    hss_hdlc_set_carrier)))
1067 			goto err_unlock;
1068 	spin_unlock_irqrestore(&npe_lock, flags);
1069 
1070 	/* Populate queues with buffers, no failure after this point */
1071 	for (i = 0; i < TX_DESCS; i++)
1072 		queue_put_desc(port->plat->txreadyq,
1073 			       tx_desc_phys(port, i), tx_desc_ptr(port, i));
1074 
1075 	for (i = 0; i < RX_DESCS; i++)
1076 		queue_put_desc(queue_ids[port->id].rxfree,
1077 			       rx_desc_phys(port, i), rx_desc_ptr(port, i));
1078 
1079 	napi_enable(&port->napi);
1080 	netif_start_queue(dev);
1081 
1082 	qmgr_set_irq(queue_ids[port->id].rx, QUEUE_IRQ_SRC_NOT_EMPTY,
1083 		     hss_hdlc_rx_irq, dev);
1084 
1085 	qmgr_set_irq(queue_ids[port->id].txdone, QUEUE_IRQ_SRC_NOT_EMPTY,
1086 		     hss_hdlc_txdone_irq, dev);
1087 	qmgr_enable_irq(queue_ids[port->id].txdone);
1088 
1089 	ports_open++;
1090 
1091 	hss_set_hdlc_cfg(port);
1092 	hss_config(port);
1093 
1094 	hss_start_hdlc(port);
1095 
1096 	/* we may already have RX data, enables IRQ */
1097 	napi_schedule(&port->napi);
1098 	return 0;
1099 
1100 err_unlock:
1101 	spin_unlock_irqrestore(&npe_lock, flags);
1102 err_destroy_queues:
1103 	destroy_hdlc_queues(port);
1104 	release_hdlc_queues(port);
1105 err_hdlc_close:
1106 	hdlc_close(dev);
1107 	return err;
1108 }
1109 
1110 static int hss_hdlc_close(struct net_device *dev)
1111 {
1112 	struct port *port = dev_to_port(dev);
1113 	unsigned long flags;
1114 	int i, buffs = RX_DESCS; /* allocated RX buffers */
1115 
1116 	spin_lock_irqsave(&npe_lock, flags);
1117 	ports_open--;
1118 	qmgr_disable_irq(queue_ids[port->id].rx);
1119 	netif_stop_queue(dev);
1120 	napi_disable(&port->napi);
1121 
1122 	hss_stop_hdlc(port);
1123 
1124 	while (queue_get_desc(queue_ids[port->id].rxfree, port, 0) >= 0)
1125 		buffs--;
1126 	while (queue_get_desc(queue_ids[port->id].rx, port, 0) >= 0)
1127 		buffs--;
1128 
1129 	if (buffs)
1130 		printk(KERN_CRIT "%s: unable to drain RX queue, %i buffer(s)"
1131 		       " left in NPE\n", dev->name, buffs);
1132 
1133 	buffs = TX_DESCS;
1134 	while (queue_get_desc(queue_ids[port->id].tx, port, 1) >= 0)
1135 		buffs--; /* cancel TX */
1136 
1137 	i = 0;
1138 	do {
1139 		while (queue_get_desc(port->plat->txreadyq, port, 1) >= 0)
1140 			buffs--;
1141 		if (!buffs)
1142 			break;
1143 	} while (++i < MAX_CLOSE_WAIT);
1144 
1145 	if (buffs)
1146 		printk(KERN_CRIT "%s: unable to drain TX queue, %i buffer(s) "
1147 		       "left in NPE\n", dev->name, buffs);
1148 #if DEBUG_CLOSE
1149 	if (!buffs)
1150 		printk(KERN_DEBUG "Draining TX queues took %i cycles\n", i);
1151 #endif
1152 	qmgr_disable_irq(queue_ids[port->id].txdone);
1153 
1154 	if (port->plat->close)
1155 		port->plat->close(port->id, dev);
1156 	spin_unlock_irqrestore(&npe_lock, flags);
1157 
1158 	destroy_hdlc_queues(port);
1159 	release_hdlc_queues(port);
1160 	hdlc_close(dev);
1161 	return 0;
1162 }
1163 
1164 
1165 static int hss_hdlc_attach(struct net_device *dev, unsigned short encoding,
1166 			   unsigned short parity)
1167 {
1168 	struct port *port = dev_to_port(dev);
1169 
1170 	if (encoding != ENCODING_NRZ)
1171 		return -EINVAL;
1172 
1173 	switch(parity) {
1174 	case PARITY_CRC16_PR1_CCITT:
1175 		port->hdlc_cfg = 0;
1176 		return 0;
1177 
1178 	case PARITY_CRC32_PR1_CCITT:
1179 		port->hdlc_cfg = PKT_HDLC_CRC_32;
1180 		return 0;
1181 
1182 	default:
1183 		return -EINVAL;
1184 	}
1185 }
1186 
1187 static u32 check_clock(u32 rate, u32 a, u32 b, u32 c,
1188 		       u32 *best, u32 *best_diff, u32 *reg)
1189 {
1190 	/* a is 10-bit, b is 10-bit, c is 12-bit */
1191 	u64 new_rate;
1192 	u32 new_diff;
1193 
1194 	new_rate = ixp4xx_timer_freq * (u64)(c + 1);
1195 	do_div(new_rate, a * (c + 1) + b + 1);
1196 	new_diff = abs((u32)new_rate - rate);
1197 
1198 	if (new_diff < *best_diff) {
1199 		*best = new_rate;
1200 		*best_diff = new_diff;
1201 		*reg = (a << 22) | (b << 12) | c;
1202 	}
1203 	return new_diff;
1204 }
1205 
1206 static void find_best_clock(u32 rate, u32 *best, u32 *reg)
1207 {
1208 	u32 a, b, diff = 0xFFFFFFFF;
1209 
1210 	a = ixp4xx_timer_freq / rate;
1211 
1212 	if (a > 0x3FF) { /* 10-bit value - we can go as slow as ca. 65 kb/s */
1213 		check_clock(rate, 0x3FF, 1, 1, best, &diff, reg);
1214 		return;
1215 	}
1216 	if (a == 0) { /* > 66.666 MHz */
1217 		a = 1; /* minimum divider is 1 (a = 0, b = 1, c = 1) */
1218 		rate = ixp4xx_timer_freq;
1219 	}
1220 
1221 	if (rate * a == ixp4xx_timer_freq) { /* don't divide by 0 later */
1222 		check_clock(rate, a - 1, 1, 1, best, &diff, reg);
1223 		return;
1224 	}
1225 
1226 	for (b = 0; b < 0x400; b++) {
1227 		u64 c = (b + 1) * (u64)rate;
1228 		do_div(c, ixp4xx_timer_freq - rate * a);
1229 		c--;
1230 		if (c >= 0xFFF) { /* 12-bit - no need to check more 'b's */
1231 			if (b == 0 && /* also try a bit higher rate */
1232 			    !check_clock(rate, a - 1, 1, 1, best, &diff, reg))
1233 				return;
1234 			check_clock(rate, a, b, 0xFFF, best, &diff, reg);
1235 			return;
1236 		}
1237 		if (!check_clock(rate, a, b, c, best, &diff, reg))
1238 			return;
1239 		if (!check_clock(rate, a, b, c + 1, best, &diff, reg))
1240 			return;
1241 	}
1242 }
1243 
1244 static int hss_hdlc_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
1245 {
1246 	const size_t size = sizeof(sync_serial_settings);
1247 	sync_serial_settings new_line;
1248 	sync_serial_settings __user *line = ifr->ifr_settings.ifs_ifsu.sync;
1249 	struct port *port = dev_to_port(dev);
1250 	unsigned long flags;
1251 	int clk;
1252 
1253 	if (cmd != SIOCWANDEV)
1254 		return hdlc_ioctl(dev, ifr, cmd);
1255 
1256 	switch(ifr->ifr_settings.type) {
1257 	case IF_GET_IFACE:
1258 		ifr->ifr_settings.type = IF_IFACE_V35;
1259 		if (ifr->ifr_settings.size < size) {
1260 			ifr->ifr_settings.size = size; /* data size wanted */
1261 			return -ENOBUFS;
1262 		}
1263 		memset(&new_line, 0, sizeof(new_line));
1264 		new_line.clock_type = port->clock_type;
1265 		new_line.clock_rate = port->clock_rate;
1266 		new_line.loopback = port->loopback;
1267 		if (copy_to_user(line, &new_line, size))
1268 			return -EFAULT;
1269 		return 0;
1270 
1271 	case IF_IFACE_SYNC_SERIAL:
1272 	case IF_IFACE_V35:
1273 		if(!capable(CAP_NET_ADMIN))
1274 			return -EPERM;
1275 		if (copy_from_user(&new_line, line, size))
1276 			return -EFAULT;
1277 
1278 		clk = new_line.clock_type;
1279 		if (port->plat->set_clock)
1280 			clk = port->plat->set_clock(port->id, clk);
1281 
1282 		if (clk != CLOCK_EXT && clk != CLOCK_INT)
1283 			return -EINVAL;	/* No such clock setting */
1284 
1285 		if (new_line.loopback != 0 && new_line.loopback != 1)
1286 			return -EINVAL;
1287 
1288 		port->clock_type = clk; /* Update settings */
1289 		if (clk == CLOCK_INT)
1290 			find_best_clock(new_line.clock_rate, &port->clock_rate,
1291 					&port->clock_reg);
1292 		else {
1293 			port->clock_rate = 0;
1294 			port->clock_reg = CLK42X_SPEED_2048KHZ;
1295 		}
1296 		port->loopback = new_line.loopback;
1297 
1298 		spin_lock_irqsave(&npe_lock, flags);
1299 
1300 		if (dev->flags & IFF_UP)
1301 			hss_config(port);
1302 
1303 		if (port->loopback || port->carrier)
1304 			netif_carrier_on(port->netdev);
1305 		else
1306 			netif_carrier_off(port->netdev);
1307 		spin_unlock_irqrestore(&npe_lock, flags);
1308 
1309 		return 0;
1310 
1311 	default:
1312 		return hdlc_ioctl(dev, ifr, cmd);
1313 	}
1314 }
1315 
1316 /*****************************************************************************
1317  * initialization
1318  ****************************************************************************/
1319 
1320 static const struct net_device_ops hss_hdlc_ops = {
1321 	.ndo_open       = hss_hdlc_open,
1322 	.ndo_stop       = hss_hdlc_close,
1323 	.ndo_change_mtu = hdlc_change_mtu,
1324 	.ndo_start_xmit = hdlc_start_xmit,
1325 	.ndo_do_ioctl   = hss_hdlc_ioctl,
1326 };
1327 
1328 static int __devinit hss_init_one(struct platform_device *pdev)
1329 {
1330 	struct port *port;
1331 	struct net_device *dev;
1332 	hdlc_device *hdlc;
1333 	int err;
1334 
1335 	if ((port = kzalloc(sizeof(*port), GFP_KERNEL)) == NULL)
1336 		return -ENOMEM;
1337 
1338 	if ((port->npe = npe_request(0)) == NULL) {
1339 		err = -ENODEV;
1340 		goto err_free;
1341 	}
1342 
1343 	if ((port->netdev = dev = alloc_hdlcdev(port)) == NULL) {
1344 		err = -ENOMEM;
1345 		goto err_plat;
1346 	}
1347 
1348 	SET_NETDEV_DEV(dev, &pdev->dev);
1349 	hdlc = dev_to_hdlc(dev);
1350 	hdlc->attach = hss_hdlc_attach;
1351 	hdlc->xmit = hss_hdlc_xmit;
1352 	dev->netdev_ops = &hss_hdlc_ops;
1353 	dev->tx_queue_len = 100;
1354 	port->clock_type = CLOCK_EXT;
1355 	port->clock_rate = 0;
1356 	port->clock_reg = CLK42X_SPEED_2048KHZ;
1357 	port->id = pdev->id;
1358 	port->dev = &pdev->dev;
1359 	port->plat = pdev->dev.platform_data;
1360 	netif_napi_add(dev, &port->napi, hss_hdlc_poll, NAPI_WEIGHT);
1361 
1362 	if ((err = register_hdlc_device(dev)))
1363 		goto err_free_netdev;
1364 
1365 	platform_set_drvdata(pdev, port);
1366 
1367 	printk(KERN_INFO "%s: HSS-%i\n", dev->name, port->id);
1368 	return 0;
1369 
1370 err_free_netdev:
1371 	free_netdev(dev);
1372 err_plat:
1373 	npe_release(port->npe);
1374 err_free:
1375 	kfree(port);
1376 	return err;
1377 }
1378 
1379 static int __devexit hss_remove_one(struct platform_device *pdev)
1380 {
1381 	struct port *port = platform_get_drvdata(pdev);
1382 
1383 	unregister_hdlc_device(port->netdev);
1384 	free_netdev(port->netdev);
1385 	npe_release(port->npe);
1386 	platform_set_drvdata(pdev, NULL);
1387 	kfree(port);
1388 	return 0;
1389 }
1390 
1391 static struct platform_driver ixp4xx_hss_driver = {
1392 	.driver.name	= DRV_NAME,
1393 	.probe		= hss_init_one,
1394 	.remove		= hss_remove_one,
1395 };
1396 
1397 static int __init hss_init_module(void)
1398 {
1399 	if ((ixp4xx_read_feature_bits() &
1400 	     (IXP4XX_FEATURE_HDLC | IXP4XX_FEATURE_HSS)) !=
1401 	    (IXP4XX_FEATURE_HDLC | IXP4XX_FEATURE_HSS))
1402 		return -ENODEV;
1403 
1404 	spin_lock_init(&npe_lock);
1405 
1406 	return platform_driver_register(&ixp4xx_hss_driver);
1407 }
1408 
1409 static void __exit hss_cleanup_module(void)
1410 {
1411 	platform_driver_unregister(&ixp4xx_hss_driver);
1412 }
1413 
1414 MODULE_AUTHOR("Krzysztof Halasa");
1415 MODULE_DESCRIPTION("Intel IXP4xx HSS driver");
1416 MODULE_LICENSE("GPL v2");
1417 MODULE_ALIAS("platform:ixp4xx_hss");
1418 module_init(hss_init_module);
1419 module_exit(hss_cleanup_module);
1420