| /* | 
 |  * 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA | 
 |  */ | 
 |  | 
 | #include "config.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 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[] = {'M','a','c','h','i','n','e','\\', | 
 |                                     'S','o','f','t','w','a','r','e','\\', | 
 |                                     'W','i','n','e','\\', | 
 |                                     'W','i','n','e','\\', | 
 |                                     'C','o','n','f','i','g','\\', | 
 |                                     'p','p','d','e','v',0}; | 
 |  | 
 |     TRACE("\n"); | 
 |  | 
 |     attr.Length = sizeof(attr); | 
 |     attr.RootDirectory = 0; | 
 |     attr.ObjectName = &nameW; | 
 |     attr.Attributes = 0; | 
 |     attr.SecurityDescriptor = NULL; | 
 |     attr.SecurityQualityOfService = NULL; | 
 |     RtlInitUnicodeString( &nameW, configW ); | 
 |  | 
 |     /* @@ Wine registry key: HKLM\Software\Wine\Wine\Config\ppdev */ | 
 |     if (NtOpenKey( &hkey, KEY_ALL_ACCESS, &attr )) 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,(char **)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,PPRCONTROL,&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,(char **)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 INP 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 */ |