iir_ctrl.c revision 130585
1/* 2 * Copyright (c) 2000-03 ICP vortex GmbH 3 * Copyright (c) 2002-03 Intel Corporation 4 * Copyright (c) 2003 Adaptec Inc. 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, immediately at the beginning of the file. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. The name of the author may not be used to endorse or promote products 17 * derived from this software without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR 23 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32/* 33 * iir_ctrl.c: Control functions and /dev entry points for /dev/iir* 34 * 35 * Written by: Achim Leubner <achim_leubner@adaptec.com> 36 * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com> 37 * 38 * $Id: iir_ctrl.c 1.3 2003/08/26 12:31:15 achim Exp $" 39 */ 40 41#include <sys/cdefs.h> 42__FBSDID("$FreeBSD: head/sys/dev/iir/iir_ctrl.c 130585 2004-06-16 09:47:26Z phk $"); 43 44#include <sys/param.h> 45#include <sys/systm.h> 46#include <sys/endian.h> 47#include <sys/malloc.h> 48#include <sys/kernel.h> 49#include <sys/uio.h> 50#include <sys/conf.h> 51#include <sys/disk.h> 52#include <sys/stat.h> 53#include <sys/disklabel.h> 54#include <machine/bus.h> 55#include <vm/vm.h> 56#include <vm/vm_kern.h> 57#include <vm/vm_extern.h> 58#include <vm/pmap.h> 59 60#include <dev/iir/iir.h> 61 62/* Entry points and other prototypes */ 63static struct gdt_softc *gdt_minor2softc(int minor_no); 64 65static d_open_t iir_open; 66static d_close_t iir_close; 67static d_write_t iir_write; 68static d_read_t iir_read; 69static d_ioctl_t iir_ioctl; 70 71/* Normally, this is a static structure. But we need it in pci/iir_pci.c */ 72static struct cdevsw iir_cdevsw = { 73 .d_version = D_VERSION, 74 .d_flags = D_NEEDGIANT, 75 .d_open = iir_open, 76 .d_close = iir_close, 77 .d_read = iir_read, 78 .d_write = iir_write, 79 .d_ioctl = iir_ioctl, 80 .d_name = "iir", 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 */ 98struct cdev * 99gdt_make_dev(int unit) 100{ 101 struct cdev *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(struct cdev *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(struct cdev *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(struct cdev *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(struct cdev *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(struct cdev *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(struct cdev *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 case GDT_IOCTL_DRVERS_OLD: 265 *(int *)cmdarg = 266 (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION; 267 break; 268 269 case GDT_IOCTL_CTRTYPE: 270 case GDT_IOCTL_CTRTYPE_OLD: 271 { 272 gdt_ctrt_t *p; 273 struct gdt_softc *gdt; 274 275 p = (gdt_ctrt_t *)cmdarg; 276 gdt = gdt_minor2softc(p->io_node); 277 if (gdt == NULL) 278 return (ENXIO); 279 /* only RP controllers */ 280 p->ext_type = 0x6000 | gdt->sc_device; 281 if (gdt->sc_vendor == INTEL_VENDOR_ID) { 282 p->oem_id = OEM_ID_INTEL; 283 p->type = 0xfd; 284 /* new -> subdevice into ext_type */ 285 if (gdt->sc_device >= 0x600) 286 p->ext_type = 0x6000 | gdt->sc_subdevice; 287 } else { 288 p->oem_id = OEM_ID_ICP; 289 p->type = 0xfe; 290 /* new -> subdevice into ext_type */ 291 if (gdt->sc_device >= 0x300) 292 p->ext_type = 0x6000 | gdt->sc_subdevice; 293 } 294 p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3); 295 p->device_id = gdt->sc_device; 296 p->sub_device_id = gdt->sc_subdevice; 297 break; 298 } 299 300 case GDT_IOCTL_OSVERS: 301 { 302 gdt_osv_t *p; 303 304 p = (gdt_osv_t *)cmdarg; 305 p->oscode = 10; 306 p->version = osrelease[0] - '0'; 307 if (osrelease[1] == '.') 308 p->subversion = osrelease[2] - '0'; 309 else 310 p->subversion = 0; 311 if (osrelease[3] == '.') 312 p->revision = osrelease[4] - '0'; 313 else 314 p->revision = 0; 315 strcpy(p->name, ostype); 316 break; 317 } 318 319 case GDT_IOCTL_CTRCNT: 320 *(int *)cmdarg = gdt_cnt; 321 break; 322 323 case GDT_IOCTL_EVENT: 324 { 325 gdt_event_t *p; 326 int lock; 327 328 p = (gdt_event_t *)cmdarg; 329 if (p->erase == 0xff) { 330 if (p->dvr.event_source == GDT_ES_TEST) 331 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test); 332 else if (p->dvr.event_source == GDT_ES_DRIVER) 333 p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver); 334 else if (p->dvr.event_source == GDT_ES_SYNC) 335 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync); 336 else 337 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async); 338 lock = splcam(); 339 gdt_store_event(p->dvr.event_source, p->dvr.event_idx, 340 &p->dvr.event_data); 341 splx(lock); 342 } else if (p->erase == 0xfe) { 343 lock = splcam(); 344 gdt_clear_events(); 345 splx(lock); 346 } else if (p->erase == 0) { 347 p->handle = gdt_read_event(p->handle, &p->dvr); 348 } else { 349 gdt_readapp_event((u_int8_t)p->erase, &p->dvr); 350 } 351 break; 352 } 353 354 case GDT_IOCTL_STATIST: 355 { 356 gdt_statist_t *p; 357 358 p = (gdt_statist_t *)cmdarg; 359 bcopy(&gdt_stat, p, sizeof(gdt_statist_t)); 360 break; 361 } 362 363 default: 364 break; 365 } 366 367 --gdt_stat.io_count_act; 368 return (0); 369} 370 371/* 372static void 373iir_drvinit(void *unused) 374{ 375 GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n")); 376 377 if (!iir_devsw_installed) { 378 cdevsw_add(&iir_cdevsw); 379 iir_devsw_installed = 1; 380 } 381} 382 383SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE, iir_drvinit, NULL) 384*/ 385