1 /* $FreeBSD: src/sys/dev/iir/iir_ctrl.c,v 1.17 2005/05/06 02:32:34 cperciva Exp $ */ 2 /* $DragonFly: src/sys/dev/raid/iir/iir_ctrl.c,v 1.13 2007/05/17 21:08:49 dillon Exp $ */ 3 /*- 4 * Copyright (c) 2000-03 ICP vortex GmbH 5 * Copyright (c) 2002-03 Intel Corporation 6 * Copyright (c) 2003 Adaptec Inc. 7 * All Rights Reserved 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions, and the following disclaimer, 14 * without modification, immediately at the beginning of the file. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR 25 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 /* 35 * iir_ctrl.c: Control functions and /dev entry points for /dev/iir* 36 * 37 * Written by: Achim Leubner <achim_leubner@adaptec.com> 38 * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com> 39 * 40 * $Id: iir_ctrl.c 1.3 2003/08/26 12:31:15 achim Exp $" 41 */ 42 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/bus.h> 51 #include <sys/conf.h> 52 #include <sys/stat.h> 53 #include <sys/device.h> 54 #include <sys/ioccom.h> 55 #include <sys/thread2.h> 56 57 #include <vm/vm.h> 58 #include <vm/vm_kern.h> 59 #include <vm/vm_extern.h> 60 #include <vm/pmap.h> 61 62 #include "iir.h" 63 64 /* Entry points and other prototypes */ 65 static struct gdt_softc *gdt_minor2softc(int minor_no); 66 67 static d_open_t iir_open; 68 static d_close_t iir_close; 69 static d_write_t iir_write; 70 static d_read_t iir_read; 71 static d_ioctl_t iir_ioctl; 72 73 #define CDEV_MAJOR IIR_CDEV_MAJOR 74 75 /* Normally, this is a static structure. But we need it in pci/iir_pci.c */ 76 static struct dev_ops iir_ops = { 77 { "iir", CDEV_MAJOR, 0 }, 78 .d_open = iir_open, 79 .d_close = iir_close, 80 .d_read = iir_read, 81 .d_write = iir_write, 82 .d_ioctl = iir_ioctl, 83 }; 84 85 static int iir_devsw_installed = 0; 86 #ifndef SDEV_PER_HBA 87 static int sdev_made = 0; 88 #endif 89 extern int gdt_cnt; 90 extern char ostype[]; 91 extern char osrelease[]; 92 extern gdt_statist_t gdt_stat; 93 94 /* 95 * Given a controller number, 96 * make a special device and return the cdev_t 97 */ 98 cdev_t 99 gdt_make_dev(int unit) 100 { 101 cdev_t dev; 102 103 #ifdef SDEV_PER_HBA 104 dev = make_dev(&iir_ops, hba2minor(unit), UID_ROOT, GID_OPERATOR, 105 S_IRUSR | S_IWUSR, "iir%d", unit); 106 #else 107 if (sdev_made) 108 return (0); 109 dev = make_dev(&iir_ops, 0, UID_ROOT, GID_OPERATOR, 110 S_IRUSR | S_IWUSR, "iir"); 111 sdev_made = 1; 112 #endif 113 reference_dev(dev); 114 return (dev); 115 } 116 117 void 118 gdt_destroy_dev(cdev_t dev) 119 { 120 if (dev != NULL) 121 destroy_dev(dev); 122 } 123 124 /* 125 * Given a minor device number, 126 * return the pointer to its softc structure 127 */ 128 static struct gdt_softc * 129 gdt_minor2softc(int minor_no) 130 { 131 struct gdt_softc *gdt; 132 int hanum; 133 134 #ifdef SDEV_PER_HBA 135 hanum = minor2hba(minor_no); 136 #else 137 hanum = minor_no; 138 #endif 139 140 for (gdt = TAILQ_FIRST(&gdt_softcs); 141 gdt != NULL && gdt->sc_hanum != hanum; 142 gdt = TAILQ_NEXT(gdt, links)); 143 144 return (gdt); 145 } 146 147 static int 148 iir_open(struct dev_open_args *ap) 149 { 150 GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n")); 151 152 #ifdef SDEV_PER_HBA 153 int minor_no; 154 struct gdt_softc *gdt; 155 156 minor_no = minor(dev); 157 gdt = gdt_minor2softc(minor_no); 158 if (gdt == NULL) 159 return (ENXIO); 160 #endif 161 162 return (0); 163 } 164 165 static int 166 iir_close(struct dev_close_args *ap) 167 { 168 GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n")); 169 170 #ifdef SDEV_PER_HBA 171 int minor_no; 172 struct gdt_softc *gdt; 173 174 minor_no = minor(dev); 175 gdt = gdt_minor2softc(minor_no); 176 if (gdt == NULL) 177 return (ENXIO); 178 #endif 179 180 return (0); 181 } 182 183 static int 184 iir_write(struct dev_write_args *ap) 185 { 186 GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n")); 187 188 #ifdef SDEV_PER_HBA 189 int minor_no; 190 struct gdt_softc *gdt; 191 192 minor_no = minor(dev); 193 gdt = gdt_minor2softc(minor_no); 194 if (gdt == NULL) 195 return (ENXIO); 196 #endif 197 198 return (0); 199 } 200 201 static int 202 iir_read(struct dev_read_args *ap) 203 { 204 GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n")); 205 206 #ifdef SDEV_PER_HBA 207 int minor_no; 208 struct gdt_softc *gdt; 209 210 minor_no = minor(dev); 211 gdt = gdt_minor2softc(minor_no); 212 if (gdt == NULL) 213 return (ENXIO); 214 #endif 215 216 return (0); 217 } 218 219 /** 220 * This is the control syscall interface. 221 * It should be binary compatible with UnixWare, 222 * if not totally syntatically so. 223 */ 224 225 static int 226 iir_ioctl(struct dev_ioctl_args *ap) 227 { 228 GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd)); 229 230 #ifdef SDEV_PER_HBA 231 int minor_no; 232 struct gdt_softc *gdt; 233 234 minor_no = minor(dev); 235 gdt = gdt_minor2softc(minor_no); 236 if (gdt == NULL) 237 return (ENXIO); 238 #endif 239 ++gdt_stat.io_count_act; 240 if (gdt_stat.io_count_act > gdt_stat.io_count_max) 241 gdt_stat.io_count_max = gdt_stat.io_count_act; 242 243 switch (ap->a_cmd) { 244 case GDT_IOCTL_GENERAL: 245 { 246 gdt_ucmd_t *ucmd; 247 struct gdt_softc *gdt; 248 249 ucmd = (gdt_ucmd_t *)ap->a_data; 250 gdt = gdt_minor2softc(ucmd->io_node); 251 if (gdt == NULL) 252 return (ENXIO); 253 crit_enter(); 254 TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links); 255 ucmd->complete_flag = FALSE; 256 crit_exit(); 257 gdt_next(gdt); 258 if (!ucmd->complete_flag) 259 (void) tsleep((void *)ucmd, PCATCH, "iirucw", 0); 260 break; 261 } 262 263 case GDT_IOCTL_DRVERS: 264 case GDT_IOCTL_DRVERS_OLD: 265 *(int *)ap->a_data = 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 *)ap->a_data; 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 *)ap->a_data; 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 *)ap->a_data = gdt_cnt; 321 break; 322 323 case GDT_IOCTL_EVENT: 324 { 325 gdt_event_t *p; 326 327 p = (gdt_event_t *)ap->a_data; 328 if (p->erase == 0xff) { 329 if (p->dvr.event_source == GDT_ES_TEST) 330 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test); 331 else if (p->dvr.event_source == GDT_ES_DRIVER) 332 p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver); 333 else if (p->dvr.event_source == GDT_ES_SYNC) 334 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync); 335 else 336 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async); 337 crit_enter(); 338 gdt_store_event(p->dvr.event_source, p->dvr.event_idx, 339 &p->dvr.event_data); 340 crit_exit(); 341 } else if (p->erase == 0xfe) { 342 crit_enter(); 343 gdt_clear_events(); 344 crit_exit(); 345 } else if (p->erase == 0) { 346 p->handle = gdt_read_event(p->handle, &p->dvr); 347 } else { 348 gdt_readapp_event((u_int8_t)p->erase, &p->dvr); 349 } 350 break; 351 } 352 353 case GDT_IOCTL_STATIST: 354 { 355 gdt_statist_t *p; 356 357 p = (gdt_statist_t *)ap->a_data; 358 bcopy(&gdt_stat, p, sizeof(gdt_statist_t)); 359 break; 360 } 361 362 default: 363 break; 364 } 365 366 --gdt_stat.io_count_act; 367 return (0); 368 } 369 370 static void 371 iir_drvinit(void *unused) 372 { 373 GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n")); 374 375 if (!iir_devsw_installed) { 376 /* Add the I/O (data) channel */ 377 dev_ops_add(&iir_ops, 0, 0); 378 iir_devsw_installed = 1; 379 } 380 } 381 382 SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, iir_drvinit, NULL) 383