Merge from vendor branch GCC:
[dragonfly.git] / sys / dev / raid / twa / twa_freebsd.c
1 /*-
2  * Copyright (c) 2003-04 3ware, Inc.
3  * Copyright (c) 2000 Michael Smith
4  * Copyright (c) 2000 BSDi
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  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  *      $FreeBSD$
29  * $DragonFly: src/sys/dev/raid/twa/twa_freebsd.c,v 1.7 2005/06/10 17:10:26 swildner Exp $
30  */
31
32 /*
33  * 3ware driver for 9000 series storage controllers.
34  *
35  * Author: Vinod Kashyap
36  */
37
38
39 #include "twa_includes.h"
40
41 static void     twa_setup_data_dmamap(void *arg, bus_dma_segment_t *segs,
42                                                 int nsegments, int error);
43 static void     twa_setup_request_dmamap(void *arg, bus_dma_segment_t *segs,
44                                                 int nsegments, int error);
45
46 MALLOC_DEFINE(TWA_MALLOC_CLASS, "twa commands", "twa commands");
47
48
49 static  d_open_t                twa_open;
50 static  d_close_t               twa_close;
51 static  d_ioctl_t               twa_ioctl_wrapper;
52
53 static struct cdevsw twa_cdevsw = {
54         "twa",
55         TWA_CDEV_MAJOR,
56         0,
57         NULL,
58         0,
59         twa_open,
60         twa_close,
61         noread,
62         nowrite,
63         twa_ioctl_wrapper,
64         nopoll,
65         nommap,
66         nostrategy,
67         nodump,
68         nopsize,
69 };
70
71 static devclass_t       twa_devclass;
72
73
74 /*
75  * Function name:       twa_open
76  * Description:         Called when the controller is opened.
77  *                      Simply marks the controller as open.
78  *
79  * Input:               dev     -- control device corresponding to the ctlr
80  *                      flags   -- mode of open
81  *                      fmt     -- device type (character/block etc.)
82  *                      proc    -- current process
83  * Output:              None
84  * Return value:        0       -- success
85  *                      non-zero-- failure
86  */
87 static int
88 twa_open(dev_t dev, int flags, int fmt, d_thread_t *proc)
89 {
90         int                     unit = minor(dev);
91         struct twa_softc        *sc = devclass_get_softc(twa_devclass, unit);
92
93         sc->twa_state |= TWA_STATE_OPEN;
94         return(0);
95 }
96
97
98
99 /*
100  * Function name:       twa_close
101  * Description:         Called when the controller is closed.
102  *                      Simply marks the controller as not open.
103  *
104  * Input:               dev     -- control device corresponding to the ctlr
105  *                      flags   -- mode of corresponding open
106  *                      fmt     -- device type (character/block etc.)
107  *                      proc    -- current process
108  * Output:              None
109  * Return value:        0       -- success
110  *                      non-zero-- failure
111  */
112 static int
113 twa_close(dev_t dev, int flags, int fmt, d_thread_t *proc)
114 {
115         int                     unit = minor(dev);
116         struct twa_softc        *sc = devclass_get_softc(twa_devclass, unit);
117
118         sc->twa_state &= ~TWA_STATE_OPEN;
119         return(0);
120 }
121
122
123
124 /*
125  * Function name:       twa_ioctl_wrapper
126  * Description:         Called when an ioctl is posted to the controller.
127  *                      Simply calls the ioctl handler.
128  *
129  * Input:               dev     -- control device corresponding to the ctlr
130  *                      cmd     -- ioctl cmd
131  *                      buf     -- ptr to buffer in kernel memory, which is
132  *                                 a copy of the input buffer in user-space
133  *                      flags   -- mode of corresponding open
134  *                      proc    -- current process
135  * Output:              buf     -- ptr to buffer in kernel memory, which will
136  *                                 be copied to the output buffer in user-space
137  * Return value:        0       -- success
138  *                      non-zero-- failure
139  */
140 static int
141 twa_ioctl_wrapper(dev_t dev, u_long cmd, caddr_t buf,
142                                         int flags, d_thread_t *proc)
143 {
144         struct twa_softc        *sc = (struct twa_softc *)(dev->si_drv1);
145
146         return(twa_ioctl(sc, cmd, buf));
147 }
148
149
150
151 static int      twa_probe (device_t dev);
152 static int      twa_attach (device_t dev);
153 static void     twa_free (struct twa_softc *sc);
154 static int      twa_detach (device_t dev);
155 static int      twa_shutdown (device_t dev);
156 static int      twa_suspend (device_t dev);
157 static int      twa_resume (device_t dev);
158 static void     twa_pci_intr(void *arg);
159 static void     twa_intrhook (void *arg);
160
161 static device_method_t  twa_methods[] = {
162         /* Device interface */
163         DEVMETHOD(device_probe,         twa_probe),
164         DEVMETHOD(device_attach,        twa_attach),
165         DEVMETHOD(device_detach,        twa_detach),
166         DEVMETHOD(device_shutdown,      twa_shutdown),
167         DEVMETHOD(device_suspend,       twa_suspend),
168         DEVMETHOD(device_resume,        twa_resume),
169
170         DEVMETHOD(bus_print_child,      bus_generic_print_child),
171         DEVMETHOD(bus_driver_added,     bus_generic_driver_added),
172         {0, 0}
173 };
174
175 static driver_t twa_pci_driver = {
176         "twa",
177         twa_methods,
178         sizeof(struct twa_softc)
179 };
180
181 DRIVER_MODULE(twa, pci, twa_pci_driver, twa_devclass, 0, 0);
182
183
184
185 /*
186  * Function name:       twa_probe
187  * Description:         Called at driver load time.  Claims 9000 ctlrs.
188  *
189  * Input:               dev     -- bus device corresponding to the ctlr
190  * Output:              None
191  * Return value:        <= 0    -- success
192  *                      > 0     -- failure
193  */
194 static int
195 twa_probe(device_t dev)
196 {
197         static u_int8_t first_ctlr = 1;
198
199         twa_dbg_print(3, "entered");
200
201         if ((pci_get_vendor(dev) == TWA_VENDOR_ID) &&
202                         (pci_get_device(dev) == TWA_DEVICE_ID_9K)) {
203                 device_set_desc(dev, TWA_DEVICE_NAME);
204                 /* Print the driver version only once. */
205                 if (first_ctlr) {
206                         printf("3ware device driver for 9000 series storage controllers, version: %s\n",
207                                         TWA_DRIVER_VERSION_STRING);
208                         first_ctlr = 0;
209                 }
210                 return(0);
211         }
212         return(ENXIO);
213 }
214
215
216
217 /*
218  * Function name:       twa_attach
219  * Description:         Allocates pci resources; updates sc; adds a node to the
220  *                      sysctl tree to expose the driver version; makes calls
221  *                      to initialize ctlr, and to attach to CAM.
222  *
223  * Input:               dev     -- bus device corresponding to the ctlr
224  * Output:              None
225  * Return value:        0       -- success
226  *                      non-zero-- failure
227  */
228 static int
229 twa_attach(device_t dev)
230 {
231         struct twa_softc        *sc = device_get_softc(dev);
232         u_int32_t               command;
233         int                     res_id;
234         int                     error;
235         dev_t                   xdev;
236
237         twa_dbg_dprint_enter(3, sc);
238
239         /* Initialize the softc structure. */
240         sc->twa_bus_dev = dev;
241
242         sysctl_ctx_init(&sc->twa_sysctl_ctx);
243         sc->twa_sysctl_tree = SYSCTL_ADD_NODE(&sc->twa_sysctl_ctx,
244                                 SYSCTL_STATIC_CHILDREN(_hw), OID_AUTO,
245                                 device_get_nameunit(dev), CTLFLAG_RD, 0, "");
246         if (sc->twa_sysctl_tree == NULL) {
247                 twa_printf(sc, "Cannot add sysctl tree node.\n");
248                 return(ENXIO);
249         }
250         SYSCTL_ADD_STRING(&sc->twa_sysctl_ctx, SYSCTL_CHILDREN(sc->twa_sysctl_tree),
251                                 OID_AUTO, "driver_version", CTLFLAG_RD,
252                                 TWA_DRIVER_VERSION_STRING, 0, "TWA driver version");
253
254         /* Make sure we are going to be able to talk to this board. */
255         command = pci_read_config(dev, PCIR_COMMAND, 2);
256         if ((command & PCIM_CMD_PORTEN) == 0) {
257                 twa_printf(sc, "Register window not available.\n");
258                 return(ENXIO);
259         }
260         
261         /* Force the busmaster enable bit on, in case the BIOS forgot. */
262         command |= PCIM_CMD_BUSMASTEREN;
263         pci_write_config(dev, PCIR_COMMAND, command, 2);
264
265         /* Allocate the PCI register window. */
266         res_id = TWA_IO_CONFIG_REG;
267         if ((sc->twa_io_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &res_id,
268                                         0, ~0, 1, RF_ACTIVE)) == NULL) {
269                 twa_printf(sc, "can't allocate register window.\n");
270                 twa_free(sc);
271                 return(ENXIO);
272         }
273         sc->twa_bus_tag = rman_get_bustag(sc->twa_io_res);
274         sc->twa_bus_handle = rman_get_bushandle(sc->twa_io_res);
275
276         /* Allocate and connect our interrupt. */
277         res_id = 0;
278         if ((sc->twa_irq_res = bus_alloc_resource(sc->twa_bus_dev, SYS_RES_IRQ,
279                                         &res_id, 0, ~0, 1,
280                                         RF_SHAREABLE | RF_ACTIVE)) == NULL) {
281                 twa_printf(sc, "Can't allocate interrupt.\n");
282                 twa_free(sc);
283                 return(ENXIO);
284         }
285         if (bus_setup_intr(sc->twa_bus_dev, sc->twa_irq_res, INTR_TYPE_CAM,
286                            twa_pci_intr, sc, &sc->twa_intr_handle, NULL)) {
287                 twa_printf(sc, "Can't set up interrupt.\n");
288                 twa_free(sc);
289                 return(ENXIO);
290         }
291
292         /* Initialize the driver for this controller. */
293         if ((error = twa_setup(sc))) {
294                 twa_free(sc);
295                 return(error);
296         }
297
298         /* Print some information about the controller and configuration. */
299         twa_describe_controller(sc);
300
301         /* Create the control device. */
302         cdevsw_add(&twa_cdevsw, -1, device_get_unit(sc->twa_bus_dev));
303         xdev = make_dev(&twa_cdevsw, device_get_unit(sc->twa_bus_dev),
304                         UID_ROOT, GID_OPERATOR, S_IRUSR | S_IWUSR,
305                         "twa%d", device_get_unit(sc->twa_bus_dev));
306         xdev->si_drv1 = sc;
307
308         /*
309          * Schedule ourselves to bring the controller up once interrupts are
310          * available.  This isn't strictly necessary, since we disable
311          * interrupts while probing the controller, but it is more in keeping
312          * with common practice for other disk devices.
313          */
314         sc->twa_ich.ich_func = twa_intrhook;
315         sc->twa_ich.ich_arg = sc;
316         sc->twa_ich.ich_desc = "twa";
317         if (config_intrhook_establish(&sc->twa_ich) != 0) {
318                 twa_printf(sc, "Can't establish configuration hook.\n");
319                 twa_free(sc);
320                 return(ENXIO);
321         }
322
323         if ((error = twa_cam_setup(sc))) {
324                 twa_free(sc);
325                 return(error);
326         }
327         return(0);
328 }
329
330
331
332 /*
333  * Function name:       twa_free
334  * Description:         Performs clean-up at the time of going down.
335  *
336  * Input:               sc      -- ptr to per ctlr structure
337  * Output:              None
338  * Return value:        None
339  */
340 static void
341 twa_free(struct twa_softc *sc)
342 {
343         struct twa_request      *tr;
344
345         twa_dbg_dprint_enter(3, sc);
346
347         /* Detach from CAM */
348         twa_cam_detach(sc);
349
350         /* Destroy dma handles. */
351
352         bus_dmamap_unload(sc->twa_dma_tag, sc->twa_cmd_map); 
353         while ((tr = twa_dequeue_free(sc)) != NULL)
354                 bus_dmamap_destroy(sc->twa_dma_tag, tr->tr_dma_map);
355
356         /* Free all memory allocated so far. */
357         if (sc->twa_req_buf)
358                 free(sc->twa_req_buf, TWA_MALLOC_CLASS);
359         if (sc->twa_cmd_pkt_buf)
360                 bus_dmamem_free(sc->twa_dma_tag, sc->twa_cmd_pkt_buf,
361                                         sc->twa_cmd_map);
362         if (sc->twa_aen_queue[0])
363                 free (sc->twa_aen_queue[0], M_DEVBUF);
364
365         /* Destroy the data-transfer DMA tag. */
366         if (sc->twa_dma_tag)
367                 bus_dma_tag_destroy(sc->twa_dma_tag);
368
369         /* Disconnect the interrupt handler. */
370         if (sc->twa_intr_handle)
371                 bus_teardown_intr(sc->twa_bus_dev, sc->twa_irq_res,
372                                         sc->twa_intr_handle);
373         if (sc->twa_irq_res != NULL)
374                 bus_release_resource(sc->twa_bus_dev, SYS_RES_IRQ,
375                                         0, sc->twa_irq_res);
376
377         /* Release the register window mapping. */
378         if (sc->twa_io_res != NULL)
379                 bus_release_resource(sc->twa_bus_dev, SYS_RES_IOPORT,
380                                         TWA_IO_CONFIG_REG, sc->twa_io_res);
381
382         cdevsw_remove(&twa_cdevsw, -1, device_get_unit(sc->twa_bus_dev));
383
384         sysctl_ctx_free(&sc->twa_sysctl_ctx);
385 }
386
387
388
389 /*
390  * Function name:       twa_detach
391  * Description:         Called when the controller is being detached from
392  *                      the pci bus.
393  *
394  * Input:               dev     -- bus device corresponding to the ctlr
395  * Output:              None
396  * Return value:        0       -- success
397  *                      non-zero-- failure
398  */
399 static int
400 twa_detach(device_t dev)
401 {
402         struct twa_softc        *sc = device_get_softc(dev);
403         int                     error;
404
405         twa_dbg_dprint_enter(3, sc);
406
407         error = EBUSY;
408         crit_enter();
409         if (sc->twa_state & TWA_STATE_OPEN)
410                 goto out;
411
412         /* Shut the controller down. */
413         if ((error = twa_shutdown(dev)))
414                 goto out;
415
416         /* Free all resources associated with this controller. */
417         twa_free(sc);
418         error = 0;
419
420 out:
421         crit_exit();
422         return(error);
423 }
424
425
426
427 /*
428  * Function name:       twa_shutdown
429  * Description:         Called at unload/shutdown time.  Lets the controller
430  *                      know that we are going down.
431  *
432  * Input:               dev     -- bus device corresponding to the ctlr
433  * Output:              None
434  * Return value:        0       -- success
435  *                      non-zero-- failure
436  */
437 static int
438 twa_shutdown(device_t dev)
439 {
440         struct twa_softc        *sc = device_get_softc(dev);
441         int                     error = 0;
442
443         twa_dbg_dprint_enter(3, sc);
444
445         crit_enter();
446
447         /* Disconnect from the controller. */
448         error = twa_deinit_ctlr(sc);
449
450         crit_exit();
451         return(error);
452 }
453
454
455
456 /*
457  * Function name:       twa_suspend
458  * Description:         Called to suspend I/O before hot-swapping PCI ctlrs.
459  *                      Doesn't do much as of now.
460  *
461  * Input:               dev     -- bus device corresponding to the ctlr
462  * Output:              None
463  * Return value:        0       -- success
464  *                      non-zero-- failure
465  */
466 static int
467 twa_suspend(device_t dev)
468 {
469         struct twa_softc        *sc = device_get_softc(dev);
470
471         twa_dbg_dprint_enter(3, sc);
472
473         crit_enter();
474         sc->twa_state |= TWA_STATE_SUSPEND;
475     
476         twa_disable_interrupts(sc);
477         crit_exit();
478
479         return(1);
480 }
481
482
483
484 /*
485  * Function name:       twa_resume
486  * Description:         Called to resume I/O after hot-swapping PCI ctlrs.
487  *                      Doesn't do much as of now.
488  *
489  * Input:               dev     -- bus device corresponding to the ctlr
490  * Output:              None
491  * Return value:        0       -- success
492  *                      non-zero-- failure
493  */
494 static int
495 twa_resume(device_t dev)
496 {
497         struct twa_softc        *sc = device_get_softc(dev);
498
499         twa_dbg_dprint_enter(3, sc);
500
501         sc->twa_state &= ~TWA_STATE_SUSPEND;
502         twa_enable_interrupts(sc);
503
504         return(1);
505 }
506
507
508
509 /*
510  * Function name:       twa_pci_intr
511  * Description:         Interrupt handler.  Wrapper for twa_interrupt.
512  *
513  * Input:               arg     -- ptr to per ctlr structure
514  * Output:              None
515  * Return value:        None
516  */
517 static void
518 twa_pci_intr(void *arg)
519 {
520         struct twa_softc        *sc = (struct twa_softc *)arg;
521
522         twa_interrupt(sc);
523 }
524
525
526
527 /*
528  * Function name:       twa_intrhook
529  * Description:         Callback for us to enable interrupts.
530  *
531  * Input:               arg     -- ptr to per ctlr structure
532  * Output:              None
533  * Return value:        None
534  */
535 static void
536 twa_intrhook(void *arg)
537 {
538         struct twa_softc        *sc = (struct twa_softc *)arg;
539
540         twa_dbg_dprint(4, sc, "twa_intrhook Entered");
541
542         /* Pull ourselves off the intrhook chain. */
543         config_intrhook_disestablish(&sc->twa_ich);
544
545         /* Enable interrupts. */
546         twa_enable_interrupts(sc);
547 }
548
549
550
551 /*
552  * Function name:       twa_write_pci_config
553  * Description:         Writes to the PCI config space.
554  *
555  * Input:               sc      -- ptr to per ctlr structure
556  *                      value   -- value to be written
557  *                      size    -- # of bytes to be written
558  * Output:              None
559  * Return value:        None
560  */
561 void
562 twa_write_pci_config(struct twa_softc *sc, u_int32_t value, int size)
563 {
564         pci_write_config(sc->twa_bus_dev, PCIR_STATUS, value, size);
565 }
566
567
568
569 /*
570  * Function name:       twa_alloc_req_pkts
571  * Description:         Allocates memory for, and initializes request pkts,
572  *                      and queues them in the free queue.
573  *
574  * Input:               sc      -- ptr to per ctlr structure
575  *                      num_reqs-- # of request pkts to allocate and initialize.
576  * Output:              None
577  * Return value:        0       -- success
578  *                      non-zero-- failure
579  */
580 int
581 twa_alloc_req_pkts(struct twa_softc *sc, int num_reqs)
582 {
583         struct twa_request      *tr;
584         int                     i;
585
586         sc->twa_req_buf = malloc(num_reqs * sizeof(struct twa_request),
587                                         TWA_MALLOC_CLASS, M_INTWAIT);
588
589         /* Allocate the bus DMA tag appropriate for PCI. */
590         if (bus_dma_tag_create(NULL,                    /* parent */
591                                 TWA_ALIGNMENT,          /* alignment */
592                                 0,                      /* boundary */
593                                 BUS_SPACE_MAXADDR,      /* lowaddr */
594                                 BUS_SPACE_MAXADDR,      /* highaddr */
595                                 NULL, NULL,             /* filter, filterarg */
596                                 TWA_Q_LENGTH *
597                                 (sizeof(struct twa_command_packet)),/* maxsize */
598                                 TWA_MAX_SG_ELEMENTS,    /* nsegments */
599                                 BUS_SPACE_MAXSIZE_32BIT,/* maxsegsize */
600                                 BUS_DMA_ALLOCNOW,       /* flags */
601                                 &sc->twa_dma_tag        /* tag */)) {
602                 twa_printf(sc, "Can't allocate DMA tag.\n");
603                 return(ENOMEM);
604         }
605
606         /* Allocate memory for cmd pkts. */
607         if (bus_dmamem_alloc(sc->twa_dma_tag,
608                                 (void *)(&(sc->twa_cmd_pkt_buf)),
609                                 BUS_DMA_WAITOK, &(sc->twa_cmd_map)))
610                 return(ENOMEM);
611
612         bus_dmamap_load(sc->twa_dma_tag, sc->twa_cmd_map,
613                                 sc->twa_cmd_pkt_buf,
614                                 num_reqs * sizeof(struct twa_command_packet),
615                                 twa_setup_request_dmamap, sc, 0);
616         bzero(sc->twa_req_buf, num_reqs * sizeof(struct twa_request));
617         bzero(sc->twa_cmd_pkt_buf,
618                         num_reqs * sizeof(struct twa_command_packet));
619
620         for (i = 0; i < num_reqs; i++) {
621                 tr = &(sc->twa_req_buf[i]);
622                 tr->tr_command = &(sc->twa_cmd_pkt_buf[i]);
623                 tr->tr_cmd_phys = sc->twa_cmd_pkt_phys +
624                                         (i * sizeof(struct twa_command_packet));
625                 tr->tr_request_id = i;
626                 tr->tr_sc = sc;
627                 sc->twa_lookup[i] = tr;
628
629                 /*
630                  * Create a map for data buffers.  maxsize (256 * 1024) used in
631                  * bus_dma_tag_create above should suffice the bounce page needs
632                  * for data buffers, since the max I/O size we support is 128KB.
633                  * If we supported I/O's bigger than 256KB, we would have to
634                  * create a second dma_tag, with the appropriate maxsize.
635                  */
636                 if (bus_dmamap_create(sc->twa_dma_tag, 0,
637                                                 &tr->tr_dma_map))
638                         return(ENOMEM);
639
640                 /* Insert request into the free queue. */
641                 twa_release_request(tr);
642         }
643         return(0);
644 }
645
646
647
648 /*
649  * Function name:       twa_fillin_sgl
650  * Description:         Fills in the scatter/gather list.
651  *
652  * Input:               sgl     -- ptr to sg list
653  *                      segs    -- ptr to fill the sg list from
654  *                      nsegments--# of segments
655  * Output:              None
656  * Return value:        None
657  */
658 static void
659 twa_fillin_sgl(struct twa_sg *sgl, bus_dma_segment_t *segs, int nsegments)
660 {
661         int     i;
662
663         for (i = 0; i < nsegments; i++) {
664                 sgl[i].address = segs[i].ds_addr;
665                 sgl[i].length = segs[i].ds_len;
666         }
667 }
668
669
670
671 /*
672  * Function name:       twa_setup_data_dmamap
673  * Description:         Callback of bus_dmamap_load for the buffer associated
674  *                      with data.  Updates the cmd pkt (size/sgl_entries
675  *                      fields, as applicable) to reflect the number of sg
676  *                      elements.
677  *
678  * Input:               arg     -- ptr to request pkt
679  *                      segs    -- ptr to a list of segment descriptors
680  *                      nsegments--# of segments
681  *                      error   -- 0 if no errors encountered before callback,
682  *                                 non-zero if errors were encountered
683  * Output:              None
684  * Return value:        None
685  */
686 static void
687 twa_setup_data_dmamap(void *arg, bus_dma_segment_t *segs,
688                                         int nsegments, int error)
689 {
690         struct twa_request              *tr = (struct twa_request *)arg;
691         struct twa_command_packet       *cmdpkt = tr->tr_command;
692         struct twa_command_9k           *cmd9k;
693         union twa_command_7k            *cmd7k;
694         u_int8_t                        sgl_offset;
695
696         twa_dbg_dprint_enter(10, tr->tr_sc);
697
698         if ((tr->tr_flags & TWA_CMD_IN_PROGRESS) &&
699                         (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_EXTERNAL))
700                 twa_allow_new_requests(tr->tr_sc, (void *)(tr->tr_private));
701
702         if (error == EFBIG) {
703                 tr->tr_error = error;
704                 goto out;
705         }
706
707         if (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_9K) {
708                 cmd9k = &(cmdpkt->command.cmd_pkt_9k);
709                 twa_fillin_sgl(&(cmd9k->sg_list[0]), segs, nsegments);
710                 cmd9k->sgl_entries += nsegments - 1;
711         } else {
712                 /* It's a 7000 command packet. */
713                 cmd7k = &(cmdpkt->command.cmd_pkt_7k);
714                 if ((sgl_offset = cmdpkt->command.cmd_pkt_7k.generic.sgl_offset))
715                         twa_fillin_sgl((struct twa_sg *)
716                                         (((u_int32_t *)cmd7k) + sgl_offset),
717                                         segs, nsegments);
718                 /* Modify the size field, based on sg address size. */
719                 cmd7k->generic.size += 
720                                 ((TWA_64BIT_ADDRESSES ? 3 : 2) * nsegments);
721         }
722
723         if (tr->tr_flags & TWA_CMD_DATA_IN)
724                 bus_dmamap_sync(tr->tr_sc->twa_dma_tag, tr->tr_dma_map,
725                                                         BUS_DMASYNC_PREREAD);
726         if (tr->tr_flags & TWA_CMD_DATA_OUT) {
727                 /* 
728                  * If we're using an alignment buffer, and we're
729                  * writing data, copy the real data out.
730                  */
731                 if (tr->tr_flags & TWA_CMD_DATA_COPY_NEEDED)
732                         bcopy(tr->tr_real_data, tr->tr_data, tr->tr_real_length);
733                 bus_dmamap_sync(tr->tr_sc->twa_dma_tag, tr->tr_dma_map,
734                                                 BUS_DMASYNC_PREWRITE);
735         }
736         error = twa_submit_io(tr);
737
738 out:
739         if (error) {
740                 twa_unmap_request(tr);
741                 /*
742                  * If the caller had been returned EINPROGRESS, and he has
743                  * registered a callback for handling completion, the callback
744                  * will never get called because we were unable to submit the
745                  * request.  So, free up the request right here.
746                  */
747                 if ((tr->tr_flags & TWA_CMD_IN_PROGRESS) && (tr->tr_callback))
748                         twa_release_request(tr);
749         }
750 }
751
752
753
754 /*
755  * Function name:       twa_setup_request_dmamap
756  * Description:         Callback of bus_dmamap_load for the buffer associated
757  *                      with a cmd pkt.
758  *
759  * Input:               arg     -- ptr to request pkt
760  *                      segs    -- ptr to a list of segment descriptors
761  *                      nsegments--# of segments
762  *                      error   -- 0 if no errors encountered before callback,
763  *                                 non-zero if errors were encountered
764  * Output:              None
765  * Return value:        None
766  */
767 static void
768 twa_setup_request_dmamap(void *arg, bus_dma_segment_t *segs,
769                                                 int nsegments, int error)
770 {
771         struct twa_softc        *sc = (struct twa_softc *)arg;
772
773         twa_dbg_dprint_enter(10, sc);
774
775         sc->twa_cmd_pkt_phys = segs[0].ds_addr;
776 }
777
778
779
780 /*
781  * Function name:       twa_map_request
782  * Description:         Maps a cmd pkt and data associated with it, into
783  *                      DMA'able memory.
784  *
785  * Input:               tr      -- ptr to request pkt
786  * Output:              None
787  * Return value:        0       -- success
788  *                      non-zero-- failure
789  */
790 int
791 twa_map_request(struct twa_request *tr)
792 {
793         struct twa_softc        *sc = tr->tr_sc;
794         int                     error = 0;
795
796         twa_dbg_dprint_enter(10, sc);
797
798         /* If the command involves data, map that too. */
799         if (tr->tr_data != NULL) {
800                 /*
801                  * It's sufficient for the data pointer to be 4-byte aligned
802                  * to work with 9000.  However, if 4-byte aligned addresses
803                  * are passed to bus_dmamap_load, we can get back sg elements
804                  * that are not 512-byte multiples in size.  So, we will let
805                  * only those buffers that are 512-byte aligned to pass
806                  * through, and bounce the rest, so as to make sure that we
807                  * always get back sg elements that are 512-byte multiples
808                  * in size.
809                  */
810                 if (((vm_offset_t)tr->tr_data % 512) || (tr->tr_length % 512)) {
811                         tr->tr_flags |= TWA_CMD_DATA_COPY_NEEDED;
812                         tr->tr_real_data = tr->tr_data; /* save original data pointer */
813                         tr->tr_real_length = tr->tr_length; /* save original data length */
814                         tr->tr_length = (tr->tr_length + 511) & ~511;
815                         tr->tr_data = malloc(tr->tr_length, TWA_MALLOC_CLASS, M_INTWAIT);
816                 }
817         
818                 /*
819                  * Map the data buffer into bus space and build the s/g list.
820                  */
821                 if ((error = bus_dmamap_load(sc->twa_dma_tag, tr->tr_dma_map,
822                                         tr->tr_data, tr->tr_length, 
823                                         twa_setup_data_dmamap, tr,
824                                         BUS_DMA_WAITOK))) {
825                         if (error == EINPROGRESS) {
826                                 tr->tr_flags |= TWA_CMD_IN_PROGRESS;
827                                 if (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_EXTERNAL)
828                                         twa_disallow_new_requests(sc);
829                                 error = 0;
830                         } else {
831                                 /* Free alignment buffer if it was used. */
832                                 if (tr->tr_flags & TWA_CMD_DATA_COPY_NEEDED) {
833                                         free(tr->tr_data, TWA_MALLOC_CLASS);
834                                         tr->tr_data = tr->tr_real_data; /* restore 'real' data pointer */
835                                         tr->tr_length = tr->tr_real_length;/* restore 'real' data length */
836                                 }
837                         }
838                 } else
839                         error = tr->tr_error;
840
841         } else
842                 if ((error = twa_submit_io(tr)))
843                         twa_unmap_request(tr);
844
845         return(error);
846 }
847
848
849
850 /*
851  * Function name:       twa_unmap_request
852  * Description:         Undoes the mapping done by twa_map_request.
853  *
854  * Input:               tr      -- ptr to request pkt
855  * Output:              None
856  * Return value:        None
857  */
858 void
859 twa_unmap_request(struct twa_request *tr)
860 {
861         struct twa_softc        *sc = tr->tr_sc;
862         u_int8_t                cmd_status;
863
864         twa_dbg_dprint_enter(10, sc);
865
866         /* If the command involved data, unmap that too. */
867         if (tr->tr_data != NULL) {
868                 if (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_9K)
869                         cmd_status = tr->tr_command->command.cmd_pkt_9k.status;
870                 else
871                         cmd_status = tr->tr_command->command.cmd_pkt_7k.generic.status;
872
873                 if (tr->tr_flags & TWA_CMD_DATA_IN) {
874                         bus_dmamap_sync(sc->twa_dma_tag,
875                                         tr->tr_dma_map, BUS_DMASYNC_POSTREAD);
876
877                         /* 
878                          * If we are using a bounce buffer, and we are reading
879                          * data, copy the real data in.
880                          */
881                         if (tr->tr_flags & TWA_CMD_DATA_COPY_NEEDED)
882                                 if (cmd_status == 0)
883                                         bcopy(tr->tr_data, tr->tr_real_data,
884                                                         tr->tr_real_length);
885                 }
886                 if (tr->tr_flags & TWA_CMD_DATA_OUT)
887                         bus_dmamap_sync(sc->twa_dma_tag, tr->tr_dma_map,
888                                                         BUS_DMASYNC_POSTWRITE);
889
890                 bus_dmamap_unload(sc->twa_dma_tag, tr->tr_dma_map); 
891         }
892
893         /* Free alignment buffer if it was used. */
894         if (tr->tr_flags & TWA_CMD_DATA_COPY_NEEDED) {
895                 free(tr->tr_data, TWA_MALLOC_CLASS);
896                 tr->tr_data = tr->tr_real_data; /* restore 'real' data pointer */
897                 tr->tr_length = tr->tr_real_length;/* restore 'real' data length */
898         }
899 }
900
901
902
903 #ifdef TWA_DEBUG
904 void    twa_report(void);
905 void    twa_reset_stats(void);
906 void    twa_print_request(struct twa_request *tr, int req_type);
907
908
909
910 /*
911  * Function name:       twa_report
912  * Description:         For being called from ddb.  Prints controller stats,
913  *                      and requests, if any, that are in the wrong queue.
914  *
915  * Input:               None
916  * Output:              None
917  * Return value:        None
918  */
919 void
920 twa_report(void)
921 {
922         struct twa_softc        *sc;
923         struct twa_request      *tr;
924         int                     i;
925
926         crit_enter();
927         for (i = 0; (sc = devclass_get_softc(twa_devclass, i)) != NULL; i++) {
928                 twa_print_controller(sc);
929                 TAILQ_FOREACH(tr, &sc->twa_busy, tr_link)
930                         twa_print_request(tr, TWA_CMD_BUSY);
931                 TAILQ_FOREACH(tr, &sc->twa_complete, tr_link)
932                         twa_print_request(tr, TWA_CMD_COMPLETE);
933         }
934         crit_exit();
935 }
936
937
938
939 /*
940  * Function name:       twa_reset_stats
941  * Description:         For being called from ddb.
942  *                      Resets some controller stats.
943  *
944  * Input:               None
945  * Output:              None
946  * Return value:        None
947  */
948 void
949 twa_reset_stats(void)
950 {
951         struct twa_softc        *sc;
952         int                     i;
953
954         crit_enter();
955         for (i = 0; (sc = devclass_get_softc(twa_devclass, i)) != NULL; i++) {
956                 sc->twa_qstats[TWAQ_FREE].q_max = 0;
957                 sc->twa_qstats[TWAQ_BUSY].q_max = 0;
958                 sc->twa_qstats[TWAQ_PENDING].q_max = 0;
959                 sc->twa_qstats[TWAQ_COMPLETE].q_max = 0;
960         }
961         crit_exit();
962 }
963
964
965
966 /*
967  * Function name:       twa_print_request
968  * Description:         Prints a given request if it's in the wrong queue.
969  *
970  * Input:               tr      -- ptr to request pkt
971  *                      req_type-- expected status of the given request
972  * Output:              None
973  * Return value:        None
974  */
975 void
976 twa_print_request(struct twa_request *tr, int req_type)
977 {
978         struct twa_softc                *sc = tr->tr_sc;
979         struct twa_command_packet       *cmdpkt = tr->tr_command;
980         struct twa_command_9k           *cmd9k;
981         union twa_command_7k            *cmd7k;
982         u_int8_t                        *cdb;
983         int                             cmd_phys_addr;
984
985         if (tr->tr_status != req_type) {
986                 twa_printf(sc, "Invalid %s request %p in queue! req_type = %x, queue_type = %x\n",
987                         (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_INTERNAL) ? "INTERNAL" : "EXTERNAL",
988                         tr, tr->tr_status, req_type);
989
990                 if (tr->tr_cmd_pkt_type & TWA_CMD_PKT_TYPE_9K) {
991                         cmd9k = &(cmdpkt->command.cmd_pkt_9k);
992                         cmd_phys_addr = cmd9k->sg_list[0].address;
993                         twa_printf(sc, "9K cmd = %x %x %x %x %x %x %x %x %x\n",
994                                         cmd9k->command.opcode,
995                                         cmd9k->command.reserved,
996                                         cmd9k->unit,
997                                         cmd9k->request_id,
998                                         cmd9k->status,
999                                         cmd9k->sgl_offset,
1000                                         cmd9k->sgl_entries,
1001                                         cmd_phys_addr,
1002                                         cmd9k->sg_list[0].length);
1003                         cdb = (u_int8_t *)(cmdpkt->command.cmd_pkt_9k.cdb);
1004                         twa_printf(sc, "cdb = %x %x %x %x %x %x %x %x %x %x %x %x %x %x %x %x\n",
1005                                 cdb[0], cdb[1], cdb[2], cdb[3], cdb[4], cdb[5], cdb[6], cdb[7],
1006                                 cdb[8], cdb[9], cdb[10], cdb[11], cdb[12], cdb[13], cdb[14], cdb[15]);
1007                 } else {
1008                         cmd7k = &(cmdpkt->command.cmd_pkt_7k);
1009                         twa_printf(sc, "7K cmd = %x %x %x %x %x %x %x %x %x\n",
1010                                         cmd7k->generic.opcode,
1011                                         cmd7k->generic.sgl_offset,
1012                                         cmd7k->generic.size,
1013                                         cmd7k->generic.request_id,
1014                                         cmd7k->generic.unit,
1015                                         cmd7k->generic.host_id,
1016                                         cmd7k->generic.status,
1017                                         cmd7k->generic.flags,
1018                                         cmd7k->generic.count);
1019                 }
1020
1021                 cmd_phys_addr = (int)(tr->tr_cmd_phys);
1022                 twa_printf(sc, "cmdphys=0x%x data=%p length=0x%x\n",
1023                                 cmd_phys_addr, tr->tr_data, tr->tr_length);
1024                 twa_printf(sc, "req_id=0x%x flags=0x%x callback=%p private=%p\n",
1025                                         tr->tr_request_id, tr->tr_flags,
1026                                         tr->tr_callback, tr->tr_private);
1027         }
1028 }
1029 #endif