1 /* $FreeBSD: src/sys/dev/iir/iir_ctrl.c,v 1.2.2.4 2002/05/05 08:18:12 asmodai Exp $ */ 2 /* $DragonFly: src/sys/dev/raid/iir/iir_ctrl.c,v 1.10 2006/07/28 02:17:37 dillon Exp $ */ 3 /* 4 * Copyright (c) 2000-01 Intel Corporation 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@intel.com> 36 * Fixes/Additions: Boji Tony Kannanthanam <boji.t.kannanthanam@intel.com> 37 * 38 * TODO: 39 */ 40 41 #ident "$Id: iir_ctrl.c 1.2 2001/07/18 11:17:22 achim Exp $" 42 43 #include <sys/param.h> 44 #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/device.h> 51 #include <sys/disklabel.h> 52 #include <sys/thread2.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 "iir.h" 60 61 /* Entry points and other prototypes */ 62 static struct gdt_softc *gdt_minor2softc(int minor_no); 63 64 static d_open_t iir_open; 65 static d_close_t iir_close; 66 static d_write_t iir_write; 67 static d_read_t iir_read; 68 static 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 */ 73 static struct dev_ops iir_ops = { 74 { "iir", CDEV_MAJOR, 0 }, 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 }; 81 82 static int iir_devsw_installed = 0; 83 #ifndef SDEV_PER_HBA 84 static int sdev_made = 0; 85 #endif 86 extern int gdt_cnt; 87 extern char ostype[]; 88 extern char osrelease[]; 89 extern gdt_statist_t gdt_stat; 90 91 /* 92 * Given a controller number, 93 * make a special device and return the dev_t 94 */ 95 dev_t 96 gdt_make_dev(int unit) 97 { 98 dev_t dev; 99 100 #ifdef SDEV_PER_HBA 101 dev = make_dev(&iir_ops, hba2minor(unit), UID_ROOT, GID_OPERATOR, 102 S_IRUSR | S_IWUSR, "iir%d", unit); 103 #else 104 if (sdev_made) 105 return (0); 106 dev = make_dev(&iir_ops, 0, UID_ROOT, GID_OPERATOR, 107 S_IRUSR | S_IWUSR, "iir"); 108 sdev_made = 1; 109 #endif 110 reference_dev(dev); 111 return (dev); 112 } 113 114 void 115 gdt_destroy_dev(dev_t dev) 116 { 117 if (dev != NULL) 118 destroy_dev(dev); 119 } 120 121 /* 122 * Given a minor device number, 123 * return the pointer to its softc structure 124 */ 125 static struct gdt_softc * 126 gdt_minor2softc(int minor_no) 127 { 128 struct gdt_softc *gdt; 129 int hanum; 130 131 #ifdef SDEV_PER_HBA 132 hanum = minor2hba(minor_no); 133 #else 134 hanum = minor_no; 135 #endif 136 137 for (gdt = TAILQ_FIRST(&gdt_softcs); 138 gdt != NULL && gdt->sc_hanum != hanum; 139 gdt = TAILQ_NEXT(gdt, links)); 140 141 return (gdt); 142 } 143 144 static int 145 iir_open(struct dev_open_args *ap) 146 { 147 GDT_DPRINTF(GDT_D_DEBUG, ("iir_open()\n")); 148 149 #ifdef SDEV_PER_HBA 150 int minor_no; 151 struct gdt_softc *gdt; 152 153 minor_no = minor(dev); 154 gdt = gdt_minor2softc(minor_no); 155 if (gdt == NULL) 156 return (ENXIO); 157 #endif 158 159 return (0); 160 } 161 162 static int 163 iir_close(struct dev_close_args *ap) 164 { 165 GDT_DPRINTF(GDT_D_DEBUG, ("iir_close()\n")); 166 167 #ifdef SDEV_PER_HBA 168 int minor_no; 169 struct gdt_softc *gdt; 170 171 minor_no = minor(dev); 172 gdt = gdt_minor2softc(minor_no); 173 if (gdt == NULL) 174 return (ENXIO); 175 #endif 176 177 return (0); 178 } 179 180 static int 181 iir_write(struct dev_write_args *ap) 182 { 183 GDT_DPRINTF(GDT_D_DEBUG, ("iir_write()\n")); 184 185 #ifdef SDEV_PER_HBA 186 int minor_no; 187 struct gdt_softc *gdt; 188 189 minor_no = minor(dev); 190 gdt = gdt_minor2softc(minor_no); 191 if (gdt == NULL) 192 return (ENXIO); 193 #endif 194 195 return (0); 196 } 197 198 static int 199 iir_read(struct dev_read_args *ap) 200 { 201 GDT_DPRINTF(GDT_D_DEBUG, ("iir_read()\n")); 202 203 #ifdef SDEV_PER_HBA 204 int minor_no; 205 struct gdt_softc *gdt; 206 207 minor_no = minor(dev); 208 gdt = gdt_minor2softc(minor_no); 209 if (gdt == NULL) 210 return (ENXIO); 211 #endif 212 213 return (0); 214 } 215 216 /** 217 * This is the control syscall interface. 218 * It should be binary compatible with UnixWare, 219 * if not totally syntatically so. 220 */ 221 222 static int 223 iir_ioctl(struct dev_ioctl_args *ap) 224 { 225 GDT_DPRINTF(GDT_D_DEBUG, ("iir_ioctl() cmd 0x%lx\n",cmd)); 226 227 #ifdef SDEV_PER_HBA 228 int minor_no; 229 struct gdt_softc *gdt; 230 231 minor_no = minor(dev); 232 gdt = gdt_minor2softc(minor_no); 233 if (gdt == NULL) 234 return (ENXIO); 235 #endif 236 ++gdt_stat.io_count_act; 237 if (gdt_stat.io_count_act > gdt_stat.io_count_max) 238 gdt_stat.io_count_max = gdt_stat.io_count_act; 239 240 switch (ap->a_cmd) { 241 case GDT_IOCTL_GENERAL: 242 { 243 gdt_ucmd_t *ucmd; 244 struct gdt_softc *gdt; 245 246 ucmd = (gdt_ucmd_t *)ap->a_data; 247 gdt = gdt_minor2softc(ucmd->io_node); 248 if (gdt == NULL) 249 return (ENXIO); 250 crit_enter(); 251 TAILQ_INSERT_TAIL(&gdt->sc_ucmd_queue, ucmd, links); 252 ucmd->complete_flag = FALSE; 253 crit_exit(); 254 gdt_next(gdt); 255 if (!ucmd->complete_flag) 256 (void) tsleep((void *)ucmd, PCATCH, "iirucw", 0); 257 break; 258 } 259 260 case GDT_IOCTL_DRVERS: 261 *(int *)ap->a_data = 262 (IIR_DRIVER_VERSION << 8) | IIR_DRIVER_SUBVERSION; 263 break; 264 265 case GDT_IOCTL_CTRTYPE: 266 { 267 gdt_ctrt_t *p; 268 struct gdt_softc *gdt; 269 270 p = (gdt_ctrt_t *)ap->a_data; 271 gdt = gdt_minor2softc(p->io_node); 272 if (gdt == NULL) 273 return (ENXIO); 274 p->oem_id = 0x8000; 275 p->type = 0xfd; 276 p->info = (gdt->sc_bus << 8) | (gdt->sc_slot << 3); 277 p->ext_type = 0x6000 | gdt->sc_subdevice; 278 p->device_id = gdt->sc_device; 279 p->sub_device_id = gdt->sc_subdevice; 280 break; 281 } 282 283 case GDT_IOCTL_OSVERS: 284 { 285 gdt_osv_t *p; 286 287 p = (gdt_osv_t *)ap->a_data; 288 p->oscode = 10; 289 p->version = osrelease[0] - '0'; 290 if (osrelease[1] == '.') 291 p->subversion = osrelease[2] - '0'; 292 else 293 p->subversion = 0; 294 if (osrelease[3] == '.') 295 p->revision = osrelease[4] - '0'; 296 else 297 p->revision = 0; 298 strcpy(p->name, ostype); 299 break; 300 } 301 302 case GDT_IOCTL_CTRCNT: 303 *(int *)ap->a_data = gdt_cnt; 304 break; 305 306 case GDT_IOCTL_EVENT: 307 { 308 gdt_event_t *p; 309 310 p = (gdt_event_t *)ap->a_data; 311 if (p->erase == 0xff) { 312 if (p->dvr.event_source == GDT_ES_TEST) 313 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.test); 314 else if (p->dvr.event_source == GDT_ES_DRIVER) 315 p->dvr.event_data.size= sizeof(p->dvr.event_data.eu.driver); 316 else if (p->dvr.event_source == GDT_ES_SYNC) 317 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.sync); 318 else 319 p->dvr.event_data.size = sizeof(p->dvr.event_data.eu.async); 320 crit_enter(); 321 gdt_store_event(p->dvr.event_source, p->dvr.event_idx, 322 &p->dvr.event_data); 323 crit_exit(); 324 } else if (p->erase == 0xfe) { 325 crit_enter(); 326 gdt_clear_events(); 327 crit_exit(); 328 } else if (p->erase == 0) { 329 p->handle = gdt_read_event(p->handle, &p->dvr); 330 } else { 331 gdt_readapp_event((u_int8_t)p->erase, &p->dvr); 332 } 333 break; 334 } 335 336 case GDT_IOCTL_STATIST: 337 { 338 gdt_statist_t *p; 339 340 p = (gdt_statist_t *)ap->a_data; 341 bcopy(&gdt_stat, p, sizeof(gdt_statist_t)); 342 break; 343 } 344 345 default: 346 break; 347 } 348 349 --gdt_stat.io_count_act; 350 return (0); 351 } 352 353 static void 354 iir_drvinit(void *unused) 355 { 356 GDT_DPRINTF(GDT_D_DEBUG, ("iir_drvinit()\n")); 357 358 if (!iir_devsw_installed) { 359 /* Add the I/O (data) channel */ 360 dev_ops_add(&iir_ops, 0, 0); 361 iir_devsw_installed = 1; 362 } 363 } 364 365 SYSINIT(iir_dev, SI_SUB_DRIVERS, SI_ORDER_MIDDLE + CDEV_MAJOR, iir_drvinit, NULL) 366