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