/****************************************************************/ /* */ /* ioctl.c */ /* */ /* DOS-C ioctl system call */ /* */ /* Copyright (c) 1995,1998 */ /* Pasquale J. Villani */ /* All Rights Reserved */ /* */ /* This file is part of DOS-C. */ /* */ /* DOS-C is free software; you can redistribute it and/or */ /* modify it under the terms of the GNU General Public License */ /* as published by the Free Software Foundation; either version */ /* 2, or (at your option) any later version. */ /* */ /* DOS-C is distributed in the hope that it will be useful, but */ /* WITHOUT ANY WARRANTY; without even the implied warranty of */ /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See */ /* the GNU General Public License for more details. */ /* */ /* You should have received a copy of the GNU General Public */ /* License along with DOS-C; see the file COPYING. If not, */ /* write to the Free Software Foundation, 675 Mass Ave, */ /* Cambridge, MA 02139, USA. */ /****************************************************************/ #include "portab.h" #include "globals.h" #ifdef VERSION_STRINGS static BYTE *RcsId = "$Id$"; #endif /* * WARNING: this code is non-portable (8086 specific). */ /* TE 10/29/01 although device drivers have only 20 pushes available for them, MS NET plays by its own rules at least TE's network card driver DM9PCI (some 10$ NE2000 clone) does: with SP=8DC before calling down to execrh, and SP=8CC when callf [interrupt], DM9PCI touches DOSDS:792, 14 bytes into error stack :-((( so some optimizations were made. this uses the fact, that only CharReq device buffer is ever used. fortunately, this saves some code as well :-) */ COUNT DosDevIOctl(lregs * r) { sft FAR *s; struct dpb FAR *dpbp; COUNT nMode; unsigned attr; unsigned char al = r->AL; if (al > 0x11) return DE_INVLDFUNC; /* commonly used, shouldn't harm to do front up */ if (al == 0x0C || al == 0x0D || al >= 0x10) /* generic or query */ { CharReqHdr.r_cat = r->CH; /* category (major) code */ CharReqHdr.r_fun = r->CL; /* function (minor) code */ CharReqHdr.r_io = MK_FP(r->DS, r->DX); /* parameter block */ } else { CharReqHdr.r_count = r->CX; CharReqHdr.r_trans = MK_FP(r->DS, r->DX); } CharReqHdr.r_length = sizeof(request); CharReqHdr.r_status = 0; switch (r->AL) { case 0x0b: /* skip, it's a special case. */ NetDelay = r->CX; if (r->DX) NetRetry = r->DX; break; case 0x00: case 0x01: case 0x02: case 0x03: case 0x06: case 0x07: case 0x0a: case 0x0c: case 0x10: { unsigned flags; /* Test that the handle is valid and */ /* get the SFT block that contains the SFT */ if ((s = get_sft(r->BX)) == (sft FAR *) - 1) return DE_INVLDHNDL; attr = s->sft_dev->dh_attr; flags = s->sft_flags; switch (r->AL) { case 0x00: /* Get the flags from the SFT */ if (flags & SFT_FDEVICE) r->AX = (attr & 0xff00) | (flags & 0xff); else r->AX = flags; /* Undocumented result, Ax = Dx seen using Pcwatch */ r->DX = r->AX; break; case 0x01: /* sft_flags is a file, return an error because you */ /* can't set the status of a file. */ if (!(flags & SFT_FDEVICE)) return DE_INVLDFUNC; /* RBIL says this is only for DOS < 6, but MSDOS 7.10 */ /* returns this as well... and some buggy program relies*/ /* on it :( */ if (r->DH != 0) return DE_INVLDDATA; /* Undocumented: AL should get the old value */ r->AL = s->sft_flags_lo; /* Set it to what we got in the DL register from the */ /* user. */ s->sft_flags_lo = SFT_FDEVICE | r->DL; break; case 0x02: nMode = C_IOCTLIN; goto IoCharCommon; case 0x03: nMode = C_IOCTLOUT; goto IoCharCommon; case 0x06: if (flags & SFT_FDEVICE) { nMode = C_ISTAT; goto IoCharCommon; } r->AL = s->sft_posit >= s->sft_size ? 0 : 0xFF; break; case 0x07: if (flags & SFT_FDEVICE) { nMode = C_OSTAT; goto IoCharCommon; } r->AL = 0; break; case 0x0a: r->DX = flags; r->AX = 0; break; case 0x0c: nMode = C_GENIOCTL; goto IoCharCommon; default: /* 0x10 */ nMode = C_IOCTLQRY; IoCharCommon: if ((flags & SFT_FDEVICE) && ( (r->AL <= 0x03 && (attr & ATTR_IOCTL)) || r->AL == 0x06 || r->AL == 0x07 || (r->AL == 0x10 && (attr & ATTR_QRYIOCTL)) || (r->AL == 0x0c && (attr & ATTR_GENIOCTL)))) { CharReqHdr.r_unit = 0; CharReqHdr.r_command = nMode; execrh((request FAR *) & CharReqHdr, s->sft_dev); if (CharReqHdr.r_status & S_ERROR) { CritErrCode = (CharReqHdr.r_status & S_MASK) + 0x13; return DE_DEVICE; } if (r->AL <= 0x03) r->AX = CharReqHdr.r_count; else if (r->AL <= 0x07) r->AX = CharReqHdr.r_status & S_BUSY ? 0000 : 0x00ff; else /* 0x0c or 0x10 */ r->AX = CharReqHdr.r_status; break; } return DE_INVLDFUNC; } break; } default: /* block IOCTL: 4, 5, 8, 9, d, e, f, 11 */ /* This line previously returned the deviceheader at r->bl. But, DOS numbers its drives starting at 1, not 0. A=1, B=2, and so on. Changed this line so it is now zero-based. -SRM */ /* JPP - changed to use default drive if drive=0 */ /* JT Fixed it */ #define NDN_HACK /* NDN feeds the actual ASCII drive letter to this function */ #ifdef NDN_HACK CharReqHdr.r_unit = ((r->BL & 0x1f) == 0 ? default_drive : (r->BL & 0x1f) - 1); #else CharReqHdr.r_unit = (r->BL == 0 ? default_drive : r->BL - 1); #endif dpbp = get_dpb(CharReqHdr.r_unit); if (dpbp) attr = dpbp->dpb_device->dh_attr; else if (r->AL != 9) return DE_INVLDDRV; switch (r->AL) { case 0x04: nMode = C_IOCTLIN; goto IoBlockCommon; case 0x05: nMode = C_IOCTLOUT; goto IoBlockCommon; case 0x08: if (attr & ATTR_EXCALLS) { nMode = C_REMMEDIA; goto IoBlockCommon; } return DE_INVLDFUNC; case 0x09: { struct cds FAR *cdsp = get_cds(CharReqHdr.r_unit); r->AX = S_DONE | S_BUSY; if (cdsp != NULL && dpbp == NULL) { r->DX = ATTR_REMOTE; } else { if (!dpbp) { return DE_INVLDDRV; } r->DX = attr; } if (cdsp->cdsFlags & CDSSUBST) { r->DX |= ATTR_SUBST; } break; } case 0x0d: nMode = C_GENIOCTL; goto IoBlockCommon; case 0x11: nMode = C_IOCTLQRY; IoBlockCommon: if (r->AL == 0x0D && (r->CX & ~(0x486B-0x084A)) == 0x084A) { /* 084A/484A, 084B/484B, 086A/486A, 086B/486B */ r->AX = 0; /* (lock/unlock logical/physical volume) */ break; /* simulate success for MS-DOS 7+ SCANDISK etc. --LG */ } if ((r->AL <= 0x05 && !(attr & ATTR_IOCTL)) || (r->AL == 0x11 && !(attr & ATTR_QRYIOCTL)) || (r->AL == 0x0d && !(attr & ATTR_GENIOCTL))) { return DE_INVLDFUNC; } CharReqHdr.r_command = nMode; execrh((request FAR *) & CharReqHdr, dpbp->dpb_device); if (CharReqHdr.r_status & S_ERROR) { CritErrCode = (CharReqHdr.r_status & S_MASK) + 0x13; return DE_DEVICE; } if (r->AL <= 0x05) r->AX = CharReqHdr.r_count; else if (r->AL == 0x08) r->AX = (CharReqHdr.r_status & S_BUSY) ? 1 : 0; else /* 0x0d or 0x11 */ r->AX = CharReqHdr.r_status; break; case 0x0e: nMode = C_GETLDEV; goto IoLogCommon; default: /* 0x0f */ nMode = C_SETLDEV; IoLogCommon: if (attr & ATTR_GENIOCTL) { CharReqHdr.r_command = nMode; execrh((request FAR *) & CharReqHdr, dpbp->dpb_device); if (CharReqHdr.r_status & S_ERROR) { CritErrCode = (CharReqHdr.r_status & S_MASK) + 0x13; return DE_ACCESS; } else { r->AL = CharReqHdr.r_unit; return SUCCESS; } } return DE_INVLDFUNC; } break; } return SUCCESS; }