860 lines
26 KiB
C++
Executable File
860 lines
26 KiB
C++
Executable File
//
|
|
// FILESTOR.CPP
|
|
//
|
|
// Source file for ArchiveLib 1.0
|
|
//
|
|
// Copyright (c) Greenleaf Software, Inc. 1994
|
|
// All Rights Reserved
|
|
//
|
|
// CONTENTS
|
|
//
|
|
// ALFile::operator new()
|
|
// ALFile::ALFile()
|
|
// ALFile::~ALFile()
|
|
// ALFile::LoadBuffer()
|
|
// ALFile::FlushBuffer()
|
|
// ALFile::Seek()
|
|
// ALFile::Open()
|
|
// ALFile::MakeTempName()
|
|
// ALFile::Create()
|
|
// ALFile::Close()
|
|
// ALFile::RenameToBackup()
|
|
// ALFile::Rename()
|
|
// ALFile::UnRename()
|
|
// ALFile::Delete()
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This file contains the C++ member functions to support class
|
|
// ALFile. This class works very closely with the parent class,
|
|
// ALStorage, found in STORAGE.CPP. You will find in many cases
|
|
// the virtual functions found here in the derived class call
|
|
// the same function in the parent class to help out with some
|
|
// of the work.
|
|
// We don't really do anything exciting in the WEP, it is just
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 22, 1994 1.0A : First release
|
|
//
|
|
//
|
|
|
|
#include "arclib.h"
|
|
#pragma hdrstop
|
|
|
|
#define __OPEN_FN
|
|
|
|
#include <unistd.h>
|
|
#include <fcntl.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#include <time.h>
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
|
|
#include <xvtility.h>
|
|
|
|
#if XVT_OS == XVT_OS_SCOUNIX
|
|
#ifndef O_BINARY
|
|
#define O_BINARY 0x0000
|
|
#endif
|
|
#else // not UNIX
|
|
#include <dos.h>
|
|
#endif
|
|
|
|
|
|
#include "filestor.h"
|
|
|
|
//
|
|
// void * ALFile::operator new( size_t size )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// size : The number of bytes needed to create a new ALFile object.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// A pointer to the newly allocated storage area, or 0 if no storage
|
|
// was available.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// When using a DLL, it is easy to get into a dangerous situation when
|
|
// creating objects whose ctor and dtor are both in the DLL. The problem
|
|
// arises because when you create an object using new, the memory for
|
|
// the object will be allocated from the EXE. However, when you destroy
|
|
// the object using delete, the memory is freed inside the DLL. Since
|
|
// the DLL doesn't really own that memory, bad things can happen.
|
|
//
|
|
// But, you say, won't the space just go back to the Windows heap regardless
|
|
// of who tries to free it? Maybe, but maybe not. If the DLL is using
|
|
// a subsegment allocation scheme, it might do some sort of local free
|
|
// before returning the space to the windows heap. That is the point where
|
|
// you could conceivably cook your heap.
|
|
//
|
|
// By providing our own version of operator new inside this class, we
|
|
// ensure that all memory allocation for the class will be done from
|
|
// inside the DLL, not the EXE calling the DLL.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
#if defined( AL_BUILDING_DLL )
|
|
void AL_DLL_FAR * AL_PROTO ALFile::operator new( size_t size )
|
|
{
|
|
return ::new char[ size ];
|
|
}
|
|
#endif
|
|
|
|
//
|
|
// ALFile::ALFile( const char *file_name = "",
|
|
// int buffer_size = 4096,
|
|
// ALCase name_case = AL_LOWER)
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// file_name : The initial file name of the ALFile object you are
|
|
// creating. By default, this is a blank string, which
|
|
// will get converted to a temporary name before opening
|
|
// the actual disk file.
|
|
//
|
|
// buffer_size : The size of the object's I/O buffer. The default of 4096
|
|
// should give very good performance.
|
|
//
|
|
// name_case : This parameter determines whether the file names will
|
|
// always be converted to upper case, lower case, or left
|
|
// in mixed case. Under MS-DOS, you shouldn't use mixed
|
|
// case, because the O/S file naming convention is case
|
|
// insensitive. ArchiveLib will think "TEMP.BAK" and
|
|
// "temp.bak" are different, when they really aren't.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// Nothing, this is a constructor.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This constructor is used to create a new ALFile object, which will
|
|
// usually be treated as an ALStorage object by ArchiveLib functions.
|
|
// It is important to note that not much happens during construction of
|
|
// this object, the real activity happens after you call the Open()
|
|
// function. Just creating this object *does not* create a file on disk!
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
AL_PROTO ALFile::ALFile( const char AL_DLL_FAR *file_name /* = "" */,
|
|
int buffer_size /* = 4096 */,
|
|
ALCase name_case /* = AL_LOWER */)
|
|
// Note: if non-msdos, change case parameter to AL_MIXED
|
|
: ALStorage( file_name, buffer_size, AL_FILE_OBJECT, name_case ) {
|
|
miHandle = -1;
|
|
}
|
|
|
|
//
|
|
// ALFile::~ALFile()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// Nothing.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// The destructor for an ALFile object doesn't have to do much work.
|
|
// The base class destructor will take care of freeing the I/O buffer,
|
|
// and any other loose ends. All we have to do here is make sure
|
|
// the file gets closed, and that its buffers get flushed to the disk
|
|
// file.
|
|
//
|
|
// Note that in debug mode, the destructor also checks this for the
|
|
// correct class type. This helps flag erroneous or duplicated
|
|
// destructor calls.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
AL_PROTO ALFile::~ALFile()
|
|
{
|
|
AL_ASSERT( GoodTag(), "~ALFile: attempting to delete invalid object" );
|
|
if ( miHandle != -1 )
|
|
Close();
|
|
}
|
|
|
|
//
|
|
// int ALFile::LoadBuffer( long address )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// address : The long offset into the physical storage object. A
|
|
// seek/read combination will be executed at this location,
|
|
// so that subsequent calls to read data will start at
|
|
// the given address.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS, AL_SEEK_ERROR, AL_END_OF_FILE, or possibly another
|
|
// error code < AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is used in the library whenever a byte needs to be read
|
|
// that isn't present in the current I/O buffer. It has to use
|
|
// the C RTL function lseek() to go to the correct position in the library.
|
|
// If that works, it uses the C RTL function read() to read in an I/O
|
|
// buffer full of data.
|
|
//
|
|
// After that operation is performed, muReadIndex is set to 0, indicating
|
|
// that the next read from the I/O buffer will take place at location 0.
|
|
// mlFilePointer is set to address plus the number of bytes read, so
|
|
// we know where the next read from the file will take place. And
|
|
// muBufferValidData is set to the count of bytes read in from this
|
|
// location. That lets us know how far we can read in the I/O buffer
|
|
// before we run out of space.
|
|
//
|
|
// Note that if CRC checking has been turned on, we will update the
|
|
// current working CRC value with the new data that has been read
|
|
// in from the buffer.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::LoadBuffer( long address )
|
|
{
|
|
if ( mStatus < AL_SUCCESS )
|
|
return mStatus;
|
|
if ( mlFilePointer != address ) {
|
|
long result = lseek( miHandle, address, SEEK_SET );
|
|
if ( result == -1L )
|
|
return mStatus.SetError( AL_SEEK_ERROR,
|
|
"Seek failure on %s. errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
}
|
|
int result = read( miHandle, mpcBuffer, muBufferSize );
|
|
if ( result == 0 )
|
|
return AL_END_OF_FILE;
|
|
if ( result < 0 )
|
|
return mStatus.SetError( AL_READ_ERROR,
|
|
"Read failure on %s. errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
if ( miUpdateCrcFlag )
|
|
UpdateCrc( result );
|
|
muReadIndex = 0; //Reading can resume at this location in the I/O buffer
|
|
mlFilePointer += result;
|
|
muBufferValidData = result;
|
|
YieldTime();
|
|
return result;
|
|
}
|
|
|
|
//
|
|
// int ALFile::FlushBuffer()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// An integer status value, AL_SUCCESS, AL_WRITE_ERROR, or possibly some
|
|
// status code < AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is the counterpart to LoadBuffer(). It gets called
|
|
// when a write operation is poised to overflow the I/O buffer. This
|
|
// means we need to flush the buffer out to disk, then reset some
|
|
// data members.
|
|
//
|
|
// Unlike LoadBuffer(), this function doesn't have an address argument,
|
|
// so we don't have to perform a seek(). Instead, the data will be
|
|
// written out to the current position of the file pointer. If the
|
|
// write is successful, muWriteIndex is set to 0, indicating that the
|
|
// next write to the I/O buffer can go to position 0. mlFilePointer is
|
|
// incremented by the length of the write, so we know where the next read
|
|
// or write will occur. Finally, muBufferValidData is set to 0, indicating
|
|
// that there is no data in the I/O buffer that has been written, and
|
|
// there is no data that can be read.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::FlushBuffer()
|
|
{
|
|
if ( mStatus < 0 )
|
|
return mStatus;
|
|
if ( muWriteIndex != 0 ) {
|
|
if ( miUpdateCrcFlag )
|
|
UpdateCrc( muWriteIndex );
|
|
int result = write( miHandle, mpcBuffer, muWriteIndex );
|
|
muWriteIndex = 0;
|
|
if ( result == -1L )
|
|
return mStatus.SetError( AL_WRITE_ERROR,
|
|
"Write failure on %s. errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
mlFilePointer += result;
|
|
}
|
|
muReadIndex = 0;
|
|
muBufferValidData = 0;
|
|
YieldTime();
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// int ALFile::Seek( long address )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// address : The address in the physical disk to seek to.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS, AL_SEEK_ERROR, or possibly some other status code < AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This is a function the user can call to position the read/write pointer
|
|
// to a new location in the disk file. If there is any data that has been
|
|
// written to the I/O buffer, it gets flushed first. After that, we do
|
|
// a seek, and update mlFilePointer to reflect the new reality. Note that
|
|
// the other important data members will have been updated by FlushBuffer().
|
|
//
|
|
// And no, this guy doesn't do a LoadBuffer(). Which is fine if you are
|
|
// going to do a bunch of writes afterwards. If you are going to read data
|
|
// immediately after Seek(), you would have been better of calling
|
|
// LoadBuffer().
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Seek( long address )
|
|
{
|
|
FlushBuffer();
|
|
if ( mStatus < 0 )
|
|
return mStatus;
|
|
if ( mlFilePointer != address ) {
|
|
long result = lseek( miHandle, address, SEEK_SET );
|
|
if ( result == -1L )
|
|
return mStatus.SetError( AL_SEEK_ERROR,
|
|
"Seek failure on %s. errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
}
|
|
mlFilePointer = address;
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// int ALFile::Open()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_CANT_OPEN_FILE, AL_SUCCESS, or possibly some other error code
|
|
// < AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This is an important function, because it converts the ALFile
|
|
// object from a dinky little unimportant object, to a big massive
|
|
// thing that is ready to do serious work.
|
|
//
|
|
// The first thing we do here is see if we can open the file. We try
|
|
// to open it with READ/WRITE privileges, but we give up and drop back
|
|
// to READ only if that doesn't work out.
|
|
//
|
|
// We then call the base class ALStorage::Open() who takes care of
|
|
// allocating buffers and initializing data members.
|
|
//
|
|
// Finally, we have to get the protection attributes and time date
|
|
// stamps for the file. After those are stored off, the file is ready
|
|
// for abuse.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Open()
|
|
{
|
|
if ( mStatus < AL_SUCCESS )
|
|
return mStatus;
|
|
miHandle = open( mName, O_BINARY | O_RDWR );
|
|
if ( miHandle == -1 && errno == EACCES )
|
|
miHandle = open( mName, O_BINARY | O_RDONLY );
|
|
if ( miHandle == -1 )
|
|
return mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"File open failure. Open of %s returned "
|
|
"errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
|
|
ALStorage::Open();
|
|
struct stat buf;
|
|
struct tm *tblock;
|
|
if ( stat( mName, &buf ) == -1 )
|
|
return mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"Couldn't get time, date, and size "
|
|
"information for %s. errno = %d.",
|
|
mName.GetName(),
|
|
errno );
|
|
mlSize = buf.st_size;
|
|
tblock = localtime( &buf.st_mtime );
|
|
mTimeDate.SetTimeDate( tblock );
|
|
#if XVT_OS == XVT_OS_SCOUNIX
|
|
// TBI code for UNIX attributes
|
|
// stat s;
|
|
// mAttributes = SetFromUnixMode(stat.st_mode)
|
|
#else
|
|
#if defined( AL_WIN32S )
|
|
DWORD attributes = GetFileAttributes( mName );
|
|
if ( attributes == 0xFFFFFFFF )
|
|
return mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"Couldn't get Win32 file attribute "
|
|
"information for %s. GetLastError = %d.",
|
|
mName.GetName(),
|
|
GetLastError() );
|
|
mAttributes.SetFromWin32Attributes( attributes );
|
|
#else
|
|
unsigned attributes;
|
|
if ( _dos_getfileattr( mName, &attributes ) != 0 )
|
|
return mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"Couldn't get DOS attribute "
|
|
"information for %s. errno = %d.",
|
|
mName.GetName(),
|
|
errno );
|
|
mAttributes.SetFromDosAttributes( attributes );
|
|
#endif
|
|
#endif
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// void ALFile::MakeTempName( int i )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// i : A numeric argument that can somehow be incorporated into
|
|
// the temporary file name. Create() will call this function
|
|
// while incrementing this number in an attempt to find a unique
|
|
// name.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// Nothing.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is called by Create() and other functions when they
|
|
// decide they need to cook up a temporary file name. The single parameter
|
|
// i is incremented by the calling program so that repeated calls should
|
|
// eventually produce a unique name.
|
|
//
|
|
// All this function does to create that unique name is perform a sprintf()
|
|
// into a buffer using a simple template. The result is copied into the
|
|
// mName member, and is ready to be tried out.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
void AL_PROTO ALFile::MakeTempName( int i )
|
|
{
|
|
char name[ 21 ];
|
|
|
|
sprintf( name, "~al~%03d.tmp", i );
|
|
mName = name;
|
|
}
|
|
|
|
//
|
|
// int ALFile::Create()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS, AL_CANT_OPEN_FILE, or possibly some other error code
|
|
// < AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is used to create a new file storage object. Since
|
|
// we are creating a new object, we must be able to open it with read
|
|
// access. We will also rudely obliterate any existing file.
|
|
//
|
|
// The first thing we do here is call the base class Create() function.
|
|
// It takes care of setting up the I/O buffer and initializing the
|
|
// data members used to support the class.
|
|
//
|
|
// Next, function checks to see if we have a valid filename. If
|
|
// not, a search is made for a valid temporary file name. In either
|
|
// case, the file is then opened with R/W access, in O_CREAT
|
|
// mode, obliterating any existing file with the same name.
|
|
//
|
|
// Once the file is open, everything is ready to go, and you can write
|
|
// to the file at will. Don't expect much to happen if you try to
|
|
// read, however.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Create()
|
|
{
|
|
ALStorage::Create();
|
|
if ( mStatus < AL_SUCCESS )
|
|
return mStatus;
|
|
if ( (char *) mName == 0 || strlen( mName ) == 0 ) {
|
|
for ( int i = 0 ; i < 999 ; i++ ) {
|
|
MakeTempName( i );
|
|
miHandle = open( mName,
|
|
O_CREAT | O_RDWR | O_BINARY | O_EXCL,
|
|
S_IREAD | S_IWRITE );
|
|
if ( miHandle != -1 )
|
|
break;
|
|
else if ( errno != EEXIST && errno != EACCES ) {
|
|
mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"Temporary file creation failure. "
|
|
"Open of %s returned errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
mName = "";
|
|
return AL_CANT_OPEN_FILE;
|
|
}
|
|
}
|
|
if ( i == 1000 ) {
|
|
mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"Temporary file creation failure. "
|
|
"Tried 1000 times to open %s "
|
|
"(or a name something like that).",
|
|
mName.GetName() );
|
|
mName = "";
|
|
return AL_CANT_OPEN_FILE;
|
|
}
|
|
} else {
|
|
miHandle = open( mName,
|
|
O_CREAT | O_RDWR | O_BINARY | O_TRUNC,
|
|
S_IREAD | S_IWRITE );
|
|
}
|
|
if ( miHandle == -1 )
|
|
return mStatus.SetError( AL_CANT_OPEN_FILE,
|
|
"File creation failure. "
|
|
"Open of %s returned errno = %d",
|
|
mName.GetName(),
|
|
errno );
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// int ALFile::Close()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// Any status code, hopefully AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is called when you are done accessing a file, and want
|
|
// to free up its resources. The first thing it does is check to see
|
|
// if the file was ever actually opened. If it was, we flush the output
|
|
// buffer, then calculate and store the file length. Finally, we close
|
|
// the disk file, then call the base class Close() function to clean up
|
|
// the buffers and deal with other miscellaneous dirty work.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Close()
|
|
{
|
|
if ( miHandle == -1 )
|
|
return mStatus;
|
|
FlushBuffer();
|
|
mlSize = filelength( miHandle );
|
|
if ( miCreated && mTimeDate.Valid() ) {
|
|
#if defined( AL_WIN32S )
|
|
// Can you do this under NT? I don't know how.
|
|
#else
|
|
_dos_setftime( miHandle, mTimeDate.GetDosDate(), mTimeDate.GetDosTime() );
|
|
#endif
|
|
}
|
|
close( miHandle );
|
|
miHandle = -1;
|
|
ALStorage::Close();
|
|
if ( miCreated && mTimeDate.Valid() ) {
|
|
#if XVT_OS == XVT_OS_SCOUNIX
|
|
// TBI code for setting UNIX attributes
|
|
#else
|
|
#if defined( AL_WIN32S )
|
|
SetFileAttributes( mName, mAttributes.GetWin32Attributes() );
|
|
#else
|
|
_dos_setfileattr( mName, mAttributes.GetDosAttributes() );
|
|
#endif
|
|
#endif
|
|
}
|
|
return mStatus;
|
|
}
|
|
|
|
//
|
|
// int ALFile::RenameToBackup( int delete_on_clash = 1 )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// delete_on_clash : If this flag is set, it means that we will overwrite
|
|
// an existing file with this file if the names clash.
|
|
// For example, if I am renaming TEMP.DAT to TEMP.BAK,
|
|
// and a TEMP.BAK already exists, I will delete it
|
|
// before renaming if this arg is set.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS or AL_RENAME_ERROR.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is a quick way to rename a storage object. The new
|
|
// name created is the default name, which usually means changing the
|
|
// file extension to ".BAK", from whatever it was.
|
|
//
|
|
// You don't see it here, but both the mName member and the physical file
|
|
// name are both updated. That all happens in the Rename() function.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::RenameToBackup( int delete_on_clash /* = 1 */ )
|
|
{
|
|
mName.ChangeExtension();
|
|
return Rename( 0, delete_on_clash );
|
|
}
|
|
|
|
//
|
|
// int ALFile::Rename( const char *new_name /* = 0 */,
|
|
// int delete_on_clash /* = 1 */ )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// new_name : A character pointer to a new file name. If a name is
|
|
// defined here, the file is renamed to this new value.
|
|
// If this value is 0, it means that we expect that
|
|
// the mName member has already been updated with a
|
|
// new name. In this case, the old name of the
|
|
// file is renamed to the new name.
|
|
//
|
|
// delete_on_clash : If this flag is set, it means that we will overwrite
|
|
// an existing file with this file if the names clash.
|
|
// For example, if I am renaming TEMP.DAT to TEMP.BAK,
|
|
// and a TEMP.BAK already exists, I will delete it
|
|
// before renaming if this arg is set.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS or AL_RENAME_ERROR.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This virtual function provides a way to rename a storage object's
|
|
// physical implementation. It first updates the mName member if a
|
|
// new_name argument is provided. After that, we unlink the clash file
|
|
// if one exists, then do a simple rename of mName.mszOldName to
|
|
// new_name.
|
|
//
|
|
// Note that this function does a lot of error checking in debug mode.
|
|
// It also does a little error checking in release mode.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Rename( const char AL_DLL_FAR *new_name /* = 0 */,
|
|
int delete_on_clash /* = 1 */ )
|
|
{
|
|
AL_ASSERT( miHandle == -1, "Rename: attempting to rename open file" );
|
|
AL_ASSERT( mName.GetName() != 0, "Rename: attempting to rename file with null name" );
|
|
AL_ASSERT( strlen( mName ) > 0, "Rename: attempting to rename file with 0 length name" );
|
|
|
|
int status;
|
|
const char *real_old_name;
|
|
const char *real_new_name;
|
|
if ( new_name ) {
|
|
real_old_name = mName.GetSafeName();
|
|
real_new_name = new_name;
|
|
} else {
|
|
real_old_name = mName.GetSafeOldName();
|
|
real_new_name = mName.GetSafeName();
|
|
}
|
|
#if !defined( AL_WIN32S )
|
|
const char *p = strchr( real_new_name, '.' );
|
|
if ( p && strlen( p ) > 4 )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error trying to rename %s. It has a long "
|
|
"extension, which could lead to inadvertent "
|
|
"deletion of a file when trying to rename.",
|
|
real_old_name );
|
|
#endif
|
|
if ( delete_on_clash ) {
|
|
if ( mName.mCase == AL_MIXED )
|
|
status = strcmp( real_new_name, real_old_name );
|
|
else
|
|
status = stricmp( real_new_name, real_old_name );
|
|
if ( status == 0 )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error attempting to rename %s to %s. "
|
|
"Can't rename to the same name!",
|
|
real_new_name,
|
|
real_old_name );
|
|
status = unlink( real_new_name );
|
|
if ( status != 0 && errno != ENOENT )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error deleting %s before renaming %s. "
|
|
"errno = %d",
|
|
real_new_name,
|
|
real_old_name,
|
|
errno );
|
|
}
|
|
status = rename( real_old_name, real_new_name );
|
|
if ( status != 0 )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error renaming %s to %s. errno = %d",
|
|
real_old_name,
|
|
real_new_name,
|
|
errno );
|
|
if ( new_name != 0 )
|
|
mName = new_name;
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// int ALFile::UnRename( int delete_on_clash /* = 1 */ )
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// delete_on_clash : If this flag is set, it means that we will overwrite
|
|
// an existing file with this file if the names clash.
|
|
// For example, if I am renaming TEMP.BAK to TEMP.DAT,
|
|
// and a TEMP.DAT already exists, I will delete it
|
|
// before renaming if this arg is set.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_SUCCESS or AL_RENAME_ERROR.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This virtual function provides a way to undo a previous renaming of
|
|
// a storage object's physical name. We can do this because the mName
|
|
// member of ALStorage keeps track both of the current name of the file,
|
|
// and the old name. In this case, we just rename the current name to
|
|
// the old name. Then we update the mName member so it is accurate.
|
|
//
|
|
// Note that this function does a lot of error checking in debug mode.
|
|
// It also does a little error checking in release mode.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::UnRename( int delete_on_clash /* = 1 */ )
|
|
{
|
|
AL_ASSERT( miHandle == -1, "UnRename: attempting to rename open file" );
|
|
AL_ASSERT( mName.GetName() != 0, "UnRename: attempting to rename file with null name" );
|
|
AL_ASSERT( mName.GetOldName() != 0, "UnRename: attempting to rename file with null old name" );
|
|
AL_ASSERT( strlen( mName ) > 0, "UnRename: attempting to rename file with 0 length name" );
|
|
AL_ASSERT( strlen( mName.GetOldName() ) > 0, "UnRename: attempting to rename file with 0 length old name" );
|
|
|
|
int status;
|
|
|
|
if ( delete_on_clash ) {
|
|
status = unlink( mName.GetOldName() );
|
|
if ( status != 0 && errno != ENOENT )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error deleting %s before renaming %s. "
|
|
"errno = %d",
|
|
mName.GetOldName(),
|
|
mName.GetName(),
|
|
errno );
|
|
}
|
|
status = rename( mName, mName.GetOldName() );
|
|
if ( status != 0 && errno != ENOENT )
|
|
return mStatus.SetError( AL_RENAME_ERROR,
|
|
"Error renaming %s to %s. errno = %d",
|
|
mName.GetName(),
|
|
mName.GetOldName(),
|
|
errno );
|
|
ALStorage::mName = mName.GetOldName();
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
//
|
|
// int ALFile::Delete()
|
|
//
|
|
// ARGUMENTS:
|
|
//
|
|
// None.
|
|
//
|
|
// RETURNS
|
|
//
|
|
// AL_DELETE_ERROR or AL_SUCCESS.
|
|
//
|
|
// DESCRIPTION
|
|
//
|
|
// This function is called to delete the physical object associated with
|
|
// a file. This simply means calling the unlink() function for the
|
|
// given name.
|
|
//
|
|
// REVISION HISTORY
|
|
//
|
|
// May 26, 1994 1.0A : First release
|
|
//
|
|
|
|
int AL_PROTO ALFile::Delete()
|
|
{
|
|
AL_ASSERT( miHandle == -1, "Delete: attempting to delete open file" );
|
|
AL_ASSERT( mName.GetName() != 0, "Delete: attempting to delete file with null name" );
|
|
AL_ASSERT( strlen( mName ) > 0, "Delete: attempting to delete file with 0 length name" );
|
|
|
|
int status = unlink( mName );
|
|
if ( status != 0 )
|
|
return mStatus.SetError( AL_DELETE_ERROR,
|
|
"Error deleting file %s, errno = %d ",
|
|
mName.GetName(),
|
|
errno );
|
|
return AL_SUCCESS;
|
|
}
|
|
|
|
|