iir_ctrl.c revision 119418
1/*
2 *       Copyright (c) 2000-01 Intel Corporation
3 *       All Rights Reserved
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions, and the following disclaimer,
10 *    without modification, immediately at the beginning of the file.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 *    derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
21 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30/*
31 * iir_ctrl.c: Control functions and /dev entry points for /dev/iir*
32 *
33 * Written by: Achim Leubner <achim.leubner@intel.com>
34 * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com>
35 *
36 * TODO:
37 */
38
39#ident "$Id: iir_ctrl.c 1.2 2001/07/18 11:17:22 achim Exp $"
40#include <sys/cdefs.h>
41__FBSDID("$FreeBSD: head/sys/dev/iir/iir_ctrl.c 119418 2003-08-24 17:55:58Z obrien $");
42
43#include <sys/param.h>
44#include <sys/systm.h>
45#include <sys/endian.h>
46#include <sys/malloc.h>
47#include <sys/kernel.h>
48#include <sys/uio.h>
49#include <sys/conf.h>
50#include <sys/disk.h>
51#include <sys/stat.h>
52#include <sys/disklabel.h>
53#include <machine/bus.h>
54#include <vm/vm.h>
55#include <vm/vm_kern.h>
56#include <vm/vm_extern.h>
57#include <vm/pmap.h>
58
59#include <dev/iir/iir.h>
60
61/* Entry points and other prototypes */
62static struct gdt_softc *gdt_minor2softc(int minor_no);
63
64static d_open_t		iir_open;
65static d_close_t	iir_close;
66static d_write_t	iir_write;
67static d_read_t		iir_read;
68static d_ioctl_t	iir_ioctl;
69
70#define CDEV_MAJOR          IIR_CDEV_MAJOR
71
72/* Normally, this is a static structure.  But we need it in pci/iir_pci.c */
73static struct cdevsw iir_cdevsw = {
74	.d_open =	iir_open,
75	.d_close =	iir_close,
76	.d_read =	iir_read,
77	.d_write =	iir_write,
78	.d_ioctl =	iir_ioctl,
79	.d_name =	"iir",
80	.d_maj =	CDEV_MAJOR,
81};
82
83/*
84static int iir_devsw_installed = 0;
85*/
86#ifndef SDEV_PER_HBA
87static int sdev_made = 0;
88#endif
89extern int gdt_cnt;
90extern char ostype[];
91extern char osrelease[];
92extern gdt_statist_t gdt_stat;
93
94/*
95 * Given a controller number,
96 * make a special device and return the dev_t
97 */
98dev_t
99gdt_make_dev(int unit)
100{
101    dev_t dev;
102
103#ifdef SDEV_PER_HBA
104    dev = make_dev(&iir_cdevsw, hba2minor(unit), UID_ROOT, GID_OPERATOR,
105                   S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH, "iir%d", unit);
106#else
107    if (sdev_made)
108        return (0);
109    dev = make_dev(&iir_cdevsw, 0, UID_ROOT, GID_OPERATOR,
110                   S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH, "iir");
111    sdev_made = 1;
112#endif
113    return (dev);
114}
115
116void
117gdt_destroy_dev(dev_t dev)
118{
119    if (dev != NULL)
120        destroy_dev(dev);
121}
122
123/*
124 * Given a minor device number,
125 * return the pointer to its softc structure
126 */
127static struct gdt_softc *
128gdt_minor2softc(int minor_no)
129{
130    struct gdt_softc *gdt;
131    int hanum;
132
133#ifdef SDEV_PER_HBA
134    hanum = minor2hba(minor_no);
135#else
136    hanum = minor_no;
137#endif
138
139    for (gdt = TAILQ_FIRST(&gdt_softcs);
140         gdt != NULL && gdt->sc_hanum != hanum;
141         gdt = TAILQ_NEXT(gdt, links));
142
143    return (gdt);
144}
145
146static int
147iir_open(dev_t dev, int flags, int fmt, d_thread_t * p)
148{
149    GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n"));
150
151#ifdef SDEV_PER_HBA
152    int minor_no;
153    struct gdt_softc *gdt;
154
155    minor_no = minor(dev);
156    gdt = gdt_minor2softc(minor_no);
157    if (gdt == NULL)
158        return (ENXIO);
159#endif
160
161    return (0);
162}
163
164static int
165iir_close(dev_t dev, int flags, int fmt, d_thread_t * p)
166{
167    GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n"));
168
169#ifdef SDEV_PER_HBA
170    int minor_no;
171    struct gdt_softc *gdt;
172
173    minor_no = minor(dev);
174    gdt = gdt_minor2softc(minor_no);
175    if (gdt == NULL)
176        return (ENXIO);
177#endif
178
179    return (0);
180}
181
182static int
183iir_write(dev_t dev, struct uio * uio, int ioflag)
184{
185    GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n"));
186
187#ifdef SDEV_PER_HBA
188    int minor_no;
189    struct gdt_softc *gdt;
190
191    minor_no = minor(dev);
192    gdt = gdt_minor2softc(minor_no);
193    if (gdt == NULL)
194        return (ENXIO);
195#endif
196
197    return (0);
198}
199
200static int
201iir_read(dev_t dev, struct uio * uio, int ioflag)
202{
203    GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n"));
204
205#ifdef SDEV_PER_HBA
206    int minor_no;
207    struct gdt_softc *gdt;
208
209    minor_no = minor(dev);
210    gdt = gdt_minor2softc(minor_no);
211    if (gdt == NULL)
212        return (ENXIO);
213#endif
214
215    return (0);
216}
217
218/**
219 * This is the control syscall interface.
220 * It should be binary compatible with UnixWare,
221 * if not totally syntatically so.
222 */
223
224static int
225iir_ioctl(dev_t dev, u_long cmd, caddr_t cmdarg, int flags, d_thread_t * p)
226{
227    GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd));
228
229#ifdef SDEV_PER_HBA
230    int minor_no;
231    struct gdt_softc *gdt;
232
233    minor_no = minor(dev);
234    gdt = gdt_minor2softc(minor_no);
235    if (gdt == NULL)
236        return (ENXIO);
237#endif
238    ++gdt_stat.io_count_act;
239    if (gdt_stat.io_count_act > gdt_stat.io_count_max)
240        gdt_stat.io_count_max = gdt_stat.io_count_act;
241
242    switch (cmd) {
243      case GDT_IOCTL_GENERAL:
244        {
245            gdt_ucmd_t *ucmd;
246            struct gdt_softc *gdt;
247            int lock;
248
249            ucmd = (gdt_ucmd_t *)cmdarg;
250            gdt = gdt_minor2softc(ucmd->io_node);
251            if (gdt == NULL)
252                return (ENXIO);
253            lock = splcam();
254            TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links);
255            ucmd->complete_flag = FALSE;
256            splx(lock);
257            gdt_next(gdt);
258            if (!ucmd->complete_flag)
259                (void) tsleep((void *)ucmd, PCATCH | PRIBIO, "iirucw", 0);
260            break;
261        }
262
263      case GDT_IOCTL_DRVERS:
264        *(int *)cmdarg =
265            (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION;
266        break;
267
268      case GDT_IOCTL_CTRTYPE:
269        {
270            gdt_ctrt_t *p;
271            struct gdt_softc *gdt;
272
273            p = (gdt_ctrt_t *)cmdarg;
274            gdt = gdt_minor2softc(p->io_node);
275            if (gdt == NULL)
276                return (ENXIO);
277            p->oem_id = 0x8000;
278            p->type = 0xfd;
279            p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3);
280            p->ext_type = 0x6000 | gdt->sc_subdevice;
281            p->device_id = gdt->sc_device;
282            p->sub_device_id = gdt->sc_subdevice;
283            break;
284        }
285
286      case GDT_IOCTL_OSVERS:
287        {
288            gdt_osv_t *p;
289
290            p = (gdt_osv_t *)cmdarg;
291            p->oscode = 10;
292            p->version = osrelease[0] - '0';
293            if (osrelease[1] == '.')
294                p->subversion = osrelease[2] - '0';
295            else
296                p->subversion = 0;
297            if (osrelease[3] == '.')
298                p->revision = osrelease[4] - '0';
299            else
300                p->revision = 0;
301            strcpy(p->name, ostype);
302            break;
303        }
304
305      case GDT_IOCTL_CTRCNT:
306        *(int *)cmdarg = gdt_cnt;
307        break;
308
309      case GDT_IOCTL_EVENT:
310        {
311            gdt_event_t *p;
312            int lock;
313
314            p = (gdt_event_t *)cmdarg;
315            if (p->erase == 0xff) {
316                if (p->dvr.event_source == GDT_ES_TEST)
317                    p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test);
318                else if (p->dvr.event_source == GDT_ES_DRIVER)
319                    p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver);
320                else if (p->dvr.event_source == GDT_ES_SYNC)
321                    p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync);
322                else
323                    p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async);
324                lock = splcam();
325                gdt_store_event(p->dvr.event_source, p->dvr.event_idx,
326                                &p->dvr.event_data);
327                splx(lock);
328            } else if (p->erase == 0xfe) {
329                lock = splcam();
330                gdt_clear_events();
331                splx(lock);
332            } else if (p->erase == 0) {
333                p->handle = gdt_read_event(p->handle, &p->dvr);
334            } else {
335                gdt_readapp_event((u_int8_t)p->erase, &p->dvr);
336            }
337            break;
338        }
339
340      case GDT_IOCTL_STATIST:
341        {
342            gdt_statist_t *p;
343
344            p = (gdt_statist_t *)cmdarg;
345            bcopy(&gdt_stat, p, sizeof(gdt_statist_t));
346            break;
347        }
348
349      default:
350        break;
351    }
352
353    --gdt_stat.io_count_act;
354    return (0);
355}
356
357/*
358static void
359iir_drvinit(void *unused)
360{
361    GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n"));
362
363    if (!iir_devsw_installed) {
364        cdevsw_add(&iir_cdevsw);
365        iir_devsw_installed = 1;
366    }
367}
368
369SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, iir_drvinit, NULL)
370*/
371