• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  *  linux/drivers/scsi/esas2r/esas2r_init.c
3  *      For use with ATTO ExpressSAS R6xx SAS/SATA RAID controllers
4  *
5  *  Copyright (c) 2001-2013 ATTO Technology, Inc.
6  *  (mailto:linuxdrivers@attotech.com)mpt3sas/mpt3sas_trigger_diag.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License
10  * as published by the Free Software Foundation; either version 2
11  * of the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * NO WARRANTY
19  * THE PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR
20  * CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT
21  * LIMITATION, ANY WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT,
22  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is
23  * solely responsible for determining the appropriateness of using and
24  * distributing the Program and assumes all risks associated with its
25  * exercise of rights under this Agreement, including but not limited to
26  * the risks and costs of program errors, damage to or loss of data,
27  * programs or equipment, and unavailability or interruption of operations.
28  *
29  * DISCLAIMER OF LIABILITY
30  * NEITHER RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY
31  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32  * DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED AND
33  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
34  * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
35  * USE OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE OF ANY RIGHTS GRANTED
36  * HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES
37  *
38  * You should have received a copy of the GNU General Public License
39  * along with this program; if not, write to the Free Software
40  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301,
41  * USA.
42  */
43 
44 #include "esas2r.h"
45 
esas2r_initmem_alloc(struct esas2r_adapter * a,struct esas2r_mem_desc * mem_desc,u32 align)46 static bool esas2r_initmem_alloc(struct esas2r_adapter *a,
47 				 struct esas2r_mem_desc *mem_desc,
48 				 u32 align)
49 {
50 	mem_desc->esas2r_param = mem_desc->size + align;
51 	mem_desc->virt_addr = NULL;
52 	mem_desc->phys_addr = 0;
53 	mem_desc->esas2r_data = dma_alloc_coherent(&a->pcid->dev,
54 						   (size_t)mem_desc->
55 						   esas2r_param,
56 						   (dma_addr_t *)&mem_desc->
57 						   phys_addr,
58 						   GFP_KERNEL);
59 
60 	if (mem_desc->esas2r_data == NULL) {
61 		esas2r_log(ESAS2R_LOG_CRIT,
62 			   "failed to allocate %lu bytes of consistent memory!",
63 			   (long
64 			    unsigned
65 			    int)mem_desc->esas2r_param);
66 		return false;
67 	}
68 
69 	mem_desc->virt_addr = PTR_ALIGN(mem_desc->esas2r_data, align);
70 	mem_desc->phys_addr = ALIGN(mem_desc->phys_addr, align);
71 	memset(mem_desc->virt_addr, 0, mem_desc->size);
72 	return true;
73 }
74 
esas2r_initmem_free(struct esas2r_adapter * a,struct esas2r_mem_desc * mem_desc)75 static void esas2r_initmem_free(struct esas2r_adapter *a,
76 				struct esas2r_mem_desc *mem_desc)
77 {
78 	if (mem_desc->virt_addr == NULL)
79 		return;
80 
81 	/*
82 	 * Careful!  phys_addr and virt_addr may have been adjusted from the
83 	 * original allocation in order to return the desired alignment.  That
84 	 * means we have to use the original address (in esas2r_data) and size
85 	 * (esas2r_param) and calculate the original physical address based on
86 	 * the difference between the requested and actual allocation size.
87 	 */
88 	if (mem_desc->phys_addr) {
89 		int unalign = ((u8 *)mem_desc->virt_addr) -
90 			      ((u8 *)mem_desc->esas2r_data);
91 
92 		dma_free_coherent(&a->pcid->dev,
93 				  (size_t)mem_desc->esas2r_param,
94 				  mem_desc->esas2r_data,
95 				  (dma_addr_t)(mem_desc->phys_addr - unalign));
96 	} else {
97 		kfree(mem_desc->esas2r_data);
98 	}
99 
100 	mem_desc->virt_addr = NULL;
101 }
102 
alloc_vda_req(struct esas2r_adapter * a,struct esas2r_request * rq)103 static bool alloc_vda_req(struct esas2r_adapter *a,
104 			  struct esas2r_request *rq)
105 {
106 	struct esas2r_mem_desc *memdesc = kzalloc(
107 		sizeof(struct esas2r_mem_desc), GFP_KERNEL);
108 
109 	if (memdesc == NULL) {
110 		esas2r_hdebug("could not alloc mem for vda request memdesc\n");
111 		return false;
112 	}
113 
114 	memdesc->size = sizeof(union atto_vda_req) +
115 			ESAS2R_DATA_BUF_LEN;
116 
117 	if (!esas2r_initmem_alloc(a, memdesc, 256)) {
118 		esas2r_hdebug("could not alloc mem for vda request\n");
119 		kfree(memdesc);
120 		return false;
121 	}
122 
123 	a->num_vrqs++;
124 	list_add(&memdesc->next_desc, &a->vrq_mds_head);
125 
126 	rq->vrq_md = memdesc;
127 	rq->vrq = (union atto_vda_req *)memdesc->virt_addr;
128 	rq->vrq->scsi.handle = a->num_vrqs;
129 
130 	return true;
131 }
132 
esas2r_unmap_regions(struct esas2r_adapter * a)133 static void esas2r_unmap_regions(struct esas2r_adapter *a)
134 {
135 	if (a->regs)
136 		iounmap((void __iomem *)a->regs);
137 
138 	a->regs = NULL;
139 
140 	pci_release_region(a->pcid, 2);
141 
142 	if (a->data_window)
143 		iounmap((void __iomem *)a->data_window);
144 
145 	a->data_window = NULL;
146 
147 	pci_release_region(a->pcid, 0);
148 }
149 
esas2r_map_regions(struct esas2r_adapter * a)150 static int esas2r_map_regions(struct esas2r_adapter *a)
151 {
152 	int error;
153 
154 	a->regs = NULL;
155 	a->data_window = NULL;
156 
157 	error = pci_request_region(a->pcid, 2, a->name);
158 	if (error != 0) {
159 		esas2r_log(ESAS2R_LOG_CRIT,
160 			   "pci_request_region(2) failed, error %d",
161 			   error);
162 
163 		return error;
164 	}
165 
166 	a->regs = (void __force *)ioremap(pci_resource_start(a->pcid, 2),
167 					  pci_resource_len(a->pcid, 2));
168 	if (a->regs == NULL) {
169 		esas2r_log(ESAS2R_LOG_CRIT,
170 			   "ioremap failed for regs mem region\n");
171 		pci_release_region(a->pcid, 2);
172 		return -EFAULT;
173 	}
174 
175 	error = pci_request_region(a->pcid, 0, a->name);
176 	if (error != 0) {
177 		esas2r_log(ESAS2R_LOG_CRIT,
178 			   "pci_request_region(2) failed, error %d",
179 			   error);
180 		esas2r_unmap_regions(a);
181 		return error;
182 	}
183 
184 	a->data_window = (void __force *)ioremap(pci_resource_start(a->pcid,
185 								    0),
186 						 pci_resource_len(a->pcid, 0));
187 	if (a->data_window == NULL) {
188 		esas2r_log(ESAS2R_LOG_CRIT,
189 			   "ioremap failed for data_window mem region\n");
190 		esas2r_unmap_regions(a);
191 		return -EFAULT;
192 	}
193 
194 	return 0;
195 }
196 
esas2r_setup_interrupts(struct esas2r_adapter * a,int intr_mode)197 static void esas2r_setup_interrupts(struct esas2r_adapter *a, int intr_mode)
198 {
199 	int i;
200 
201 	/* Set up interrupt mode based on the requested value */
202 	switch (intr_mode) {
203 	case INTR_MODE_LEGACY:
204 use_legacy_interrupts:
205 		a->intr_mode = INTR_MODE_LEGACY;
206 		break;
207 
208 	case INTR_MODE_MSI:
209 		i = pci_enable_msi(a->pcid);
210 		if (i != 0) {
211 			esas2r_log(ESAS2R_LOG_WARN,
212 				   "failed to enable MSI for adapter %d, "
213 				   "falling back to legacy interrupts "
214 				   "(err=%d)", a->index,
215 				   i);
216 			goto use_legacy_interrupts;
217 		}
218 		a->intr_mode = INTR_MODE_MSI;
219 		set_bit(AF2_MSI_ENABLED, &a->flags2);
220 		break;
221 
222 
223 	default:
224 		esas2r_log(ESAS2R_LOG_WARN,
225 			   "unknown interrupt_mode %d requested, "
226 			   "falling back to legacy interrupt",
227 			   interrupt_mode);
228 		goto use_legacy_interrupts;
229 	}
230 }
231 
esas2r_claim_interrupts(struct esas2r_adapter * a)232 static void esas2r_claim_interrupts(struct esas2r_adapter *a)
233 {
234 	unsigned long flags = 0;
235 
236 	if (a->intr_mode == INTR_MODE_LEGACY)
237 		flags |= IRQF_SHARED;
238 
239 	esas2r_log(ESAS2R_LOG_INFO,
240 		   "esas2r_claim_interrupts irq=%d (%p, %s, %lx)",
241 		   a->pcid->irq, a, a->name, flags);
242 
243 	if (request_irq(a->pcid->irq,
244 			(a->intr_mode ==
245 			 INTR_MODE_LEGACY) ? esas2r_interrupt :
246 			esas2r_msi_interrupt,
247 			flags,
248 			a->name,
249 			a)) {
250 		esas2r_log(ESAS2R_LOG_CRIT, "unable to request IRQ %02X",
251 			   a->pcid->irq);
252 		return;
253 	}
254 
255 	set_bit(AF2_IRQ_CLAIMED, &a->flags2);
256 	esas2r_log(ESAS2R_LOG_INFO,
257 		   "claimed IRQ %d flags: 0x%lx",
258 		   a->pcid->irq, flags);
259 }
260 
esas2r_init_adapter(struct Scsi_Host * host,struct pci_dev * pcid,int index)261 int esas2r_init_adapter(struct Scsi_Host *host, struct pci_dev *pcid,
262 			int index)
263 {
264 	struct esas2r_adapter *a;
265 	u64 bus_addr = 0;
266 	int i;
267 	void *next_uncached;
268 	struct esas2r_request *first_request, *last_request;
269 	bool dma64 = false;
270 
271 	if (index >= MAX_ADAPTERS) {
272 		esas2r_log(ESAS2R_LOG_CRIT,
273 			   "tried to init invalid adapter index %u!",
274 			   index);
275 		return 0;
276 	}
277 
278 	if (esas2r_adapters[index]) {
279 		esas2r_log(ESAS2R_LOG_CRIT,
280 			   "tried to init existing adapter index %u!",
281 			   index);
282 		return 0;
283 	}
284 
285 	a = (struct esas2r_adapter *)host->hostdata;
286 	memset(a, 0, sizeof(struct esas2r_adapter));
287 	a->pcid = pcid;
288 	a->host = host;
289 
290 	if (sizeof(dma_addr_t) > 4 &&
291 	    dma_get_required_mask(&pcid->dev) > DMA_BIT_MASK(32) &&
292 	    !dma_set_mask_and_coherent(&pcid->dev, DMA_BIT_MASK(64)))
293 		dma64 = true;
294 
295 	if (!dma64 && dma_set_mask_and_coherent(&pcid->dev, DMA_BIT_MASK(32))) {
296 		esas2r_log(ESAS2R_LOG_CRIT, "failed to set DMA mask");
297 		esas2r_kill_adapter(index);
298 		return 0;
299 	}
300 
301 	esas2r_log_dev(ESAS2R_LOG_INFO, &pcid->dev,
302 		       "%s-bit PCI addressing enabled\n", dma64 ? "64" : "32");
303 
304 	esas2r_adapters[index] = a;
305 	sprintf(a->name, ESAS2R_DRVR_NAME "_%02d", index);
306 	esas2r_debug("new adapter %p, name %s", a, a->name);
307 	spin_lock_init(&a->request_lock);
308 	spin_lock_init(&a->fw_event_lock);
309 	mutex_init(&a->fm_api_mutex);
310 	mutex_init(&a->fs_api_mutex);
311 	sema_init(&a->nvram_semaphore, 1);
312 
313 	esas2r_fw_event_off(a);
314 	snprintf(a->fw_event_q_name, ESAS2R_KOBJ_NAME_LEN, "esas2r/%d",
315 		 a->index);
316 	a->fw_event_q = create_singlethread_workqueue(a->fw_event_q_name);
317 
318 	init_waitqueue_head(&a->buffered_ioctl_waiter);
319 	init_waitqueue_head(&a->nvram_waiter);
320 	init_waitqueue_head(&a->fm_api_waiter);
321 	init_waitqueue_head(&a->fs_api_waiter);
322 	init_waitqueue_head(&a->vda_waiter);
323 
324 	INIT_LIST_HEAD(&a->general_req.req_list);
325 	INIT_LIST_HEAD(&a->active_list);
326 	INIT_LIST_HEAD(&a->defer_list);
327 	INIT_LIST_HEAD(&a->free_sg_list_head);
328 	INIT_LIST_HEAD(&a->avail_request);
329 	INIT_LIST_HEAD(&a->vrq_mds_head);
330 	INIT_LIST_HEAD(&a->fw_event_list);
331 
332 	first_request = (struct esas2r_request *)((u8 *)(a + 1));
333 
334 	for (last_request = first_request, i = 1; i < num_requests;
335 	     last_request++, i++) {
336 		INIT_LIST_HEAD(&last_request->req_list);
337 		list_add_tail(&last_request->comp_list, &a->avail_request);
338 		if (!alloc_vda_req(a, last_request)) {
339 			esas2r_log(ESAS2R_LOG_CRIT,
340 				   "failed to allocate a VDA request!");
341 			esas2r_kill_adapter(index);
342 			return 0;
343 		}
344 	}
345 
346 	esas2r_debug("requests: %p to %p (%d, %d)", first_request,
347 		     last_request,
348 		     sizeof(*first_request),
349 		     num_requests);
350 
351 	if (esas2r_map_regions(a) != 0) {
352 		esas2r_log(ESAS2R_LOG_CRIT, "could not map PCI regions!");
353 		esas2r_kill_adapter(index);
354 		return 0;
355 	}
356 
357 	a->index = index;
358 
359 	/* interrupts will be disabled until we are done with init */
360 	atomic_inc(&a->dis_ints_cnt);
361 	atomic_inc(&a->disable_cnt);
362 	set_bit(AF_CHPRST_PENDING, &a->flags);
363 	set_bit(AF_DISC_PENDING, &a->flags);
364 	set_bit(AF_FIRST_INIT, &a->flags);
365 	set_bit(AF_LEGACY_SGE_MODE, &a->flags);
366 
367 	a->init_msg = ESAS2R_INIT_MSG_START;
368 	a->max_vdareq_size = 128;
369 	a->build_sgl = esas2r_build_sg_list_sge;
370 
371 	esas2r_setup_interrupts(a, interrupt_mode);
372 
373 	a->uncached_size = esas2r_get_uncached_size(a);
374 	a->uncached = dma_alloc_coherent(&pcid->dev,
375 					 (size_t)a->uncached_size,
376 					 (dma_addr_t *)&bus_addr,
377 					 GFP_KERNEL);
378 	if (a->uncached == NULL) {
379 		esas2r_log(ESAS2R_LOG_CRIT,
380 			   "failed to allocate %d bytes of consistent memory!",
381 			   a->uncached_size);
382 		esas2r_kill_adapter(index);
383 		return 0;
384 	}
385 
386 	a->uncached_phys = bus_addr;
387 
388 	esas2r_debug("%d bytes uncached memory allocated @ %p (%x:%x)",
389 		     a->uncached_size,
390 		     a->uncached,
391 		     upper_32_bits(bus_addr),
392 		     lower_32_bits(bus_addr));
393 	memset(a->uncached, 0, a->uncached_size);
394 	next_uncached = a->uncached;
395 
396 	if (!esas2r_init_adapter_struct(a,
397 					&next_uncached)) {
398 		esas2r_log(ESAS2R_LOG_CRIT,
399 			   "failed to initialize adapter structure (2)!");
400 		esas2r_kill_adapter(index);
401 		return 0;
402 	}
403 
404 	tasklet_init(&a->tasklet,
405 		     esas2r_adapter_tasklet,
406 		     (unsigned long)a);
407 
408 	/*
409 	 * Disable chip interrupts to prevent spurious interrupts
410 	 * until we claim the IRQ.
411 	 */
412 	esas2r_disable_chip_interrupts(a);
413 	esas2r_check_adapter(a);
414 
415 	if (!esas2r_init_adapter_hw(a, true))
416 		esas2r_log(ESAS2R_LOG_CRIT, "failed to initialize hardware!");
417 	else
418 		esas2r_debug("esas2r_init_adapter ok");
419 
420 	esas2r_claim_interrupts(a);
421 
422 	if (test_bit(AF2_IRQ_CLAIMED, &a->flags2))
423 		esas2r_enable_chip_interrupts(a);
424 
425 	set_bit(AF2_INIT_DONE, &a->flags2);
426 	if (!test_bit(AF_DEGRADED_MODE, &a->flags))
427 		esas2r_kickoff_timer(a);
428 	esas2r_debug("esas2r_init_adapter done for %p (%d)",
429 		     a, a->disable_cnt);
430 
431 	return 1;
432 }
433 
esas2r_adapter_power_down(struct esas2r_adapter * a,int power_management)434 static void esas2r_adapter_power_down(struct esas2r_adapter *a,
435 				      int power_management)
436 {
437 	struct esas2r_mem_desc *memdesc, *next;
438 
439 	if ((test_bit(AF2_INIT_DONE, &a->flags2))
440 	    &&  (!test_bit(AF_DEGRADED_MODE, &a->flags))) {
441 		if (!power_management) {
442 			del_timer_sync(&a->timer);
443 			tasklet_kill(&a->tasklet);
444 		}
445 		esas2r_power_down(a);
446 
447 		/*
448 		 * There are versions of firmware that do not handle the sync
449 		 * cache command correctly.  Stall here to ensure that the
450 		 * cache is lazily flushed.
451 		 */
452 		mdelay(500);
453 		esas2r_debug("chip halted");
454 	}
455 
456 	/* Remove sysfs binary files */
457 	if (a->sysfs_fw_created) {
458 		sysfs_remove_bin_file(&a->host->shost_dev.kobj, &bin_attr_fw);
459 		a->sysfs_fw_created = 0;
460 	}
461 
462 	if (a->sysfs_fs_created) {
463 		sysfs_remove_bin_file(&a->host->shost_dev.kobj, &bin_attr_fs);
464 		a->sysfs_fs_created = 0;
465 	}
466 
467 	if (a->sysfs_vda_created) {
468 		sysfs_remove_bin_file(&a->host->shost_dev.kobj, &bin_attr_vda);
469 		a->sysfs_vda_created = 0;
470 	}
471 
472 	if (a->sysfs_hw_created) {
473 		sysfs_remove_bin_file(&a->host->shost_dev.kobj, &bin_attr_hw);
474 		a->sysfs_hw_created = 0;
475 	}
476 
477 	if (a->sysfs_live_nvram_created) {
478 		sysfs_remove_bin_file(&a->host->shost_dev.kobj,
479 				      &bin_attr_live_nvram);
480 		a->sysfs_live_nvram_created = 0;
481 	}
482 
483 	if (a->sysfs_default_nvram_created) {
484 		sysfs_remove_bin_file(&a->host->shost_dev.kobj,
485 				      &bin_attr_default_nvram);
486 		a->sysfs_default_nvram_created = 0;
487 	}
488 
489 	/* Clean up interrupts */
490 	if (test_bit(AF2_IRQ_CLAIMED, &a->flags2)) {
491 		esas2r_log_dev(ESAS2R_LOG_INFO,
492 			       &(a->pcid->dev),
493 			       "free_irq(%d) called", a->pcid->irq);
494 
495 		free_irq(a->pcid->irq, a);
496 		esas2r_debug("IRQ released");
497 		clear_bit(AF2_IRQ_CLAIMED, &a->flags2);
498 	}
499 
500 	if (test_bit(AF2_MSI_ENABLED, &a->flags2)) {
501 		pci_disable_msi(a->pcid);
502 		clear_bit(AF2_MSI_ENABLED, &a->flags2);
503 		esas2r_debug("MSI disabled");
504 	}
505 
506 	if (a->inbound_list_md.virt_addr)
507 		esas2r_initmem_free(a, &a->inbound_list_md);
508 
509 	if (a->outbound_list_md.virt_addr)
510 		esas2r_initmem_free(a, &a->outbound_list_md);
511 
512 	list_for_each_entry_safe(memdesc, next, &a->free_sg_list_head,
513 				 next_desc) {
514 		esas2r_initmem_free(a, memdesc);
515 	}
516 
517 	/* Following frees everything allocated via alloc_vda_req */
518 	list_for_each_entry_safe(memdesc, next, &a->vrq_mds_head, next_desc) {
519 		esas2r_initmem_free(a, memdesc);
520 		list_del(&memdesc->next_desc);
521 		kfree(memdesc);
522 	}
523 
524 	kfree(a->first_ae_req);
525 	a->first_ae_req = NULL;
526 
527 	kfree(a->sg_list_mds);
528 	a->sg_list_mds = NULL;
529 
530 	kfree(a->req_table);
531 	a->req_table = NULL;
532 
533 	if (a->regs) {
534 		esas2r_unmap_regions(a);
535 		a->regs = NULL;
536 		a->data_window = NULL;
537 		esas2r_debug("regions unmapped");
538 	}
539 }
540 
541 /* Release/free allocated resources for specified adapters. */
esas2r_kill_adapter(int i)542 void esas2r_kill_adapter(int i)
543 {
544 	struct esas2r_adapter *a = esas2r_adapters[i];
545 
546 	if (a) {
547 		unsigned long flags;
548 		struct workqueue_struct *wq;
549 		esas2r_debug("killing adapter %p [%d] ", a, i);
550 		esas2r_fw_event_off(a);
551 		esas2r_adapter_power_down(a, 0);
552 		if (esas2r_buffered_ioctl &&
553 		    (a->pcid == esas2r_buffered_ioctl_pcid)) {
554 			dma_free_coherent(&a->pcid->dev,
555 					  (size_t)esas2r_buffered_ioctl_size,
556 					  esas2r_buffered_ioctl,
557 					  esas2r_buffered_ioctl_addr);
558 			esas2r_buffered_ioctl = NULL;
559 		}
560 
561 		if (a->vda_buffer) {
562 			dma_free_coherent(&a->pcid->dev,
563 					  (size_t)VDA_MAX_BUFFER_SIZE,
564 					  a->vda_buffer,
565 					  (dma_addr_t)a->ppvda_buffer);
566 			a->vda_buffer = NULL;
567 		}
568 		if (a->fs_api_buffer) {
569 			dma_free_coherent(&a->pcid->dev,
570 					  (size_t)a->fs_api_buffer_size,
571 					  a->fs_api_buffer,
572 					  (dma_addr_t)a->ppfs_api_buffer);
573 			a->fs_api_buffer = NULL;
574 		}
575 
576 		kfree(a->local_atto_ioctl);
577 		a->local_atto_ioctl = NULL;
578 
579 		spin_lock_irqsave(&a->fw_event_lock, flags);
580 		wq = a->fw_event_q;
581 		a->fw_event_q = NULL;
582 		spin_unlock_irqrestore(&a->fw_event_lock, flags);
583 		if (wq)
584 			destroy_workqueue(wq);
585 
586 		if (a->uncached) {
587 			dma_free_coherent(&a->pcid->dev,
588 					  (size_t)a->uncached_size,
589 					  a->uncached,
590 					  (dma_addr_t)a->uncached_phys);
591 			a->uncached = NULL;
592 			esas2r_debug("uncached area freed");
593 		}
594 
595 		esas2r_log_dev(ESAS2R_LOG_INFO,
596 			       &(a->pcid->dev),
597 			       "pci_disable_device() called.  msix_enabled: %d "
598 			       "msi_enabled: %d irq: %d pin: %d",
599 			       a->pcid->msix_enabled,
600 			       a->pcid->msi_enabled,
601 			       a->pcid->irq,
602 			       a->pcid->pin);
603 
604 		esas2r_log_dev(ESAS2R_LOG_INFO,
605 			       &(a->pcid->dev),
606 			       "before pci_disable_device() enable_cnt: %d",
607 			       a->pcid->enable_cnt.counter);
608 
609 		pci_disable_device(a->pcid);
610 		esas2r_log_dev(ESAS2R_LOG_INFO,
611 			       &(a->pcid->dev),
612 			       "after pci_disable_device() enable_cnt: %d",
613 			       a->pcid->enable_cnt.counter);
614 
615 		esas2r_log_dev(ESAS2R_LOG_INFO,
616 			       &(a->pcid->dev),
617 			       "pci_set_drv_data(%p, NULL) called",
618 			       a->pcid);
619 
620 		pci_set_drvdata(a->pcid, NULL);
621 		esas2r_adapters[i] = NULL;
622 
623 		if (test_bit(AF2_INIT_DONE, &a->flags2)) {
624 			clear_bit(AF2_INIT_DONE, &a->flags2);
625 
626 			set_bit(AF_DEGRADED_MODE, &a->flags);
627 
628 			esas2r_log_dev(ESAS2R_LOG_INFO,
629 				       &(a->host->shost_gendev),
630 				       "scsi_remove_host() called");
631 
632 			scsi_remove_host(a->host);
633 
634 			esas2r_log_dev(ESAS2R_LOG_INFO,
635 				       &(a->host->shost_gendev),
636 				       "scsi_host_put() called");
637 
638 			scsi_host_put(a->host);
639 		}
640 	}
641 }
642 
esas2r_suspend(struct pci_dev * pdev,pm_message_t state)643 int esas2r_suspend(struct pci_dev *pdev, pm_message_t state)
644 {
645 	struct Scsi_Host *host = pci_get_drvdata(pdev);
646 	u32 device_state;
647 	struct esas2r_adapter *a = (struct esas2r_adapter *)host->hostdata;
648 
649 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev), "suspending adapter()");
650 	if (!a)
651 		return -ENODEV;
652 
653 	esas2r_adapter_power_down(a, 1);
654 	device_state = pci_choose_state(pdev, state);
655 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
656 		       "pci_save_state() called");
657 	pci_save_state(pdev);
658 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
659 		       "pci_disable_device() called");
660 	pci_disable_device(pdev);
661 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
662 		       "pci_set_power_state() called");
663 	pci_set_power_state(pdev, device_state);
664 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev), "esas2r_suspend(): 0");
665 	return 0;
666 }
667 
esas2r_resume(struct pci_dev * pdev)668 int esas2r_resume(struct pci_dev *pdev)
669 {
670 	struct Scsi_Host *host = pci_get_drvdata(pdev);
671 	struct esas2r_adapter *a = (struct esas2r_adapter *)host->hostdata;
672 	int rez;
673 
674 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev), "resuming adapter()");
675 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
676 		       "pci_set_power_state(PCI_D0) "
677 		       "called");
678 	pci_set_power_state(pdev, PCI_D0);
679 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
680 		       "pci_enable_wake(PCI_D0, 0) "
681 		       "called");
682 	pci_enable_wake(pdev, PCI_D0, 0);
683 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
684 		       "pci_restore_state() called");
685 	pci_restore_state(pdev);
686 	esas2r_log_dev(ESAS2R_LOG_INFO, &(pdev->dev),
687 		       "pci_enable_device() called");
688 	rez = pci_enable_device(pdev);
689 	pci_set_master(pdev);
690 
691 	if (!a) {
692 		rez = -ENODEV;
693 		goto error_exit;
694 	}
695 
696 	if (esas2r_map_regions(a) != 0) {
697 		esas2r_log(ESAS2R_LOG_CRIT, "could not re-map PCI regions!");
698 		rez = -ENOMEM;
699 		goto error_exit;
700 	}
701 
702 	/* Set up interupt mode */
703 	esas2r_setup_interrupts(a, a->intr_mode);
704 
705 	/*
706 	 * Disable chip interrupts to prevent spurious interrupts until we
707 	 * claim the IRQ.
708 	 */
709 	esas2r_disable_chip_interrupts(a);
710 	if (!esas2r_power_up(a, true)) {
711 		esas2r_debug("yikes, esas2r_power_up failed");
712 		rez = -ENOMEM;
713 		goto error_exit;
714 	}
715 
716 	esas2r_claim_interrupts(a);
717 
718 	if (test_bit(AF2_IRQ_CLAIMED, &a->flags2)) {
719 		/*
720 		 * Now that system interrupt(s) are claimed, we can enable
721 		 * chip interrupts.
722 		 */
723 		esas2r_enable_chip_interrupts(a);
724 		esas2r_kickoff_timer(a);
725 	} else {
726 		esas2r_debug("yikes, unable to claim IRQ");
727 		esas2r_log(ESAS2R_LOG_CRIT, "could not re-claim IRQ!");
728 		rez = -ENOMEM;
729 		goto error_exit;
730 	}
731 
732 error_exit:
733 	esas2r_log_dev(ESAS2R_LOG_CRIT, &(pdev->dev), "esas2r_resume(): %d",
734 		       rez);
735 	return rez;
736 }
737 
esas2r_set_degraded_mode(struct esas2r_adapter * a,char * error_str)738 bool esas2r_set_degraded_mode(struct esas2r_adapter *a, char *error_str)
739 {
740 	set_bit(AF_DEGRADED_MODE, &a->flags);
741 	esas2r_log(ESAS2R_LOG_CRIT,
742 		   "setting adapter to degraded mode: %s\n", error_str);
743 	return false;
744 }
745 
esas2r_get_uncached_size(struct esas2r_adapter * a)746 u32 esas2r_get_uncached_size(struct esas2r_adapter *a)
747 {
748 	return sizeof(struct esas2r_sas_nvram)
749 	       + ALIGN(ESAS2R_DISC_BUF_LEN, 8)
750 	       + ALIGN(sizeof(u32), 8) /* outbound list copy pointer */
751 	       + 8
752 	       + (num_sg_lists * (u16)sgl_page_size)
753 	       + ALIGN((num_requests + num_ae_requests + 1 +
754 			ESAS2R_LIST_EXTRA) *
755 		       sizeof(struct esas2r_inbound_list_source_entry),
756 		       8)
757 	       + ALIGN((num_requests + num_ae_requests + 1 +
758 			ESAS2R_LIST_EXTRA) *
759 		       sizeof(struct atto_vda_ob_rsp), 8)
760 	       + 256; /* VDA request and buffer align */
761 }
762 
esas2r_init_pci_cfg_space(struct esas2r_adapter * a)763 static void esas2r_init_pci_cfg_space(struct esas2r_adapter *a)
764 {
765 	if (pci_is_pcie(a->pcid)) {
766 		u16 devcontrol;
767 
768 		pcie_capability_read_word(a->pcid, PCI_EXP_DEVCTL, &devcontrol);
769 
770 		if ((devcontrol & PCI_EXP_DEVCTL_READRQ) >
771 		     PCI_EXP_DEVCTL_READRQ_512B) {
772 			esas2r_log(ESAS2R_LOG_INFO,
773 				   "max read request size > 512B");
774 
775 			devcontrol &= ~PCI_EXP_DEVCTL_READRQ;
776 			devcontrol |= PCI_EXP_DEVCTL_READRQ_512B;
777 			pcie_capability_write_word(a->pcid, PCI_EXP_DEVCTL,
778 						   devcontrol);
779 		}
780 	}
781 }
782 
783 /*
784  * Determine the organization of the uncached data area and
785  * finish initializing the adapter structure
786  */
esas2r_init_adapter_struct(struct esas2r_adapter * a,void ** uncached_area)787 bool esas2r_init_adapter_struct(struct esas2r_adapter *a,
788 				void **uncached_area)
789 {
790 	u32 i;
791 	u8 *high;
792 	struct esas2r_inbound_list_source_entry *element;
793 	struct esas2r_request *rq;
794 	struct esas2r_mem_desc *sgl;
795 
796 	spin_lock_init(&a->sg_list_lock);
797 	spin_lock_init(&a->mem_lock);
798 	spin_lock_init(&a->queue_lock);
799 
800 	a->targetdb_end = &a->targetdb[ESAS2R_MAX_TARGETS];
801 
802 	if (!alloc_vda_req(a, &a->general_req)) {
803 		esas2r_hdebug(
804 			"failed to allocate a VDA request for the general req!");
805 		return false;
806 	}
807 
808 	/* allocate requests for asynchronous events */
809 	a->first_ae_req =
810 		kcalloc(num_ae_requests, sizeof(struct esas2r_request),
811 			GFP_KERNEL);
812 
813 	if (a->first_ae_req == NULL) {
814 		esas2r_log(ESAS2R_LOG_CRIT,
815 			   "failed to allocate memory for asynchronous events");
816 		return false;
817 	}
818 
819 	/* allocate the S/G list memory descriptors */
820 	a->sg_list_mds = kcalloc(num_sg_lists, sizeof(struct esas2r_mem_desc),
821 				 GFP_KERNEL);
822 
823 	if (a->sg_list_mds == NULL) {
824 		esas2r_log(ESAS2R_LOG_CRIT,
825 			   "failed to allocate memory for s/g list descriptors");
826 		return false;
827 	}
828 
829 	/* allocate the request table */
830 	a->req_table =
831 		kcalloc(num_requests + num_ae_requests + 1,
832 			sizeof(struct esas2r_request *),
833 			GFP_KERNEL);
834 
835 	if (a->req_table == NULL) {
836 		esas2r_log(ESAS2R_LOG_CRIT,
837 			   "failed to allocate memory for the request table");
838 		return false;
839 	}
840 
841 	/* initialize PCI configuration space */
842 	esas2r_init_pci_cfg_space(a);
843 
844 	/*
845 	 * the thunder_stream boards all have a serial flash part that has a
846 	 * different base address on the AHB bus.
847 	 */
848 	if ((a->pcid->subsystem_vendor == ATTO_VENDOR_ID)
849 	    && (a->pcid->subsystem_device & ATTO_SSDID_TBT))
850 		a->flags2 |= AF2_THUNDERBOLT;
851 
852 	if (test_bit(AF2_THUNDERBOLT, &a->flags2))
853 		a->flags2 |= AF2_SERIAL_FLASH;
854 
855 	if (a->pcid->subsystem_device == ATTO_TLSH_1068)
856 		a->flags2 |= AF2_THUNDERLINK;
857 
858 	/* Uncached Area */
859 	high = (u8 *)*uncached_area;
860 
861 	/* initialize the scatter/gather table pages */
862 
863 	for (i = 0, sgl = a->sg_list_mds; i < num_sg_lists; i++, sgl++) {
864 		sgl->size = sgl_page_size;
865 
866 		list_add_tail(&sgl->next_desc, &a->free_sg_list_head);
867 
868 		if (!esas2r_initmem_alloc(a, sgl, ESAS2R_SGL_ALIGN)) {
869 			/* Allow the driver to load if the minimum count met. */
870 			if (i < NUM_SGL_MIN)
871 				return false;
872 			break;
873 		}
874 	}
875 
876 	/* compute the size of the lists */
877 	a->list_size = num_requests + ESAS2R_LIST_EXTRA;
878 
879 	/* allocate the inbound list */
880 	a->inbound_list_md.size = a->list_size *
881 				  sizeof(struct
882 					 esas2r_inbound_list_source_entry);
883 
884 	if (!esas2r_initmem_alloc(a, &a->inbound_list_md, ESAS2R_LIST_ALIGN)) {
885 		esas2r_hdebug("failed to allocate IB list");
886 		return false;
887 	}
888 
889 	/* allocate the outbound list */
890 	a->outbound_list_md.size = a->list_size *
891 				   sizeof(struct atto_vda_ob_rsp);
892 
893 	if (!esas2r_initmem_alloc(a, &a->outbound_list_md,
894 				  ESAS2R_LIST_ALIGN)) {
895 		esas2r_hdebug("failed to allocate IB list");
896 		return false;
897 	}
898 
899 	/* allocate the NVRAM structure */
900 	a->nvram = (struct esas2r_sas_nvram *)high;
901 	high += sizeof(struct esas2r_sas_nvram);
902 
903 	/* allocate the discovery buffer */
904 	a->disc_buffer = high;
905 	high += ESAS2R_DISC_BUF_LEN;
906 	high = PTR_ALIGN(high, 8);
907 
908 	/* allocate the outbound list copy pointer */
909 	a->outbound_copy = (u32 volatile *)high;
910 	high += sizeof(u32);
911 
912 	if (!test_bit(AF_NVR_VALID, &a->flags))
913 		esas2r_nvram_set_defaults(a);
914 
915 	/* update the caller's uncached memory area pointer */
916 	*uncached_area = (void *)high;
917 
918 	/* initialize the allocated memory */
919 	if (test_bit(AF_FIRST_INIT, &a->flags)) {
920 		esas2r_targ_db_initialize(a);
921 
922 		/* prime parts of the inbound list */
923 		element =
924 			(struct esas2r_inbound_list_source_entry *)a->
925 			inbound_list_md.
926 			virt_addr;
927 
928 		for (i = 0; i < a->list_size; i++) {
929 			element->address = 0;
930 			element->reserved = 0;
931 			element->length = cpu_to_le32(HWILSE_INTERFACE_F0
932 						      | (sizeof(union
933 								atto_vda_req)
934 							 /
935 							 sizeof(u32)));
936 			element++;
937 		}
938 
939 		/* init the AE requests */
940 		for (rq = a->first_ae_req, i = 0; i < num_ae_requests; rq++,
941 		     i++) {
942 			INIT_LIST_HEAD(&rq->req_list);
943 			if (!alloc_vda_req(a, rq)) {
944 				esas2r_hdebug(
945 					"failed to allocate a VDA request!");
946 				return false;
947 			}
948 
949 			esas2r_rq_init_request(rq, a);
950 
951 			/* override the completion function */
952 			rq->comp_cb = esas2r_ae_complete;
953 		}
954 	}
955 
956 	return true;
957 }
958 
959 /* This code will verify that the chip is operational. */
esas2r_check_adapter(struct esas2r_adapter * a)960 bool esas2r_check_adapter(struct esas2r_adapter *a)
961 {
962 	u32 starttime;
963 	u32 doorbell;
964 	u64 ppaddr;
965 	u32 dw;
966 
967 	/*
968 	 * if the chip reset detected flag is set, we can bypass a bunch of
969 	 * stuff.
970 	 */
971 	if (test_bit(AF_CHPRST_DETECTED, &a->flags))
972 		goto skip_chip_reset;
973 
974 	/*
975 	 * BEFORE WE DO ANYTHING, disable the chip interrupts!  the boot driver
976 	 * may have left them enabled or we may be recovering from a fault.
977 	 */
978 	esas2r_write_register_dword(a, MU_INT_MASK_OUT, ESAS2R_INT_DIS_MASK);
979 	esas2r_flush_register_dword(a, MU_INT_MASK_OUT);
980 
981 	/*
982 	 * wait for the firmware to become ready by forcing an interrupt and
983 	 * waiting for a response.
984 	 */
985 	starttime = jiffies_to_msecs(jiffies);
986 
987 	while (true) {
988 		esas2r_force_interrupt(a);
989 		doorbell = esas2r_read_register_dword(a, MU_DOORBELL_OUT);
990 		if (doorbell == 0xFFFFFFFF) {
991 			/*
992 			 * Give the firmware up to two seconds to enable
993 			 * register access after a reset.
994 			 */
995 			if ((jiffies_to_msecs(jiffies) - starttime) > 2000)
996 				return esas2r_set_degraded_mode(a,
997 								"unable to access registers");
998 		} else if (doorbell & DRBL_FORCE_INT) {
999 			u32 ver = (doorbell & DRBL_FW_VER_MSK);
1000 
1001 			/*
1002 			 * This driver supports version 0 and version 1 of
1003 			 * the API
1004 			 */
1005 			esas2r_write_register_dword(a, MU_DOORBELL_OUT,
1006 						    doorbell);
1007 
1008 			if (ver == DRBL_FW_VER_0) {
1009 				set_bit(AF_LEGACY_SGE_MODE, &a->flags);
1010 
1011 				a->max_vdareq_size = 128;
1012 				a->build_sgl = esas2r_build_sg_list_sge;
1013 			} else if (ver == DRBL_FW_VER_1) {
1014 				clear_bit(AF_LEGACY_SGE_MODE, &a->flags);
1015 
1016 				a->max_vdareq_size = 1024;
1017 				a->build_sgl = esas2r_build_sg_list_prd;
1018 			} else {
1019 				return esas2r_set_degraded_mode(a,
1020 								"unknown firmware version");
1021 			}
1022 			break;
1023 		}
1024 
1025 		schedule_timeout_interruptible(msecs_to_jiffies(100));
1026 
1027 		if ((jiffies_to_msecs(jiffies) - starttime) > 180000) {
1028 			esas2r_hdebug("FW ready TMO");
1029 			esas2r_bugon();
1030 
1031 			return esas2r_set_degraded_mode(a,
1032 							"firmware start has timed out");
1033 		}
1034 	}
1035 
1036 	/* purge any asynchronous events since we will repost them later */
1037 	esas2r_write_register_dword(a, MU_DOORBELL_IN, DRBL_MSG_IFC_DOWN);
1038 	starttime = jiffies_to_msecs(jiffies);
1039 
1040 	while (true) {
1041 		doorbell = esas2r_read_register_dword(a, MU_DOORBELL_OUT);
1042 		if (doorbell & DRBL_MSG_IFC_DOWN) {
1043 			esas2r_write_register_dword(a, MU_DOORBELL_OUT,
1044 						    doorbell);
1045 			break;
1046 		}
1047 
1048 		schedule_timeout_interruptible(msecs_to_jiffies(50));
1049 
1050 		if ((jiffies_to_msecs(jiffies) - starttime) > 3000) {
1051 			esas2r_hdebug("timeout waiting for interface down");
1052 			break;
1053 		}
1054 	}
1055 skip_chip_reset:
1056 	/*
1057 	 * first things first, before we go changing any of these registers
1058 	 * disable the communication lists.
1059 	 */
1060 	dw = esas2r_read_register_dword(a, MU_IN_LIST_CONFIG);
1061 	dw &= ~MU_ILC_ENABLE;
1062 	esas2r_write_register_dword(a, MU_IN_LIST_CONFIG, dw);
1063 	dw = esas2r_read_register_dword(a, MU_OUT_LIST_CONFIG);
1064 	dw &= ~MU_OLC_ENABLE;
1065 	esas2r_write_register_dword(a, MU_OUT_LIST_CONFIG, dw);
1066 
1067 	/* configure the communication list addresses */
1068 	ppaddr = a->inbound_list_md.phys_addr;
1069 	esas2r_write_register_dword(a, MU_IN_LIST_ADDR_LO,
1070 				    lower_32_bits(ppaddr));
1071 	esas2r_write_register_dword(a, MU_IN_LIST_ADDR_HI,
1072 				    upper_32_bits(ppaddr));
1073 	ppaddr = a->outbound_list_md.phys_addr;
1074 	esas2r_write_register_dword(a, MU_OUT_LIST_ADDR_LO,
1075 				    lower_32_bits(ppaddr));
1076 	esas2r_write_register_dword(a, MU_OUT_LIST_ADDR_HI,
1077 				    upper_32_bits(ppaddr));
1078 	ppaddr = a->uncached_phys +
1079 		 ((u8 *)a->outbound_copy - a->uncached);
1080 	esas2r_write_register_dword(a, MU_OUT_LIST_COPY_PTR_LO,
1081 				    lower_32_bits(ppaddr));
1082 	esas2r_write_register_dword(a, MU_OUT_LIST_COPY_PTR_HI,
1083 				    upper_32_bits(ppaddr));
1084 
1085 	/* reset the read and write pointers */
1086 	*a->outbound_copy =
1087 		a->last_write =
1088 			a->last_read = a->list_size - 1;
1089 	set_bit(AF_COMM_LIST_TOGGLE, &a->flags);
1090 	esas2r_write_register_dword(a, MU_IN_LIST_WRITE, MU_ILW_TOGGLE |
1091 				    a->last_write);
1092 	esas2r_write_register_dword(a, MU_OUT_LIST_COPY, MU_OLC_TOGGLE |
1093 				    a->last_write);
1094 	esas2r_write_register_dword(a, MU_IN_LIST_READ, MU_ILR_TOGGLE |
1095 				    a->last_write);
1096 	esas2r_write_register_dword(a, MU_OUT_LIST_WRITE,
1097 				    MU_OLW_TOGGLE | a->last_write);
1098 
1099 	/* configure the interface select fields */
1100 	dw = esas2r_read_register_dword(a, MU_IN_LIST_IFC_CONFIG);
1101 	dw &= ~(MU_ILIC_LIST | MU_ILIC_DEST);
1102 	esas2r_write_register_dword(a, MU_IN_LIST_IFC_CONFIG,
1103 				    (dw | MU_ILIC_LIST_F0 | MU_ILIC_DEST_DDR));
1104 	dw = esas2r_read_register_dword(a, MU_OUT_LIST_IFC_CONFIG);
1105 	dw &= ~(MU_OLIC_LIST | MU_OLIC_SOURCE);
1106 	esas2r_write_register_dword(a, MU_OUT_LIST_IFC_CONFIG,
1107 				    (dw | MU_OLIC_LIST_F0 |
1108 				     MU_OLIC_SOURCE_DDR));
1109 
1110 	/* finish configuring the communication lists */
1111 	dw = esas2r_read_register_dword(a, MU_IN_LIST_CONFIG);
1112 	dw &= ~(MU_ILC_ENTRY_MASK | MU_ILC_NUMBER_MASK);
1113 	dw |= MU_ILC_ENTRY_4_DW | MU_ILC_DYNAMIC_SRC
1114 	      | (a->list_size << MU_ILC_NUMBER_SHIFT);
1115 	esas2r_write_register_dword(a, MU_IN_LIST_CONFIG, dw);
1116 	dw = esas2r_read_register_dword(a, MU_OUT_LIST_CONFIG);
1117 	dw &= ~(MU_OLC_ENTRY_MASK | MU_OLC_NUMBER_MASK);
1118 	dw |= MU_OLC_ENTRY_4_DW | (a->list_size << MU_OLC_NUMBER_SHIFT);
1119 	esas2r_write_register_dword(a, MU_OUT_LIST_CONFIG, dw);
1120 
1121 	/*
1122 	 * notify the firmware that we're done setting up the communication
1123 	 * list registers.  wait here until the firmware is done configuring
1124 	 * its lists.  it will signal that it is done by enabling the lists.
1125 	 */
1126 	esas2r_write_register_dword(a, MU_DOORBELL_IN, DRBL_MSG_IFC_INIT);
1127 	starttime = jiffies_to_msecs(jiffies);
1128 
1129 	while (true) {
1130 		doorbell = esas2r_read_register_dword(a, MU_DOORBELL_OUT);
1131 		if (doorbell & DRBL_MSG_IFC_INIT) {
1132 			esas2r_write_register_dword(a, MU_DOORBELL_OUT,
1133 						    doorbell);
1134 			break;
1135 		}
1136 
1137 		schedule_timeout_interruptible(msecs_to_jiffies(100));
1138 
1139 		if ((jiffies_to_msecs(jiffies) - starttime) > 3000) {
1140 			esas2r_hdebug(
1141 				"timeout waiting for communication list init");
1142 			esas2r_bugon();
1143 			return esas2r_set_degraded_mode(a,
1144 							"timeout waiting for communication list init");
1145 		}
1146 	}
1147 
1148 	/*
1149 	 * flag whether the firmware supports the power down doorbell.  we
1150 	 * determine this by reading the inbound doorbell enable mask.
1151 	 */
1152 	doorbell = esas2r_read_register_dword(a, MU_DOORBELL_IN_ENB);
1153 	if (doorbell & DRBL_POWER_DOWN)
1154 		set_bit(AF2_VDA_POWER_DOWN, &a->flags2);
1155 	else
1156 		clear_bit(AF2_VDA_POWER_DOWN, &a->flags2);
1157 
1158 	/*
1159 	 * enable assertion of outbound queue and doorbell interrupts in the
1160 	 * main interrupt cause register.
1161 	 */
1162 	esas2r_write_register_dword(a, MU_OUT_LIST_INT_MASK, MU_OLIS_MASK);
1163 	esas2r_write_register_dword(a, MU_DOORBELL_OUT_ENB, DRBL_ENB_MASK);
1164 	return true;
1165 }
1166 
1167 /* Process the initialization message just completed and format the next one. */
esas2r_format_init_msg(struct esas2r_adapter * a,struct esas2r_request * rq)1168 static bool esas2r_format_init_msg(struct esas2r_adapter *a,
1169 				   struct esas2r_request *rq)
1170 {
1171 	u32 msg = a->init_msg;
1172 	struct atto_vda_cfg_init *ci;
1173 
1174 	a->init_msg = 0;
1175 
1176 	switch (msg) {
1177 	case ESAS2R_INIT_MSG_START:
1178 	case ESAS2R_INIT_MSG_REINIT:
1179 	{
1180 		esas2r_hdebug("CFG init");
1181 		esas2r_build_cfg_req(a,
1182 				     rq,
1183 				     VDA_CFG_INIT,
1184 				     0,
1185 				     NULL);
1186 		ci = (struct atto_vda_cfg_init *)&rq->vrq->cfg.data.init;
1187 		ci->sgl_page_size = cpu_to_le32(sgl_page_size);
1188 		/* firmware interface overflows in y2106 */
1189 		ci->epoch_time = cpu_to_le32(ktime_get_real_seconds());
1190 		rq->flags |= RF_FAILURE_OK;
1191 		a->init_msg = ESAS2R_INIT_MSG_INIT;
1192 		break;
1193 	}
1194 
1195 	case ESAS2R_INIT_MSG_INIT:
1196 		if (rq->req_stat == RS_SUCCESS) {
1197 			u32 major;
1198 			u32 minor;
1199 			u16 fw_release;
1200 
1201 			a->fw_version = le16_to_cpu(
1202 				rq->func_rsp.cfg_rsp.vda_version);
1203 			a->fw_build = rq->func_rsp.cfg_rsp.fw_build;
1204 			fw_release = le16_to_cpu(
1205 				rq->func_rsp.cfg_rsp.fw_release);
1206 			major = LOBYTE(fw_release);
1207 			minor = HIBYTE(fw_release);
1208 			a->fw_version += (major << 16) + (minor << 24);
1209 		} else {
1210 			esas2r_hdebug("FAILED");
1211 		}
1212 
1213 		/*
1214 		 * the 2.71 and earlier releases of R6xx firmware did not error
1215 		 * unsupported config requests correctly.
1216 		 */
1217 
1218 		if ((test_bit(AF2_THUNDERBOLT, &a->flags2))
1219 		    || (be32_to_cpu(a->fw_version) > 0x00524702)) {
1220 			esas2r_hdebug("CFG get init");
1221 			esas2r_build_cfg_req(a,
1222 					     rq,
1223 					     VDA_CFG_GET_INIT2,
1224 					     sizeof(struct atto_vda_cfg_init),
1225 					     NULL);
1226 
1227 			rq->vrq->cfg.sg_list_offset = offsetof(
1228 				struct atto_vda_cfg_req,
1229 				data.sge);
1230 			rq->vrq->cfg.data.prde.ctl_len =
1231 				cpu_to_le32(sizeof(struct atto_vda_cfg_init));
1232 			rq->vrq->cfg.data.prde.address = cpu_to_le64(
1233 				rq->vrq_md->phys_addr +
1234 				sizeof(union atto_vda_req));
1235 			rq->flags |= RF_FAILURE_OK;
1236 			a->init_msg = ESAS2R_INIT_MSG_GET_INIT;
1237 			break;
1238 		}
1239 		fallthrough;
1240 
1241 	case ESAS2R_INIT_MSG_GET_INIT:
1242 		if (msg == ESAS2R_INIT_MSG_GET_INIT) {
1243 			ci = (struct atto_vda_cfg_init *)rq->data_buf;
1244 			if (rq->req_stat == RS_SUCCESS) {
1245 				a->num_targets_backend =
1246 					le32_to_cpu(ci->num_targets_backend);
1247 				a->ioctl_tunnel =
1248 					le32_to_cpu(ci->ioctl_tunnel);
1249 			} else {
1250 				esas2r_hdebug("FAILED");
1251 			}
1252 		}
1253 		fallthrough;
1254 
1255 	default:
1256 		rq->req_stat = RS_SUCCESS;
1257 		return false;
1258 	}
1259 	return true;
1260 }
1261 
1262 /*
1263  * Perform initialization messages via the request queue.  Messages are
1264  * performed with interrupts disabled.
1265  */
esas2r_init_msgs(struct esas2r_adapter * a)1266 bool esas2r_init_msgs(struct esas2r_adapter *a)
1267 {
1268 	bool success = true;
1269 	struct esas2r_request *rq = &a->general_req;
1270 
1271 	esas2r_rq_init_request(rq, a);
1272 	rq->comp_cb = esas2r_dummy_complete;
1273 
1274 	if (a->init_msg == 0)
1275 		a->init_msg = ESAS2R_INIT_MSG_REINIT;
1276 
1277 	while (a->init_msg) {
1278 		if (esas2r_format_init_msg(a, rq)) {
1279 			unsigned long flags;
1280 			while (true) {
1281 				spin_lock_irqsave(&a->queue_lock, flags);
1282 				esas2r_start_vda_request(a, rq);
1283 				spin_unlock_irqrestore(&a->queue_lock, flags);
1284 				esas2r_wait_request(a, rq);
1285 				if (rq->req_stat != RS_PENDING)
1286 					break;
1287 			}
1288 		}
1289 
1290 		if (rq->req_stat == RS_SUCCESS
1291 		    || ((rq->flags & RF_FAILURE_OK)
1292 			&& rq->req_stat != RS_TIMEOUT))
1293 			continue;
1294 
1295 		esas2r_log(ESAS2R_LOG_CRIT, "init message %x failed (%x, %x)",
1296 			   a->init_msg, rq->req_stat, rq->flags);
1297 		a->init_msg = ESAS2R_INIT_MSG_START;
1298 		success = false;
1299 		break;
1300 	}
1301 
1302 	esas2r_rq_destroy_request(rq, a);
1303 	return success;
1304 }
1305 
1306 /* Initialize the adapter chip */
esas2r_init_adapter_hw(struct esas2r_adapter * a,bool init_poll)1307 bool esas2r_init_adapter_hw(struct esas2r_adapter *a, bool init_poll)
1308 {
1309 	bool rslt = false;
1310 	struct esas2r_request *rq;
1311 	u32 i;
1312 
1313 	if (test_bit(AF_DEGRADED_MODE, &a->flags))
1314 		goto exit;
1315 
1316 	if (!test_bit(AF_NVR_VALID, &a->flags)) {
1317 		if (!esas2r_nvram_read_direct(a))
1318 			esas2r_log(ESAS2R_LOG_WARN,
1319 				   "invalid/missing NVRAM parameters");
1320 	}
1321 
1322 	if (!esas2r_init_msgs(a)) {
1323 		esas2r_set_degraded_mode(a, "init messages failed");
1324 		goto exit;
1325 	}
1326 
1327 	/* The firmware is ready. */
1328 	clear_bit(AF_DEGRADED_MODE, &a->flags);
1329 	clear_bit(AF_CHPRST_PENDING, &a->flags);
1330 
1331 	/* Post all the async event requests */
1332 	for (i = 0, rq = a->first_ae_req; i < num_ae_requests; i++, rq++)
1333 		esas2r_start_ae_request(a, rq);
1334 
1335 	if (!a->flash_rev[0])
1336 		esas2r_read_flash_rev(a);
1337 
1338 	if (!a->image_type[0])
1339 		esas2r_read_image_type(a);
1340 
1341 	if (a->fw_version == 0)
1342 		a->fw_rev[0] = 0;
1343 	else
1344 		sprintf(a->fw_rev, "%1d.%02d",
1345 			(int)LOBYTE(HIWORD(a->fw_version)),
1346 			(int)HIBYTE(HIWORD(a->fw_version)));
1347 
1348 	esas2r_hdebug("firmware revision: %s", a->fw_rev);
1349 
1350 	if (test_bit(AF_CHPRST_DETECTED, &a->flags)
1351 	    && (test_bit(AF_FIRST_INIT, &a->flags))) {
1352 		esas2r_enable_chip_interrupts(a);
1353 		return true;
1354 	}
1355 
1356 	/* initialize discovery */
1357 	esas2r_disc_initialize(a);
1358 
1359 	/*
1360 	 * wait for the device wait time to expire here if requested.  this is
1361 	 * usually requested during initial driver load and possibly when
1362 	 * resuming from a low power state.  deferred device waiting will use
1363 	 * interrupts.  chip reset recovery always defers device waiting to
1364 	 * avoid being in a TASKLET too long.
1365 	 */
1366 	if (init_poll) {
1367 		u32 currtime = a->disc_start_time;
1368 		u32 nexttick = 100;
1369 		u32 deltatime;
1370 
1371 		/*
1372 		 * Block Tasklets from getting scheduled and indicate this is
1373 		 * polled discovery.
1374 		 */
1375 		set_bit(AF_TASKLET_SCHEDULED, &a->flags);
1376 		set_bit(AF_DISC_POLLED, &a->flags);
1377 
1378 		/*
1379 		 * Temporarily bring the disable count to zero to enable
1380 		 * deferred processing.  Note that the count is already zero
1381 		 * after the first initialization.
1382 		 */
1383 		if (test_bit(AF_FIRST_INIT, &a->flags))
1384 			atomic_dec(&a->disable_cnt);
1385 
1386 		while (test_bit(AF_DISC_PENDING, &a->flags)) {
1387 			schedule_timeout_interruptible(msecs_to_jiffies(100));
1388 
1389 			/*
1390 			 * Determine the need for a timer tick based on the
1391 			 * delta time between this and the last iteration of
1392 			 * this loop.  We don't use the absolute time because
1393 			 * then we would have to worry about when nexttick
1394 			 * wraps and currtime hasn't yet.
1395 			 */
1396 			deltatime = jiffies_to_msecs(jiffies) - currtime;
1397 			currtime += deltatime;
1398 
1399 			/*
1400 			 * Process any waiting discovery as long as the chip is
1401 			 * up.  If a chip reset happens during initial polling,
1402 			 * we have to make sure the timer tick processes the
1403 			 * doorbell indicating the firmware is ready.
1404 			 */
1405 			if (!test_bit(AF_CHPRST_PENDING, &a->flags))
1406 				esas2r_disc_check_for_work(a);
1407 
1408 			/* Simulate a timer tick. */
1409 			if (nexttick <= deltatime) {
1410 
1411 				/* Time for a timer tick */
1412 				nexttick += 100;
1413 				esas2r_timer_tick(a);
1414 			}
1415 
1416 			if (nexttick > deltatime)
1417 				nexttick -= deltatime;
1418 
1419 			/* Do any deferred processing */
1420 			if (esas2r_is_tasklet_pending(a))
1421 				esas2r_do_tasklet_tasks(a);
1422 
1423 		}
1424 
1425 		if (test_bit(AF_FIRST_INIT, &a->flags))
1426 			atomic_inc(&a->disable_cnt);
1427 
1428 		clear_bit(AF_DISC_POLLED, &a->flags);
1429 		clear_bit(AF_TASKLET_SCHEDULED, &a->flags);
1430 	}
1431 
1432 
1433 	esas2r_targ_db_report_changes(a);
1434 
1435 	/*
1436 	 * For cases where (a) the initialization messages processing may
1437 	 * handle an interrupt for a port event and a discovery is waiting, but
1438 	 * we are not waiting for devices, or (b) the device wait time has been
1439 	 * exhausted but there is still discovery pending, start any leftover
1440 	 * discovery in interrupt driven mode.
1441 	 */
1442 	esas2r_disc_start_waiting(a);
1443 
1444 	/* Enable chip interrupts */
1445 	a->int_mask = ESAS2R_INT_STS_MASK;
1446 	esas2r_enable_chip_interrupts(a);
1447 	esas2r_enable_heartbeat(a);
1448 	rslt = true;
1449 
1450 exit:
1451 	/*
1452 	 * Regardless of whether initialization was successful, certain things
1453 	 * need to get done before we exit.
1454 	 */
1455 
1456 	if (test_bit(AF_CHPRST_DETECTED, &a->flags) &&
1457 	    test_bit(AF_FIRST_INIT, &a->flags)) {
1458 		/*
1459 		 * Reinitialization was performed during the first
1460 		 * initialization.  Only clear the chip reset flag so the
1461 		 * original device polling is not cancelled.
1462 		 */
1463 		if (!rslt)
1464 			clear_bit(AF_CHPRST_PENDING, &a->flags);
1465 	} else {
1466 		/* First initialization or a subsequent re-init is complete. */
1467 		if (!rslt) {
1468 			clear_bit(AF_CHPRST_PENDING, &a->flags);
1469 			clear_bit(AF_DISC_PENDING, &a->flags);
1470 		}
1471 
1472 
1473 		/* Enable deferred processing after the first initialization. */
1474 		if (test_bit(AF_FIRST_INIT, &a->flags)) {
1475 			clear_bit(AF_FIRST_INIT, &a->flags);
1476 
1477 			if (atomic_dec_return(&a->disable_cnt) == 0)
1478 				esas2r_do_deferred_processes(a);
1479 		}
1480 	}
1481 
1482 	return rslt;
1483 }
1484 
esas2r_reset_adapter(struct esas2r_adapter * a)1485 void esas2r_reset_adapter(struct esas2r_adapter *a)
1486 {
1487 	set_bit(AF_OS_RESET, &a->flags);
1488 	esas2r_local_reset_adapter(a);
1489 	esas2r_schedule_tasklet(a);
1490 }
1491 
esas2r_reset_chip(struct esas2r_adapter * a)1492 void esas2r_reset_chip(struct esas2r_adapter *a)
1493 {
1494 	if (!esas2r_is_adapter_present(a))
1495 		return;
1496 
1497 	/*
1498 	 * Before we reset the chip, save off the VDA core dump.  The VDA core
1499 	 * dump is located in the upper 512KB of the onchip SRAM.  Make sure
1500 	 * to not overwrite a previous crash that was saved.
1501 	 */
1502 	if (test_bit(AF2_COREDUMP_AVAIL, &a->flags2) &&
1503 	    !test_bit(AF2_COREDUMP_SAVED, &a->flags2)) {
1504 		esas2r_read_mem_block(a,
1505 				      a->fw_coredump_buff,
1506 				      MW_DATA_ADDR_SRAM + 0x80000,
1507 				      ESAS2R_FWCOREDUMP_SZ);
1508 
1509 		set_bit(AF2_COREDUMP_SAVED, &a->flags2);
1510 	}
1511 
1512 	clear_bit(AF2_COREDUMP_AVAIL, &a->flags2);
1513 
1514 	/* Reset the chip */
1515 	if (a->pcid->revision == MVR_FREY_B2)
1516 		esas2r_write_register_dword(a, MU_CTL_STATUS_IN_B2,
1517 					    MU_CTL_IN_FULL_RST2);
1518 	else
1519 		esas2r_write_register_dword(a, MU_CTL_STATUS_IN,
1520 					    MU_CTL_IN_FULL_RST);
1521 
1522 
1523 	/* Stall a little while to let the reset condition clear */
1524 	mdelay(10);
1525 }
1526 
esas2r_power_down_notify_firmware(struct esas2r_adapter * a)1527 static void esas2r_power_down_notify_firmware(struct esas2r_adapter *a)
1528 {
1529 	u32 starttime;
1530 	u32 doorbell;
1531 
1532 	esas2r_write_register_dword(a, MU_DOORBELL_IN, DRBL_POWER_DOWN);
1533 	starttime = jiffies_to_msecs(jiffies);
1534 
1535 	while (true) {
1536 		doorbell = esas2r_read_register_dword(a, MU_DOORBELL_OUT);
1537 		if (doorbell & DRBL_POWER_DOWN) {
1538 			esas2r_write_register_dword(a, MU_DOORBELL_OUT,
1539 						    doorbell);
1540 			break;
1541 		}
1542 
1543 		schedule_timeout_interruptible(msecs_to_jiffies(100));
1544 
1545 		if ((jiffies_to_msecs(jiffies) - starttime) > 30000) {
1546 			esas2r_hdebug("Timeout waiting for power down");
1547 			break;
1548 		}
1549 	}
1550 }
1551 
1552 /*
1553  * Perform power management processing including managing device states, adapter
1554  * states, interrupts, and I/O.
1555  */
esas2r_power_down(struct esas2r_adapter * a)1556 void esas2r_power_down(struct esas2r_adapter *a)
1557 {
1558 	set_bit(AF_POWER_MGT, &a->flags);
1559 	set_bit(AF_POWER_DOWN, &a->flags);
1560 
1561 	if (!test_bit(AF_DEGRADED_MODE, &a->flags)) {
1562 		u32 starttime;
1563 		u32 doorbell;
1564 
1565 		/*
1566 		 * We are currently running OK and will be reinitializing later.
1567 		 * increment the disable count to coordinate with
1568 		 * esas2r_init_adapter.  We don't have to do this in degraded
1569 		 * mode since we never enabled interrupts in the first place.
1570 		 */
1571 		esas2r_disable_chip_interrupts(a);
1572 		esas2r_disable_heartbeat(a);
1573 
1574 		/* wait for any VDA activity to clear before continuing */
1575 		esas2r_write_register_dword(a, MU_DOORBELL_IN,
1576 					    DRBL_MSG_IFC_DOWN);
1577 		starttime = jiffies_to_msecs(jiffies);
1578 
1579 		while (true) {
1580 			doorbell =
1581 				esas2r_read_register_dword(a, MU_DOORBELL_OUT);
1582 			if (doorbell & DRBL_MSG_IFC_DOWN) {
1583 				esas2r_write_register_dword(a, MU_DOORBELL_OUT,
1584 							    doorbell);
1585 				break;
1586 			}
1587 
1588 			schedule_timeout_interruptible(msecs_to_jiffies(100));
1589 
1590 			if ((jiffies_to_msecs(jiffies) - starttime) > 3000) {
1591 				esas2r_hdebug(
1592 					"timeout waiting for interface down");
1593 				break;
1594 			}
1595 		}
1596 
1597 		/*
1598 		 * For versions of firmware that support it tell them the driver
1599 		 * is powering down.
1600 		 */
1601 		if (test_bit(AF2_VDA_POWER_DOWN, &a->flags2))
1602 			esas2r_power_down_notify_firmware(a);
1603 	}
1604 
1605 	/* Suspend I/O processing. */
1606 	set_bit(AF_OS_RESET, &a->flags);
1607 	set_bit(AF_DISC_PENDING, &a->flags);
1608 	set_bit(AF_CHPRST_PENDING, &a->flags);
1609 
1610 	esas2r_process_adapter_reset(a);
1611 
1612 	/* Remove devices now that I/O is cleaned up. */
1613 	a->prev_dev_cnt = esas2r_targ_db_get_tgt_cnt(a);
1614 	esas2r_targ_db_remove_all(a, false);
1615 }
1616 
1617 /*
1618  * Perform power management processing including managing device states, adapter
1619  * states, interrupts, and I/O.
1620  */
esas2r_power_up(struct esas2r_adapter * a,bool init_poll)1621 bool esas2r_power_up(struct esas2r_adapter *a, bool init_poll)
1622 {
1623 	bool ret;
1624 
1625 	clear_bit(AF_POWER_DOWN, &a->flags);
1626 	esas2r_init_pci_cfg_space(a);
1627 	set_bit(AF_FIRST_INIT, &a->flags);
1628 	atomic_inc(&a->disable_cnt);
1629 
1630 	/* reinitialize the adapter */
1631 	ret = esas2r_check_adapter(a);
1632 	if (!esas2r_init_adapter_hw(a, init_poll))
1633 		ret = false;
1634 
1635 	/* send the reset asynchronous event */
1636 	esas2r_send_reset_ae(a, true);
1637 
1638 	/* clear this flag after initialization. */
1639 	clear_bit(AF_POWER_MGT, &a->flags);
1640 	return ret;
1641 }
1642 
esas2r_is_adapter_present(struct esas2r_adapter * a)1643 bool esas2r_is_adapter_present(struct esas2r_adapter *a)
1644 {
1645 	if (test_bit(AF_NOT_PRESENT, &a->flags))
1646 		return false;
1647 
1648 	if (esas2r_read_register_dword(a, MU_DOORBELL_OUT) == 0xFFFFFFFF) {
1649 		set_bit(AF_NOT_PRESENT, &a->flags);
1650 
1651 		return false;
1652 	}
1653 	return true;
1654 }
1655 
esas2r_get_model_name(struct esas2r_adapter * a)1656 const char *esas2r_get_model_name(struct esas2r_adapter *a)
1657 {
1658 	switch (a->pcid->subsystem_device) {
1659 	case ATTO_ESAS_R680:
1660 		return "ATTO ExpressSAS R680";
1661 
1662 	case ATTO_ESAS_R608:
1663 		return "ATTO ExpressSAS R608";
1664 
1665 	case ATTO_ESAS_R60F:
1666 		return "ATTO ExpressSAS R60F";
1667 
1668 	case ATTO_ESAS_R6F0:
1669 		return "ATTO ExpressSAS R6F0";
1670 
1671 	case ATTO_ESAS_R644:
1672 		return "ATTO ExpressSAS R644";
1673 
1674 	case ATTO_ESAS_R648:
1675 		return "ATTO ExpressSAS R648";
1676 
1677 	case ATTO_TSSC_3808:
1678 		return "ATTO ThunderStream SC 3808D";
1679 
1680 	case ATTO_TSSC_3808E:
1681 		return "ATTO ThunderStream SC 3808E";
1682 
1683 	case ATTO_TLSH_1068:
1684 		return "ATTO ThunderLink SH 1068";
1685 	}
1686 
1687 	return "ATTO SAS Controller";
1688 }
1689 
esas2r_get_model_name_short(struct esas2r_adapter * a)1690 const char *esas2r_get_model_name_short(struct esas2r_adapter *a)
1691 {
1692 	switch (a->pcid->subsystem_device) {
1693 	case ATTO_ESAS_R680:
1694 		return "R680";
1695 
1696 	case ATTO_ESAS_R608:
1697 		return "R608";
1698 
1699 	case ATTO_ESAS_R60F:
1700 		return "R60F";
1701 
1702 	case ATTO_ESAS_R6F0:
1703 		return "R6F0";
1704 
1705 	case ATTO_ESAS_R644:
1706 		return "R644";
1707 
1708 	case ATTO_ESAS_R648:
1709 		return "R648";
1710 
1711 	case ATTO_TSSC_3808:
1712 		return "SC 3808D";
1713 
1714 	case ATTO_TSSC_3808E:
1715 		return "SC 3808E";
1716 
1717 	case ATTO_TLSH_1068:
1718 		return "SH 1068";
1719 	}
1720 
1721 	return "unknown";
1722 }
1723