/* * Parallel port device support * * Copyright 2001 Uwe Bonnes * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library 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 * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #include "config.h" #include "wine/port.h" #include "windef.h" #ifdef HAVE_PPDEV #include <stdarg.h> #include <stdlib.h> #include <sys/types.h> #ifdef HAVE_SYS_STAT_H # include <sys/stat.h> #endif #include <fcntl.h> #include <errno.h> #ifdef HAVE_SYS_IOCTL_H # include <sys/ioctl.h> #endif #ifdef HAVE_LINUX_IOCTL_H # include <linux/ioctl.h> #endif #include <linux/ppdev.h> #include "winerror.h" #include "winbase.h" #include "winreg.h" #include "winternl.h" #include "wine/debug.h" WINE_DEFAULT_DEBUG_CHANNEL(int); typedef struct _PPDEVICESTRUCT{ int fd; /* NULL if device not available */ char *devicename; int userbase; /* where wine thinks the ports are */ DWORD lastaccess; /* or NULL if release */ int timeout; /* time in second of inactivity to release the port */ } PPDeviceStruct; static PPDeviceStruct PPDeviceList[5]; static int PPDeviceNum=0; static int IO_pp_sort(const void *p1,const void *p2) { return ((const PPDeviceStruct*)p1)->userbase - ((const PPDeviceStruct*)p2)->userbase; } /* IO_pp_init * * Read the ppdev entries from wine.conf, open the device and check * for necessary IOCTRL * Report verbose about possible errors */ char IO_pp_init(void) { char name[80]; char buffer[256]; HANDLE root, hkey; int i,idx=0,fd,res,userbase,nports=0; char * timeout; char ret=1; int lasterror; OBJECT_ATTRIBUTES attr; UNICODE_STRING nameW; static const WCHAR configW[] = {'S','o','f','t','w','a','r','e','\\', 'W','i','n','e','\\','V','D','M','\\','p','p','d','e','v',0}; TRACE("\n"); RtlOpenCurrentUser( KEY_ALL_ACCESS, &root ); attr.Length = sizeof(attr); attr.RootDirectory = root; attr.ObjectName = &nameW; attr.Attributes = 0; attr.SecurityDescriptor = NULL; attr.SecurityQualityOfService = NULL; RtlInitUnicodeString( &nameW, configW ); /* @@ Wine registry key: HKCU\Software\Wine\VDM\ppdev */ if (NtOpenKey( &hkey, KEY_ALL_ACCESS, &attr )) hkey = 0; NtClose( root ); if (!hkey) return 1; for (;;) { DWORD total_size, len; char temp[256]; KEY_VALUE_FULL_INFORMATION *info = (KEY_VALUE_FULL_INFORMATION *)temp; if (NtEnumerateValueKey( hkey, idx, KeyValueFullInformation, temp, sizeof(temp), &total_size )) break; if (info->Type != REG_SZ) break; RtlUnicodeToMultiByteN( name, sizeof(name)-1, &len, info->Name, info->NameLength ); name[len] = 0; RtlUnicodeToMultiByteN( buffer, sizeof(buffer)-1, &len, (WCHAR *)(temp + info->DataOffset), total_size-info->DataOffset ); buffer[len] = 0; idx++; if(nports >4) { FIXME("Make the PPDeviceList larger than 5 elements\n"); break; } TRACE("Device '%s' at virtual userbase '%s'\n", buffer,name); timeout = strchr(buffer,','); if (timeout) *timeout++=0; fd=open(buffer,O_RDWR); lasterror=errno; if (fd == -1) { WARN("Configuration: No access to %s Cause: %s\n",buffer,strerror(lasterror)); WARN("Rejecting configuration item\n"); if (lasterror == ENODEV) ERR("Is the ppdev module loaded?\n"); continue; } userbase = strtol(name, NULL, 16); if ( errno == ERANGE) { WARN("Configuration: Invalid base %s for %s\n",name,buffer); WARN("Rejecting configuration item\n"); continue; } if (ioctl (fd,PPCLAIM,0)) { ERR("PPCLAIM rejected %s\n",buffer); ERR("Perhaps the device is already in use or nonexistent\n"); continue; } if (nports > 0) { for (i=0; i<= nports; i++) { if (PPDeviceList[i].userbase == userbase) { WARN("Configuration: %s uses the same virtual ports as %s\n", buffer,PPDeviceList[0].devicename); WARN("Configuration: Rejecting configuration item\n"); userbase = 0; break; } } if (!userbase) continue; } /* Check for the minimum required IOCTLS */ if ((ioctl(fd,PPRDATA,&res))|| (ioctl(fd,PPRSTATUS,&res))|| (ioctl(fd,PPRCONTROL,&res))) { ERR("PPUSER IOCTL not available for parport device %s\n",buffer); continue; } if (ioctl (fd,PPRELEASE,0)) { ERR("PPRELEASE rejected %s\n",buffer); ERR("Perhaps the device is already in use or nonexistent\n"); continue; } PPDeviceList[nports].devicename = malloc(sizeof(buffer)+1); if (!PPDeviceList[nports].devicename) { ERR("No (more) space for devicename\n"); break; } strcpy(PPDeviceList[nports].devicename,buffer); PPDeviceList[nports].fd = fd; PPDeviceList[nports].userbase = userbase; PPDeviceList[nports].lastaccess=GetTickCount(); if (timeout) { PPDeviceList[nports].timeout = strtol(timeout, NULL, 10); if (errno == ERANGE) { WARN("Configuration: Invalid timeout %s in configuration for %s, Setting to 0\n", timeout,buffer); PPDeviceList[nports].timeout = 0; } } else PPDeviceList[nports].timeout = 0; nports++; } TRACE("found %d ports\n",nports); NtClose( hkey ); PPDeviceNum= nports; if (nports > 1) /* sort in ascending order for userbase for faster access */ qsort (PPDeviceList,PPDeviceNum,sizeof(PPDeviceStruct),IO_pp_sort); if (nports) ret=0; for (idx= 0;idx<PPDeviceNum; idx++) TRACE("found device %s userbase %x fd %x timeout %d\n", PPDeviceList[idx].devicename, PPDeviceList[idx].userbase, PPDeviceList[idx].fd,PPDeviceList[idx].timeout); /* FIXME: register a timer callback perhaps every 30 seconds to release unused ports Set lastaccess = 0 as indicator when port was released */ return ret; } /* IO_pp_do_access * * Do the actual IOCTL * Return NULL on success */ static int IO_pp_do_access(int idx,int ppctl, DWORD* res) { int ret; if (ioctl(PPDeviceList[idx].fd,PPCLAIM,0)) { ERR("Can't reclaim device %s, PPUSER/PPDEV handling confused\n", PPDeviceList[idx].devicename); return 1; } ret = ioctl(PPDeviceList[idx].fd,ppctl,res); if (ioctl(PPDeviceList[idx].fd,PPRELEASE,0)) { ERR("Can't release device %s, PPUSER/PPDEV handling confused\n", PPDeviceList[idx].devicename); return 1; } return ret; } /* IO_pp_inp * * Check if we can satisfy the INP command with some of the configured PPDEV deviced * Return NULL on success */ int IO_pp_inp(int port, DWORD* res) { int idx,j=0; for (idx=0;idx<PPDeviceNum ;idx++) { j = port - PPDeviceList[idx].userbase; if (j <0) return 1; switch (j) { case 0: return IO_pp_do_access(idx,PPRDATA,res); case 1: return IO_pp_do_access(idx,PPRSTATUS,res); case 2: return IO_pp_do_access(idx,PPRCONTROL,res); case 0x400: case 0x402: case 3: case 4: case 0x401: FIXME("Port 0x%x not accessible for reading with ppdev\n",port); FIXME("If this is causing problems, try direct port access\n"); return 1; default: break; } } return 1; } /* IO_pp_outp * * Check if we can satisfy the OUTP command with some of the configured PPDEV deviced * Return NULL on success */ BOOL IO_pp_outp(int port, DWORD* res) { int idx,j=0; for (idx=0;idx<PPDeviceNum ;idx++) { j = port - PPDeviceList[idx].userbase; if (j <0) return 1; switch (j) { case 0: return IO_pp_do_access(idx,PPWDATA,res); case 2: { /* We can't switch port direction via PPWCONTROL, so do it via PPDATADIR */ DWORD mode = *res & 0x20; IO_pp_do_access(idx,PPDATADIR,&mode); mode = (*res & ~0x20); return IO_pp_do_access(idx,PPWCONTROL,&mode); } case 1: case 0x400: case 0x402: case 3: case 4: case 0x401: FIXME("Port %d not accessible for writing with ppdev\n",port); FIXME("If this is causing problems, try direct port access\n"); return 1; default: break; } } return TRUE; } #else /* HAVE_PPDEV */ char IO_pp_init(void) { return 1; } int IO_pp_inp(int port, DWORD* res) { return 1; } BOOL IO_pp_outp(int port, DWORD* res) { return TRUE; } #endif /* HAVE_PPDEV */