xref: /freebsd/sys/dev/aic7xxx/aic7xxx_inline.h (revision 3047fefe49f57a673de8df152c199de12ec2c6d3)
1 /*
2  * Inline routines shareable across OS platforms.
3  *
4  * Copyright (c) 1994-2001 Justin T. Gibbs.
5  * Copyright (c) 2000-2001 Adaptec Inc.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions, and the following disclaimer,
13  *    without modification.
14  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
15  *    substantially similar to the "NO WARRANTY" disclaimer below
16  *    ("Disclaimer") and any redistribution must be conditioned upon
17  *    including a substantially similar Disclaimer requirement for further
18  *    binary redistribution.
19  * 3. Neither the names of the above-listed copyright holders nor the names
20  *    of any contributors may be used to endorse or promote products derived
21  *    from this software without specific prior written permission.
22  *
23  * Alternatively, this software may be distributed under the terms of the
24  * GNU General Public License ("GPL") version 2 as published by the Free
25  * Software Foundation.
26  *
27  * NO WARRANTY
28  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
29  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
30  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
31  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
32  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
36  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
37  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
38  * POSSIBILITY OF SUCH DAMAGES.
39  *
40  * $Id: //depot/aic7xxx/aic7xxx/aic7xxx_inline.h#38 $
41  *
42  * $FreeBSD$
43  */
44 
45 #ifndef _AIC7XXX_INLINE_H_
46 #define _AIC7XXX_INLINE_H_
47 
48 /************************* Sequencer Execution Control ************************/
49 static __inline void ahc_pause_bug_fix(struct ahc_softc *ahc);
50 static __inline int  ahc_is_paused(struct ahc_softc *ahc);
51 static __inline void ahc_pause(struct ahc_softc *ahc);
52 static __inline void ahc_unpause(struct ahc_softc *ahc);
53 
54 /*
55  * Work around any chip bugs related to halting sequencer execution.
56  * On Ultra2 controllers, we must clear the CIOBUS stretch signal by
57  * reading a register that will set this signal and deassert it.
58  * Without this workaround, if the chip is paused, by an interrupt or
59  * manual pause while accessing scb ram, accesses to certain registers
60  * will hang the system (infinite pci retries).
61  */
62 static __inline void
63 ahc_pause_bug_fix(struct ahc_softc *ahc)
64 {
65 	if ((ahc->features & AHC_ULTRA2) != 0)
66 		(void)ahc_inb(ahc, CCSCBCTL);
67 }
68 
69 /*
70  * Determine whether the sequencer has halted code execution.
71  * Returns non-zero status if the sequencer is stopped.
72  */
73 static __inline int
74 ahc_is_paused(struct ahc_softc *ahc)
75 {
76 	return ((ahc_inb(ahc, HCNTRL) & PAUSE) != 0);
77 }
78 
79 /*
80  * Request that the sequencer stop and wait, indefinitely, for it
81  * to stop.  The sequencer will only acknowledge that it is paused
82  * once it has reached an instruction boundary and PAUSEDIS is
83  * cleared in the SEQCTL register.  The sequencer may use PAUSEDIS
84  * for critical sections.
85  */
86 static __inline void
87 ahc_pause(struct ahc_softc *ahc)
88 {
89 	ahc_outb(ahc, HCNTRL, ahc->pause);
90 
91 	/*
92 	 * Since the sequencer can disable pausing in a critical section, we
93 	 * must loop until it actually stops.
94 	 */
95 	while (ahc_is_paused(ahc) == 0)
96 		;
97 
98 	ahc_pause_bug_fix(ahc);
99 }
100 
101 /*
102  * Allow the sequencer to continue program execution.
103  * We check here to ensure that no additional interrupt
104  * sources that would cause the sequencer to halt have been
105  * asserted.  If, for example, a SCSI bus reset is detected
106  * while we are fielding a different, pausing, interrupt type,
107  * we don't want to release the sequencer before going back
108  * into our interrupt handler and dealing with this new
109  * condition.
110  */
111 static __inline void
112 ahc_unpause(struct ahc_softc *ahc)
113 {
114 	if ((ahc_inb(ahc, INTSTAT) & (SCSIINT | SEQINT | BRKADRINT)) == 0)
115 		ahc_outb(ahc, HCNTRL, ahc->unpause);
116 }
117 
118 /*********************** Untagged Transaction Routines ************************/
119 static __inline void	ahc_freeze_untagged_queues(struct ahc_softc *ahc);
120 static __inline void	ahc_release_untagged_queues(struct ahc_softc *ahc);
121 
122 /*
123  * Block our completion routine from starting the next untagged
124  * transaction for this target or target lun.
125  */
126 static __inline void
127 ahc_freeze_untagged_queues(struct ahc_softc *ahc)
128 {
129 	if ((ahc->flags & AHC_SCB_BTT) == 0)
130 		ahc->untagged_queue_lock++;
131 }
132 
133 /*
134  * Allow the next untagged transaction for this target or target lun
135  * to be executed.  We use a counting semaphore to allow the lock
136  * to be acquired recursively.  Once the count drops to zero, the
137  * transaction queues will be run.
138  */
139 static __inline void
140 ahc_release_untagged_queues(struct ahc_softc *ahc)
141 {
142 	if ((ahc->flags & AHC_SCB_BTT) == 0) {
143 		ahc->untagged_queue_lock--;
144 		if (ahc->untagged_queue_lock == 0)
145 			ahc_run_untagged_queues(ahc);
146 	}
147 }
148 
149 /************************** Memory mapping routines ***************************/
150 static __inline struct ahc_dma_seg *
151 			ahc_sg_bus_to_virt(struct scb *scb,
152 					   uint32_t sg_busaddr);
153 static __inline uint32_t
154 			ahc_sg_virt_to_bus(struct scb *scb,
155 					   struct ahc_dma_seg *sg);
156 static __inline uint32_t
157 			ahc_hscb_busaddr(struct ahc_softc *ahc, u_int index);
158 static __inline void	ahc_sync_scb(struct ahc_softc *ahc,
159 				     struct scb *scb, int op);
160 static __inline void	ahc_sync_sglist(struct ahc_softc *ahc,
161 					struct scb *scb, int op);
162 static __inline uint32_t
163 			ahc_targetcmd_offset(struct ahc_softc *ahc,
164 					     u_int index);
165 
166 static __inline struct ahc_dma_seg *
167 ahc_sg_bus_to_virt(struct scb *scb, uint32_t sg_busaddr)
168 {
169 	int sg_index;
170 
171 	sg_index = (sg_busaddr - scb->sg_list_phys)/sizeof(struct ahc_dma_seg);
172 	/* sg_list_phys points to entry 1, not 0 */
173 	sg_index++;
174 
175 	return (&scb->sg_list[sg_index]);
176 }
177 
178 static __inline uint32_t
179 ahc_sg_virt_to_bus(struct scb *scb, struct ahc_dma_seg *sg)
180 {
181 	int sg_index;
182 
183 	/* sg_list_phys points to entry 1, not 0 */
184 	sg_index = sg - &scb->sg_list[1];
185 
186 	return (scb->sg_list_phys + (sg_index * sizeof(*scb->sg_list)));
187 }
188 
189 static __inline uint32_t
190 ahc_hscb_busaddr(struct ahc_softc *ahc, u_int index)
191 {
192 	return (ahc->scb_data->hscb_busaddr
193 		+ (sizeof(struct hardware_scb) * index));
194 }
195 
196 static __inline void
197 ahc_sync_scb(struct ahc_softc *ahc, struct scb *scb, int op)
198 {
199 	ahc_dmamap_sync(ahc, ahc->scb_data->hscb_dmat,
200 			ahc->scb_data->hscb_dmamap,
201 			/*offset*/(scb->hscb - ahc->hscbs) * sizeof(*scb->hscb),
202 			/*len*/sizeof(*scb->hscb), op);
203 }
204 
205 static __inline void
206 ahc_sync_sglist(struct ahc_softc *ahc, struct scb *scb, int op)
207 {
208 	if (scb->sg_count == 0)
209 		return;
210 
211 	ahc_dmamap_sync(ahc, ahc->scb_data->sg_dmat, scb->sg_map->sg_dmamap,
212 			/*offset*/(scb->sg_list - scb->sg_map->sg_vaddr)
213 				* sizeof(struct ahc_dma_seg),
214 			/*len*/sizeof(struct ahc_dma_seg) * scb->sg_count, op);
215 }
216 
217 static __inline uint32_t
218 ahc_targetcmd_offset(struct ahc_softc *ahc, u_int index)
219 {
220 	return (((uint8_t *)&ahc->targetcmds[index]) - ahc->qoutfifo);
221 }
222 
223 /******************************** Debugging ***********************************/
224 static __inline char *ahc_name(struct ahc_softc *ahc);
225 
226 static __inline char *
227 ahc_name(struct ahc_softc *ahc)
228 {
229 	return (ahc->name);
230 }
231 
232 /*********************** Miscelaneous Support Functions ***********************/
233 
234 static __inline void	ahc_update_residual(struct ahc_softc *ahc,
235 					    struct scb *scb);
236 static __inline struct ahc_initiator_tinfo *
237 			ahc_fetch_transinfo(struct ahc_softc *ahc,
238 					    char channel, u_int our_id,
239 					    u_int remote_id,
240 					    struct ahc_tmode_tstate **tstate);
241 static __inline struct scb*
242 			ahc_get_scb(struct ahc_softc *ahc);
243 static __inline void	ahc_free_scb(struct ahc_softc *ahc, struct scb *scb);
244 static __inline void	ahc_swap_with_next_hscb(struct ahc_softc *ahc,
245 						struct scb *scb);
246 static __inline void	ahc_queue_scb(struct ahc_softc *ahc, struct scb *scb);
247 static __inline struct scsi_sense_data *
248 			ahc_get_sense_buf(struct ahc_softc *ahc,
249 					  struct scb *scb);
250 static __inline uint32_t
251 			ahc_get_sense_bufaddr(struct ahc_softc *ahc,
252 					      struct scb *scb);
253 
254 /*
255  * Determine whether the sequencer reported a residual
256  * for this SCB/transaction.
257  */
258 static __inline void
259 ahc_update_residual(struct ahc_softc *ahc, struct scb *scb)
260 {
261 	uint32_t sgptr;
262 
263 	sgptr = ahc_le32toh(scb->hscb->sgptr);
264 	if ((sgptr & SG_RESID_VALID) != 0)
265 		ahc_calc_residual(ahc, scb);
266 }
267 
268 /*
269  * Return pointers to the transfer negotiation information
270  * for the specified our_id/remote_id pair.
271  */
272 static __inline struct ahc_initiator_tinfo *
273 ahc_fetch_transinfo(struct ahc_softc *ahc, char channel, u_int our_id,
274 		    u_int remote_id, struct ahc_tmode_tstate **tstate)
275 {
276 	/*
277 	 * Transfer data structures are stored from the perspective
278 	 * of the target role.  Since the parameters for a connection
279 	 * in the initiator role to a given target are the same as
280 	 * when the roles are reversed, we pretend we are the target.
281 	 */
282 	if (channel == 'B')
283 		our_id += 8;
284 	*tstate = ahc->enabled_targets[our_id];
285 	return (&(*tstate)->transinfo[remote_id]);
286 }
287 
288 /*
289  * Get a free scb. If there are none, see if we can allocate a new SCB.
290  */
291 static __inline struct scb *
292 ahc_get_scb(struct ahc_softc *ahc)
293 {
294 	struct scb *scb;
295 
296 	if ((scb = SLIST_FIRST(&ahc->scb_data->free_scbs)) == NULL) {
297 		ahc_alloc_scbs(ahc);
298 		scb = SLIST_FIRST(&ahc->scb_data->free_scbs);
299 		if (scb == NULL)
300 			return (NULL);
301 	}
302 	SLIST_REMOVE_HEAD(&ahc->scb_data->free_scbs, links.sle);
303 	return (scb);
304 }
305 
306 /*
307  * Return an SCB resource to the free list.
308  */
309 static __inline void
310 ahc_free_scb(struct ahc_softc *ahc, struct scb *scb)
311 {
312 	struct hardware_scb *hscb;
313 
314 	hscb = scb->hscb;
315 	/* Clean up for the next user */
316 	ahc->scb_data->scbindex[hscb->tag] = NULL;
317 	scb->flags = SCB_FREE;
318 	hscb->control = 0;
319 
320 	SLIST_INSERT_HEAD(&ahc->scb_data->free_scbs, scb, links.sle);
321 
322 	/* Notify the OSM that a resource is now available. */
323 	ahc_platform_scb_free(ahc, scb);
324 }
325 
326 static __inline struct scb *
327 ahc_lookup_scb(struct ahc_softc *ahc, u_int tag)
328 {
329 	struct scb* scb;
330 
331 	scb = ahc->scb_data->scbindex[tag];
332 	if (scb != NULL)
333 		ahc_sync_scb(ahc, scb,
334 			     BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
335 	return (scb);
336 }
337 
338 static __inline void
339 ahc_swap_with_next_hscb(struct ahc_softc *ahc, struct scb *scb)
340 {
341 	struct hardware_scb *q_hscb;
342 	u_int  saved_tag;
343 
344 	/*
345 	 * Our queuing method is a bit tricky.  The card
346 	 * knows in advance which HSCB to download, and we
347 	 * can't disappoint it.  To achieve this, the next
348 	 * SCB to download is saved off in ahc->next_queued_scb.
349 	 * When we are called to queue "an arbitrary scb",
350 	 * we copy the contents of the incoming HSCB to the one
351 	 * the sequencer knows about, swap HSCB pointers and
352 	 * finally assign the SCB to the tag indexed location
353 	 * in the scb_array.  This makes sure that we can still
354 	 * locate the correct SCB by SCB_TAG.
355 	 */
356 	q_hscb = ahc->next_queued_scb->hscb;
357 	saved_tag = q_hscb->tag;
358 	memcpy(q_hscb, scb->hscb, sizeof(*scb->hscb));
359 	if ((scb->flags & SCB_CDB32_PTR) != 0) {
360 		q_hscb->shared_data.cdb_ptr =
361 		    ahc_htole32(ahc_hscb_busaddr(ahc, q_hscb->tag)
362 			      + offsetof(struct hardware_scb, cdb32));
363 	}
364 	q_hscb->tag = saved_tag;
365 	q_hscb->next = scb->hscb->tag;
366 
367 	/* Now swap HSCB pointers. */
368 	ahc->next_queued_scb->hscb = scb->hscb;
369 	scb->hscb = q_hscb;
370 
371 	/* Now define the mapping from tag to SCB in the scbindex */
372 	ahc->scb_data->scbindex[scb->hscb->tag] = scb;
373 }
374 
375 /*
376  * Tell the sequencer about a new transaction to execute.
377  */
378 static __inline void
379 ahc_queue_scb(struct ahc_softc *ahc, struct scb *scb)
380 {
381 	ahc_swap_with_next_hscb(ahc, scb);
382 
383 	if (scb->hscb->tag == SCB_LIST_NULL
384 	 || scb->hscb->next == SCB_LIST_NULL)
385 		panic("Attempt to queue invalid SCB tag %x:%x\n",
386 		      scb->hscb->tag, scb->hscb->next);
387 
388 	/*
389 	 * Keep a history of SCBs we've downloaded in the qinfifo.
390 	 */
391 	ahc->qinfifo[ahc->qinfifonext++] = scb->hscb->tag;
392 
393 	/*
394 	 * Make sure our data is consistant from the
395 	 * perspective of the adapter.
396 	 */
397 	ahc_sync_scb(ahc, scb, BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
398 
399 	/* Tell the adapter about the newly queued SCB */
400 	if ((ahc->features & AHC_QUEUE_REGS) != 0) {
401 		ahc_outb(ahc, HNSCB_QOFF, ahc->qinfifonext);
402 	} else {
403 		if ((ahc->features & AHC_AUTOPAUSE) == 0)
404 			ahc_pause(ahc);
405 		ahc_outb(ahc, KERNEL_QINPOS, ahc->qinfifonext);
406 		if ((ahc->features & AHC_AUTOPAUSE) == 0)
407 			ahc_unpause(ahc);
408 	}
409 }
410 
411 static __inline struct scsi_sense_data *
412 ahc_get_sense_buf(struct ahc_softc *ahc, struct scb *scb)
413 {
414 	int offset;
415 
416 	offset = scb - ahc->scb_data->scbarray;
417 	return (&ahc->scb_data->sense[offset]);
418 }
419 
420 static __inline uint32_t
421 ahc_get_sense_bufaddr(struct ahc_softc *ahc, struct scb *scb)
422 {
423 	int offset;
424 
425 	offset = scb - ahc->scb_data->scbarray;
426 	return (ahc->scb_data->sense_busaddr
427 	      + (offset * sizeof(struct scsi_sense_data)));
428 }
429 
430 /************************** Interrupt Processing ******************************/
431 static __inline void	ahc_sync_qoutfifo(struct ahc_softc *ahc, int op);
432 static __inline void	ahc_sync_tqinfifo(struct ahc_softc *ahc, int op);
433 static __inline u_int	ahc_check_cmdcmpltqueues(struct ahc_softc *ahc);
434 static __inline void	ahc_intr(struct ahc_softc *ahc);
435 
436 static __inline void
437 ahc_sync_qoutfifo(struct ahc_softc *ahc, int op)
438 {
439 	ahc_dmamap_sync(ahc, ahc->shared_data_dmat, ahc->shared_data_dmamap,
440 			/*offset*/0, /*len*/256, op);
441 }
442 
443 static __inline void
444 ahc_sync_tqinfifo(struct ahc_softc *ahc, int op)
445 {
446 #ifdef AHC_TARGET_MODE
447 	if ((ahc->flags & AHC_TARGETROLE) != 0) {
448 		ahc_dmamap_sync(ahc, ahc->shared_data_dmat,
449 				ahc->shared_data_dmamap,
450 				ahc_targetcmd_offset(ahc, 0),
451 				sizeof(struct target_cmd) * AHC_TMODE_CMDS,
452 				op);
453 	}
454 #endif
455 }
456 
457 /*
458  * See if the firmware has posted any completed commands
459  * into our in-core command complete fifos.
460  */
461 #define AHC_RUN_QOUTFIFO 0x1
462 #define AHC_RUN_TQINFIFO 0x2
463 static __inline u_int
464 ahc_check_cmdcmpltqueues(struct ahc_softc *ahc)
465 {
466 	u_int retval;
467 
468 	retval = 0;
469 	ahc_dmamap_sync(ahc, ahc->shared_data_dmat, ahc->shared_data_dmamap,
470 			/*offset*/ahc->qoutfifonext, /*len*/1,
471 			BUS_DMASYNC_POSTREAD);
472 	if (ahc->qoutfifo[ahc->qoutfifonext] != SCB_LIST_NULL)
473 		retval |= AHC_RUN_QOUTFIFO;
474 #ifdef AHC_TARGET_MODE
475 	if ((ahc->flags & AHC_TARGETROLE) != 0
476 	 && (ahc->flags & AHC_TQINFIFO_BLOCKED) == 0) {
477 		ahc_dmamap_sync(ahc, ahc->shared_data_dmat,
478 				ahc->shared_data_dmamap,
479 				ahc_targetcmd_offset(ahc, ahc->tqinfifofnext),
480 				/*len*/sizeof(struct target_cmd),
481 				BUS_DMASYNC_POSTREAD);
482 		if (ahc->targetcmds[ahc->tqinfifonext].cmd_valid != 0)
483 			retval |= AHC_RUN_TQINFIFO;
484 	}
485 #endif
486 	return (retval);
487 }
488 
489 /*
490  * Catch an interrupt from the adapter
491  */
492 static __inline void
493 ahc_intr(struct ahc_softc *ahc)
494 {
495 	u_int	intstat;
496 
497 	if ((ahc->pause & INTEN) == 0) {
498 		/*
499 		 * Our interrupt is not enabled on the chip
500 		 * and may be disabled for re-entrancy reasons,
501 		 * so just return.  This is likely just a shared
502 		 * interrupt.
503 		 */
504 		return;
505 	}
506 	/*
507 	 * Instead of directly reading the interrupt status register,
508 	 * infer the cause of the interrupt by checking our in-core
509 	 * completion queues.  This avoids a costly PCI bus read in
510 	 * most cases.
511 	 */
512 	if ((ahc->flags & (AHC_ALL_INTERRUPTS|AHC_EDGE_INTERRUPT)) == 0
513 	 && (ahc_check_cmdcmpltqueues(ahc) != 0))
514 		intstat = CMDCMPLT;
515 	else {
516 		intstat = ahc_inb(ahc, INTSTAT);
517 	}
518 
519 	if (intstat & CMDCMPLT) {
520 		ahc_outb(ahc, CLRINT, CLRCMDINT);
521 
522 		/*
523 		 * Ensure that the chip sees that we've cleared
524 		 * this interrupt before we walk the output fifo.
525 		 * Otherwise, we may, due to posted bus writes,
526 		 * clear the interrupt after we finish the scan,
527 		 * and after the sequencer has added new entries
528 		 * and asserted the interrupt again.
529 		 */
530 		ahc_flush_device_writes(ahc);
531 		ahc_run_qoutfifo(ahc);
532 #ifdef AHC_TARGET_MODE
533 		if ((ahc->flags & AHC_TARGETROLE) != 0)
534 			ahc_run_tqinfifo(ahc, /*paused*/FALSE);
535 #endif
536 	}
537 
538 	if (intstat == 0xFF && (ahc->features & AHC_REMOVABLE) != 0)
539 		/* Hot eject */
540 		return;
541 
542 	if ((intstat & INT_PEND) == 0) {
543 #if AHC_PCI_CONFIG > 0
544 		if (ahc->unsolicited_ints > 500) {
545 			ahc->unsolicited_ints = 0;
546 			if ((ahc->chip & AHC_PCI) != 0
547 			 && (ahc_inb(ahc, ERROR) & PCIERRSTAT) != 0)
548 				ahc->bus_intr(ahc);
549 		}
550 #endif
551 		ahc->unsolicited_ints++;
552 		return;
553 	}
554 	ahc->unsolicited_ints = 0;
555 
556 	if (intstat & BRKADRINT) {
557 		ahc_handle_brkadrint(ahc);
558 		/* Fatal error, no more interrupts to handle. */
559 		return;
560 	}
561 
562 	if ((intstat & (SEQINT|SCSIINT)) != 0)
563 		ahc_pause_bug_fix(ahc);
564 
565 	if ((intstat & SEQINT) != 0)
566 		ahc_handle_seqint(ahc, intstat);
567 
568 	if ((intstat & SCSIINT) != 0)
569 		ahc_handle_scsiint(ahc, intstat);
570 }
571 
572 #endif  /* _AIC7XXX_INLINE_H_ */
573