• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * udc.c - ChipIdea UDC driver
4  *
5  * Copyright (C) 2008 Chipidea - MIPS Technologies, Inc. All rights reserved.
6  *
7  * Author: David Lopo
8  */
9 
10 #include <linux/delay.h>
11 #include <linux/device.h>
12 #include <linux/dmapool.h>
13 #include <linux/err.h>
14 #include <linux/irqreturn.h>
15 #include <linux/kernel.h>
16 #include <linux/slab.h>
17 #include <linux/pm_runtime.h>
18 #include <linux/pinctrl/consumer.h>
19 #include <linux/usb/ch9.h>
20 #include <linux/usb/gadget.h>
21 #include <linux/usb/otg-fsm.h>
22 #include <linux/usb/chipidea.h>
23 
24 #include "ci.h"
25 #include "udc.h"
26 #include "bits.h"
27 #include "otg.h"
28 #include "otg_fsm.h"
29 
30 /* control endpoint description */
31 static const struct usb_endpoint_descriptor
32 ctrl_endpt_out_desc = {
33 	.bLength         = USB_DT_ENDPOINT_SIZE,
34 	.bDescriptorType = USB_DT_ENDPOINT,
35 
36 	.bEndpointAddress = USB_DIR_OUT,
37 	.bmAttributes    = USB_ENDPOINT_XFER_CONTROL,
38 	.wMaxPacketSize  = cpu_to_le16(CTRL_PAYLOAD_MAX),
39 };
40 
41 static const struct usb_endpoint_descriptor
42 ctrl_endpt_in_desc = {
43 	.bLength         = USB_DT_ENDPOINT_SIZE,
44 	.bDescriptorType = USB_DT_ENDPOINT,
45 
46 	.bEndpointAddress = USB_DIR_IN,
47 	.bmAttributes    = USB_ENDPOINT_XFER_CONTROL,
48 	.wMaxPacketSize  = cpu_to_le16(CTRL_PAYLOAD_MAX),
49 };
50 
51 /**
52  * hw_ep_bit: calculates the bit number
53  * @num: endpoint number
54  * @dir: endpoint direction
55  *
56  * This function returns bit number
57  */
hw_ep_bit(int num,int dir)58 static inline int hw_ep_bit(int num, int dir)
59 {
60 	return num + ((dir == TX) ? 16 : 0);
61 }
62 
ep_to_bit(struct ci_hdrc * ci,int n)63 static inline int ep_to_bit(struct ci_hdrc *ci, int n)
64 {
65 	int fill = 16 - ci->hw_ep_max / 2;
66 
67 	if (n >= ci->hw_ep_max / 2)
68 		n += fill;
69 
70 	return n;
71 }
72 
73 /**
74  * hw_device_state: enables/disables interrupts (execute without interruption)
75  * @ci: the controller
76  * @dma: 0 => disable, !0 => enable and set dma engine
77  *
78  * This function returns an error code
79  */
hw_device_state(struct ci_hdrc * ci,u32 dma)80 static int hw_device_state(struct ci_hdrc *ci, u32 dma)
81 {
82 	if (dma) {
83 		hw_write(ci, OP_ENDPTLISTADDR, ~0, dma);
84 		/* interrupt, error, port change, reset, sleep/suspend */
85 		hw_write(ci, OP_USBINTR, ~0,
86 			     USBi_UI|USBi_UEI|USBi_PCI|USBi_URI|USBi_SLI);
87 	} else {
88 		hw_write(ci, OP_USBINTR, ~0, 0);
89 	}
90 	return 0;
91 }
92 
93 /**
94  * hw_ep_flush: flush endpoint fifo (execute without interruption)
95  * @ci: the controller
96  * @num: endpoint number
97  * @dir: endpoint direction
98  *
99  * This function returns an error code
100  */
hw_ep_flush(struct ci_hdrc * ci,int num,int dir)101 static int hw_ep_flush(struct ci_hdrc *ci, int num, int dir)
102 {
103 	int n = hw_ep_bit(num, dir);
104 
105 	do {
106 		/* flush any pending transfer */
107 		hw_write(ci, OP_ENDPTFLUSH, ~0, BIT(n));
108 		while (hw_read(ci, OP_ENDPTFLUSH, BIT(n)))
109 			cpu_relax();
110 	} while (hw_read(ci, OP_ENDPTSTAT, BIT(n)));
111 
112 	return 0;
113 }
114 
115 /**
116  * hw_ep_disable: disables endpoint (execute without interruption)
117  * @ci: the controller
118  * @num: endpoint number
119  * @dir: endpoint direction
120  *
121  * This function returns an error code
122  */
hw_ep_disable(struct ci_hdrc * ci,int num,int dir)123 static int hw_ep_disable(struct ci_hdrc *ci, int num, int dir)
124 {
125 	hw_write(ci, OP_ENDPTCTRL + num,
126 		 (dir == TX) ? ENDPTCTRL_TXE : ENDPTCTRL_RXE, 0);
127 	return 0;
128 }
129 
130 /**
131  * hw_ep_enable: enables endpoint (execute without interruption)
132  * @ci: the controller
133  * @num:  endpoint number
134  * @dir:  endpoint direction
135  * @type: endpoint type
136  *
137  * This function returns an error code
138  */
hw_ep_enable(struct ci_hdrc * ci,int num,int dir,int type)139 static int hw_ep_enable(struct ci_hdrc *ci, int num, int dir, int type)
140 {
141 	u32 mask, data;
142 
143 	if (dir == TX) {
144 		mask  = ENDPTCTRL_TXT;  /* type    */
145 		data  = type << __ffs(mask);
146 
147 		mask |= ENDPTCTRL_TXS;  /* unstall */
148 		mask |= ENDPTCTRL_TXR;  /* reset data toggle */
149 		data |= ENDPTCTRL_TXR;
150 		mask |= ENDPTCTRL_TXE;  /* enable  */
151 		data |= ENDPTCTRL_TXE;
152 	} else {
153 		mask  = ENDPTCTRL_RXT;  /* type    */
154 		data  = type << __ffs(mask);
155 
156 		mask |= ENDPTCTRL_RXS;  /* unstall */
157 		mask |= ENDPTCTRL_RXR;  /* reset data toggle */
158 		data |= ENDPTCTRL_RXR;
159 		mask |= ENDPTCTRL_RXE;  /* enable  */
160 		data |= ENDPTCTRL_RXE;
161 	}
162 	hw_write(ci, OP_ENDPTCTRL + num, mask, data);
163 	return 0;
164 }
165 
166 /**
167  * hw_ep_get_halt: return endpoint halt status
168  * @ci: the controller
169  * @num: endpoint number
170  * @dir: endpoint direction
171  *
172  * This function returns 1 if endpoint halted
173  */
hw_ep_get_halt(struct ci_hdrc * ci,int num,int dir)174 static int hw_ep_get_halt(struct ci_hdrc *ci, int num, int dir)
175 {
176 	u32 mask = (dir == TX) ? ENDPTCTRL_TXS : ENDPTCTRL_RXS;
177 
178 	return hw_read(ci, OP_ENDPTCTRL + num, mask) ? 1 : 0;
179 }
180 
181 /**
182  * hw_ep_prime: primes endpoint (execute without interruption)
183  * @ci: the controller
184  * @num:     endpoint number
185  * @dir:     endpoint direction
186  * @is_ctrl: true if control endpoint
187  *
188  * This function returns an error code
189  */
hw_ep_prime(struct ci_hdrc * ci,int num,int dir,int is_ctrl)190 static int hw_ep_prime(struct ci_hdrc *ci, int num, int dir, int is_ctrl)
191 {
192 	int n = hw_ep_bit(num, dir);
193 
194 	/* Synchronize before ep prime */
195 	wmb();
196 
197 	if (is_ctrl && dir == RX && hw_read(ci, OP_ENDPTSETUPSTAT, BIT(num)))
198 		return -EAGAIN;
199 
200 	hw_write(ci, OP_ENDPTPRIME, ~0, BIT(n));
201 
202 	while (hw_read(ci, OP_ENDPTPRIME, BIT(n)))
203 		cpu_relax();
204 	if (is_ctrl && dir == RX && hw_read(ci, OP_ENDPTSETUPSTAT, BIT(num)))
205 		return -EAGAIN;
206 
207 	/* status shoult be tested according with manual but it doesn't work */
208 	return 0;
209 }
210 
211 /**
212  * hw_ep_set_halt: configures ep halt & resets data toggle after clear (execute
213  *                 without interruption)
214  * @ci: the controller
215  * @num:   endpoint number
216  * @dir:   endpoint direction
217  * @value: true => stall, false => unstall
218  *
219  * This function returns an error code
220  */
hw_ep_set_halt(struct ci_hdrc * ci,int num,int dir,int value)221 static int hw_ep_set_halt(struct ci_hdrc *ci, int num, int dir, int value)
222 {
223 	if (value != 0 && value != 1)
224 		return -EINVAL;
225 
226 	do {
227 		enum ci_hw_regs reg = OP_ENDPTCTRL + num;
228 		u32 mask_xs = (dir == TX) ? ENDPTCTRL_TXS : ENDPTCTRL_RXS;
229 		u32 mask_xr = (dir == TX) ? ENDPTCTRL_TXR : ENDPTCTRL_RXR;
230 
231 		/* data toggle - reserved for EP0 but it's in ESS */
232 		hw_write(ci, reg, mask_xs|mask_xr,
233 			  value ? mask_xs : mask_xr);
234 	} while (value != hw_ep_get_halt(ci, num, dir));
235 
236 	return 0;
237 }
238 
239 /**
240  * hw_is_port_high_speed: test if port is high speed
241  * @ci: the controller
242  *
243  * This function returns true if high speed port
244  */
hw_port_is_high_speed(struct ci_hdrc * ci)245 static int hw_port_is_high_speed(struct ci_hdrc *ci)
246 {
247 	return ci->hw_bank.lpm ? hw_read(ci, OP_DEVLC, DEVLC_PSPD) :
248 		hw_read(ci, OP_PORTSC, PORTSC_HSP);
249 }
250 
251 /**
252  * hw_test_and_clear_complete: test & clear complete status (execute without
253  *                             interruption)
254  * @ci: the controller
255  * @n: endpoint number
256  *
257  * This function returns complete status
258  */
hw_test_and_clear_complete(struct ci_hdrc * ci,int n)259 static int hw_test_and_clear_complete(struct ci_hdrc *ci, int n)
260 {
261 	n = ep_to_bit(ci, n);
262 	return hw_test_and_clear(ci, OP_ENDPTCOMPLETE, BIT(n));
263 }
264 
265 /**
266  * hw_test_and_clear_intr_active: test & clear active interrupts (execute
267  *                                without interruption)
268  * @ci: the controller
269  *
270  * This function returns active interrutps
271  */
hw_test_and_clear_intr_active(struct ci_hdrc * ci)272 static u32 hw_test_and_clear_intr_active(struct ci_hdrc *ci)
273 {
274 	u32 reg = hw_read_intr_status(ci) & hw_read_intr_enable(ci);
275 
276 	hw_write(ci, OP_USBSTS, ~0, reg);
277 	return reg;
278 }
279 
280 /**
281  * hw_test_and_clear_setup_guard: test & clear setup guard (execute without
282  *                                interruption)
283  * @ci: the controller
284  *
285  * This function returns guard value
286  */
hw_test_and_clear_setup_guard(struct ci_hdrc * ci)287 static int hw_test_and_clear_setup_guard(struct ci_hdrc *ci)
288 {
289 	return hw_test_and_write(ci, OP_USBCMD, USBCMD_SUTW, 0);
290 }
291 
292 /**
293  * hw_test_and_set_setup_guard: test & set setup guard (execute without
294  *                              interruption)
295  * @ci: the controller
296  *
297  * This function returns guard value
298  */
hw_test_and_set_setup_guard(struct ci_hdrc * ci)299 static int hw_test_and_set_setup_guard(struct ci_hdrc *ci)
300 {
301 	return hw_test_and_write(ci, OP_USBCMD, USBCMD_SUTW, USBCMD_SUTW);
302 }
303 
304 /**
305  * hw_usb_set_address: configures USB address (execute without interruption)
306  * @ci: the controller
307  * @value: new USB address
308  *
309  * This function explicitly sets the address, without the "USBADRA" (advance)
310  * feature, which is not supported by older versions of the controller.
311  */
hw_usb_set_address(struct ci_hdrc * ci,u8 value)312 static void hw_usb_set_address(struct ci_hdrc *ci, u8 value)
313 {
314 	hw_write(ci, OP_DEVICEADDR, DEVICEADDR_USBADR,
315 		 value << __ffs(DEVICEADDR_USBADR));
316 }
317 
318 /**
319  * hw_usb_reset: restart device after a bus reset (execute without
320  *               interruption)
321  * @ci: the controller
322  *
323  * This function returns an error code
324  */
hw_usb_reset(struct ci_hdrc * ci)325 static int hw_usb_reset(struct ci_hdrc *ci)
326 {
327 	hw_usb_set_address(ci, 0);
328 
329 	/* ESS flushes only at end?!? */
330 	hw_write(ci, OP_ENDPTFLUSH,    ~0, ~0);
331 
332 	/* clear setup token semaphores */
333 	hw_write(ci, OP_ENDPTSETUPSTAT, 0,  0);
334 
335 	/* clear complete status */
336 	hw_write(ci, OP_ENDPTCOMPLETE,  0,  0);
337 
338 	/* wait until all bits cleared */
339 	while (hw_read(ci, OP_ENDPTPRIME, ~0))
340 		udelay(10);             /* not RTOS friendly */
341 
342 	/* reset all endpoints ? */
343 
344 	/* reset internal status and wait for further instructions
345 	   no need to verify the port reset status (ESS does it) */
346 
347 	return 0;
348 }
349 
350 /******************************************************************************
351  * UTIL block
352  *****************************************************************************/
353 
add_td_to_list(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq,unsigned int length,struct scatterlist * s)354 static int add_td_to_list(struct ci_hw_ep *hwep, struct ci_hw_req *hwreq,
355 			unsigned int length, struct scatterlist *s)
356 {
357 	int i;
358 	u32 temp;
359 	struct td_node *lastnode, *node = kzalloc(sizeof(struct td_node),
360 						  GFP_ATOMIC);
361 
362 	if (node == NULL)
363 		return -ENOMEM;
364 
365 	node->ptr = dma_pool_zalloc(hwep->td_pool, GFP_ATOMIC, &node->dma);
366 	if (node->ptr == NULL) {
367 		kfree(node);
368 		return -ENOMEM;
369 	}
370 
371 	node->ptr->token = cpu_to_le32(length << __ffs(TD_TOTAL_BYTES));
372 	node->ptr->token &= cpu_to_le32(TD_TOTAL_BYTES);
373 	node->ptr->token |= cpu_to_le32(TD_STATUS_ACTIVE);
374 	if (hwep->type == USB_ENDPOINT_XFER_ISOC && hwep->dir == TX) {
375 		u32 mul = hwreq->req.length / hwep->ep.maxpacket;
376 
377 		if (hwreq->req.length == 0
378 				|| hwreq->req.length % hwep->ep.maxpacket)
379 			mul++;
380 		node->ptr->token |= cpu_to_le32(mul << __ffs(TD_MULTO));
381 	}
382 
383 	if (s) {
384 		temp = (u32) (sg_dma_address(s) + hwreq->req.actual);
385 		node->td_remaining_size = CI_MAX_BUF_SIZE - length;
386 	} else {
387 		temp = (u32) (hwreq->req.dma + hwreq->req.actual);
388 	}
389 
390 	if (length) {
391 		node->ptr->page[0] = cpu_to_le32(temp);
392 		for (i = 1; i < TD_PAGE_COUNT; i++) {
393 			u32 page = temp + i * CI_HDRC_PAGE_SIZE;
394 			page &= ~TD_RESERVED_MASK;
395 			node->ptr->page[i] = cpu_to_le32(page);
396 		}
397 	}
398 
399 	hwreq->req.actual += length;
400 
401 	if (!list_empty(&hwreq->tds)) {
402 		/* get the last entry */
403 		lastnode = list_entry(hwreq->tds.prev,
404 				struct td_node, td);
405 		lastnode->ptr->next = cpu_to_le32(node->dma);
406 	}
407 
408 	INIT_LIST_HEAD(&node->td);
409 	list_add_tail(&node->td, &hwreq->tds);
410 
411 	return 0;
412 }
413 
414 /**
415  * _usb_addr: calculates endpoint address from direction & number
416  * @ep:  endpoint
417  */
_usb_addr(struct ci_hw_ep * ep)418 static inline u8 _usb_addr(struct ci_hw_ep *ep)
419 {
420 	return ((ep->dir == TX) ? USB_ENDPOINT_DIR_MASK : 0) | ep->num;
421 }
422 
prepare_td_for_non_sg(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq)423 static int prepare_td_for_non_sg(struct ci_hw_ep *hwep,
424 		struct ci_hw_req *hwreq)
425 {
426 	unsigned int rest = hwreq->req.length;
427 	int pages = TD_PAGE_COUNT;
428 	int ret = 0;
429 
430 	if (rest == 0) {
431 		ret = add_td_to_list(hwep, hwreq, 0, NULL);
432 		if (ret < 0)
433 			return ret;
434 	}
435 
436 	/*
437 	 * The first buffer could be not page aligned.
438 	 * In that case we have to span into one extra td.
439 	 */
440 	if (hwreq->req.dma % PAGE_SIZE)
441 		pages--;
442 
443 	while (rest > 0) {
444 		unsigned int count = min(hwreq->req.length - hwreq->req.actual,
445 			(unsigned int)(pages * CI_HDRC_PAGE_SIZE));
446 
447 		ret = add_td_to_list(hwep, hwreq, count, NULL);
448 		if (ret < 0)
449 			return ret;
450 
451 		rest -= count;
452 	}
453 
454 	if (hwreq->req.zero && hwreq->req.length && hwep->dir == TX
455 	    && (hwreq->req.length % hwep->ep.maxpacket == 0)) {
456 		ret = add_td_to_list(hwep, hwreq, 0, NULL);
457 		if (ret < 0)
458 			return ret;
459 	}
460 
461 	return ret;
462 }
463 
prepare_td_per_sg(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq,struct scatterlist * s)464 static int prepare_td_per_sg(struct ci_hw_ep *hwep, struct ci_hw_req *hwreq,
465 		struct scatterlist *s)
466 {
467 	unsigned int rest = sg_dma_len(s);
468 	int ret = 0;
469 
470 	hwreq->req.actual = 0;
471 	while (rest > 0) {
472 		unsigned int count = min_t(unsigned int, rest,
473 				CI_MAX_BUF_SIZE);
474 
475 		ret = add_td_to_list(hwep, hwreq, count, s);
476 		if (ret < 0)
477 			return ret;
478 
479 		rest -= count;
480 	}
481 
482 	return ret;
483 }
484 
ci_add_buffer_entry(struct td_node * node,struct scatterlist * s)485 static void ci_add_buffer_entry(struct td_node *node, struct scatterlist *s)
486 {
487 	int empty_td_slot_index = (CI_MAX_BUF_SIZE - node->td_remaining_size)
488 			/ CI_HDRC_PAGE_SIZE;
489 	int i;
490 	u32 token;
491 
492 	token = le32_to_cpu(node->ptr->token) + (sg_dma_len(s) << __ffs(TD_TOTAL_BYTES));
493 	node->ptr->token = cpu_to_le32(token);
494 
495 	for (i = empty_td_slot_index; i < TD_PAGE_COUNT; i++) {
496 		u32 page = (u32) sg_dma_address(s) +
497 			(i - empty_td_slot_index) * CI_HDRC_PAGE_SIZE;
498 
499 		page &= ~TD_RESERVED_MASK;
500 		node->ptr->page[i] = cpu_to_le32(page);
501 	}
502 }
503 
prepare_td_for_sg(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq)504 static int prepare_td_for_sg(struct ci_hw_ep *hwep, struct ci_hw_req *hwreq)
505 {
506 	struct usb_request *req = &hwreq->req;
507 	struct scatterlist *s = req->sg;
508 	int ret = 0, i = 0;
509 	struct td_node *node = NULL;
510 
511 	if (!s || req->zero || req->length == 0) {
512 		dev_err(hwep->ci->dev, "not supported operation for sg\n");
513 		return -EINVAL;
514 	}
515 
516 	while (i++ < req->num_mapped_sgs) {
517 		if (sg_dma_address(s) % PAGE_SIZE) {
518 			dev_err(hwep->ci->dev, "not page aligned sg buffer\n");
519 			return -EINVAL;
520 		}
521 
522 		if (node && (node->td_remaining_size >= sg_dma_len(s))) {
523 			ci_add_buffer_entry(node, s);
524 			node->td_remaining_size -= sg_dma_len(s);
525 		} else {
526 			ret = prepare_td_per_sg(hwep, hwreq, s);
527 			if (ret)
528 				return ret;
529 
530 			node = list_entry(hwreq->tds.prev,
531 				struct td_node, td);
532 		}
533 
534 		s = sg_next(s);
535 	}
536 
537 	return ret;
538 }
539 
540 /**
541  * _hardware_enqueue: configures a request at hardware level
542  * @hwep:   endpoint
543  * @hwreq:  request
544  *
545  * This function returns an error code
546  */
_hardware_enqueue(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq)547 static int _hardware_enqueue(struct ci_hw_ep *hwep, struct ci_hw_req *hwreq)
548 {
549 	struct ci_hdrc *ci = hwep->ci;
550 	int ret = 0;
551 	struct td_node *firstnode, *lastnode;
552 
553 	/* don't queue twice */
554 	if (hwreq->req.status == -EALREADY)
555 		return -EALREADY;
556 
557 	hwreq->req.status = -EALREADY;
558 
559 	ret = usb_gadget_map_request_by_dev(ci->dev->parent,
560 					    &hwreq->req, hwep->dir);
561 	if (ret)
562 		return ret;
563 
564 	if (hwreq->req.num_mapped_sgs)
565 		ret = prepare_td_for_sg(hwep, hwreq);
566 	else
567 		ret = prepare_td_for_non_sg(hwep, hwreq);
568 
569 	if (ret)
570 		return ret;
571 
572 	firstnode = list_first_entry(&hwreq->tds, struct td_node, td);
573 
574 	lastnode = list_entry(hwreq->tds.prev,
575 		struct td_node, td);
576 
577 	lastnode->ptr->next = cpu_to_le32(TD_TERMINATE);
578 	if (!hwreq->req.no_interrupt)
579 		lastnode->ptr->token |= cpu_to_le32(TD_IOC);
580 	wmb();
581 
582 	hwreq->req.actual = 0;
583 	if (!list_empty(&hwep->qh.queue)) {
584 		struct ci_hw_req *hwreqprev;
585 		int n = hw_ep_bit(hwep->num, hwep->dir);
586 		int tmp_stat;
587 		struct td_node *prevlastnode;
588 		u32 next = firstnode->dma & TD_ADDR_MASK;
589 
590 		hwreqprev = list_entry(hwep->qh.queue.prev,
591 				struct ci_hw_req, queue);
592 		prevlastnode = list_entry(hwreqprev->tds.prev,
593 				struct td_node, td);
594 
595 		prevlastnode->ptr->next = cpu_to_le32(next);
596 		wmb();
597 		if (hw_read(ci, OP_ENDPTPRIME, BIT(n)))
598 			goto done;
599 		do {
600 			hw_write(ci, OP_USBCMD, USBCMD_ATDTW, USBCMD_ATDTW);
601 			tmp_stat = hw_read(ci, OP_ENDPTSTAT, BIT(n));
602 		} while (!hw_read(ci, OP_USBCMD, USBCMD_ATDTW));
603 		hw_write(ci, OP_USBCMD, USBCMD_ATDTW, 0);
604 		if (tmp_stat)
605 			goto done;
606 	}
607 
608 	/*  QH configuration */
609 	hwep->qh.ptr->td.next = cpu_to_le32(firstnode->dma);
610 	hwep->qh.ptr->td.token &=
611 		cpu_to_le32(~(TD_STATUS_HALTED|TD_STATUS_ACTIVE));
612 
613 	if (hwep->type == USB_ENDPOINT_XFER_ISOC && hwep->dir == RX) {
614 		u32 mul = hwreq->req.length / hwep->ep.maxpacket;
615 
616 		if (hwreq->req.length == 0
617 				|| hwreq->req.length % hwep->ep.maxpacket)
618 			mul++;
619 		hwep->qh.ptr->cap |= cpu_to_le32(mul << __ffs(QH_MULT));
620 	}
621 
622 	ret = hw_ep_prime(ci, hwep->num, hwep->dir,
623 			   hwep->type == USB_ENDPOINT_XFER_CONTROL);
624 done:
625 	return ret;
626 }
627 
628 /**
629  * free_pending_td: remove a pending request for the endpoint
630  * @hwep: endpoint
631  */
free_pending_td(struct ci_hw_ep * hwep)632 static void free_pending_td(struct ci_hw_ep *hwep)
633 {
634 	struct td_node *pending = hwep->pending_td;
635 
636 	dma_pool_free(hwep->td_pool, pending->ptr, pending->dma);
637 	hwep->pending_td = NULL;
638 	kfree(pending);
639 }
640 
reprime_dtd(struct ci_hdrc * ci,struct ci_hw_ep * hwep,struct td_node * node)641 static int reprime_dtd(struct ci_hdrc *ci, struct ci_hw_ep *hwep,
642 					   struct td_node *node)
643 {
644 	hwep->qh.ptr->td.next = cpu_to_le32(node->dma);
645 	hwep->qh.ptr->td.token &=
646 		cpu_to_le32(~(TD_STATUS_HALTED | TD_STATUS_ACTIVE));
647 
648 	return hw_ep_prime(ci, hwep->num, hwep->dir,
649 				hwep->type == USB_ENDPOINT_XFER_CONTROL);
650 }
651 
652 /**
653  * _hardware_dequeue: handles a request at hardware level
654  * @hwep: endpoint
655  * @hwreq:  request
656  *
657  * This function returns an error code
658  */
_hardware_dequeue(struct ci_hw_ep * hwep,struct ci_hw_req * hwreq)659 static int _hardware_dequeue(struct ci_hw_ep *hwep, struct ci_hw_req *hwreq)
660 {
661 	u32 tmptoken;
662 	struct td_node *node, *tmpnode;
663 	unsigned remaining_length;
664 	unsigned actual = hwreq->req.length;
665 	struct ci_hdrc *ci = hwep->ci;
666 
667 	if (hwreq->req.status != -EALREADY)
668 		return -EINVAL;
669 
670 	hwreq->req.status = 0;
671 
672 	list_for_each_entry_safe(node, tmpnode, &hwreq->tds, td) {
673 		tmptoken = le32_to_cpu(node->ptr->token);
674 		if ((TD_STATUS_ACTIVE & tmptoken) != 0) {
675 			int n = hw_ep_bit(hwep->num, hwep->dir);
676 
677 			if (ci->rev == CI_REVISION_24)
678 				if (!hw_read(ci, OP_ENDPTSTAT, BIT(n)))
679 					reprime_dtd(ci, hwep, node);
680 			hwreq->req.status = -EALREADY;
681 			return -EBUSY;
682 		}
683 
684 		remaining_length = (tmptoken & TD_TOTAL_BYTES);
685 		remaining_length >>= __ffs(TD_TOTAL_BYTES);
686 		actual -= remaining_length;
687 
688 		hwreq->req.status = tmptoken & TD_STATUS;
689 		if ((TD_STATUS_HALTED & hwreq->req.status)) {
690 			hwreq->req.status = -EPIPE;
691 			break;
692 		} else if ((TD_STATUS_DT_ERR & hwreq->req.status)) {
693 			hwreq->req.status = -EPROTO;
694 			break;
695 		} else if ((TD_STATUS_TR_ERR & hwreq->req.status)) {
696 			hwreq->req.status = -EILSEQ;
697 			break;
698 		}
699 
700 		if (remaining_length) {
701 			if (hwep->dir == TX) {
702 				hwreq->req.status = -EPROTO;
703 				break;
704 			}
705 		}
706 		/*
707 		 * As the hardware could still address the freed td
708 		 * which will run the udc unusable, the cleanup of the
709 		 * td has to be delayed by one.
710 		 */
711 		if (hwep->pending_td)
712 			free_pending_td(hwep);
713 
714 		hwep->pending_td = node;
715 		list_del_init(&node->td);
716 	}
717 
718 	usb_gadget_unmap_request_by_dev(hwep->ci->dev->parent,
719 					&hwreq->req, hwep->dir);
720 
721 	hwreq->req.actual += actual;
722 
723 	if (hwreq->req.status)
724 		return hwreq->req.status;
725 
726 	return hwreq->req.actual;
727 }
728 
729 /**
730  * _ep_nuke: dequeues all endpoint requests
731  * @hwep: endpoint
732  *
733  * This function returns an error code
734  * Caller must hold lock
735  */
_ep_nuke(struct ci_hw_ep * hwep)736 static int _ep_nuke(struct ci_hw_ep *hwep)
737 __releases(hwep->lock)
738 __acquires(hwep->lock)
739 {
740 	struct td_node *node, *tmpnode;
741 	if (hwep == NULL)
742 		return -EINVAL;
743 
744 	hw_ep_flush(hwep->ci, hwep->num, hwep->dir);
745 
746 	while (!list_empty(&hwep->qh.queue)) {
747 
748 		/* pop oldest request */
749 		struct ci_hw_req *hwreq = list_entry(hwep->qh.queue.next,
750 						     struct ci_hw_req, queue);
751 
752 		list_for_each_entry_safe(node, tmpnode, &hwreq->tds, td) {
753 			dma_pool_free(hwep->td_pool, node->ptr, node->dma);
754 			list_del_init(&node->td);
755 			node->ptr = NULL;
756 			kfree(node);
757 		}
758 
759 		list_del_init(&hwreq->queue);
760 		hwreq->req.status = -ESHUTDOWN;
761 
762 		if (hwreq->req.complete != NULL) {
763 			spin_unlock(hwep->lock);
764 			usb_gadget_giveback_request(&hwep->ep, &hwreq->req);
765 			spin_lock(hwep->lock);
766 		}
767 	}
768 
769 	if (hwep->pending_td)
770 		free_pending_td(hwep);
771 
772 	return 0;
773 }
774 
_ep_set_halt(struct usb_ep * ep,int value,bool check_transfer)775 static int _ep_set_halt(struct usb_ep *ep, int value, bool check_transfer)
776 {
777 	struct ci_hw_ep *hwep = container_of(ep, struct ci_hw_ep, ep);
778 	int direction, retval = 0;
779 	unsigned long flags;
780 
781 	if (ep == NULL || hwep->ep.desc == NULL)
782 		return -EINVAL;
783 
784 	if (usb_endpoint_xfer_isoc(hwep->ep.desc))
785 		return -EOPNOTSUPP;
786 
787 	spin_lock_irqsave(hwep->lock, flags);
788 
789 	if (value && hwep->dir == TX && check_transfer &&
790 		!list_empty(&hwep->qh.queue) &&
791 			!usb_endpoint_xfer_control(hwep->ep.desc)) {
792 		spin_unlock_irqrestore(hwep->lock, flags);
793 		return -EAGAIN;
794 	}
795 
796 	direction = hwep->dir;
797 	do {
798 		retval |= hw_ep_set_halt(hwep->ci, hwep->num, hwep->dir, value);
799 
800 		if (!value)
801 			hwep->wedge = 0;
802 
803 		if (hwep->type == USB_ENDPOINT_XFER_CONTROL)
804 			hwep->dir = (hwep->dir == TX) ? RX : TX;
805 
806 	} while (hwep->dir != direction);
807 
808 	spin_unlock_irqrestore(hwep->lock, flags);
809 	return retval;
810 }
811 
812 
813 /**
814  * _gadget_stop_activity: stops all USB activity, flushes & disables all endpts
815  * @gadget: gadget
816  *
817  * This function returns an error code
818  */
_gadget_stop_activity(struct usb_gadget * gadget)819 static int _gadget_stop_activity(struct usb_gadget *gadget)
820 {
821 	struct usb_ep *ep;
822 	struct ci_hdrc    *ci = container_of(gadget, struct ci_hdrc, gadget);
823 	unsigned long flags;
824 
825 	/* flush all endpoints */
826 	gadget_for_each_ep(ep, gadget) {
827 		usb_ep_fifo_flush(ep);
828 	}
829 	usb_ep_fifo_flush(&ci->ep0out->ep);
830 	usb_ep_fifo_flush(&ci->ep0in->ep);
831 
832 	/* make sure to disable all endpoints */
833 	gadget_for_each_ep(ep, gadget) {
834 		usb_ep_disable(ep);
835 	}
836 
837 	if (ci->status != NULL) {
838 		usb_ep_free_request(&ci->ep0in->ep, ci->status);
839 		ci->status = NULL;
840 	}
841 
842 	spin_lock_irqsave(&ci->lock, flags);
843 	ci->gadget.speed = USB_SPEED_UNKNOWN;
844 	ci->remote_wakeup = 0;
845 	ci->suspended = 0;
846 	spin_unlock_irqrestore(&ci->lock, flags);
847 
848 	return 0;
849 }
850 
851 /******************************************************************************
852  * ISR block
853  *****************************************************************************/
854 /**
855  * isr_reset_handler: USB reset interrupt handler
856  * @ci: UDC device
857  *
858  * This function resets USB engine after a bus reset occurred
859  */
isr_reset_handler(struct ci_hdrc * ci)860 static void isr_reset_handler(struct ci_hdrc *ci)
861 __releases(ci->lock)
862 __acquires(ci->lock)
863 {
864 	int retval;
865 
866 	spin_unlock(&ci->lock);
867 	if (ci->gadget.speed != USB_SPEED_UNKNOWN)
868 		usb_gadget_udc_reset(&ci->gadget, ci->driver);
869 
870 	retval = _gadget_stop_activity(&ci->gadget);
871 	if (retval)
872 		goto done;
873 
874 	retval = hw_usb_reset(ci);
875 	if (retval)
876 		goto done;
877 
878 	ci->status = usb_ep_alloc_request(&ci->ep0in->ep, GFP_ATOMIC);
879 	if (ci->status == NULL)
880 		retval = -ENOMEM;
881 
882 done:
883 	spin_lock(&ci->lock);
884 
885 	if (retval)
886 		dev_err(ci->dev, "error: %i\n", retval);
887 }
888 
889 /**
890  * isr_get_status_complete: get_status request complete function
891  * @ep:  endpoint
892  * @req: request handled
893  *
894  * Caller must release lock
895  */
isr_get_status_complete(struct usb_ep * ep,struct usb_request * req)896 static void isr_get_status_complete(struct usb_ep *ep, struct usb_request *req)
897 {
898 	if (ep == NULL || req == NULL)
899 		return;
900 
901 	kfree(req->buf);
902 	usb_ep_free_request(ep, req);
903 }
904 
905 /**
906  * _ep_queue: queues (submits) an I/O request to an endpoint
907  * @ep:        endpoint
908  * @req:       request
909  * @gfp_flags: GFP flags (not used)
910  *
911  * Caller must hold lock
912  * This function returns an error code
913  */
_ep_queue(struct usb_ep * ep,struct usb_request * req,gfp_t __maybe_unused gfp_flags)914 static int _ep_queue(struct usb_ep *ep, struct usb_request *req,
915 		    gfp_t __maybe_unused gfp_flags)
916 {
917 	struct ci_hw_ep  *hwep  = container_of(ep,  struct ci_hw_ep, ep);
918 	struct ci_hw_req *hwreq = container_of(req, struct ci_hw_req, req);
919 	struct ci_hdrc *ci = hwep->ci;
920 	int retval = 0;
921 
922 	if (ep == NULL || req == NULL || hwep->ep.desc == NULL)
923 		return -EINVAL;
924 
925 	if (hwep->type == USB_ENDPOINT_XFER_CONTROL) {
926 		if (req->length)
927 			hwep = (ci->ep0_dir == RX) ?
928 			       ci->ep0out : ci->ep0in;
929 		if (!list_empty(&hwep->qh.queue)) {
930 			_ep_nuke(hwep);
931 			dev_warn(hwep->ci->dev, "endpoint ctrl %X nuked\n",
932 				 _usb_addr(hwep));
933 		}
934 	}
935 
936 	if (usb_endpoint_xfer_isoc(hwep->ep.desc) &&
937 	    hwreq->req.length > hwep->ep.mult * hwep->ep.maxpacket) {
938 		dev_err(hwep->ci->dev, "request length too big for isochronous\n");
939 		return -EMSGSIZE;
940 	}
941 
942 	/* first nuke then test link, e.g. previous status has not sent */
943 	if (!list_empty(&hwreq->queue)) {
944 		dev_err(hwep->ci->dev, "request already in queue\n");
945 		return -EBUSY;
946 	}
947 
948 	/* push request */
949 	hwreq->req.status = -EINPROGRESS;
950 	hwreq->req.actual = 0;
951 
952 	retval = _hardware_enqueue(hwep, hwreq);
953 
954 	if (retval == -EALREADY)
955 		retval = 0;
956 	if (!retval)
957 		list_add_tail(&hwreq->queue, &hwep->qh.queue);
958 
959 	return retval;
960 }
961 
962 /**
963  * isr_get_status_response: get_status request response
964  * @ci: ci struct
965  * @setup: setup request packet
966  *
967  * This function returns an error code
968  */
isr_get_status_response(struct ci_hdrc * ci,struct usb_ctrlrequest * setup)969 static int isr_get_status_response(struct ci_hdrc *ci,
970 				   struct usb_ctrlrequest *setup)
971 __releases(hwep->lock)
972 __acquires(hwep->lock)
973 {
974 	struct ci_hw_ep *hwep = ci->ep0in;
975 	struct usb_request *req = NULL;
976 	gfp_t gfp_flags = GFP_ATOMIC;
977 	int dir, num, retval;
978 
979 	if (hwep == NULL || setup == NULL)
980 		return -EINVAL;
981 
982 	spin_unlock(hwep->lock);
983 	req = usb_ep_alloc_request(&hwep->ep, gfp_flags);
984 	spin_lock(hwep->lock);
985 	if (req == NULL)
986 		return -ENOMEM;
987 
988 	req->complete = isr_get_status_complete;
989 	req->length   = 2;
990 	req->buf      = kzalloc(req->length, gfp_flags);
991 	if (req->buf == NULL) {
992 		retval = -ENOMEM;
993 		goto err_free_req;
994 	}
995 
996 	if ((setup->bRequestType & USB_RECIP_MASK) == USB_RECIP_DEVICE) {
997 		*(u16 *)req->buf = (ci->remote_wakeup << 1) |
998 			ci->gadget.is_selfpowered;
999 	} else if ((setup->bRequestType & USB_RECIP_MASK) \
1000 		   == USB_RECIP_ENDPOINT) {
1001 		dir = (le16_to_cpu(setup->wIndex) & USB_ENDPOINT_DIR_MASK) ?
1002 			TX : RX;
1003 		num =  le16_to_cpu(setup->wIndex) & USB_ENDPOINT_NUMBER_MASK;
1004 		*(u16 *)req->buf = hw_ep_get_halt(ci, num, dir);
1005 	}
1006 	/* else do nothing; reserved for future use */
1007 
1008 	retval = _ep_queue(&hwep->ep, req, gfp_flags);
1009 	if (retval)
1010 		goto err_free_buf;
1011 
1012 	return 0;
1013 
1014  err_free_buf:
1015 	kfree(req->buf);
1016  err_free_req:
1017 	spin_unlock(hwep->lock);
1018 	usb_ep_free_request(&hwep->ep, req);
1019 	spin_lock(hwep->lock);
1020 	return retval;
1021 }
1022 
1023 /**
1024  * isr_setup_status_complete: setup_status request complete function
1025  * @ep:  endpoint
1026  * @req: request handled
1027  *
1028  * Caller must release lock. Put the port in test mode if test mode
1029  * feature is selected.
1030  */
1031 static void
isr_setup_status_complete(struct usb_ep * ep,struct usb_request * req)1032 isr_setup_status_complete(struct usb_ep *ep, struct usb_request *req)
1033 {
1034 	struct ci_hdrc *ci = req->context;
1035 	unsigned long flags;
1036 
1037 	if (req->status < 0)
1038 		return;
1039 
1040 	if (ci->setaddr) {
1041 		hw_usb_set_address(ci, ci->address);
1042 		ci->setaddr = false;
1043 		if (ci->address)
1044 			usb_gadget_set_state(&ci->gadget, USB_STATE_ADDRESS);
1045 	}
1046 
1047 	spin_lock_irqsave(&ci->lock, flags);
1048 	if (ci->test_mode)
1049 		hw_port_test_set(ci, ci->test_mode);
1050 	spin_unlock_irqrestore(&ci->lock, flags);
1051 }
1052 
1053 /**
1054  * isr_setup_status_phase: queues the status phase of a setup transation
1055  * @ci: ci struct
1056  *
1057  * This function returns an error code
1058  */
isr_setup_status_phase(struct ci_hdrc * ci)1059 static int isr_setup_status_phase(struct ci_hdrc *ci)
1060 {
1061 	struct ci_hw_ep *hwep;
1062 
1063 	/*
1064 	 * Unexpected USB controller behavior, caused by bad signal integrity
1065 	 * or ground reference problems, can lead to isr_setup_status_phase
1066 	 * being called with ci->status equal to NULL.
1067 	 * If this situation occurs, you should review your USB hardware design.
1068 	 */
1069 	if (WARN_ON_ONCE(!ci->status))
1070 		return -EPIPE;
1071 
1072 	hwep = (ci->ep0_dir == TX) ? ci->ep0out : ci->ep0in;
1073 	ci->status->context = ci;
1074 	ci->status->complete = isr_setup_status_complete;
1075 
1076 	return _ep_queue(&hwep->ep, ci->status, GFP_ATOMIC);
1077 }
1078 
1079 /**
1080  * isr_tr_complete_low: transaction complete low level handler
1081  * @hwep: endpoint
1082  *
1083  * This function returns an error code
1084  * Caller must hold lock
1085  */
isr_tr_complete_low(struct ci_hw_ep * hwep)1086 static int isr_tr_complete_low(struct ci_hw_ep *hwep)
1087 __releases(hwep->lock)
1088 __acquires(hwep->lock)
1089 {
1090 	struct ci_hw_req *hwreq, *hwreqtemp;
1091 	struct ci_hw_ep *hweptemp = hwep;
1092 	int retval = 0;
1093 
1094 	list_for_each_entry_safe(hwreq, hwreqtemp, &hwep->qh.queue,
1095 			queue) {
1096 		retval = _hardware_dequeue(hwep, hwreq);
1097 		if (retval < 0)
1098 			break;
1099 		list_del_init(&hwreq->queue);
1100 		if (hwreq->req.complete != NULL) {
1101 			spin_unlock(hwep->lock);
1102 			if ((hwep->type == USB_ENDPOINT_XFER_CONTROL) &&
1103 					hwreq->req.length)
1104 				hweptemp = hwep->ci->ep0in;
1105 			usb_gadget_giveback_request(&hweptemp->ep, &hwreq->req);
1106 			spin_lock(hwep->lock);
1107 		}
1108 	}
1109 
1110 	if (retval == -EBUSY)
1111 		retval = 0;
1112 
1113 	return retval;
1114 }
1115 
otg_a_alt_hnp_support(struct ci_hdrc * ci)1116 static int otg_a_alt_hnp_support(struct ci_hdrc *ci)
1117 {
1118 	dev_warn(&ci->gadget.dev,
1119 		"connect the device to an alternate port if you want HNP\n");
1120 	return isr_setup_status_phase(ci);
1121 }
1122 
1123 /**
1124  * isr_setup_packet_handler: setup packet handler
1125  * @ci: UDC descriptor
1126  *
1127  * This function handles setup packet
1128  */
isr_setup_packet_handler(struct ci_hdrc * ci)1129 static void isr_setup_packet_handler(struct ci_hdrc *ci)
1130 __releases(ci->lock)
1131 __acquires(ci->lock)
1132 {
1133 	struct ci_hw_ep *hwep = &ci->ci_hw_ep[0];
1134 	struct usb_ctrlrequest req;
1135 	int type, num, dir, err = -EINVAL;
1136 	u8 tmode = 0;
1137 
1138 	/*
1139 	 * Flush data and handshake transactions of previous
1140 	 * setup packet.
1141 	 */
1142 	_ep_nuke(ci->ep0out);
1143 	_ep_nuke(ci->ep0in);
1144 
1145 	/* read_setup_packet */
1146 	do {
1147 		hw_test_and_set_setup_guard(ci);
1148 		memcpy(&req, &hwep->qh.ptr->setup, sizeof(req));
1149 	} while (!hw_test_and_clear_setup_guard(ci));
1150 
1151 	type = req.bRequestType;
1152 
1153 	ci->ep0_dir = (type & USB_DIR_IN) ? TX : RX;
1154 
1155 	switch (req.bRequest) {
1156 	case USB_REQ_CLEAR_FEATURE:
1157 		if (type == (USB_DIR_OUT|USB_RECIP_ENDPOINT) &&
1158 				le16_to_cpu(req.wValue) ==
1159 				USB_ENDPOINT_HALT) {
1160 			if (req.wLength != 0)
1161 				break;
1162 			num  = le16_to_cpu(req.wIndex);
1163 			dir = (num & USB_ENDPOINT_DIR_MASK) ? TX : RX;
1164 			num &= USB_ENDPOINT_NUMBER_MASK;
1165 			if (dir == TX)
1166 				num += ci->hw_ep_max / 2;
1167 			if (!ci->ci_hw_ep[num].wedge) {
1168 				spin_unlock(&ci->lock);
1169 				err = usb_ep_clear_halt(
1170 					&ci->ci_hw_ep[num].ep);
1171 				spin_lock(&ci->lock);
1172 				if (err)
1173 					break;
1174 			}
1175 			err = isr_setup_status_phase(ci);
1176 		} else if (type == (USB_DIR_OUT|USB_RECIP_DEVICE) &&
1177 				le16_to_cpu(req.wValue) ==
1178 				USB_DEVICE_REMOTE_WAKEUP) {
1179 			if (req.wLength != 0)
1180 				break;
1181 			ci->remote_wakeup = 0;
1182 			err = isr_setup_status_phase(ci);
1183 		} else {
1184 			goto delegate;
1185 		}
1186 		break;
1187 	case USB_REQ_GET_STATUS:
1188 		if ((type != (USB_DIR_IN|USB_RECIP_DEVICE) ||
1189 			le16_to_cpu(req.wIndex) == OTG_STS_SELECTOR) &&
1190 		    type != (USB_DIR_IN|USB_RECIP_ENDPOINT) &&
1191 		    type != (USB_DIR_IN|USB_RECIP_INTERFACE))
1192 			goto delegate;
1193 		if (le16_to_cpu(req.wLength) != 2 ||
1194 		    le16_to_cpu(req.wValue)  != 0)
1195 			break;
1196 		err = isr_get_status_response(ci, &req);
1197 		break;
1198 	case USB_REQ_SET_ADDRESS:
1199 		if (type != (USB_DIR_OUT|USB_RECIP_DEVICE))
1200 			goto delegate;
1201 		if (le16_to_cpu(req.wLength) != 0 ||
1202 		    le16_to_cpu(req.wIndex)  != 0)
1203 			break;
1204 		ci->address = (u8)le16_to_cpu(req.wValue);
1205 		ci->setaddr = true;
1206 		err = isr_setup_status_phase(ci);
1207 		break;
1208 	case USB_REQ_SET_FEATURE:
1209 		if (type == (USB_DIR_OUT|USB_RECIP_ENDPOINT) &&
1210 				le16_to_cpu(req.wValue) ==
1211 				USB_ENDPOINT_HALT) {
1212 			if (req.wLength != 0)
1213 				break;
1214 			num  = le16_to_cpu(req.wIndex);
1215 			dir = (num & USB_ENDPOINT_DIR_MASK) ? TX : RX;
1216 			num &= USB_ENDPOINT_NUMBER_MASK;
1217 			if (dir == TX)
1218 				num += ci->hw_ep_max / 2;
1219 
1220 			spin_unlock(&ci->lock);
1221 			err = _ep_set_halt(&ci->ci_hw_ep[num].ep, 1, false);
1222 			spin_lock(&ci->lock);
1223 			if (!err)
1224 				isr_setup_status_phase(ci);
1225 		} else if (type == (USB_DIR_OUT|USB_RECIP_DEVICE)) {
1226 			if (req.wLength != 0)
1227 				break;
1228 			switch (le16_to_cpu(req.wValue)) {
1229 			case USB_DEVICE_REMOTE_WAKEUP:
1230 				ci->remote_wakeup = 1;
1231 				err = isr_setup_status_phase(ci);
1232 				break;
1233 			case USB_DEVICE_TEST_MODE:
1234 				tmode = le16_to_cpu(req.wIndex) >> 8;
1235 				switch (tmode) {
1236 				case USB_TEST_J:
1237 				case USB_TEST_K:
1238 				case USB_TEST_SE0_NAK:
1239 				case USB_TEST_PACKET:
1240 				case USB_TEST_FORCE_ENABLE:
1241 					ci->test_mode = tmode;
1242 					err = isr_setup_status_phase(
1243 							ci);
1244 					break;
1245 				default:
1246 					break;
1247 				}
1248 				break;
1249 			case USB_DEVICE_B_HNP_ENABLE:
1250 				if (ci_otg_is_fsm_mode(ci)) {
1251 					ci->gadget.b_hnp_enable = 1;
1252 					err = isr_setup_status_phase(
1253 							ci);
1254 				}
1255 				break;
1256 			case USB_DEVICE_A_ALT_HNP_SUPPORT:
1257 				if (ci_otg_is_fsm_mode(ci))
1258 					err = otg_a_alt_hnp_support(ci);
1259 				break;
1260 			case USB_DEVICE_A_HNP_SUPPORT:
1261 				if (ci_otg_is_fsm_mode(ci)) {
1262 					ci->gadget.a_hnp_support = 1;
1263 					err = isr_setup_status_phase(
1264 							ci);
1265 				}
1266 				break;
1267 			default:
1268 				goto delegate;
1269 			}
1270 		} else {
1271 			goto delegate;
1272 		}
1273 		break;
1274 	default:
1275 delegate:
1276 		if (req.wLength == 0)   /* no data phase */
1277 			ci->ep0_dir = TX;
1278 
1279 		spin_unlock(&ci->lock);
1280 		err = ci->driver->setup(&ci->gadget, &req);
1281 		spin_lock(&ci->lock);
1282 		break;
1283 	}
1284 
1285 	if (err < 0) {
1286 		spin_unlock(&ci->lock);
1287 		if (_ep_set_halt(&hwep->ep, 1, false))
1288 			dev_err(ci->dev, "error: _ep_set_halt\n");
1289 		spin_lock(&ci->lock);
1290 	}
1291 }
1292 
1293 /**
1294  * isr_tr_complete_handler: transaction complete interrupt handler
1295  * @ci: UDC descriptor
1296  *
1297  * This function handles traffic events
1298  */
isr_tr_complete_handler(struct ci_hdrc * ci)1299 static void isr_tr_complete_handler(struct ci_hdrc *ci)
1300 __releases(ci->lock)
1301 __acquires(ci->lock)
1302 {
1303 	unsigned i;
1304 	int err;
1305 
1306 	for (i = 0; i < ci->hw_ep_max; i++) {
1307 		struct ci_hw_ep *hwep  = &ci->ci_hw_ep[i];
1308 
1309 		if (hwep->ep.desc == NULL)
1310 			continue;   /* not configured */
1311 
1312 		if (hw_test_and_clear_complete(ci, i)) {
1313 			err = isr_tr_complete_low(hwep);
1314 			if (hwep->type == USB_ENDPOINT_XFER_CONTROL) {
1315 				if (err > 0)   /* needs status phase */
1316 					err = isr_setup_status_phase(ci);
1317 				if (err < 0) {
1318 					spin_unlock(&ci->lock);
1319 					if (_ep_set_halt(&hwep->ep, 1, false))
1320 						dev_err(ci->dev,
1321 						"error: _ep_set_halt\n");
1322 					spin_lock(&ci->lock);
1323 				}
1324 			}
1325 		}
1326 
1327 		/* Only handle setup packet below */
1328 		if (i == 0 &&
1329 			hw_test_and_clear(ci, OP_ENDPTSETUPSTAT, BIT(0)))
1330 			isr_setup_packet_handler(ci);
1331 	}
1332 }
1333 
1334 /******************************************************************************
1335  * ENDPT block
1336  *****************************************************************************/
1337 /*
1338  * ep_enable: configure endpoint, making it usable
1339  *
1340  * Check usb_ep_enable() at "usb_gadget.h" for details
1341  */
ep_enable(struct usb_ep * ep,const struct usb_endpoint_descriptor * desc)1342 static int ep_enable(struct usb_ep *ep,
1343 		     const struct usb_endpoint_descriptor *desc)
1344 {
1345 	struct ci_hw_ep *hwep = container_of(ep, struct ci_hw_ep, ep);
1346 	int retval = 0;
1347 	unsigned long flags;
1348 	u32 cap = 0;
1349 
1350 	if (ep == NULL || desc == NULL)
1351 		return -EINVAL;
1352 
1353 	spin_lock_irqsave(hwep->lock, flags);
1354 
1355 	/* only internal SW should enable ctrl endpts */
1356 
1357 	if (!list_empty(&hwep->qh.queue)) {
1358 		dev_warn(hwep->ci->dev, "enabling a non-empty endpoint!\n");
1359 		spin_unlock_irqrestore(hwep->lock, flags);
1360 		return -EBUSY;
1361 	}
1362 
1363 	hwep->ep.desc = desc;
1364 
1365 	hwep->dir  = usb_endpoint_dir_in(desc) ? TX : RX;
1366 	hwep->num  = usb_endpoint_num(desc);
1367 	hwep->type = usb_endpoint_type(desc);
1368 
1369 	hwep->ep.maxpacket = usb_endpoint_maxp(desc);
1370 	hwep->ep.mult = usb_endpoint_maxp_mult(desc);
1371 
1372 	if (hwep->type == USB_ENDPOINT_XFER_CONTROL)
1373 		cap |= QH_IOS;
1374 
1375 	cap |= QH_ZLT;
1376 	cap |= (hwep->ep.maxpacket << __ffs(QH_MAX_PKT)) & QH_MAX_PKT;
1377 	/*
1378 	 * For ISO-TX, we set mult at QH as the largest value, and use
1379 	 * MultO at TD as real mult value.
1380 	 */
1381 	if (hwep->type == USB_ENDPOINT_XFER_ISOC && hwep->dir == TX)
1382 		cap |= 3 << __ffs(QH_MULT);
1383 
1384 	hwep->qh.ptr->cap = cpu_to_le32(cap);
1385 
1386 	hwep->qh.ptr->td.next |= cpu_to_le32(TD_TERMINATE);   /* needed? */
1387 
1388 	if (hwep->num != 0 && hwep->type == USB_ENDPOINT_XFER_CONTROL) {
1389 		dev_err(hwep->ci->dev, "Set control xfer at non-ep0\n");
1390 		retval = -EINVAL;
1391 	}
1392 
1393 	/*
1394 	 * Enable endpoints in the HW other than ep0 as ep0
1395 	 * is always enabled
1396 	 */
1397 	if (hwep->num)
1398 		retval |= hw_ep_enable(hwep->ci, hwep->num, hwep->dir,
1399 				       hwep->type);
1400 
1401 	spin_unlock_irqrestore(hwep->lock, flags);
1402 	return retval;
1403 }
1404 
1405 /*
1406  * ep_disable: endpoint is no longer usable
1407  *
1408  * Check usb_ep_disable() at "usb_gadget.h" for details
1409  */
ep_disable(struct usb_ep * ep)1410 static int ep_disable(struct usb_ep *ep)
1411 {
1412 	struct ci_hw_ep *hwep = container_of(ep, struct ci_hw_ep, ep);
1413 	int direction, retval = 0;
1414 	unsigned long flags;
1415 
1416 	if (ep == NULL)
1417 		return -EINVAL;
1418 	else if (hwep->ep.desc == NULL)
1419 		return -EBUSY;
1420 
1421 	spin_lock_irqsave(hwep->lock, flags);
1422 	if (hwep->ci->gadget.speed == USB_SPEED_UNKNOWN) {
1423 		spin_unlock_irqrestore(hwep->lock, flags);
1424 		return 0;
1425 	}
1426 
1427 	/* only internal SW should disable ctrl endpts */
1428 
1429 	direction = hwep->dir;
1430 	do {
1431 		retval |= _ep_nuke(hwep);
1432 		retval |= hw_ep_disable(hwep->ci, hwep->num, hwep->dir);
1433 
1434 		if (hwep->type == USB_ENDPOINT_XFER_CONTROL)
1435 			hwep->dir = (hwep->dir == TX) ? RX : TX;
1436 
1437 	} while (hwep->dir != direction);
1438 
1439 	hwep->ep.desc = NULL;
1440 
1441 	spin_unlock_irqrestore(hwep->lock, flags);
1442 	return retval;
1443 }
1444 
1445 /*
1446  * ep_alloc_request: allocate a request object to use with this endpoint
1447  *
1448  * Check usb_ep_alloc_request() at "usb_gadget.h" for details
1449  */
ep_alloc_request(struct usb_ep * ep,gfp_t gfp_flags)1450 static struct usb_request *ep_alloc_request(struct usb_ep *ep, gfp_t gfp_flags)
1451 {
1452 	struct ci_hw_req *hwreq = NULL;
1453 
1454 	if (ep == NULL)
1455 		return NULL;
1456 
1457 	hwreq = kzalloc(sizeof(struct ci_hw_req), gfp_flags);
1458 	if (hwreq != NULL) {
1459 		INIT_LIST_HEAD(&hwreq->queue);
1460 		INIT_LIST_HEAD(&hwreq->tds);
1461 	}
1462 
1463 	return (hwreq == NULL) ? NULL : &hwreq->req;
1464 }
1465 
1466 /*
1467  * ep_free_request: frees a request object
1468  *
1469  * Check usb_ep_free_request() at "usb_gadget.h" for details
1470  */
ep_free_request(struct usb_ep * ep,struct usb_request * req)1471 static void ep_free_request(struct usb_ep *ep, struct usb_request *req)
1472 {
1473 	struct ci_hw_ep  *hwep  = container_of(ep,  struct ci_hw_ep, ep);
1474 	struct ci_hw_req *hwreq = container_of(req, struct ci_hw_req, req);
1475 	struct td_node *node, *tmpnode;
1476 	unsigned long flags;
1477 
1478 	if (ep == NULL || req == NULL) {
1479 		return;
1480 	} else if (!list_empty(&hwreq->queue)) {
1481 		dev_err(hwep->ci->dev, "freeing queued request\n");
1482 		return;
1483 	}
1484 
1485 	spin_lock_irqsave(hwep->lock, flags);
1486 
1487 	list_for_each_entry_safe(node, tmpnode, &hwreq->tds, td) {
1488 		dma_pool_free(hwep->td_pool, node->ptr, node->dma);
1489 		list_del_init(&node->td);
1490 		node->ptr = NULL;
1491 		kfree(node);
1492 	}
1493 
1494 	kfree(hwreq);
1495 
1496 	spin_unlock_irqrestore(hwep->lock, flags);
1497 }
1498 
1499 /*
1500  * ep_queue: queues (submits) an I/O request to an endpoint
1501  *
1502  * Check usb_ep_queue()* at usb_gadget.h" for details
1503  */
ep_queue(struct usb_ep * ep,struct usb_request * req,gfp_t __maybe_unused gfp_flags)1504 static int ep_queue(struct usb_ep *ep, struct usb_request *req,
1505 		    gfp_t __maybe_unused gfp_flags)
1506 {
1507 	struct ci_hw_ep  *hwep  = container_of(ep,  struct ci_hw_ep, ep);
1508 	int retval = 0;
1509 	unsigned long flags;
1510 
1511 	if (ep == NULL || req == NULL || hwep->ep.desc == NULL)
1512 		return -EINVAL;
1513 
1514 	spin_lock_irqsave(hwep->lock, flags);
1515 	if (hwep->ci->gadget.speed == USB_SPEED_UNKNOWN) {
1516 		spin_unlock_irqrestore(hwep->lock, flags);
1517 		return 0;
1518 	}
1519 	retval = _ep_queue(ep, req, gfp_flags);
1520 	spin_unlock_irqrestore(hwep->lock, flags);
1521 	return retval;
1522 }
1523 
1524 /*
1525  * ep_dequeue: dequeues (cancels, unlinks) an I/O request from an endpoint
1526  *
1527  * Check usb_ep_dequeue() at "usb_gadget.h" for details
1528  */
ep_dequeue(struct usb_ep * ep,struct usb_request * req)1529 static int ep_dequeue(struct usb_ep *ep, struct usb_request *req)
1530 {
1531 	struct ci_hw_ep  *hwep  = container_of(ep,  struct ci_hw_ep, ep);
1532 	struct ci_hw_req *hwreq = container_of(req, struct ci_hw_req, req);
1533 	unsigned long flags;
1534 	struct td_node *node, *tmpnode;
1535 
1536 	if (ep == NULL || req == NULL || hwreq->req.status != -EALREADY ||
1537 		hwep->ep.desc == NULL || list_empty(&hwreq->queue) ||
1538 		list_empty(&hwep->qh.queue))
1539 		return -EINVAL;
1540 
1541 	spin_lock_irqsave(hwep->lock, flags);
1542 	if (hwep->ci->gadget.speed != USB_SPEED_UNKNOWN)
1543 		hw_ep_flush(hwep->ci, hwep->num, hwep->dir);
1544 
1545 	list_for_each_entry_safe(node, tmpnode, &hwreq->tds, td) {
1546 		dma_pool_free(hwep->td_pool, node->ptr, node->dma);
1547 		list_del(&node->td);
1548 		kfree(node);
1549 	}
1550 
1551 	/* pop request */
1552 	list_del_init(&hwreq->queue);
1553 
1554 	usb_gadget_unmap_request(&hwep->ci->gadget, req, hwep->dir);
1555 
1556 	req->status = -ECONNRESET;
1557 
1558 	if (hwreq->req.complete != NULL) {
1559 		spin_unlock(hwep->lock);
1560 		usb_gadget_giveback_request(&hwep->ep, &hwreq->req);
1561 		spin_lock(hwep->lock);
1562 	}
1563 
1564 	spin_unlock_irqrestore(hwep->lock, flags);
1565 	return 0;
1566 }
1567 
1568 /*
1569  * ep_set_halt: sets the endpoint halt feature
1570  *
1571  * Check usb_ep_set_halt() at "usb_gadget.h" for details
1572  */
ep_set_halt(struct usb_ep * ep,int value)1573 static int ep_set_halt(struct usb_ep *ep, int value)
1574 {
1575 	return _ep_set_halt(ep, value, true);
1576 }
1577 
1578 /*
1579  * ep_set_wedge: sets the halt feature and ignores clear requests
1580  *
1581  * Check usb_ep_set_wedge() at "usb_gadget.h" for details
1582  */
ep_set_wedge(struct usb_ep * ep)1583 static int ep_set_wedge(struct usb_ep *ep)
1584 {
1585 	struct ci_hw_ep *hwep = container_of(ep, struct ci_hw_ep, ep);
1586 	unsigned long flags;
1587 
1588 	if (ep == NULL || hwep->ep.desc == NULL)
1589 		return -EINVAL;
1590 
1591 	spin_lock_irqsave(hwep->lock, flags);
1592 	hwep->wedge = 1;
1593 	spin_unlock_irqrestore(hwep->lock, flags);
1594 
1595 	return usb_ep_set_halt(ep);
1596 }
1597 
1598 /*
1599  * ep_fifo_flush: flushes contents of a fifo
1600  *
1601  * Check usb_ep_fifo_flush() at "usb_gadget.h" for details
1602  */
ep_fifo_flush(struct usb_ep * ep)1603 static void ep_fifo_flush(struct usb_ep *ep)
1604 {
1605 	struct ci_hw_ep *hwep = container_of(ep, struct ci_hw_ep, ep);
1606 	unsigned long flags;
1607 
1608 	if (ep == NULL) {
1609 		dev_err(hwep->ci->dev, "%02X: -EINVAL\n", _usb_addr(hwep));
1610 		return;
1611 	}
1612 
1613 	spin_lock_irqsave(hwep->lock, flags);
1614 	if (hwep->ci->gadget.speed == USB_SPEED_UNKNOWN) {
1615 		spin_unlock_irqrestore(hwep->lock, flags);
1616 		return;
1617 	}
1618 
1619 	hw_ep_flush(hwep->ci, hwep->num, hwep->dir);
1620 
1621 	spin_unlock_irqrestore(hwep->lock, flags);
1622 }
1623 
1624 /*
1625  * Endpoint-specific part of the API to the USB controller hardware
1626  * Check "usb_gadget.h" for details
1627  */
1628 static const struct usb_ep_ops usb_ep_ops = {
1629 	.enable	       = ep_enable,
1630 	.disable       = ep_disable,
1631 	.alloc_request = ep_alloc_request,
1632 	.free_request  = ep_free_request,
1633 	.queue	       = ep_queue,
1634 	.dequeue       = ep_dequeue,
1635 	.set_halt      = ep_set_halt,
1636 	.set_wedge     = ep_set_wedge,
1637 	.fifo_flush    = ep_fifo_flush,
1638 };
1639 
1640 /******************************************************************************
1641  * GADGET block
1642  *****************************************************************************/
1643 /*
1644  * ci_hdrc_gadget_connect: caller makes sure gadget driver is binded
1645  */
ci_hdrc_gadget_connect(struct usb_gadget * _gadget,int is_active)1646 static void ci_hdrc_gadget_connect(struct usb_gadget *_gadget, int is_active)
1647 {
1648 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1649 
1650 	if (is_active) {
1651 		pm_runtime_get_sync(ci->dev);
1652 		hw_device_reset(ci);
1653 		spin_lock_irq(&ci->lock);
1654 		if (ci->driver) {
1655 			hw_device_state(ci, ci->ep0out->qh.dma);
1656 			usb_gadget_set_state(_gadget, USB_STATE_POWERED);
1657 			spin_unlock_irq(&ci->lock);
1658 			usb_udc_vbus_handler(_gadget, true);
1659 		} else {
1660 			spin_unlock_irq(&ci->lock);
1661 		}
1662 	} else {
1663 		usb_udc_vbus_handler(_gadget, false);
1664 		if (ci->driver)
1665 			ci->driver->disconnect(&ci->gadget);
1666 		hw_device_state(ci, 0);
1667 		if (ci->platdata->notify_event)
1668 			ci->platdata->notify_event(ci,
1669 			CI_HDRC_CONTROLLER_STOPPED_EVENT);
1670 		_gadget_stop_activity(&ci->gadget);
1671 		pm_runtime_put_sync(ci->dev);
1672 		usb_gadget_set_state(_gadget, USB_STATE_NOTATTACHED);
1673 	}
1674 }
1675 
ci_udc_vbus_session(struct usb_gadget * _gadget,int is_active)1676 static int ci_udc_vbus_session(struct usb_gadget *_gadget, int is_active)
1677 {
1678 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1679 	unsigned long flags;
1680 	int ret = 0;
1681 
1682 	spin_lock_irqsave(&ci->lock, flags);
1683 	ci->vbus_active = is_active;
1684 	spin_unlock_irqrestore(&ci->lock, flags);
1685 
1686 	if (ci->usb_phy)
1687 		usb_phy_set_charger_state(ci->usb_phy, is_active ?
1688 			USB_CHARGER_PRESENT : USB_CHARGER_ABSENT);
1689 
1690 	if (ci->platdata->notify_event)
1691 		ret = ci->platdata->notify_event(ci,
1692 				CI_HDRC_CONTROLLER_VBUS_EVENT);
1693 
1694 	if (ci->driver)
1695 		ci_hdrc_gadget_connect(_gadget, is_active);
1696 
1697 	return ret;
1698 }
1699 
ci_udc_wakeup(struct usb_gadget * _gadget)1700 static int ci_udc_wakeup(struct usb_gadget *_gadget)
1701 {
1702 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1703 	unsigned long flags;
1704 	int ret = 0;
1705 
1706 	spin_lock_irqsave(&ci->lock, flags);
1707 	if (ci->gadget.speed == USB_SPEED_UNKNOWN) {
1708 		spin_unlock_irqrestore(&ci->lock, flags);
1709 		return 0;
1710 	}
1711 	if (!ci->remote_wakeup) {
1712 		ret = -EOPNOTSUPP;
1713 		goto out;
1714 	}
1715 	if (!hw_read(ci, OP_PORTSC, PORTSC_SUSP)) {
1716 		ret = -EINVAL;
1717 		goto out;
1718 	}
1719 	hw_write(ci, OP_PORTSC, PORTSC_FPR, PORTSC_FPR);
1720 out:
1721 	spin_unlock_irqrestore(&ci->lock, flags);
1722 	return ret;
1723 }
1724 
ci_udc_vbus_draw(struct usb_gadget * _gadget,unsigned ma)1725 static int ci_udc_vbus_draw(struct usb_gadget *_gadget, unsigned ma)
1726 {
1727 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1728 
1729 	if (ci->usb_phy)
1730 		return usb_phy_set_power(ci->usb_phy, ma);
1731 	return -ENOTSUPP;
1732 }
1733 
ci_udc_selfpowered(struct usb_gadget * _gadget,int is_on)1734 static int ci_udc_selfpowered(struct usb_gadget *_gadget, int is_on)
1735 {
1736 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1737 	struct ci_hw_ep *hwep = ci->ep0in;
1738 	unsigned long flags;
1739 
1740 	spin_lock_irqsave(hwep->lock, flags);
1741 	_gadget->is_selfpowered = (is_on != 0);
1742 	spin_unlock_irqrestore(hwep->lock, flags);
1743 
1744 	return 0;
1745 }
1746 
1747 /* Change Data+ pullup status
1748  * this func is used by usb_gadget_connect/disconnect
1749  */
ci_udc_pullup(struct usb_gadget * _gadget,int is_on)1750 static int ci_udc_pullup(struct usb_gadget *_gadget, int is_on)
1751 {
1752 	struct ci_hdrc *ci = container_of(_gadget, struct ci_hdrc, gadget);
1753 
1754 	/*
1755 	 * Data+ pullup controlled by OTG state machine in OTG fsm mode;
1756 	 * and don't touch Data+ in host mode for dual role config.
1757 	 */
1758 	if (ci_otg_is_fsm_mode(ci) || ci->role == CI_ROLE_HOST)
1759 		return 0;
1760 
1761 	pm_runtime_get_sync(ci->dev);
1762 	if (is_on)
1763 		hw_write(ci, OP_USBCMD, USBCMD_RS, USBCMD_RS);
1764 	else
1765 		hw_write(ci, OP_USBCMD, USBCMD_RS, 0);
1766 	pm_runtime_put_sync(ci->dev);
1767 
1768 	return 0;
1769 }
1770 
1771 static int ci_udc_start(struct usb_gadget *gadget,
1772 			 struct usb_gadget_driver *driver);
1773 static int ci_udc_stop(struct usb_gadget *gadget);
1774 
1775 /* Match ISOC IN from the highest endpoint */
ci_udc_match_ep(struct usb_gadget * gadget,struct usb_endpoint_descriptor * desc,struct usb_ss_ep_comp_descriptor * comp_desc)1776 static struct usb_ep *ci_udc_match_ep(struct usb_gadget *gadget,
1777 			      struct usb_endpoint_descriptor *desc,
1778 			      struct usb_ss_ep_comp_descriptor *comp_desc)
1779 {
1780 	struct ci_hdrc *ci = container_of(gadget, struct ci_hdrc, gadget);
1781 	struct usb_ep *ep;
1782 
1783 	if (usb_endpoint_xfer_isoc(desc) && usb_endpoint_dir_in(desc)) {
1784 		list_for_each_entry_reverse(ep, &ci->gadget.ep_list, ep_list) {
1785 			if (ep->caps.dir_in && !ep->claimed)
1786 				return ep;
1787 		}
1788 	}
1789 
1790 	return NULL;
1791 }
1792 
1793 /*
1794  * Device operations part of the API to the USB controller hardware,
1795  * which don't involve endpoints (or i/o)
1796  * Check  "usb_gadget.h" for details
1797  */
1798 static const struct usb_gadget_ops usb_gadget_ops = {
1799 	.vbus_session	= ci_udc_vbus_session,
1800 	.wakeup		= ci_udc_wakeup,
1801 	.set_selfpowered	= ci_udc_selfpowered,
1802 	.pullup		= ci_udc_pullup,
1803 	.vbus_draw	= ci_udc_vbus_draw,
1804 	.udc_start	= ci_udc_start,
1805 	.udc_stop	= ci_udc_stop,
1806 	.match_ep 	= ci_udc_match_ep,
1807 };
1808 
init_eps(struct ci_hdrc * ci)1809 static int init_eps(struct ci_hdrc *ci)
1810 {
1811 	int retval = 0, i, j;
1812 
1813 	for (i = 0; i < ci->hw_ep_max/2; i++)
1814 		for (j = RX; j <= TX; j++) {
1815 			int k = i + j * ci->hw_ep_max/2;
1816 			struct ci_hw_ep *hwep = &ci->ci_hw_ep[k];
1817 
1818 			scnprintf(hwep->name, sizeof(hwep->name), "ep%i%s", i,
1819 					(j == TX)  ? "in" : "out");
1820 
1821 			hwep->ci          = ci;
1822 			hwep->lock         = &ci->lock;
1823 			hwep->td_pool      = ci->td_pool;
1824 
1825 			hwep->ep.name      = hwep->name;
1826 			hwep->ep.ops       = &usb_ep_ops;
1827 
1828 			if (i == 0) {
1829 				hwep->ep.caps.type_control = true;
1830 			} else {
1831 				hwep->ep.caps.type_iso = true;
1832 				hwep->ep.caps.type_bulk = true;
1833 				hwep->ep.caps.type_int = true;
1834 			}
1835 
1836 			if (j == TX)
1837 				hwep->ep.caps.dir_in = true;
1838 			else
1839 				hwep->ep.caps.dir_out = true;
1840 
1841 			/*
1842 			 * for ep0: maxP defined in desc, for other
1843 			 * eps, maxP is set by epautoconfig() called
1844 			 * by gadget layer
1845 			 */
1846 			usb_ep_set_maxpacket_limit(&hwep->ep, (unsigned short)~0);
1847 
1848 			INIT_LIST_HEAD(&hwep->qh.queue);
1849 			hwep->qh.ptr = dma_pool_zalloc(ci->qh_pool, GFP_KERNEL,
1850 						       &hwep->qh.dma);
1851 			if (hwep->qh.ptr == NULL)
1852 				retval = -ENOMEM;
1853 
1854 			/*
1855 			 * set up shorthands for ep0 out and in endpoints,
1856 			 * don't add to gadget's ep_list
1857 			 */
1858 			if (i == 0) {
1859 				if (j == RX)
1860 					ci->ep0out = hwep;
1861 				else
1862 					ci->ep0in = hwep;
1863 
1864 				usb_ep_set_maxpacket_limit(&hwep->ep, CTRL_PAYLOAD_MAX);
1865 				continue;
1866 			}
1867 
1868 			list_add_tail(&hwep->ep.ep_list, &ci->gadget.ep_list);
1869 		}
1870 
1871 	return retval;
1872 }
1873 
destroy_eps(struct ci_hdrc * ci)1874 static void destroy_eps(struct ci_hdrc *ci)
1875 {
1876 	int i;
1877 
1878 	for (i = 0; i < ci->hw_ep_max; i++) {
1879 		struct ci_hw_ep *hwep = &ci->ci_hw_ep[i];
1880 
1881 		if (hwep->pending_td)
1882 			free_pending_td(hwep);
1883 		dma_pool_free(ci->qh_pool, hwep->qh.ptr, hwep->qh.dma);
1884 	}
1885 }
1886 
1887 /**
1888  * ci_udc_start: register a gadget driver
1889  * @gadget: our gadget
1890  * @driver: the driver being registered
1891  *
1892  * Interrupts are enabled here.
1893  */
ci_udc_start(struct usb_gadget * gadget,struct usb_gadget_driver * driver)1894 static int ci_udc_start(struct usb_gadget *gadget,
1895 			 struct usb_gadget_driver *driver)
1896 {
1897 	struct ci_hdrc *ci = container_of(gadget, struct ci_hdrc, gadget);
1898 	int retval;
1899 
1900 	if (driver->disconnect == NULL)
1901 		return -EINVAL;
1902 
1903 	ci->ep0out->ep.desc = &ctrl_endpt_out_desc;
1904 	retval = usb_ep_enable(&ci->ep0out->ep);
1905 	if (retval)
1906 		return retval;
1907 
1908 	ci->ep0in->ep.desc = &ctrl_endpt_in_desc;
1909 	retval = usb_ep_enable(&ci->ep0in->ep);
1910 	if (retval)
1911 		return retval;
1912 
1913 	ci->driver = driver;
1914 
1915 	/* Start otg fsm for B-device */
1916 	if (ci_otg_is_fsm_mode(ci) && ci->fsm.id) {
1917 		ci_hdrc_otg_fsm_start(ci);
1918 		return retval;
1919 	}
1920 
1921 	if (ci->vbus_active)
1922 		ci_hdrc_gadget_connect(gadget, 1);
1923 	else
1924 		usb_udc_vbus_handler(&ci->gadget, false);
1925 
1926 	return retval;
1927 }
1928 
ci_udc_stop_for_otg_fsm(struct ci_hdrc * ci)1929 static void ci_udc_stop_for_otg_fsm(struct ci_hdrc *ci)
1930 {
1931 	if (!ci_otg_is_fsm_mode(ci))
1932 		return;
1933 
1934 	mutex_lock(&ci->fsm.lock);
1935 	if (ci->fsm.otg->state == OTG_STATE_A_PERIPHERAL) {
1936 		ci->fsm.a_bidl_adis_tmout = 1;
1937 		ci_hdrc_otg_fsm_start(ci);
1938 	} else if (ci->fsm.otg->state == OTG_STATE_B_PERIPHERAL) {
1939 		ci->fsm.protocol = PROTO_UNDEF;
1940 		ci->fsm.otg->state = OTG_STATE_UNDEFINED;
1941 	}
1942 	mutex_unlock(&ci->fsm.lock);
1943 }
1944 
1945 /*
1946  * ci_udc_stop: unregister a gadget driver
1947  */
ci_udc_stop(struct usb_gadget * gadget)1948 static int ci_udc_stop(struct usb_gadget *gadget)
1949 {
1950 	struct ci_hdrc *ci = container_of(gadget, struct ci_hdrc, gadget);
1951 	unsigned long flags;
1952 
1953 	spin_lock_irqsave(&ci->lock, flags);
1954 	ci->driver = NULL;
1955 
1956 	if (ci->vbus_active) {
1957 		hw_device_state(ci, 0);
1958 		spin_unlock_irqrestore(&ci->lock, flags);
1959 		if (ci->platdata->notify_event)
1960 			ci->platdata->notify_event(ci,
1961 			CI_HDRC_CONTROLLER_STOPPED_EVENT);
1962 		_gadget_stop_activity(&ci->gadget);
1963 		spin_lock_irqsave(&ci->lock, flags);
1964 		pm_runtime_put(ci->dev);
1965 	}
1966 
1967 	spin_unlock_irqrestore(&ci->lock, flags);
1968 
1969 	ci_udc_stop_for_otg_fsm(ci);
1970 	return 0;
1971 }
1972 
1973 /******************************************************************************
1974  * BUS block
1975  *****************************************************************************/
1976 /*
1977  * udc_irq: ci interrupt handler
1978  *
1979  * This function returns IRQ_HANDLED if the IRQ has been handled
1980  * It locks access to registers
1981  */
udc_irq(struct ci_hdrc * ci)1982 static irqreturn_t udc_irq(struct ci_hdrc *ci)
1983 {
1984 	irqreturn_t retval;
1985 	u32 intr;
1986 
1987 	if (ci == NULL)
1988 		return IRQ_HANDLED;
1989 
1990 	spin_lock(&ci->lock);
1991 
1992 	if (ci->platdata->flags & CI_HDRC_REGS_SHARED) {
1993 		if (hw_read(ci, OP_USBMODE, USBMODE_CM) !=
1994 				USBMODE_CM_DC) {
1995 			spin_unlock(&ci->lock);
1996 			return IRQ_NONE;
1997 		}
1998 	}
1999 	intr = hw_test_and_clear_intr_active(ci);
2000 
2001 	if (intr) {
2002 		/* order defines priority - do NOT change it */
2003 		if (USBi_URI & intr)
2004 			isr_reset_handler(ci);
2005 
2006 		if (USBi_PCI & intr) {
2007 			ci->gadget.speed = hw_port_is_high_speed(ci) ?
2008 				USB_SPEED_HIGH : USB_SPEED_FULL;
2009 			if (ci->suspended) {
2010 				if (ci->driver->resume) {
2011 					spin_unlock(&ci->lock);
2012 					ci->driver->resume(&ci->gadget);
2013 					spin_lock(&ci->lock);
2014 				}
2015 				ci->suspended = 0;
2016 				usb_gadget_set_state(&ci->gadget,
2017 						ci->resume_state);
2018 			}
2019 		}
2020 
2021 		if (USBi_UI  & intr)
2022 			isr_tr_complete_handler(ci);
2023 
2024 		if ((USBi_SLI & intr) && !(ci->suspended)) {
2025 			ci->suspended = 1;
2026 			ci->resume_state = ci->gadget.state;
2027 			if (ci->gadget.speed != USB_SPEED_UNKNOWN &&
2028 			    ci->driver->suspend) {
2029 				spin_unlock(&ci->lock);
2030 				ci->driver->suspend(&ci->gadget);
2031 				spin_lock(&ci->lock);
2032 			}
2033 			usb_gadget_set_state(&ci->gadget,
2034 					USB_STATE_SUSPENDED);
2035 		}
2036 		retval = IRQ_HANDLED;
2037 	} else {
2038 		retval = IRQ_NONE;
2039 	}
2040 	spin_unlock(&ci->lock);
2041 
2042 	return retval;
2043 }
2044 
2045 /**
2046  * udc_start: initialize gadget role
2047  * @ci: chipidea controller
2048  */
udc_start(struct ci_hdrc * ci)2049 static int udc_start(struct ci_hdrc *ci)
2050 {
2051 	struct device *dev = ci->dev;
2052 	struct usb_otg_caps *otg_caps = &ci->platdata->ci_otg_caps;
2053 	int retval = 0;
2054 
2055 	ci->gadget.ops          = &usb_gadget_ops;
2056 	ci->gadget.speed        = USB_SPEED_UNKNOWN;
2057 	ci->gadget.max_speed    = USB_SPEED_HIGH;
2058 	ci->gadget.name         = ci->platdata->name;
2059 	ci->gadget.otg_caps	= otg_caps;
2060 	ci->gadget.sg_supported = 1;
2061 	ci->gadget.irq		= ci->irq;
2062 
2063 	if (ci->platdata->flags & CI_HDRC_REQUIRES_ALIGNED_DMA)
2064 		ci->gadget.quirk_avoids_skb_reserve = 1;
2065 
2066 	if (ci->is_otg && (otg_caps->hnp_support || otg_caps->srp_support ||
2067 						otg_caps->adp_support))
2068 		ci->gadget.is_otg = 1;
2069 
2070 	INIT_LIST_HEAD(&ci->gadget.ep_list);
2071 
2072 	/* alloc resources */
2073 	ci->qh_pool = dma_pool_create("ci_hw_qh", dev->parent,
2074 				       sizeof(struct ci_hw_qh),
2075 				       64, CI_HDRC_PAGE_SIZE);
2076 	if (ci->qh_pool == NULL)
2077 		return -ENOMEM;
2078 
2079 	ci->td_pool = dma_pool_create("ci_hw_td", dev->parent,
2080 				       sizeof(struct ci_hw_td),
2081 				       64, CI_HDRC_PAGE_SIZE);
2082 	if (ci->td_pool == NULL) {
2083 		retval = -ENOMEM;
2084 		goto free_qh_pool;
2085 	}
2086 
2087 	retval = init_eps(ci);
2088 	if (retval)
2089 		goto free_pools;
2090 
2091 	ci->gadget.ep0 = &ci->ep0in->ep;
2092 
2093 	retval = usb_add_gadget_udc(dev, &ci->gadget);
2094 	if (retval)
2095 		goto destroy_eps;
2096 
2097 	return retval;
2098 
2099 destroy_eps:
2100 	destroy_eps(ci);
2101 free_pools:
2102 	dma_pool_destroy(ci->td_pool);
2103 free_qh_pool:
2104 	dma_pool_destroy(ci->qh_pool);
2105 	return retval;
2106 }
2107 
2108 /*
2109  * ci_hdrc_gadget_destroy: parent remove must call this to remove UDC
2110  *
2111  * No interrupts active, the IRQ has been released
2112  */
ci_hdrc_gadget_destroy(struct ci_hdrc * ci)2113 void ci_hdrc_gadget_destroy(struct ci_hdrc *ci)
2114 {
2115 	if (!ci->roles[CI_ROLE_GADGET])
2116 		return;
2117 
2118 	usb_del_gadget_udc(&ci->gadget);
2119 
2120 	destroy_eps(ci);
2121 
2122 	dma_pool_destroy(ci->td_pool);
2123 	dma_pool_destroy(ci->qh_pool);
2124 }
2125 
udc_id_switch_for_device(struct ci_hdrc * ci)2126 static int udc_id_switch_for_device(struct ci_hdrc *ci)
2127 {
2128 	if (ci->platdata->pins_device)
2129 		pinctrl_select_state(ci->platdata->pctl,
2130 				     ci->platdata->pins_device);
2131 
2132 	if (ci->is_otg)
2133 		/* Clear and enable BSV irq */
2134 		hw_write_otgsc(ci, OTGSC_BSVIS | OTGSC_BSVIE,
2135 					OTGSC_BSVIS | OTGSC_BSVIE);
2136 
2137 	return 0;
2138 }
2139 
udc_id_switch_for_host(struct ci_hdrc * ci)2140 static void udc_id_switch_for_host(struct ci_hdrc *ci)
2141 {
2142 	/*
2143 	 * host doesn't care B_SESSION_VALID event
2144 	 * so clear and disbale BSV irq
2145 	 */
2146 	if (ci->is_otg)
2147 		hw_write_otgsc(ci, OTGSC_BSVIE | OTGSC_BSVIS, OTGSC_BSVIS);
2148 
2149 	ci->vbus_active = 0;
2150 
2151 	if (ci->platdata->pins_device && ci->platdata->pins_default)
2152 		pinctrl_select_state(ci->platdata->pctl,
2153 				     ci->platdata->pins_default);
2154 }
2155 
2156 /**
2157  * ci_hdrc_gadget_init - initialize device related bits
2158  * @ci: the controller
2159  *
2160  * This function initializes the gadget, if the device is "device capable".
2161  */
ci_hdrc_gadget_init(struct ci_hdrc * ci)2162 int ci_hdrc_gadget_init(struct ci_hdrc *ci)
2163 {
2164 	struct ci_role_driver *rdrv;
2165 	int ret;
2166 
2167 	if (!hw_read(ci, CAP_DCCPARAMS, DCCPARAMS_DC))
2168 		return -ENXIO;
2169 
2170 	rdrv = devm_kzalloc(ci->dev, sizeof(*rdrv), GFP_KERNEL);
2171 	if (!rdrv)
2172 		return -ENOMEM;
2173 
2174 	rdrv->start	= udc_id_switch_for_device;
2175 	rdrv->stop	= udc_id_switch_for_host;
2176 	rdrv->irq	= udc_irq;
2177 	rdrv->name	= "gadget";
2178 
2179 	ret = udc_start(ci);
2180 	if (!ret)
2181 		ci->roles[CI_ROLE_GADGET] = rdrv;
2182 
2183 	return ret;
2184 }
2185