381 lines
9.9 KiB
C
381 lines
9.9 KiB
C
/************************************************************************
|
|
* FILE.C Copyright (C) 1993 John Burton
|
|
*
|
|
* File I/O routines for the Linux Wine Project.
|
|
*
|
|
* WARNING : Many options of OpenFile are not yet implemeted.
|
|
*
|
|
* NOV 93 Erik Bos (erik@(trashcan.)hacktic.nl
|
|
* - removed ParseDosFileName, and DosDrive structures.
|
|
* - structures dynamically configured at runtime.
|
|
* - _lopen modified to use GetUnixFileName.
|
|
*
|
|
* DEC 93 Erik Bos (erik@(trashcan.)hacktic.nl)
|
|
* - Existing functions modified to use dosfs functions.
|
|
* - Added _llseek, _lcreat, GetDriveType, GetTempDrive,
|
|
* GetWindowsDirectory, GetSystemDirectory, GetTempFileName.
|
|
*
|
|
************************************************************************/
|
|
|
|
#include <stdio.h>
|
|
#include <fcntl.h>
|
|
#include <limits.h>
|
|
#include <unistd.h>
|
|
#include <time.h>
|
|
#include <windows.h>
|
|
#include "prototypes.h"
|
|
|
|
/* #define DEBUG_FILE /* */
|
|
|
|
char WindowsDirectory[256], SystemDirectory[256], TempDirectory[256];
|
|
extern char WindowsPath[256];
|
|
|
|
/***************************************************************************
|
|
_lopen
|
|
|
|
Emulate the _lopen windows call
|
|
***************************************************************************/
|
|
INT _lopen (LPSTR lpPathName, INT iReadWrite)
|
|
{
|
|
int handle;
|
|
char *UnixFileName;
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf (stderr, "_lopen: open('%s', %X);\n", lpPathName, iReadWrite);
|
|
#endif
|
|
|
|
if ((UnixFileName = GetUnixFileName(lpPathName)) == NULL)
|
|
return HFILE_ERROR;
|
|
iReadWrite &= 0x000F;
|
|
handle = open (UnixFileName, iReadWrite);
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf (stderr, "_lopen: open: %s (handle %d)\n", UnixFileName, handle);
|
|
#endif
|
|
|
|
if (handle == -1)
|
|
return HFILE_ERROR;
|
|
else
|
|
return handle;
|
|
}
|
|
|
|
/***************************************************************************
|
|
_lread
|
|
***************************************************************************/
|
|
INT _lread (INT hFile, LPSTR lpBuffer, WORD wBytes)
|
|
{
|
|
int result;
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "_lread: handle %d, buffer = %ld, length = %d\n",
|
|
hFile, (int) lpBuffer, wBytes);
|
|
#endif
|
|
|
|
result = read (hFile, lpBuffer, wBytes);
|
|
|
|
if (result == -1)
|
|
return HFILE_ERROR;
|
|
else
|
|
return result;
|
|
}
|
|
|
|
/****************************************************************************
|
|
_lwrite
|
|
****************************************************************************/
|
|
INT _lwrite (INT hFile, LPSTR lpBuffer, WORD wBytes)
|
|
{
|
|
int result;
|
|
|
|
#if 0
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "_lwrite: handle %d, buffer = %ld, length = %d\n",
|
|
hFile, (int) lpBuffer, wBytes);
|
|
#endif
|
|
#endif
|
|
result = write (hFile, lpBuffer, wBytes);
|
|
|
|
if (result == -1)
|
|
return HFILE_ERROR;
|
|
else
|
|
return result;
|
|
}
|
|
|
|
/***************************************************************************
|
|
_lclose
|
|
***************************************************************************/
|
|
INT _lclose (INT hFile)
|
|
{
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "_lclose: handle %d\n", hFile);
|
|
#endif
|
|
if (close (hFile))
|
|
return HFILE_ERROR;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
/**************************************************************************
|
|
OpenFile
|
|
|
|
Warning: This is nearly totally untested. It compiles, that's it...
|
|
-SL 9/13/93
|
|
**************************************************************************/
|
|
INT OpenFile (LPSTR lpFileName, LPOFSTRUCT ofs, WORD wStyle)
|
|
{
|
|
int base, flags;
|
|
int handle;
|
|
char buf[256];
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"OpenFile(%s,<struct>,%04X)\n",lpFileName,wStyle);
|
|
#endif
|
|
|
|
base = wStyle & 0xF;
|
|
flags = wStyle & 0xFFF0;
|
|
|
|
flags &= 0xFF0F; /* strip SHARE bits for now */
|
|
flags &= 0xD7FF; /* strip PROMPT & CANCEL bits for now */
|
|
flags &= 0x7FFF; /* strip REOPEN bit for now */
|
|
flags &= 0xFBFF; /* strib VERIFY bit for now */
|
|
|
|
if (flags & OF_CREATE)
|
|
{
|
|
base |= O_CREAT;
|
|
flags &= 0xEFFF;
|
|
}
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"now %d,%d\n",base,flags);
|
|
#endif
|
|
|
|
if (flags & OF_EXIST)
|
|
{
|
|
printf("OpenFile // OF_EXIST '%s' !\n", lpFileName);
|
|
handle = _lopen (lpFileName, wStyle);
|
|
if (handle == -1) {
|
|
/* Try again with WindowsPath */
|
|
if (FindFile(buf, sizeof(buf), lpFileName, NULL, WindowsPath) != NULL) {
|
|
handle = _lopen (buf, wStyle);
|
|
}
|
|
}
|
|
close(handle);
|
|
return handle;
|
|
}
|
|
if (flags & OF_DELETE)
|
|
{
|
|
printf("OpenFile // OF_DELETE '%s' !\n", lpFileName);
|
|
return unlink(lpFileName);
|
|
}
|
|
else
|
|
{
|
|
int handle;
|
|
char *UnixFileName;
|
|
if ((UnixFileName = GetUnixFileName(lpFileName)) == NULL)
|
|
return HFILE_ERROR;
|
|
handle = open(UnixFileName, base, 0666);
|
|
if (handle == -1) {
|
|
/* Try again with WindowsPath */
|
|
if (FindFile(buf, sizeof(buf), lpFileName, NULL, WindowsPath) != NULL) {
|
|
#ifdef DEBUG_FILE
|
|
printf("OpenFile // file '%s' found !\n", buf);
|
|
#endif
|
|
UnixFileName = buf;
|
|
handle = open(UnixFileName, base, 0666);
|
|
}
|
|
}
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "OpenFile: returning %04.4x\n", handle);
|
|
#endif
|
|
|
|
if (handle == -1)
|
|
return HFILE_ERROR;
|
|
else
|
|
return handle;
|
|
}
|
|
}
|
|
|
|
/**************************************************************************
|
|
SetHandleCount
|
|
|
|
Changes the number of file handles available to the application. Since
|
|
Linux isn't limited to 20 files, this one's easy. - SL
|
|
**************************************************************************/
|
|
|
|
#if !defined (OPEN_MAX)
|
|
/* This one is for the Sun */
|
|
#define OPEN_MAX _POSIX_OPEN_MAX
|
|
#endif
|
|
WORD SetHandleCount (WORD wNumber)
|
|
{
|
|
printf("SetHandleCount(%d)\n",wNumber);
|
|
return((wNumber<OPEN_MAX) ? wNumber : OPEN_MAX);
|
|
}
|
|
|
|
/***************************************************************************
|
|
_llseek
|
|
***************************************************************************/
|
|
LONG _llseek (INT hFile, LONG lOffset, INT nOrigin)
|
|
{
|
|
int origin;
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "_llseek: handle %d, offset %ld, origin %d\n", hFile, lOffset, nOrigin);
|
|
#endif
|
|
|
|
switch (nOrigin) {
|
|
case 1: origin = SEEK_CUR;
|
|
break;
|
|
case 2: origin = SEEK_END;
|
|
break;
|
|
default: origin = SEEK_SET;
|
|
break;
|
|
}
|
|
|
|
return ( lseek(hFile, lOffset, origin) );
|
|
}
|
|
|
|
/***************************************************************************
|
|
_lcreat
|
|
***************************************************************************/
|
|
INT _lcreat (LPSTR lpszFilename, INT fnAttribute)
|
|
{
|
|
int handle;
|
|
char *UnixFileName;
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr, "_lcreat: filename %s, attributes %d\n",lpszFilename,
|
|
fnAttribute);
|
|
#endif
|
|
if ((UnixFileName = GetUnixFileName(lpszFilename)) == NULL)
|
|
return HFILE_ERROR;
|
|
handle = open (UnixFileName, O_CREAT | O_TRUNC | O_WRONLY, 426);
|
|
|
|
if (handle == -1)
|
|
return HFILE_ERROR;
|
|
else
|
|
return handle;
|
|
}
|
|
|
|
/***************************************************************************
|
|
GetDriveType
|
|
***************************************************************************/
|
|
UINT GetDriveType(INT drive)
|
|
{
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"GetDriveType %c:\n",'A'+drive);
|
|
#endif
|
|
|
|
if (!DOS_ValidDrive(drive))
|
|
return DRIVE_DOESNOTEXIST;
|
|
|
|
if (drive == 0 || drive == 1)
|
|
return DRIVE_REMOVABLE;
|
|
|
|
return DRIVE_FIXED;
|
|
}
|
|
|
|
/***************************************************************************
|
|
GetTempDrive
|
|
***************************************************************************/
|
|
BYTE GetTempDrive(BYTE chDriveLetter)
|
|
{
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"GetTempDrive (%d)\n",chDriveLetter);
|
|
#endif
|
|
return('C');
|
|
}
|
|
|
|
/***************************************************************************
|
|
GetWindowsDirectory
|
|
***************************************************************************/
|
|
UINT GetWindowsDirectory(LPSTR lpszSysPath, UINT cbSysPath)
|
|
{
|
|
if (cbSysPath < strlen(WindowsDirectory))
|
|
*lpszSysPath = 0;
|
|
else
|
|
strcpy(lpszSysPath, WindowsDirectory);
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"GetWindowsDirectory (%s)\n",lpszSysPath);
|
|
#endif
|
|
|
|
ChopOffSlash(lpszSysPath);
|
|
return(strlen(lpszSysPath));
|
|
}
|
|
/***************************************************************************
|
|
GetSystemDirectory
|
|
***************************************************************************/
|
|
UINT GetSystemDirectory(LPSTR lpszSysPath, UINT cbSysPath)
|
|
{
|
|
if (cbSysPath < strlen(SystemDirectory))
|
|
*lpszSysPath = 0;
|
|
else
|
|
strcpy(lpszSysPath, SystemDirectory);
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"GetSystemDirectory (%s)\n",lpszSysPath);
|
|
#endif
|
|
|
|
ChopOffSlash(lpszSysPath);
|
|
return(strlen(lpszSysPath));
|
|
}
|
|
/***************************************************************************
|
|
GetTempFileName
|
|
***************************************************************************/
|
|
INT GetTempFileName(BYTE bDriveLetter, LPCSTR lpszPrefixString, UINT uUnique, LPSTR lpszTempFileName)
|
|
{
|
|
int unique;
|
|
int handle;
|
|
char tempname[256];
|
|
|
|
if (uUnique == 0)
|
|
unique = time(NULL)%99999L;
|
|
else
|
|
unique = uUnique%99999L;
|
|
|
|
strcpy(tempname,lpszPrefixString);
|
|
tempname[3]='\0';
|
|
|
|
sprintf(lpszTempFileName,"%s\\%s%d.tmp", TempDirectory, tempname,
|
|
unique);
|
|
|
|
ToDos(lpszTempFileName);
|
|
|
|
#ifdef DEBUG_FILE
|
|
fprintf(stderr,"GetTempFilename: %c %s %d => %s\n",bDriveLetter,
|
|
lpszPrefixString,uUnique,lpszTempFileName);
|
|
#endif
|
|
if ((handle = _lcreat (lpszTempFileName, 0x0000)) == -1) {
|
|
fprintf(stderr,"GetTempFilename: can't create temp file '%s' !\n", lpszTempFileName);
|
|
}
|
|
else
|
|
close(handle);
|
|
|
|
return unique;
|
|
}
|
|
|
|
/***************************************************************************
|
|
SetErrorMode
|
|
***************************************************************************/
|
|
WORD SetErrorMode(WORD x)
|
|
{
|
|
fprintf(stderr,"wine: SetErrorMode %4x (ignored)\n",x);
|
|
}
|
|
|
|
/***************************************************************************
|
|
_hread
|
|
***************************************************************************/
|
|
long _hread(int hf, void FAR *hpvBuffer, long cbBuffer)
|
|
{
|
|
return read(hf, hpvBuffer, cbBuffer);
|
|
}
|
|
/***************************************************************************
|
|
_hwrite
|
|
***************************************************************************/
|
|
long _hwrite(int hf, const void FAR *hpvBuffer, long cbBuffer)
|
|
{
|
|
return write(hf, hpvBuffer, cbBuffer);
|
|
}
|