1 /*
2  * PMC-Sierra PM8001/8081/8088/8089 SAS/SATA based host adapters driver
3  *
4  * Copyright (c) 2008-2009 USI Co., Ltd.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions, and the following disclaimer,
12  *    without modification.
13  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
14  *    substantially similar to the "NO WARRANTY" disclaimer below
15  *    ("Disclaimer") and any redistribution must be conditioned upon
16  *    including a substantially similar Disclaimer requirement for further
17  *    binary redistribution.
18  * 3. Neither the names of the above-listed copyright holders nor the names
19  *    of any contributors may be used to endorse or promote products derived
20  *    from this software without specific prior written permission.
21  *
22  * Alternatively, this software may be distributed under the terms of the
23  * GNU General Public License ("GPL") version 2 as published by the Free
24  * Software Foundation.
25  *
26  * NO WARRANTY
27  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
28  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
29  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
30  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
31  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
35  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
36  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37  * POSSIBILITY OF SUCH DAMAGES.
38  *
39  */
40 
41 #include <linux/slab.h>
42 #include "pm8001_sas.h"
43 #include "pm8001_chips.h"
44 #include "pm80xx_hwi.h"
45 
46 static ulong logging_level = PM8001_FAIL_LOGGING | PM8001_IOERR_LOGGING;
47 module_param(logging_level, ulong, 0644);
48 MODULE_PARM_DESC(logging_level, " bits for enabling logging info.");
49 
50 static ulong link_rate = LINKRATE_15 | LINKRATE_30 | LINKRATE_60 | LINKRATE_120;
51 module_param(link_rate, ulong, 0644);
52 MODULE_PARM_DESC(link_rate, "Enable link rate.\n"
53 		" 1: Link rate 1.5G\n"
54 		" 2: Link rate 3.0G\n"
55 		" 4: Link rate 6.0G\n"
56 		" 8: Link rate 12.0G\n");
57 
58 static struct scsi_transport_template *pm8001_stt;
59 static int pm8001_init_ccb_tag(struct pm8001_hba_info *, struct Scsi_Host *, struct pci_dev *);
60 
61 /*
62  * chip info structure to identify chip key functionality as
63  * encryption available/not, no of ports, hw specific function ref
64  */
65 static const struct pm8001_chip_info pm8001_chips[] = {
66 	[chip_8001] = {0,  8, &pm8001_8001_dispatch,},
67 	[chip_8008] = {0,  8, &pm8001_80xx_dispatch,},
68 	[chip_8009] = {1,  8, &pm8001_80xx_dispatch,},
69 	[chip_8018] = {0,  16, &pm8001_80xx_dispatch,},
70 	[chip_8019] = {1,  16, &pm8001_80xx_dispatch,},
71 	[chip_8074] = {0,  8, &pm8001_80xx_dispatch,},
72 	[chip_8076] = {0,  16, &pm8001_80xx_dispatch,},
73 	[chip_8077] = {0,  16, &pm8001_80xx_dispatch,},
74 	[chip_8006] = {0,  16, &pm8001_80xx_dispatch,},
75 	[chip_8070] = {0,  8, &pm8001_80xx_dispatch,},
76 	[chip_8072] = {0,  16, &pm8001_80xx_dispatch,},
77 };
78 static int pm8001_id;
79 
80 LIST_HEAD(hba_list);
81 
82 struct workqueue_struct *pm8001_wq;
83 
84 /*
85  * The main structure which LLDD must register for scsi core.
86  */
87 static struct scsi_host_template pm8001_sht = {
88 	.module			= THIS_MODULE,
89 	.name			= DRV_NAME,
90 	.queuecommand		= sas_queuecommand,
91 	.dma_need_drain		= ata_scsi_dma_need_drain,
92 	.target_alloc		= sas_target_alloc,
93 	.slave_configure	= sas_slave_configure,
94 	.scan_finished		= pm8001_scan_finished,
95 	.scan_start		= pm8001_scan_start,
96 	.change_queue_depth	= sas_change_queue_depth,
97 	.bios_param		= sas_bios_param,
98 	.can_queue		= 1,
99 	.this_id		= -1,
100 	.sg_tablesize		= PM8001_MAX_DMA_SG,
101 	.max_sectors		= SCSI_DEFAULT_MAX_SECTORS,
102 	.eh_device_reset_handler = sas_eh_device_reset_handler,
103 	.eh_target_reset_handler = sas_eh_target_reset_handler,
104 	.slave_alloc		= sas_slave_alloc,
105 	.target_destroy		= sas_target_destroy,
106 	.ioctl			= sas_ioctl,
107 #ifdef CONFIG_COMPAT
108 	.compat_ioctl		= sas_ioctl,
109 #endif
110 	.shost_attrs		= pm8001_host_attrs,
111 	.track_queue_depth	= 1,
112 };
113 
114 /*
115  * Sas layer call this function to execute specific task.
116  */
117 static struct sas_domain_function_template pm8001_transport_ops = {
118 	.lldd_dev_found		= pm8001_dev_found,
119 	.lldd_dev_gone		= pm8001_dev_gone,
120 
121 	.lldd_execute_task	= pm8001_queue_command,
122 	.lldd_control_phy	= pm8001_phy_control,
123 
124 	.lldd_abort_task	= pm8001_abort_task,
125 	.lldd_abort_task_set	= pm8001_abort_task_set,
126 	.lldd_clear_aca		= pm8001_clear_aca,
127 	.lldd_clear_task_set	= pm8001_clear_task_set,
128 	.lldd_I_T_nexus_reset   = pm8001_I_T_nexus_reset,
129 	.lldd_lu_reset		= pm8001_lu_reset,
130 	.lldd_query_task	= pm8001_query_task,
131 };
132 
133 /**
134  * pm8001_phy_init - initiate our adapter phys
135  * @pm8001_ha: our hba structure.
136  * @phy_id: phy id.
137  */
138 static void pm8001_phy_init(struct pm8001_hba_info *pm8001_ha, int phy_id)
139 {
140 	struct pm8001_phy *phy = &pm8001_ha->phy[phy_id];
141 	struct asd_sas_phy *sas_phy = &phy->sas_phy;
142 	phy->phy_state = PHY_LINK_DISABLE;
143 	phy->pm8001_ha = pm8001_ha;
144 	sas_phy->enabled = (phy_id < pm8001_ha->chip->n_phy) ? 1 : 0;
145 	sas_phy->class = SAS;
146 	sas_phy->iproto = SAS_PROTOCOL_ALL;
147 	sas_phy->tproto = 0;
148 	sas_phy->type = PHY_TYPE_PHYSICAL;
149 	sas_phy->role = PHY_ROLE_INITIATOR;
150 	sas_phy->oob_mode = OOB_NOT_CONNECTED;
151 	sas_phy->linkrate = SAS_LINK_RATE_UNKNOWN;
152 	sas_phy->id = phy_id;
153 	sas_phy->sas_addr = (u8 *)&phy->dev_sas_addr;
154 	sas_phy->frame_rcvd = &phy->frame_rcvd[0];
155 	sas_phy->ha = (struct sas_ha_struct *)pm8001_ha->shost->hostdata;
156 	sas_phy->lldd_phy = phy;
157 }
158 
159 /**
160  * pm8001_free - free hba
161  * @pm8001_ha:	our hba structure.
162  */
163 static void pm8001_free(struct pm8001_hba_info *pm8001_ha)
164 {
165 	int i;
166 
167 	if (!pm8001_ha)
168 		return;
169 
170 	for (i = 0; i < USI_MAX_MEMCNT; i++) {
171 		if (pm8001_ha->memoryMap.region[i].virt_ptr != NULL) {
172 			dma_free_coherent(&pm8001_ha->pdev->dev,
173 				(pm8001_ha->memoryMap.region[i].total_len +
174 				pm8001_ha->memoryMap.region[i].alignment),
175 				pm8001_ha->memoryMap.region[i].virt_ptr,
176 				pm8001_ha->memoryMap.region[i].phys_addr);
177 			}
178 	}
179 	PM8001_CHIP_DISP->chip_iounmap(pm8001_ha);
180 	flush_workqueue(pm8001_wq);
181 	kfree(pm8001_ha->tags);
182 	kfree(pm8001_ha);
183 }
184 
185 #ifdef PM8001_USE_TASKLET
186 
187 /**
188  * pm8001_tasklet() - tasklet for 64 msi-x interrupt handler
189  * @opaque: the passed general host adapter struct
190  * Note: pm8001_tasklet is common for pm8001 & pm80xx
191  */
192 static void pm8001_tasklet(unsigned long opaque)
193 {
194 	struct pm8001_hba_info *pm8001_ha;
195 	struct isr_param *irq_vector;
196 
197 	irq_vector = (struct isr_param *)opaque;
198 	pm8001_ha = irq_vector->drv_inst;
199 	if (unlikely(!pm8001_ha))
200 		BUG_ON(1);
201 	PM8001_CHIP_DISP->isr(pm8001_ha, irq_vector->irq_id);
202 }
203 #endif
204 
205 /**
206  * pm8001_interrupt_handler_msix - main MSIX interrupt handler.
207  * It obtains the vector number and calls the equivalent bottom
208  * half or services directly.
209  * @irq: interrupt number
210  * @opaque: the passed outbound queue/vector. Host structure is
211  * retrieved from the same.
212  */
213 static irqreturn_t pm8001_interrupt_handler_msix(int irq, void *opaque)
214 {
215 	struct isr_param *irq_vector;
216 	struct pm8001_hba_info *pm8001_ha;
217 	irqreturn_t ret = IRQ_HANDLED;
218 	irq_vector = (struct isr_param *)opaque;
219 	pm8001_ha = irq_vector->drv_inst;
220 
221 	if (unlikely(!pm8001_ha))
222 		return IRQ_NONE;
223 	if (!PM8001_CHIP_DISP->is_our_interrupt(pm8001_ha))
224 		return IRQ_NONE;
225 #ifdef PM8001_USE_TASKLET
226 	tasklet_schedule(&pm8001_ha->tasklet[irq_vector->irq_id]);
227 #else
228 	ret = PM8001_CHIP_DISP->isr(pm8001_ha, irq_vector->irq_id);
229 #endif
230 	return ret;
231 }
232 
233 /**
234  * pm8001_interrupt_handler_intx - main INTx interrupt handler.
235  * @irq: interrupt number
236  * @dev_id: sas_ha structure. The HBA is retrieved from sas_has structure.
237  */
238 
239 static irqreturn_t pm8001_interrupt_handler_intx(int irq, void *dev_id)
240 {
241 	struct pm8001_hba_info *pm8001_ha;
242 	irqreturn_t ret = IRQ_HANDLED;
243 	struct sas_ha_struct *sha = dev_id;
244 	pm8001_ha = sha->lldd_ha;
245 	if (unlikely(!pm8001_ha))
246 		return IRQ_NONE;
247 	if (!PM8001_CHIP_DISP->is_our_interrupt(pm8001_ha))
248 		return IRQ_NONE;
249 
250 #ifdef PM8001_USE_TASKLET
251 	tasklet_schedule(&pm8001_ha->tasklet[0]);
252 #else
253 	ret = PM8001_CHIP_DISP->isr(pm8001_ha, 0);
254 #endif
255 	return ret;
256 }
257 
258 static u32 pm8001_setup_irq(struct pm8001_hba_info *pm8001_ha);
259 static u32 pm8001_request_irq(struct pm8001_hba_info *pm8001_ha);
260 
261 /**
262  * pm8001_alloc - initiate our hba structure and 6 DMAs area.
263  * @pm8001_ha: our hba structure.
264  * @ent: PCI device ID structure to match on
265  */
266 static int pm8001_alloc(struct pm8001_hba_info *pm8001_ha,
267 			const struct pci_device_id *ent)
268 {
269 	int i, count = 0, rc = 0;
270 	u32 ci_offset, ib_offset, ob_offset, pi_offset;
271 	struct inbound_queue_table *ibq;
272 	struct outbound_queue_table *obq;
273 
274 	spin_lock_init(&pm8001_ha->lock);
275 	spin_lock_init(&pm8001_ha->bitmap_lock);
276 	pm8001_dbg(pm8001_ha, INIT, "pm8001_alloc: PHY:%x\n",
277 		   pm8001_ha->chip->n_phy);
278 
279 	/* Setup Interrupt */
280 	rc = pm8001_setup_irq(pm8001_ha);
281 	if (rc) {
282 		pm8001_dbg(pm8001_ha, FAIL,
283 			   "pm8001_setup_irq failed [ret: %d]\n", rc);
284 		goto err_out_shost;
285 	}
286 	/* Request Interrupt */
287 	rc = pm8001_request_irq(pm8001_ha);
288 	if (rc)
289 		goto err_out_shost;
290 
291 	count = pm8001_ha->max_q_num;
292 	/* Queues are chosen based on the number of cores/msix availability */
293 	ib_offset = pm8001_ha->ib_offset  = USI_MAX_MEMCNT_BASE;
294 	ci_offset = pm8001_ha->ci_offset  = ib_offset + count;
295 	ob_offset = pm8001_ha->ob_offset  = ci_offset + count;
296 	pi_offset = pm8001_ha->pi_offset  = ob_offset + count;
297 	pm8001_ha->max_memcnt = pi_offset + count;
298 
299 	for (i = 0; i < pm8001_ha->chip->n_phy; i++) {
300 		pm8001_phy_init(pm8001_ha, i);
301 		pm8001_ha->port[i].wide_port_phymap = 0;
302 		pm8001_ha->port[i].port_attached = 0;
303 		pm8001_ha->port[i].port_state = 0;
304 		INIT_LIST_HEAD(&pm8001_ha->port[i].list);
305 	}
306 
307 	/* MPI Memory region 1 for AAP Event Log for fw */
308 	pm8001_ha->memoryMap.region[AAP1].num_elements = 1;
309 	pm8001_ha->memoryMap.region[AAP1].element_size = PM8001_EVENT_LOG_SIZE;
310 	pm8001_ha->memoryMap.region[AAP1].total_len = PM8001_EVENT_LOG_SIZE;
311 	pm8001_ha->memoryMap.region[AAP1].alignment = 32;
312 
313 	/* MPI Memory region 2 for IOP Event Log for fw */
314 	pm8001_ha->memoryMap.region[IOP].num_elements = 1;
315 	pm8001_ha->memoryMap.region[IOP].element_size = PM8001_EVENT_LOG_SIZE;
316 	pm8001_ha->memoryMap.region[IOP].total_len = PM8001_EVENT_LOG_SIZE;
317 	pm8001_ha->memoryMap.region[IOP].alignment = 32;
318 
319 	for (i = 0; i < count; i++) {
320 		ibq = &pm8001_ha->inbnd_q_tbl[i];
321 		spin_lock_init(&ibq->iq_lock);
322 		/* MPI Memory region 3 for consumer Index of inbound queues */
323 		pm8001_ha->memoryMap.region[ci_offset+i].num_elements = 1;
324 		pm8001_ha->memoryMap.region[ci_offset+i].element_size = 4;
325 		pm8001_ha->memoryMap.region[ci_offset+i].total_len = 4;
326 		pm8001_ha->memoryMap.region[ci_offset+i].alignment = 4;
327 
328 		if ((ent->driver_data) != chip_8001) {
329 			/* MPI Memory region 5 inbound queues */
330 			pm8001_ha->memoryMap.region[ib_offset+i].num_elements =
331 						PM8001_MPI_QUEUE;
332 			pm8001_ha->memoryMap.region[ib_offset+i].element_size
333 								= 128;
334 			pm8001_ha->memoryMap.region[ib_offset+i].total_len =
335 						PM8001_MPI_QUEUE * 128;
336 			pm8001_ha->memoryMap.region[ib_offset+i].alignment
337 								= 128;
338 		} else {
339 			pm8001_ha->memoryMap.region[ib_offset+i].num_elements =
340 						PM8001_MPI_QUEUE;
341 			pm8001_ha->memoryMap.region[ib_offset+i].element_size
342 								= 64;
343 			pm8001_ha->memoryMap.region[ib_offset+i].total_len =
344 						PM8001_MPI_QUEUE * 64;
345 			pm8001_ha->memoryMap.region[ib_offset+i].alignment = 64;
346 		}
347 	}
348 
349 	for (i = 0; i < count; i++) {
350 		obq = &pm8001_ha->outbnd_q_tbl[i];
351 		spin_lock_init(&obq->oq_lock);
352 		/* MPI Memory region 4 for producer Index of outbound queues */
353 		pm8001_ha->memoryMap.region[pi_offset+i].num_elements = 1;
354 		pm8001_ha->memoryMap.region[pi_offset+i].element_size = 4;
355 		pm8001_ha->memoryMap.region[pi_offset+i].total_len = 4;
356 		pm8001_ha->memoryMap.region[pi_offset+i].alignment = 4;
357 
358 		if (ent->driver_data != chip_8001) {
359 			/* MPI Memory region 6 Outbound queues */
360 			pm8001_ha->memoryMap.region[ob_offset+i].num_elements =
361 						PM8001_MPI_QUEUE;
362 			pm8001_ha->memoryMap.region[ob_offset+i].element_size
363 								= 128;
364 			pm8001_ha->memoryMap.region[ob_offset+i].total_len =
365 						PM8001_MPI_QUEUE * 128;
366 			pm8001_ha->memoryMap.region[ob_offset+i].alignment
367 								= 128;
368 		} else {
369 			/* MPI Memory region 6 Outbound queues */
370 			pm8001_ha->memoryMap.region[ob_offset+i].num_elements =
371 						PM8001_MPI_QUEUE;
372 			pm8001_ha->memoryMap.region[ob_offset+i].element_size
373 								= 64;
374 			pm8001_ha->memoryMap.region[ob_offset+i].total_len =
375 						PM8001_MPI_QUEUE * 64;
376 			pm8001_ha->memoryMap.region[ob_offset+i].alignment = 64;
377 		}
378 
379 	}
380 	/* Memory region write DMA*/
381 	pm8001_ha->memoryMap.region[NVMD].num_elements = 1;
382 	pm8001_ha->memoryMap.region[NVMD].element_size = 4096;
383 	pm8001_ha->memoryMap.region[NVMD].total_len = 4096;
384 
385 	/* Memory region for fw flash */
386 	pm8001_ha->memoryMap.region[FW_FLASH].total_len = 4096;
387 
388 	pm8001_ha->memoryMap.region[FORENSIC_MEM].num_elements = 1;
389 	pm8001_ha->memoryMap.region[FORENSIC_MEM].total_len = 0x10000;
390 	pm8001_ha->memoryMap.region[FORENSIC_MEM].element_size = 0x10000;
391 	pm8001_ha->memoryMap.region[FORENSIC_MEM].alignment = 0x10000;
392 	for (i = 0; i < pm8001_ha->max_memcnt; i++) {
393 		struct mpi_mem *region = &pm8001_ha->memoryMap.region[i];
394 
395 		if (pm8001_mem_alloc(pm8001_ha->pdev,
396 				     &region->virt_ptr,
397 				     &region->phys_addr,
398 				     &region->phys_addr_hi,
399 				     &region->phys_addr_lo,
400 				     region->total_len,
401 				     region->alignment) != 0) {
402 			pm8001_dbg(pm8001_ha, FAIL, "Mem%d alloc failed\n", i);
403 			goto err_out;
404 		}
405 	}
406 
407 	/* Memory region for devices*/
408 	pm8001_ha->devices = kzalloc(PM8001_MAX_DEVICES
409 				* sizeof(struct pm8001_device), GFP_KERNEL);
410 	if (!pm8001_ha->devices) {
411 		rc = -ENOMEM;
412 		goto err_out_nodev;
413 	}
414 	for (i = 0; i < PM8001_MAX_DEVICES; i++) {
415 		pm8001_ha->devices[i].dev_type = SAS_PHY_UNUSED;
416 		pm8001_ha->devices[i].id = i;
417 		pm8001_ha->devices[i].device_id = PM8001_MAX_DEVICES;
418 		atomic_set(&pm8001_ha->devices[i].running_req, 0);
419 	}
420 	pm8001_ha->flags = PM8001F_INIT_TIME;
421 	/* Initialize tags */
422 	pm8001_tag_init(pm8001_ha);
423 	return 0;
424 
425 err_out_shost:
426 	scsi_remove_host(pm8001_ha->shost);
427 err_out_nodev:
428 	for (i = 0; i < pm8001_ha->max_memcnt; i++) {
429 		if (pm8001_ha->memoryMap.region[i].virt_ptr != NULL) {
430 			dma_free_coherent(&pm8001_ha->pdev->dev,
431 				(pm8001_ha->memoryMap.region[i].total_len +
432 				pm8001_ha->memoryMap.region[i].alignment),
433 				pm8001_ha->memoryMap.region[i].virt_ptr,
434 				pm8001_ha->memoryMap.region[i].phys_addr);
435 		}
436 	}
437 err_out:
438 	return 1;
439 }
440 
441 /**
442  * pm8001_ioremap - remap the pci high physical address to kernal virtual
443  * address so that we can access them.
444  * @pm8001_ha:our hba structure.
445  */
446 static int pm8001_ioremap(struct pm8001_hba_info *pm8001_ha)
447 {
448 	u32 bar;
449 	u32 logicalBar = 0;
450 	struct pci_dev *pdev;
451 
452 	pdev = pm8001_ha->pdev;
453 	/* map pci mem (PMC pci base 0-3)*/
454 	for (bar = 0; bar < PCI_STD_NUM_BARS; bar++) {
455 		/*
456 		** logical BARs for SPC:
457 		** bar 0 and 1 - logical BAR0
458 		** bar 2 and 3 - logical BAR1
459 		** bar4 - logical BAR2
460 		** bar5 - logical BAR3
461 		** Skip the appropriate assignments:
462 		*/
463 		if ((bar == 1) || (bar == 3))
464 			continue;
465 		if (pci_resource_flags(pdev, bar) & IORESOURCE_MEM) {
466 			pm8001_ha->io_mem[logicalBar].membase =
467 				pci_resource_start(pdev, bar);
468 			pm8001_ha->io_mem[logicalBar].memsize =
469 				pci_resource_len(pdev, bar);
470 			pm8001_ha->io_mem[logicalBar].memvirtaddr =
471 				ioremap(pm8001_ha->io_mem[logicalBar].membase,
472 				pm8001_ha->io_mem[logicalBar].memsize);
473 			if (!pm8001_ha->io_mem[logicalBar].memvirtaddr) {
474 				pm8001_dbg(pm8001_ha, INIT,
475 					"Failed to ioremap bar %d, logicalBar %d",
476 				   bar, logicalBar);
477 				return -ENOMEM;
478 			}
479 			pm8001_dbg(pm8001_ha, INIT,
480 				   "base addr %llx virt_addr=%llx len=%d\n",
481 				   (u64)pm8001_ha->io_mem[logicalBar].membase,
482 				   (u64)(unsigned long)
483 				   pm8001_ha->io_mem[logicalBar].memvirtaddr,
484 				   pm8001_ha->io_mem[logicalBar].memsize);
485 		} else {
486 			pm8001_ha->io_mem[logicalBar].membase	= 0;
487 			pm8001_ha->io_mem[logicalBar].memsize	= 0;
488 			pm8001_ha->io_mem[logicalBar].memvirtaddr = NULL;
489 		}
490 		logicalBar++;
491 	}
492 	return 0;
493 }
494 
495 /**
496  * pm8001_pci_alloc - initialize our ha card structure
497  * @pdev: pci device.
498  * @ent: ent
499  * @shost: scsi host struct which has been initialized before.
500  */
501 static struct pm8001_hba_info *pm8001_pci_alloc(struct pci_dev *pdev,
502 				 const struct pci_device_id *ent,
503 				struct Scsi_Host *shost)
504 
505 {
506 	struct pm8001_hba_info *pm8001_ha;
507 	struct sas_ha_struct *sha = SHOST_TO_SAS_HA(shost);
508 	int j;
509 
510 	pm8001_ha = sha->lldd_ha;
511 	if (!pm8001_ha)
512 		return NULL;
513 
514 	pm8001_ha->pdev = pdev;
515 	pm8001_ha->dev = &pdev->dev;
516 	pm8001_ha->chip_id = ent->driver_data;
517 	pm8001_ha->chip = &pm8001_chips[pm8001_ha->chip_id];
518 	pm8001_ha->irq = pdev->irq;
519 	pm8001_ha->sas = sha;
520 	pm8001_ha->shost = shost;
521 	pm8001_ha->id = pm8001_id++;
522 	pm8001_ha->logging_level = logging_level;
523 	pm8001_ha->non_fatal_count = 0;
524 	if (link_rate >= 1 && link_rate <= 15)
525 		pm8001_ha->link_rate = (link_rate << 8);
526 	else {
527 		pm8001_ha->link_rate = LINKRATE_15 | LINKRATE_30 |
528 			LINKRATE_60 | LINKRATE_120;
529 		pm8001_dbg(pm8001_ha, FAIL,
530 			   "Setting link rate to default value\n");
531 	}
532 	sprintf(pm8001_ha->name, "%s%d", DRV_NAME, pm8001_ha->id);
533 	/* IOMB size is 128 for 8088/89 controllers */
534 	if (pm8001_ha->chip_id != chip_8001)
535 		pm8001_ha->iomb_size = IOMB_SIZE_SPCV;
536 	else
537 		pm8001_ha->iomb_size = IOMB_SIZE_SPC;
538 
539 #ifdef PM8001_USE_TASKLET
540 	/* Tasklet for non msi-x interrupt handler */
541 	if ((!pdev->msix_cap || !pci_msi_enabled())
542 	    || (pm8001_ha->chip_id == chip_8001))
543 		tasklet_init(&pm8001_ha->tasklet[0], pm8001_tasklet,
544 			(unsigned long)&(pm8001_ha->irq_vector[0]));
545 	else
546 		for (j = 0; j < PM8001_MAX_MSIX_VEC; j++)
547 			tasklet_init(&pm8001_ha->tasklet[j], pm8001_tasklet,
548 				(unsigned long)&(pm8001_ha->irq_vector[j]));
549 #endif
550 	if (pm8001_ioremap(pm8001_ha))
551 		goto failed_pci_alloc;
552 	if (!pm8001_alloc(pm8001_ha, ent))
553 		return pm8001_ha;
554 failed_pci_alloc:
555 	pm8001_free(pm8001_ha);
556 	return NULL;
557 }
558 
559 /**
560  * pci_go_44 - pm8001 specified, its DMA is 44 bit rather than 64 bit
561  * @pdev: pci device.
562  */
563 static int pci_go_44(struct pci_dev *pdev)
564 {
565 	int rc;
566 
567 	rc = dma_set_mask_and_coherent(&pdev->dev, DMA_BIT_MASK(44));
568 	if (rc) {
569 		rc = dma_set_mask_and_coherent(&pdev->dev, DMA_BIT_MASK(32));
570 		if (rc)
571 			dev_printk(KERN_ERR, &pdev->dev,
572 				"32-bit DMA enable failed\n");
573 	}
574 	return rc;
575 }
576 
577 /**
578  * pm8001_prep_sas_ha_init - allocate memory in general hba struct && init them.
579  * @shost: scsi host which has been allocated outside.
580  * @chip_info: our ha struct.
581  */
582 static int pm8001_prep_sas_ha_init(struct Scsi_Host *shost,
583 				   const struct pm8001_chip_info *chip_info)
584 {
585 	int phy_nr, port_nr;
586 	struct asd_sas_phy **arr_phy;
587 	struct asd_sas_port **arr_port;
588 	struct sas_ha_struct *sha = SHOST_TO_SAS_HA(shost);
589 
590 	phy_nr = chip_info->n_phy;
591 	port_nr = phy_nr;
592 	memset(sha, 0x00, sizeof(*sha));
593 	arr_phy = kcalloc(phy_nr, sizeof(void *), GFP_KERNEL);
594 	if (!arr_phy)
595 		goto exit;
596 	arr_port = kcalloc(port_nr, sizeof(void *), GFP_KERNEL);
597 	if (!arr_port)
598 		goto exit_free2;
599 
600 	sha->sas_phy = arr_phy;
601 	sha->sas_port = arr_port;
602 	sha->lldd_ha = kzalloc(sizeof(struct pm8001_hba_info), GFP_KERNEL);
603 	if (!sha->lldd_ha)
604 		goto exit_free1;
605 
606 	shost->transportt = pm8001_stt;
607 	shost->max_id = PM8001_MAX_DEVICES;
608 	shost->max_lun = 8;
609 	shost->max_channel = 0;
610 	shost->unique_id = pm8001_id;
611 	shost->max_cmd_len = 16;
612 	shost->can_queue = PM8001_CAN_QUEUE;
613 	shost->cmd_per_lun = 32;
614 	return 0;
615 exit_free1:
616 	kfree(arr_port);
617 exit_free2:
618 	kfree(arr_phy);
619 exit:
620 	return -1;
621 }
622 
623 /**
624  * pm8001_post_sas_ha_init - initialize general hba struct defined in libsas
625  * @shost: scsi host which has been allocated outside
626  * @chip_info: our ha struct.
627  */
628 static void  pm8001_post_sas_ha_init(struct Scsi_Host *shost,
629 				     const struct pm8001_chip_info *chip_info)
630 {
631 	int i = 0;
632 	struct pm8001_hba_info *pm8001_ha;
633 	struct sas_ha_struct *sha = SHOST_TO_SAS_HA(shost);
634 
635 	pm8001_ha = sha->lldd_ha;
636 	for (i = 0; i < chip_info->n_phy; i++) {
637 		sha->sas_phy[i] = &pm8001_ha->phy[i].sas_phy;
638 		sha->sas_port[i] = &pm8001_ha->port[i].sas_port;
639 		sha->sas_phy[i]->sas_addr =
640 			(u8 *)&pm8001_ha->phy[i].dev_sas_addr;
641 	}
642 	sha->sas_ha_name = DRV_NAME;
643 	sha->dev = pm8001_ha->dev;
644 	sha->strict_wide_ports = 1;
645 	sha->lldd_module = THIS_MODULE;
646 	sha->sas_addr = &pm8001_ha->sas_addr[0];
647 	sha->num_phys = chip_info->n_phy;
648 	sha->core.shost = shost;
649 }
650 
651 /**
652  * pm8001_init_sas_add - initialize sas address
653  * @pm8001_ha: our ha struct.
654  *
655  * Currently we just set the fixed SAS address to our HBA,for manufacture,
656  * it should read from the EEPROM
657  */
658 static void pm8001_init_sas_add(struct pm8001_hba_info *pm8001_ha)
659 {
660 	u8 i, j;
661 	u8 sas_add[8];
662 #ifdef PM8001_READ_VPD
663 	/* For new SPC controllers WWN is stored in flash vpd
664 	*  For SPC/SPCve controllers WWN is stored in EEPROM
665 	*  For Older SPC WWN is stored in NVMD
666 	*/
667 	DECLARE_COMPLETION_ONSTACK(completion);
668 	struct pm8001_ioctl_payload payload;
669 	u16 deviceid;
670 	int rc;
671 
672 	pci_read_config_word(pm8001_ha->pdev, PCI_DEVICE_ID, &deviceid);
673 	pm8001_ha->nvmd_completion = &completion;
674 
675 	if (pm8001_ha->chip_id == chip_8001) {
676 		if (deviceid == 0x8081 || deviceid == 0x0042) {
677 			payload.minor_function = 4;
678 			payload.rd_length = 4096;
679 		} else {
680 			payload.minor_function = 0;
681 			payload.rd_length = 128;
682 		}
683 	} else if ((pm8001_ha->chip_id == chip_8070 ||
684 			pm8001_ha->chip_id == chip_8072) &&
685 			pm8001_ha->pdev->subsystem_vendor == PCI_VENDOR_ID_ATTO) {
686 		payload.minor_function = 4;
687 		payload.rd_length = 4096;
688 	} else {
689 		payload.minor_function = 1;
690 		payload.rd_length = 4096;
691 	}
692 	payload.offset = 0;
693 	payload.func_specific = kzalloc(payload.rd_length, GFP_KERNEL);
694 	if (!payload.func_specific) {
695 		pm8001_dbg(pm8001_ha, INIT, "mem alloc fail\n");
696 		return;
697 	}
698 	rc = PM8001_CHIP_DISP->get_nvmd_req(pm8001_ha, &payload);
699 	if (rc) {
700 		kfree(payload.func_specific);
701 		pm8001_dbg(pm8001_ha, INIT, "nvmd failed\n");
702 		return;
703 	}
704 	wait_for_completion(&completion);
705 
706 	for (i = 0, j = 0; i <= 7; i++, j++) {
707 		if (pm8001_ha->chip_id == chip_8001) {
708 			if (deviceid == 0x8081)
709 				pm8001_ha->sas_addr[j] =
710 					payload.func_specific[0x704 + i];
711 			else if (deviceid == 0x0042)
712 				pm8001_ha->sas_addr[j] =
713 					payload.func_specific[0x010 + i];
714 		} else if ((pm8001_ha->chip_id == chip_8070 ||
715 				pm8001_ha->chip_id == chip_8072) &&
716 				pm8001_ha->pdev->subsystem_vendor == PCI_VENDOR_ID_ATTO) {
717 			pm8001_ha->sas_addr[j] =
718 					payload.func_specific[0x010 + i];
719 		} else
720 			pm8001_ha->sas_addr[j] =
721 					payload.func_specific[0x804 + i];
722 	}
723 	memcpy(sas_add, pm8001_ha->sas_addr, SAS_ADDR_SIZE);
724 	for (i = 0; i < pm8001_ha->chip->n_phy; i++) {
725 		if (i && ((i % 4) == 0))
726 			sas_add[7] = sas_add[7] + 4;
727 		memcpy(&pm8001_ha->phy[i].dev_sas_addr,
728 			sas_add, SAS_ADDR_SIZE);
729 		pm8001_dbg(pm8001_ha, INIT, "phy %d sas_addr = %016llx\n", i,
730 			   pm8001_ha->phy[i].dev_sas_addr);
731 	}
732 	kfree(payload.func_specific);
733 #else
734 	for (i = 0; i < pm8001_ha->chip->n_phy; i++) {
735 		pm8001_ha->phy[i].dev_sas_addr = 0x50010c600047f9d0ULL;
736 		pm8001_ha->phy[i].dev_sas_addr =
737 			cpu_to_be64((u64)
738 				(*(u64 *)&pm8001_ha->phy[i].dev_sas_addr));
739 	}
740 	memcpy(pm8001_ha->sas_addr, &pm8001_ha->phy[0].dev_sas_addr,
741 		SAS_ADDR_SIZE);
742 #endif
743 }
744 
745 /*
746  * pm8001_get_phy_settings_info : Read phy setting values.
747  * @pm8001_ha : our hba.
748  */
749 static int pm8001_get_phy_settings_info(struct pm8001_hba_info *pm8001_ha)
750 {
751 
752 #ifdef PM8001_READ_VPD
753 	/*OPTION ROM FLASH read for the SPC cards */
754 	DECLARE_COMPLETION_ONSTACK(completion);
755 	struct pm8001_ioctl_payload payload;
756 	int rc;
757 
758 	pm8001_ha->nvmd_completion = &completion;
759 	/* SAS ADDRESS read from flash / EEPROM */
760 	payload.minor_function = 6;
761 	payload.offset = 0;
762 	payload.rd_length = 4096;
763 	payload.func_specific = kzalloc(4096, GFP_KERNEL);
764 	if (!payload.func_specific)
765 		return -ENOMEM;
766 	/* Read phy setting values from flash */
767 	rc = PM8001_CHIP_DISP->get_nvmd_req(pm8001_ha, &payload);
768 	if (rc) {
769 		kfree(payload.func_specific);
770 		pm8001_dbg(pm8001_ha, INIT, "nvmd failed\n");
771 		return -ENOMEM;
772 	}
773 	wait_for_completion(&completion);
774 	pm8001_set_phy_profile(pm8001_ha, sizeof(u8), payload.func_specific);
775 	kfree(payload.func_specific);
776 #endif
777 	return 0;
778 }
779 
780 struct pm8001_mpi3_phy_pg_trx_config {
781 	u32 LaneLosCfg;
782 	u32 LanePgaCfg1;
783 	u32 LanePisoCfg1;
784 	u32 LanePisoCfg2;
785 	u32 LanePisoCfg3;
786 	u32 LanePisoCfg4;
787 	u32 LanePisoCfg5;
788 	u32 LanePisoCfg6;
789 	u32 LaneBctCtrl;
790 };
791 
792 /**
793  * pm8001_get_internal_phy_settings : Retrieves the internal PHY settings
794  * @pm8001_ha : our adapter
795  * @phycfg : PHY config page to populate
796  */
797 static
798 void pm8001_get_internal_phy_settings(struct pm8001_hba_info *pm8001_ha,
799 		struct pm8001_mpi3_phy_pg_trx_config *phycfg)
800 {
801 	phycfg->LaneLosCfg   = 0x00000132;
802 	phycfg->LanePgaCfg1  = 0x00203949;
803 	phycfg->LanePisoCfg1 = 0x000000FF;
804 	phycfg->LanePisoCfg2 = 0xFF000001;
805 	phycfg->LanePisoCfg3 = 0xE7011300;
806 	phycfg->LanePisoCfg4 = 0x631C40C0;
807 	phycfg->LanePisoCfg5 = 0xF8102036;
808 	phycfg->LanePisoCfg6 = 0xF74A1000;
809 	phycfg->LaneBctCtrl  = 0x00FB33F8;
810 }
811 
812 /**
813  * pm8001_get_external_phy_settings : Retrieves the external PHY settings
814  * @pm8001_ha : our adapter
815  * @phycfg : PHY config page to populate
816  */
817 static
818 void pm8001_get_external_phy_settings(struct pm8001_hba_info *pm8001_ha,
819 		struct pm8001_mpi3_phy_pg_trx_config *phycfg)
820 {
821 	phycfg->LaneLosCfg   = 0x00000132;
822 	phycfg->LanePgaCfg1  = 0x00203949;
823 	phycfg->LanePisoCfg1 = 0x000000FF;
824 	phycfg->LanePisoCfg2 = 0xFF000001;
825 	phycfg->LanePisoCfg3 = 0xE7011300;
826 	phycfg->LanePisoCfg4 = 0x63349140;
827 	phycfg->LanePisoCfg5 = 0xF8102036;
828 	phycfg->LanePisoCfg6 = 0xF80D9300;
829 	phycfg->LaneBctCtrl  = 0x00FB33F8;
830 }
831 
832 /**
833  * pm8001_get_phy_mask : Retrieves the mask that denotes if a PHY is int/ext
834  * @pm8001_ha : our adapter
835  * @phymask : The PHY mask
836  */
837 static
838 void pm8001_get_phy_mask(struct pm8001_hba_info *pm8001_ha, int *phymask)
839 {
840 	switch (pm8001_ha->pdev->subsystem_device) {
841 	case 0x0070: /* H1280 - 8 external 0 internal */
842 	case 0x0072: /* H12F0 - 16 external 0 internal */
843 		*phymask = 0x0000;
844 		break;
845 
846 	case 0x0071: /* H1208 - 0 external 8 internal */
847 	case 0x0073: /* H120F - 0 external 16 internal */
848 		*phymask = 0xFFFF;
849 		break;
850 
851 	case 0x0080: /* H1244 - 4 external 4 internal */
852 		*phymask = 0x00F0;
853 		break;
854 
855 	case 0x0081: /* H1248 - 4 external 8 internal */
856 		*phymask = 0x0FF0;
857 		break;
858 
859 	case 0x0082: /* H1288 - 8 external 8 internal */
860 		*phymask = 0xFF00;
861 		break;
862 
863 	default:
864 		pm8001_dbg(pm8001_ha, INIT,
865 			   "Unknown subsystem device=0x%.04x\n",
866 			   pm8001_ha->pdev->subsystem_device);
867 	}
868 }
869 
870 /**
871  * pm8001_set_phy_settings_ven_117c_12G() : Configure ATTO 12Gb PHY settings
872  * @pm8001_ha : our adapter
873  */
874 static
875 int pm8001_set_phy_settings_ven_117c_12G(struct pm8001_hba_info *pm8001_ha)
876 {
877 	struct pm8001_mpi3_phy_pg_trx_config phycfg_int;
878 	struct pm8001_mpi3_phy_pg_trx_config phycfg_ext;
879 	int phymask = 0;
880 	int i = 0;
881 
882 	memset(&phycfg_int, 0, sizeof(phycfg_int));
883 	memset(&phycfg_ext, 0, sizeof(phycfg_ext));
884 
885 	pm8001_get_internal_phy_settings(pm8001_ha, &phycfg_int);
886 	pm8001_get_external_phy_settings(pm8001_ha, &phycfg_ext);
887 	pm8001_get_phy_mask(pm8001_ha, &phymask);
888 
889 	for (i = 0; i < pm8001_ha->chip->n_phy; i++) {
890 		if (phymask & (1 << i)) {/* Internal PHY */
891 			pm8001_set_phy_profile_single(pm8001_ha, i,
892 					sizeof(phycfg_int) / sizeof(u32),
893 					(u32 *)&phycfg_int);
894 
895 		} else { /* External PHY */
896 			pm8001_set_phy_profile_single(pm8001_ha, i,
897 					sizeof(phycfg_ext) / sizeof(u32),
898 					(u32 *)&phycfg_ext);
899 		}
900 	}
901 
902 	return 0;
903 }
904 
905 /**
906  * pm8001_configure_phy_settings : Configures PHY settings based on vendor ID.
907  * @pm8001_ha : our hba.
908  */
909 static int pm8001_configure_phy_settings(struct pm8001_hba_info *pm8001_ha)
910 {
911 	switch (pm8001_ha->pdev->subsystem_vendor) {
912 	case PCI_VENDOR_ID_ATTO:
913 		if (pm8001_ha->pdev->device == 0x0042) /* 6Gb */
914 			return 0;
915 		else
916 			return pm8001_set_phy_settings_ven_117c_12G(pm8001_ha);
917 
918 	case PCI_VENDOR_ID_ADAPTEC2:
919 	case 0:
920 		return 0;
921 
922 	default:
923 		return pm8001_get_phy_settings_info(pm8001_ha);
924 	}
925 }
926 
927 #ifdef PM8001_USE_MSIX
928 /**
929  * pm8001_setup_msix - enable MSI-X interrupt
930  * @pm8001_ha: our ha struct.
931  */
932 static u32 pm8001_setup_msix(struct pm8001_hba_info *pm8001_ha)
933 {
934 	u32 number_of_intr;
935 	int rc, cpu_online_count;
936 	unsigned int allocated_irq_vectors;
937 
938 	/* SPCv controllers supports 64 msi-x */
939 	if (pm8001_ha->chip_id == chip_8001) {
940 		number_of_intr = 1;
941 	} else {
942 		number_of_intr = PM8001_MAX_MSIX_VEC;
943 	}
944 
945 	cpu_online_count = num_online_cpus();
946 	number_of_intr = min_t(int, cpu_online_count, number_of_intr);
947 	rc = pci_alloc_irq_vectors(pm8001_ha->pdev, number_of_intr,
948 			number_of_intr, PCI_IRQ_MSIX);
949 	allocated_irq_vectors = rc;
950 	if (rc < 0)
951 		return rc;
952 
953 	/* Assigns the number of interrupts */
954 	number_of_intr = min_t(int, allocated_irq_vectors, number_of_intr);
955 	pm8001_ha->number_of_intr = number_of_intr;
956 
957 	/* Maximum queue number updating in HBA structure */
958 	pm8001_ha->max_q_num = number_of_intr;
959 
960 	pm8001_dbg(pm8001_ha, INIT,
961 		   "pci_alloc_irq_vectors request ret:%d no of intr %d\n",
962 		   rc, pm8001_ha->number_of_intr);
963 	return 0;
964 }
965 
966 static u32 pm8001_request_msix(struct pm8001_hba_info *pm8001_ha)
967 {
968 	u32 i = 0, j = 0;
969 	int flag = 0, rc = 0;
970 	int nr_irqs = pm8001_ha->number_of_intr;
971 
972 	if (pm8001_ha->chip_id != chip_8001)
973 		flag &= ~IRQF_SHARED;
974 
975 	pm8001_dbg(pm8001_ha, INIT,
976 		   "pci_enable_msix request number of intr %d\n",
977 		   pm8001_ha->number_of_intr);
978 
979 	if (nr_irqs > ARRAY_SIZE(pm8001_ha->intr_drvname))
980 		nr_irqs = ARRAY_SIZE(pm8001_ha->intr_drvname);
981 
982 	for (i = 0; i < nr_irqs; i++) {
983 		snprintf(pm8001_ha->intr_drvname[i],
984 			sizeof(pm8001_ha->intr_drvname[0]),
985 			"%s-%d", pm8001_ha->name, i);
986 		pm8001_ha->irq_vector[i].irq_id = i;
987 		pm8001_ha->irq_vector[i].drv_inst = pm8001_ha;
988 
989 		rc = request_irq(pci_irq_vector(pm8001_ha->pdev, i),
990 			pm8001_interrupt_handler_msix, flag,
991 			pm8001_ha->intr_drvname[i],
992 			&(pm8001_ha->irq_vector[i]));
993 		if (rc) {
994 			for (j = 0; j < i; j++) {
995 				free_irq(pci_irq_vector(pm8001_ha->pdev, i),
996 					&(pm8001_ha->irq_vector[i]));
997 			}
998 			pci_free_irq_vectors(pm8001_ha->pdev);
999 			break;
1000 		}
1001 	}
1002 
1003 	return rc;
1004 }
1005 #endif
1006 
1007 static u32 pm8001_setup_irq(struct pm8001_hba_info *pm8001_ha)
1008 {
1009 	struct pci_dev *pdev;
1010 
1011 	pdev = pm8001_ha->pdev;
1012 
1013 #ifdef PM8001_USE_MSIX
1014 	if (pci_find_capability(pdev, PCI_CAP_ID_MSIX))
1015 		return pm8001_setup_msix(pm8001_ha);
1016 	pm8001_dbg(pm8001_ha, INIT, "MSIX not supported!!!\n");
1017 #endif
1018 	return 0;
1019 }
1020 
1021 /**
1022  * pm8001_request_irq - register interrupt
1023  * @pm8001_ha: our ha struct.
1024  */
1025 static u32 pm8001_request_irq(struct pm8001_hba_info *pm8001_ha)
1026 {
1027 	struct pci_dev *pdev;
1028 	int rc;
1029 
1030 	pdev = pm8001_ha->pdev;
1031 
1032 #ifdef PM8001_USE_MSIX
1033 	if (pdev->msix_cap && pci_msi_enabled())
1034 		return pm8001_request_msix(pm8001_ha);
1035 	else {
1036 		pm8001_dbg(pm8001_ha, INIT, "MSIX not supported!!!\n");
1037 		goto intx;
1038 	}
1039 #endif
1040 
1041 intx:
1042 	/* initialize the INT-X interrupt */
1043 	pm8001_ha->irq_vector[0].irq_id = 0;
1044 	pm8001_ha->irq_vector[0].drv_inst = pm8001_ha;
1045 	rc = request_irq(pdev->irq, pm8001_interrupt_handler_intx, IRQF_SHARED,
1046 		pm8001_ha->name, SHOST_TO_SAS_HA(pm8001_ha->shost));
1047 	return rc;
1048 }
1049 
1050 /**
1051  * pm8001_pci_probe - probe supported device
1052  * @pdev: pci device which kernel has been prepared for.
1053  * @ent: pci device id
1054  *
1055  * This function is the main initialization function, when register a new
1056  * pci driver it is invoked, all struct an hardware initilization should be done
1057  * here, also, register interrupt
1058  */
1059 static int pm8001_pci_probe(struct pci_dev *pdev,
1060 			    const struct pci_device_id *ent)
1061 {
1062 	unsigned int rc;
1063 	u32	pci_reg;
1064 	u8	i = 0;
1065 	struct pm8001_hba_info *pm8001_ha;
1066 	struct Scsi_Host *shost = NULL;
1067 	const struct pm8001_chip_info *chip;
1068 	struct sas_ha_struct *sha;
1069 
1070 	dev_printk(KERN_INFO, &pdev->dev,
1071 		"pm80xx: driver version %s\n", DRV_VERSION);
1072 	rc = pci_enable_device(pdev);
1073 	if (rc)
1074 		goto err_out_enable;
1075 	pci_set_master(pdev);
1076 	/*
1077 	 * Enable pci slot busmaster by setting pci command register.
1078 	 * This is required by FW for Cyclone card.
1079 	 */
1080 
1081 	pci_read_config_dword(pdev, PCI_COMMAND, &pci_reg);
1082 	pci_reg |= 0x157;
1083 	pci_write_config_dword(pdev, PCI_COMMAND, pci_reg);
1084 	rc = pci_request_regions(pdev, DRV_NAME);
1085 	if (rc)
1086 		goto err_out_disable;
1087 	rc = pci_go_44(pdev);
1088 	if (rc)
1089 		goto err_out_regions;
1090 
1091 	shost = scsi_host_alloc(&pm8001_sht, sizeof(void *));
1092 	if (!shost) {
1093 		rc = -ENOMEM;
1094 		goto err_out_regions;
1095 	}
1096 	chip = &pm8001_chips[ent->driver_data];
1097 	sha = kzalloc(sizeof(struct sas_ha_struct), GFP_KERNEL);
1098 	if (!sha) {
1099 		rc = -ENOMEM;
1100 		goto err_out_free_host;
1101 	}
1102 	SHOST_TO_SAS_HA(shost) = sha;
1103 
1104 	rc = pm8001_prep_sas_ha_init(shost, chip);
1105 	if (rc) {
1106 		rc = -ENOMEM;
1107 		goto err_out_free;
1108 	}
1109 	pci_set_drvdata(pdev, SHOST_TO_SAS_HA(shost));
1110 	/* ent->driver variable is used to differentiate between controllers */
1111 	pm8001_ha = pm8001_pci_alloc(pdev, ent, shost);
1112 	if (!pm8001_ha) {
1113 		rc = -ENOMEM;
1114 		goto err_out_free;
1115 	}
1116 
1117 	PM8001_CHIP_DISP->chip_soft_rst(pm8001_ha);
1118 	rc = PM8001_CHIP_DISP->chip_init(pm8001_ha);
1119 	if (rc) {
1120 		pm8001_dbg(pm8001_ha, FAIL,
1121 			   "chip_init failed [ret: %d]\n", rc);
1122 		goto err_out_ha_free;
1123 	}
1124 
1125 	rc = pm8001_init_ccb_tag(pm8001_ha, shost, pdev);
1126 	if (rc)
1127 		goto err_out_enable;
1128 
1129 	rc = scsi_add_host(shost, &pdev->dev);
1130 	if (rc)
1131 		goto err_out_ha_free;
1132 
1133 	PM8001_CHIP_DISP->interrupt_enable(pm8001_ha, 0);
1134 	if (pm8001_ha->chip_id != chip_8001) {
1135 		for (i = 1; i < pm8001_ha->number_of_intr; i++)
1136 			PM8001_CHIP_DISP->interrupt_enable(pm8001_ha, i);
1137 		/* setup thermal configuration. */
1138 		pm80xx_set_thermal_config(pm8001_ha);
1139 	}
1140 
1141 	pm8001_init_sas_add(pm8001_ha);
1142 	/* phy setting support for motherboard controller */
1143 	rc = pm8001_configure_phy_settings(pm8001_ha);
1144 	if (rc)
1145 		goto err_out_shost;
1146 
1147 	pm8001_post_sas_ha_init(shost, chip);
1148 	rc = sas_register_ha(SHOST_TO_SAS_HA(shost));
1149 	if (rc) {
1150 		pm8001_dbg(pm8001_ha, FAIL,
1151 			   "sas_register_ha failed [ret: %d]\n", rc);
1152 		goto err_out_shost;
1153 	}
1154 	list_add_tail(&pm8001_ha->list, &hba_list);
1155 	pm8001_ha->flags = PM8001F_RUN_TIME;
1156 	scsi_scan_host(pm8001_ha->shost);
1157 	return 0;
1158 
1159 err_out_shost:
1160 	scsi_remove_host(pm8001_ha->shost);
1161 err_out_ha_free:
1162 	pm8001_free(pm8001_ha);
1163 err_out_free:
1164 	kfree(sha);
1165 err_out_free_host:
1166 	scsi_host_put(shost);
1167 err_out_regions:
1168 	pci_release_regions(pdev);
1169 err_out_disable:
1170 	pci_disable_device(pdev);
1171 err_out_enable:
1172 	return rc;
1173 }
1174 
1175 /*
1176  * pm8001_init_ccb_tag - allocate memory to CCB and tag.
1177  * @pm8001_ha: our hba card information.
1178  * @shost: scsi host which has been allocated outside.
1179  */
1180 static int
1181 pm8001_init_ccb_tag(struct pm8001_hba_info *pm8001_ha, struct Scsi_Host *shost,
1182 			struct pci_dev *pdev)
1183 {
1184 	int i = 0;
1185 	u32 max_out_io, ccb_count;
1186 	u32 can_queue;
1187 
1188 	max_out_io = pm8001_ha->main_cfg_tbl.pm80xx_tbl.max_out_io;
1189 	ccb_count = min_t(int, PM8001_MAX_CCB, max_out_io);
1190 
1191 	/* Update to the scsi host*/
1192 	can_queue = ccb_count - PM8001_RESERVE_SLOT;
1193 	shost->can_queue = can_queue;
1194 
1195 	pm8001_ha->tags = kzalloc(ccb_count, GFP_KERNEL);
1196 	if (!pm8001_ha->tags)
1197 		goto err_out;
1198 
1199 	/* Memory region for ccb_info*/
1200 	pm8001_ha->ccb_info =
1201 		kcalloc(ccb_count, sizeof(struct pm8001_ccb_info), GFP_KERNEL);
1202 	if (!pm8001_ha->ccb_info) {
1203 		pm8001_dbg(pm8001_ha, FAIL,
1204 			   "Unable to allocate memory for ccb\n");
1205 		goto err_out_noccb;
1206 	}
1207 	for (i = 0; i < ccb_count; i++) {
1208 		pm8001_ha->ccb_info[i].buf_prd = dma_alloc_coherent(&pdev->dev,
1209 				sizeof(struct pm8001_prd) * PM8001_MAX_DMA_SG,
1210 				&pm8001_ha->ccb_info[i].ccb_dma_handle,
1211 				GFP_KERNEL);
1212 		if (!pm8001_ha->ccb_info[i].buf_prd) {
1213 			pm8001_dbg(pm8001_ha, FAIL,
1214 				   "ccb prd memory allocation error\n");
1215 			goto err_out;
1216 		}
1217 		pm8001_ha->ccb_info[i].task = NULL;
1218 		pm8001_ha->ccb_info[i].ccb_tag = 0xffffffff;
1219 		pm8001_ha->ccb_info[i].device = NULL;
1220 		++pm8001_ha->tags_num;
1221 	}
1222 	return 0;
1223 
1224 err_out_noccb:
1225 	kfree(pm8001_ha->devices);
1226 err_out:
1227 	return -ENOMEM;
1228 }
1229 
1230 static void pm8001_pci_remove(struct pci_dev *pdev)
1231 {
1232 	struct sas_ha_struct *sha = pci_get_drvdata(pdev);
1233 	struct pm8001_hba_info *pm8001_ha;
1234 	int i, j;
1235 	pm8001_ha = sha->lldd_ha;
1236 	sas_unregister_ha(sha);
1237 	sas_remove_host(pm8001_ha->shost);
1238 	list_del(&pm8001_ha->list);
1239 	PM8001_CHIP_DISP->interrupt_disable(pm8001_ha, 0xFF);
1240 	PM8001_CHIP_DISP->chip_soft_rst(pm8001_ha);
1241 
1242 #ifdef PM8001_USE_MSIX
1243 	for (i = 0; i < pm8001_ha->number_of_intr; i++)
1244 		synchronize_irq(pci_irq_vector(pdev, i));
1245 	for (i = 0; i < pm8001_ha->number_of_intr; i++)
1246 		free_irq(pci_irq_vector(pdev, i), &pm8001_ha->irq_vector[i]);
1247 	pci_free_irq_vectors(pdev);
1248 #else
1249 	free_irq(pm8001_ha->irq, sha);
1250 #endif
1251 #ifdef PM8001_USE_TASKLET
1252 	/* For non-msix and msix interrupts */
1253 	if ((!pdev->msix_cap || !pci_msi_enabled()) ||
1254 	    (pm8001_ha->chip_id == chip_8001))
1255 		tasklet_kill(&pm8001_ha->tasklet[0]);
1256 	else
1257 		for (j = 0; j < PM8001_MAX_MSIX_VEC; j++)
1258 			tasklet_kill(&pm8001_ha->tasklet[j]);
1259 #endif
1260 	scsi_host_put(pm8001_ha->shost);
1261 	pm8001_free(pm8001_ha);
1262 	kfree(sha->sas_phy);
1263 	kfree(sha->sas_port);
1264 	kfree(sha);
1265 	pci_release_regions(pdev);
1266 	pci_disable_device(pdev);
1267 }
1268 
1269 /**
1270  * pm8001_pci_suspend - power management suspend main entry point
1271  * @dev: Device struct
1272  *
1273  * Returns 0 success, anything else error.
1274  */
1275 static int __maybe_unused pm8001_pci_suspend(struct device *dev)
1276 {
1277 	struct pci_dev *pdev = to_pci_dev(dev);
1278 	struct sas_ha_struct *sha = pci_get_drvdata(pdev);
1279 	struct pm8001_hba_info *pm8001_ha = sha->lldd_ha;
1280 	int  i, j;
1281 	sas_suspend_ha(sha);
1282 	flush_workqueue(pm8001_wq);
1283 	scsi_block_requests(pm8001_ha->shost);
1284 	if (!pdev->pm_cap) {
1285 		dev_err(dev, " PCI PM not supported\n");
1286 		return -ENODEV;
1287 	}
1288 	PM8001_CHIP_DISP->interrupt_disable(pm8001_ha, 0xFF);
1289 	PM8001_CHIP_DISP->chip_soft_rst(pm8001_ha);
1290 #ifdef PM8001_USE_MSIX
1291 	for (i = 0; i < pm8001_ha->number_of_intr; i++)
1292 		synchronize_irq(pci_irq_vector(pdev, i));
1293 	for (i = 0; i < pm8001_ha->number_of_intr; i++)
1294 		free_irq(pci_irq_vector(pdev, i), &pm8001_ha->irq_vector[i]);
1295 	pci_free_irq_vectors(pdev);
1296 #else
1297 	free_irq(pm8001_ha->irq, sha);
1298 #endif
1299 #ifdef PM8001_USE_TASKLET
1300 	/* For non-msix and msix interrupts */
1301 	if ((!pdev->msix_cap || !pci_msi_enabled()) ||
1302 	    (pm8001_ha->chip_id == chip_8001))
1303 		tasklet_kill(&pm8001_ha->tasklet[0]);
1304 	else
1305 		for (j = 0; j < PM8001_MAX_MSIX_VEC; j++)
1306 			tasklet_kill(&pm8001_ha->tasklet[j]);
1307 #endif
1308 	pm8001_info(pm8001_ha, "pdev=0x%p, slot=%s, entering "
1309 		      "suspended state\n", pdev,
1310 		      pm8001_ha->name);
1311 	return 0;
1312 }
1313 
1314 /**
1315  * pm8001_pci_resume - power management resume main entry point
1316  * @dev: Device struct
1317  *
1318  * Returns 0 success, anything else error.
1319  */
1320 static int __maybe_unused pm8001_pci_resume(struct device *dev)
1321 {
1322 	struct pci_dev *pdev = to_pci_dev(dev);
1323 	struct sas_ha_struct *sha = pci_get_drvdata(pdev);
1324 	struct pm8001_hba_info *pm8001_ha;
1325 	int rc;
1326 	u8 i = 0, j;
1327 	u32 device_state;
1328 	DECLARE_COMPLETION_ONSTACK(completion);
1329 	pm8001_ha = sha->lldd_ha;
1330 	device_state = pdev->current_state;
1331 
1332 	pm8001_info(pm8001_ha, "pdev=0x%p, slot=%s, resuming from previous operating state [D%d]\n",
1333 		      pdev, pm8001_ha->name, device_state);
1334 
1335 	rc = pci_go_44(pdev);
1336 	if (rc)
1337 		goto err_out_disable;
1338 	sas_prep_resume_ha(sha);
1339 	/* chip soft rst only for spc */
1340 	if (pm8001_ha->chip_id == chip_8001) {
1341 		PM8001_CHIP_DISP->chip_soft_rst(pm8001_ha);
1342 		pm8001_dbg(pm8001_ha, INIT, "chip soft reset successful\n");
1343 	}
1344 	rc = PM8001_CHIP_DISP->chip_init(pm8001_ha);
1345 	if (rc)
1346 		goto err_out_disable;
1347 
1348 	/* disable all the interrupt bits */
1349 	PM8001_CHIP_DISP->interrupt_disable(pm8001_ha, 0xFF);
1350 
1351 	rc = pm8001_request_irq(pm8001_ha);
1352 	if (rc)
1353 		goto err_out_disable;
1354 #ifdef PM8001_USE_TASKLET
1355 	/*  Tasklet for non msi-x interrupt handler */
1356 	if ((!pdev->msix_cap || !pci_msi_enabled()) ||
1357 	    (pm8001_ha->chip_id == chip_8001))
1358 		tasklet_init(&pm8001_ha->tasklet[0], pm8001_tasklet,
1359 			(unsigned long)&(pm8001_ha->irq_vector[0]));
1360 	else
1361 		for (j = 0; j < PM8001_MAX_MSIX_VEC; j++)
1362 			tasklet_init(&pm8001_ha->tasklet[j], pm8001_tasklet,
1363 				(unsigned long)&(pm8001_ha->irq_vector[j]));
1364 #endif
1365 	PM8001_CHIP_DISP->interrupt_enable(pm8001_ha, 0);
1366 	if (pm8001_ha->chip_id != chip_8001) {
1367 		for (i = 1; i < pm8001_ha->number_of_intr; i++)
1368 			PM8001_CHIP_DISP->interrupt_enable(pm8001_ha, i);
1369 	}
1370 
1371 	/* Chip documentation for the 8070 and 8072 SPCv    */
1372 	/* states that a 500ms minimum delay is required    */
1373 	/* before issuing commands. Otherwise, the firmware */
1374 	/* will enter an unrecoverable state.               */
1375 
1376 	if (pm8001_ha->chip_id == chip_8070 ||
1377 		pm8001_ha->chip_id == chip_8072) {
1378 		mdelay(500);
1379 	}
1380 
1381 	/* Spin up the PHYs */
1382 
1383 	pm8001_ha->flags = PM8001F_RUN_TIME;
1384 	for (i = 0; i < pm8001_ha->chip->n_phy; i++) {
1385 		pm8001_ha->phy[i].enable_completion = &completion;
1386 		PM8001_CHIP_DISP->phy_start_req(pm8001_ha, i);
1387 		wait_for_completion(&completion);
1388 	}
1389 	sas_resume_ha(sha);
1390 	return 0;
1391 
1392 err_out_disable:
1393 	scsi_remove_host(pm8001_ha->shost);
1394 
1395 	return rc;
1396 }
1397 
1398 /* update of pci device, vendor id and driver data with
1399  * unique value for each of the controller
1400  */
1401 static struct pci_device_id pm8001_pci_table[] = {
1402 	{ PCI_VDEVICE(PMC_Sierra, 0x8001), chip_8001 },
1403 	{ PCI_VDEVICE(PMC_Sierra, 0x8006), chip_8006 },
1404 	{ PCI_VDEVICE(ADAPTEC2, 0x8006), chip_8006 },
1405 	{ PCI_VDEVICE(ATTO, 0x0042), chip_8001 },
1406 	/* Support for SPC/SPCv/SPCve controllers */
1407 	{ PCI_VDEVICE(ADAPTEC2, 0x8001), chip_8001 },
1408 	{ PCI_VDEVICE(PMC_Sierra, 0x8008), chip_8008 },
1409 	{ PCI_VDEVICE(ADAPTEC2, 0x8008), chip_8008 },
1410 	{ PCI_VDEVICE(PMC_Sierra, 0x8018), chip_8018 },
1411 	{ PCI_VDEVICE(ADAPTEC2, 0x8018), chip_8018 },
1412 	{ PCI_VDEVICE(PMC_Sierra, 0x8009), chip_8009 },
1413 	{ PCI_VDEVICE(ADAPTEC2, 0x8009), chip_8009 },
1414 	{ PCI_VDEVICE(PMC_Sierra, 0x8019), chip_8019 },
1415 	{ PCI_VDEVICE(ADAPTEC2, 0x8019), chip_8019 },
1416 	{ PCI_VDEVICE(PMC_Sierra, 0x8074), chip_8074 },
1417 	{ PCI_VDEVICE(ADAPTEC2, 0x8074), chip_8074 },
1418 	{ PCI_VDEVICE(PMC_Sierra, 0x8076), chip_8076 },
1419 	{ PCI_VDEVICE(ADAPTEC2, 0x8076), chip_8076 },
1420 	{ PCI_VDEVICE(PMC_Sierra, 0x8077), chip_8077 },
1421 	{ PCI_VDEVICE(ADAPTEC2, 0x8077), chip_8077 },
1422 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8081,
1423 		PCI_VENDOR_ID_ADAPTEC2, 0x0400, 0, 0, chip_8001 },
1424 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8081,
1425 		PCI_VENDOR_ID_ADAPTEC2, 0x0800, 0, 0, chip_8001 },
1426 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8088,
1427 		PCI_VENDOR_ID_ADAPTEC2, 0x0008, 0, 0, chip_8008 },
1428 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8088,
1429 		PCI_VENDOR_ID_ADAPTEC2, 0x0800, 0, 0, chip_8008 },
1430 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8089,
1431 		PCI_VENDOR_ID_ADAPTEC2, 0x0008, 0, 0, chip_8009 },
1432 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8089,
1433 		PCI_VENDOR_ID_ADAPTEC2, 0x0800, 0, 0, chip_8009 },
1434 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8088,
1435 		PCI_VENDOR_ID_ADAPTEC2, 0x0016, 0, 0, chip_8018 },
1436 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8088,
1437 		PCI_VENDOR_ID_ADAPTEC2, 0x1600, 0, 0, chip_8018 },
1438 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8089,
1439 		PCI_VENDOR_ID_ADAPTEC2, 0x0016, 0, 0, chip_8019 },
1440 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8089,
1441 		PCI_VENDOR_ID_ADAPTEC2, 0x1600, 0, 0, chip_8019 },
1442 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8074,
1443 		PCI_VENDOR_ID_ADAPTEC2, 0x0800, 0, 0, chip_8074 },
1444 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8076,
1445 		PCI_VENDOR_ID_ADAPTEC2, 0x1600, 0, 0, chip_8076 },
1446 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8077,
1447 		PCI_VENDOR_ID_ADAPTEC2, 0x1600, 0, 0, chip_8077 },
1448 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8074,
1449 		PCI_VENDOR_ID_ADAPTEC2, 0x0008, 0, 0, chip_8074 },
1450 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8076,
1451 		PCI_VENDOR_ID_ADAPTEC2, 0x0016, 0, 0, chip_8076 },
1452 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8077,
1453 		PCI_VENDOR_ID_ADAPTEC2, 0x0016, 0, 0, chip_8077 },
1454 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8076,
1455 		PCI_VENDOR_ID_ADAPTEC2, 0x0808, 0, 0, chip_8076 },
1456 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8077,
1457 		PCI_VENDOR_ID_ADAPTEC2, 0x0808, 0, 0, chip_8077 },
1458 	{ PCI_VENDOR_ID_ADAPTEC2, 0x8074,
1459 		PCI_VENDOR_ID_ADAPTEC2, 0x0404, 0, 0, chip_8074 },
1460 	{ PCI_VENDOR_ID_ATTO, 0x8070,
1461 		PCI_VENDOR_ID_ATTO, 0x0070, 0, 0, chip_8070 },
1462 	{ PCI_VENDOR_ID_ATTO, 0x8070,
1463 		PCI_VENDOR_ID_ATTO, 0x0071, 0, 0, chip_8070 },
1464 	{ PCI_VENDOR_ID_ATTO, 0x8072,
1465 		PCI_VENDOR_ID_ATTO, 0x0072, 0, 0, chip_8072 },
1466 	{ PCI_VENDOR_ID_ATTO, 0x8072,
1467 		PCI_VENDOR_ID_ATTO, 0x0073, 0, 0, chip_8072 },
1468 	{ PCI_VENDOR_ID_ATTO, 0x8070,
1469 		PCI_VENDOR_ID_ATTO, 0x0080, 0, 0, chip_8070 },
1470 	{ PCI_VENDOR_ID_ATTO, 0x8072,
1471 		PCI_VENDOR_ID_ATTO, 0x0081, 0, 0, chip_8072 },
1472 	{ PCI_VENDOR_ID_ATTO, 0x8072,
1473 		PCI_VENDOR_ID_ATTO, 0x0082, 0, 0, chip_8072 },
1474 	{} /* terminate list */
1475 };
1476 
1477 static SIMPLE_DEV_PM_OPS(pm8001_pci_pm_ops,
1478 			 pm8001_pci_suspend,
1479 			 pm8001_pci_resume);
1480 
1481 static struct pci_driver pm8001_pci_driver = {
1482 	.name		= DRV_NAME,
1483 	.id_table	= pm8001_pci_table,
1484 	.probe		= pm8001_pci_probe,
1485 	.remove		= pm8001_pci_remove,
1486 	.driver.pm	= &pm8001_pci_pm_ops,
1487 };
1488 
1489 /**
1490  *	pm8001_init - initialize scsi transport template
1491  */
1492 static int __init pm8001_init(void)
1493 {
1494 	int rc = -ENOMEM;
1495 
1496 	pm8001_wq = alloc_workqueue("pm80xx", 0, 0);
1497 	if (!pm8001_wq)
1498 		goto err;
1499 
1500 	pm8001_id = 0;
1501 	pm8001_stt = sas_domain_attach_transport(&pm8001_transport_ops);
1502 	if (!pm8001_stt)
1503 		goto err_wq;
1504 	rc = pci_register_driver(&pm8001_pci_driver);
1505 	if (rc)
1506 		goto err_tp;
1507 	return 0;
1508 
1509 err_tp:
1510 	sas_release_transport(pm8001_stt);
1511 err_wq:
1512 	destroy_workqueue(pm8001_wq);
1513 err:
1514 	return rc;
1515 }
1516 
1517 static void __exit pm8001_exit(void)
1518 {
1519 	pci_unregister_driver(&pm8001_pci_driver);
1520 	sas_release_transport(pm8001_stt);
1521 	destroy_workqueue(pm8001_wq);
1522 }
1523 
1524 module_init(pm8001_init);
1525 module_exit(pm8001_exit);
1526 
1527 MODULE_AUTHOR("Jack Wang <jack_wang@usish.com>");
1528 MODULE_AUTHOR("Anand Kumar Santhanam <AnandKumar.Santhanam@pmcs.com>");
1529 MODULE_AUTHOR("Sangeetha Gnanasekaran <Sangeetha.Gnanasekaran@pmcs.com>");
1530 MODULE_AUTHOR("Nikith Ganigarakoppal <Nikith.Ganigarakoppal@pmcs.com>");
1531 MODULE_DESCRIPTION(
1532 		"PMC-Sierra PM8001/8006/8081/8088/8089/8074/8076/8077/8070/8072 "
1533 		"SAS/SATA controller driver");
1534 MODULE_VERSION(DRV_VERSION);
1535 MODULE_LICENSE("GPL");
1536 MODULE_DEVICE_TABLE(pci, pm8001_pci_table);
1537 
1538