1 /*- 2 * Copyright (c) 2008 David E. O'Brien 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 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. Neither the name of the author nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * 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 21 * FOR 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 #include <sys/cdefs.h> 31 __FBSDID("$FreeBSD$"); 32 33 #include "opt_compat.h" 34 35 #include <sys/param.h> 36 #include <sys/capability.h> 37 #include <sys/cdio.h> 38 #include <sys/fcntl.h> 39 #include <sys/filio.h> 40 #include <sys/file.h> 41 #include <sys/ioccom.h> 42 #include <sys/malloc.h> 43 #include <sys/mdioctl.h> 44 #include <sys/memrange.h> 45 #include <sys/pciio.h> 46 #include <sys/proc.h> 47 #include <sys/syscall.h> 48 #include <sys/syscallsubr.h> 49 #include <sys/sysctl.h> 50 #include <sys/sysent.h> 51 #include <sys/sysproto.h> 52 #include <sys/systm.h> 53 54 #include <compat/freebsd32/freebsd32.h> 55 #include <compat/freebsd32/freebsd32_ioctl.h> 56 #include <compat/freebsd32/freebsd32_proto.h> 57 58 /* Cannot get exact size in 64-bit due to alignment issue of entire struct. */ 59 CTASSERT((sizeof(struct md_ioctl32)+4) == 436); 60 CTASSERT(sizeof(struct ioc_read_toc_entry32) == 8); 61 CTASSERT(sizeof(struct ioc_toc_header32) == 4); 62 CTASSERT(sizeof(struct mem_range_op32) == 12); 63 CTASSERT(sizeof(struct pci_conf_io32) == 36); 64 CTASSERT(sizeof(struct pci_match_conf32) == 44); 65 CTASSERT(sizeof(struct pci_conf32) == 44); 66 67 68 static int 69 freebsd32_ioctl_md(struct thread *td, struct freebsd32_ioctl_args *uap, 70 struct file *fp) 71 { 72 struct md_ioctl mdv; 73 struct md_ioctl32 md32; 74 u_long com = 0; 75 int i, error; 76 77 if (uap->com & IOC_IN) { 78 if ((error = copyin(uap->data, &md32, sizeof(md32)))) { 79 return (error); 80 } 81 CP(md32, mdv, md_version); 82 CP(md32, mdv, md_unit); 83 CP(md32, mdv, md_type); 84 PTRIN_CP(md32, mdv, md_file); 85 CP(md32, mdv, md_mediasize); 86 CP(md32, mdv, md_sectorsize); 87 CP(md32, mdv, md_options); 88 CP(md32, mdv, md_base); 89 CP(md32, mdv, md_fwheads); 90 CP(md32, mdv, md_fwsectors); 91 } else if (uap->com & IOC_OUT) { 92 /* 93 * Zero the buffer so the user always 94 * gets back something deterministic. 95 */ 96 bzero(&mdv, sizeof mdv); 97 } 98 99 switch (uap->com) { 100 case MDIOCATTACH_32: 101 com = MDIOCATTACH; 102 break; 103 case MDIOCDETACH_32: 104 com = MDIOCDETACH; 105 break; 106 case MDIOCQUERY_32: 107 com = MDIOCQUERY; 108 break; 109 case MDIOCLIST_32: 110 com = MDIOCLIST; 111 break; 112 default: 113 panic("%s: unknown MDIOC %#x", __func__, uap->com); 114 } 115 error = fo_ioctl(fp, com, (caddr_t)&mdv, td->td_ucred, td); 116 if (error == 0 && (com & IOC_OUT)) { 117 CP(mdv, md32, md_version); 118 CP(mdv, md32, md_unit); 119 CP(mdv, md32, md_type); 120 PTROUT_CP(mdv, md32, md_file); 121 CP(mdv, md32, md_mediasize); 122 CP(mdv, md32, md_sectorsize); 123 CP(mdv, md32, md_options); 124 CP(mdv, md32, md_base); 125 CP(mdv, md32, md_fwheads); 126 CP(mdv, md32, md_fwsectors); 127 if (com == MDIOCLIST) { 128 /* 129 * Use MDNPAD, and not MDNPAD32. Padding is 130 * allocated and used by compat32 ABI. 131 */ 132 for (i = 0; i < MDNPAD; i++) 133 CP(mdv, md32, md_pad[i]); 134 } 135 error = copyout(&md32, uap->data, sizeof(md32)); 136 } 137 return error; 138 } 139 140 141 static int 142 freebsd32_ioctl_ioc_toc_header(struct thread *td, 143 struct freebsd32_ioctl_args *uap, struct file *fp) 144 { 145 struct ioc_toc_header toch; 146 struct ioc_toc_header32 toch32; 147 int error; 148 149 if ((error = copyin(uap->data, &toch32, sizeof(toch32)))) 150 return (error); 151 CP(toch32, toch, len); 152 CP(toch32, toch, starting_track); 153 CP(toch32, toch, ending_track); 154 error = fo_ioctl(fp, CDIOREADTOCHEADER, (caddr_t)&toch, 155 td->td_ucred, td); 156 return (error); 157 } 158 159 160 static int 161 freebsd32_ioctl_ioc_read_toc(struct thread *td, 162 struct freebsd32_ioctl_args *uap, struct file *fp) 163 { 164 struct ioc_read_toc_entry toce; 165 struct ioc_read_toc_entry32 toce32; 166 int error; 167 168 if ((error = copyin(uap->data, &toce32, sizeof(toce32)))) 169 return (error); 170 CP(toce32, toce, address_format); 171 CP(toce32, toce, starting_track); 172 CP(toce32, toce, data_len); 173 PTRIN_CP(toce32, toce, data); 174 175 if ((error = fo_ioctl(fp, CDIOREADTOCENTRYS, (caddr_t)&toce, 176 td->td_ucred, td))) { 177 CP(toce, toce32, address_format); 178 CP(toce, toce32, starting_track); 179 CP(toce, toce32, data_len); 180 PTROUT_CP(toce, toce32, data); 181 error = copyout(&toce32, uap->data, sizeof(toce32)); 182 } 183 return error; 184 } 185 186 static int 187 freebsd32_ioctl_fiodgname(struct thread *td, 188 struct freebsd32_ioctl_args *uap, struct file *fp) 189 { 190 struct fiodgname_arg fgn; 191 struct fiodgname_arg32 fgn32; 192 int error; 193 194 if ((error = copyin(uap->data, &fgn32, sizeof fgn32)) != 0) 195 return (error); 196 CP(fgn32, fgn, len); 197 PTRIN_CP(fgn32, fgn, buf); 198 error = fo_ioctl(fp, FIODGNAME, (caddr_t)&fgn, td->td_ucred, td); 199 return (error); 200 } 201 202 static int 203 freebsd32_ioctl_memrange(struct thread *td, 204 struct freebsd32_ioctl_args *uap, struct file *fp) 205 { 206 struct mem_range_op mro; 207 struct mem_range_op32 mro32; 208 int error; 209 u_long com; 210 211 if ((error = copyin(uap->data, &mro32, sizeof(mro32))) != 0) 212 return (error); 213 214 PTRIN_CP(mro32, mro, mo_desc); 215 CP(mro32, mro, mo_arg[0]); 216 CP(mro32, mro, mo_arg[1]); 217 218 com = 0; 219 switch (uap->com) { 220 case MEMRANGE_GET32: 221 com = MEMRANGE_GET; 222 break; 223 224 case MEMRANGE_SET32: 225 com = MEMRANGE_SET; 226 break; 227 228 default: 229 panic("%s: unknown MEMRANGE %#x", __func__, uap->com); 230 } 231 232 if ((error = fo_ioctl(fp, com, (caddr_t)&mro, td->td_ucred, td)) != 0) 233 return (error); 234 235 if ( (com & IOC_OUT) ) { 236 CP(mro, mro32, mo_arg[0]); 237 CP(mro, mro32, mo_arg[1]); 238 239 error = copyout(&mro32, uap->data, sizeof(mro32)); 240 } 241 242 return (error); 243 } 244 245 static int 246 freebsd32_ioctl_pciocgetconf(struct thread *td, 247 struct freebsd32_ioctl_args *uap, struct file *fp) 248 { 249 struct pci_conf_io pci; 250 struct pci_conf_io32 pci32; 251 struct pci_match_conf32 pmc32; 252 struct pci_match_conf32 *pmc32p; 253 struct pci_match_conf pmc; 254 struct pci_match_conf *pmcp; 255 struct pci_conf32 pc32; 256 struct pci_conf32 *pc32p; 257 struct pci_conf pc; 258 struct pci_conf *pcp; 259 u_int32_t i; 260 u_int32_t npat_to_convert; 261 u_int32_t nmatch_to_convert; 262 vm_offset_t addr; 263 int error; 264 265 if ((error = copyin(uap->data, &pci32, sizeof(pci32))) != 0) 266 return (error); 267 268 CP(pci32, pci, num_patterns); 269 CP(pci32, pci, offset); 270 CP(pci32, pci, generation); 271 272 npat_to_convert = pci32.pat_buf_len / sizeof(struct pci_match_conf32); 273 pci.pat_buf_len = npat_to_convert * sizeof(struct pci_match_conf); 274 pci.patterns = NULL; 275 nmatch_to_convert = pci32.match_buf_len / sizeof(struct pci_conf32); 276 pci.match_buf_len = nmatch_to_convert * sizeof(struct pci_conf); 277 pci.matches = NULL; 278 279 if ((error = copyout_map(td, &addr, pci.pat_buf_len)) != 0) 280 goto cleanup; 281 pci.patterns = (struct pci_match_conf *)addr; 282 if ((error = copyout_map(td, &addr, pci.match_buf_len)) != 0) 283 goto cleanup; 284 pci.matches = (struct pci_conf *)addr; 285 286 npat_to_convert = min(npat_to_convert, pci.num_patterns); 287 288 for (i = 0, pmc32p = (struct pci_match_conf32 *)PTRIN(pci32.patterns), 289 pmcp = pci.patterns; 290 i < npat_to_convert; i++, pmc32p++, pmcp++) { 291 if ((error = copyin(pmc32p, &pmc32, sizeof(pmc32))) != 0) 292 goto cleanup; 293 CP(pmc32,pmc,pc_sel); 294 strlcpy(pmc.pd_name, pmc32.pd_name, sizeof(pmc.pd_name)); 295 CP(pmc32,pmc,pd_unit); 296 CP(pmc32,pmc,pc_vendor); 297 CP(pmc32,pmc,pc_device); 298 CP(pmc32,pmc,pc_class); 299 CP(pmc32,pmc,flags); 300 if ((error = copyout(&pmc, pmcp, sizeof(pmc))) != 0) 301 goto cleanup; 302 } 303 304 if ((error = fo_ioctl(fp, PCIOCGETCONF, (caddr_t)&pci, 305 td->td_ucred, td)) != 0) 306 goto cleanup; 307 308 nmatch_to_convert = min(nmatch_to_convert, pci.num_matches); 309 310 for (i = 0, pcp = pci.matches, 311 pc32p = (struct pci_conf32 *)PTRIN(pci32.matches); 312 i < nmatch_to_convert; i++, pcp++, pc32p++) { 313 if ((error = copyin(pcp, &pc, sizeof(pc))) != 0) 314 goto cleanup; 315 CP(pc,pc32,pc_sel); 316 CP(pc,pc32,pc_hdr); 317 CP(pc,pc32,pc_subvendor); 318 CP(pc,pc32,pc_subdevice); 319 CP(pc,pc32,pc_vendor); 320 CP(pc,pc32,pc_device); 321 CP(pc,pc32,pc_class); 322 CP(pc,pc32,pc_subclass); 323 CP(pc,pc32,pc_progif); 324 CP(pc,pc32,pc_revid); 325 strlcpy(pc32.pd_name, pc.pd_name, sizeof(pc32.pd_name)); 326 CP(pc,pc32,pd_unit); 327 if ((error = copyout(&pc32, pc32p, sizeof(pc32))) != 0) 328 goto cleanup; 329 } 330 331 CP(pci, pci32, num_matches); 332 CP(pci, pci32, offset); 333 CP(pci, pci32, generation); 334 CP(pci, pci32, status); 335 336 error = copyout(&pci32, uap->data, sizeof(pci32)); 337 338 cleanup: 339 if (pci.patterns) 340 copyout_unmap(td, (vm_offset_t)pci.patterns, pci.pat_buf_len); 341 if (pci.matches) 342 copyout_unmap(td, (vm_offset_t)pci.matches, pci.match_buf_len); 343 344 return (error); 345 } 346 347 int 348 freebsd32_ioctl(struct thread *td, struct freebsd32_ioctl_args *uap) 349 { 350 struct ioctl_args ap /*{ 351 int fd; 352 u_long com; 353 caddr_t data; 354 }*/ ; 355 struct file *fp; 356 cap_rights_t rights; 357 int error; 358 359 error = fget(td, uap->fd, cap_rights_init(&rights, CAP_IOCTL), &fp); 360 if (error != 0) 361 return (error); 362 if ((fp->f_flag & (FREAD | FWRITE)) == 0) { 363 fdrop(fp, td); 364 return (EBADF); 365 } 366 367 switch (uap->com) { 368 case MDIOCATTACH_32: /* FALLTHROUGH */ 369 case MDIOCDETACH_32: /* FALLTHROUGH */ 370 case MDIOCQUERY_32: /* FALLTHROUGH */ 371 case MDIOCLIST_32: 372 error = freebsd32_ioctl_md(td, uap, fp); 373 break; 374 375 case CDIOREADTOCENTRYS_32: 376 error = freebsd32_ioctl_ioc_read_toc(td, uap, fp); 377 break; 378 379 case CDIOREADTOCHEADER_32: 380 error = freebsd32_ioctl_ioc_toc_header(td, uap, fp); 381 break; 382 383 case FIODGNAME_32: 384 error = freebsd32_ioctl_fiodgname(td, uap, fp); 385 break; 386 387 case MEMRANGE_GET32: /* FALLTHROUGH */ 388 case MEMRANGE_SET32: 389 error = freebsd32_ioctl_memrange(td, uap, fp); 390 break; 391 392 case PCIOCGETCONF_32: 393 error = freebsd32_ioctl_pciocgetconf(td, uap, fp); 394 break; 395 396 default: 397 fdrop(fp, td); 398 ap.fd = uap->fd; 399 ap.com = uap->com; 400 PTRIN_CP(*uap, ap, data); 401 return sys_ioctl(td, &ap); 402 } 403 404 fdrop(fp, td); 405 return error; 406 } 407