c0388656dc
There were a variety of potential 64b problems due to the complete lack of prototype declarations. So, we add a file, isam_prototypes.h, generated mostly by the 'cproto' tool. We also fixed up some errors that having proper prototypes pointed out, mainly in passing ints where pointers were expected and vice versa. The iserase() function was supposed to accept a char *, but was defined as only accepting a char. Fun stuff like that.
290 lines
7.2 KiB
C
290 lines
7.2 KiB
C
/*
|
|
* CDE - Common Desktop Environment
|
|
*
|
|
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
|
|
*
|
|
* These libraries and programs are free software; you can
|
|
* redistribute them and/or modify them under the terms of the GNU
|
|
* Lesser General Public License as published by the Free Software
|
|
* Foundation; either version 2 of the License, or (at your option)
|
|
* any later version.
|
|
*
|
|
* These libraries and programs are distributed in the hope that
|
|
* they 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 these libraries and programs; if not, write
|
|
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
|
|
* Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
/*%% (c) Copyright 1993, 1994 Hewlett-Packard Company */
|
|
/*%% (c) Copyright 1993, 1994 International Business Machines Corp. */
|
|
/*%% (c) Copyright 1993, 1994 Sun Microsystems, Inc. */
|
|
/*%% (c) Copyright 1993, 1994 Novell, Inc. */
|
|
/*%% $XConsortium: isrename.c /main/3 1995/10/23 11:43:48 rswiston $ */
|
|
/*
|
|
* Copyright (c) 1988 by Sun Microsystems, Inc.
|
|
*/
|
|
|
|
/*
|
|
* isrename.c
|
|
*
|
|
* Description:
|
|
* Rename an ISAM file.
|
|
*/
|
|
|
|
|
|
#include "isam_impl.h"
|
|
#include <unistd.h>
|
|
#include <sys/time.h>
|
|
|
|
void _removelast();
|
|
static void _removelast2();
|
|
char *_lastelement();
|
|
static void _rename_datfile(), _rename_indfile(), _rename_varfile();
|
|
static int _amrename();
|
|
|
|
/*
|
|
* isfd = isrename(oldname, newname)
|
|
*
|
|
*
|
|
* Errors:
|
|
* EBADFILE ISAM file is corrupted or it is not an NetISAM file
|
|
* EFLOCKED The file is exclusively locked by other process.
|
|
* EFNAME Invalid ISAM file name
|
|
* EFNAME ISAM file does not exist
|
|
* ETOOMANY Too many ISAM file descriptors are in use (128 is the limit)
|
|
*
|
|
* The following error code is "borrowed" from UNIX:
|
|
* EACCES UNIX file system protection denies access to the file:
|
|
* - mode is INOUT or OUTPUT and ISAM file is on
|
|
* a Read-Only mounted file system
|
|
* - UNIX file permissions don't allow access to the file
|
|
*/
|
|
|
|
int
|
|
isrename(char *oldname, char *newname)
|
|
{
|
|
Isfd isfd, isfd2;
|
|
Fab *fab;
|
|
char olddir [MAXPATHLEN];
|
|
char newdir [MAXPATHLEN];
|
|
char datfname[MAXPATHLEN];
|
|
|
|
/*
|
|
* Check that the odl and new filename are in the same directory.
|
|
*/
|
|
snprintf(olddir, sizeof(olddir), "%s", oldname);
|
|
_removelast2(olddir);
|
|
snprintf(newdir, sizeof(newdir), "%s", newname);
|
|
_removelast2(newdir);
|
|
|
|
if (strcmp(newdir, olddir) != 0) {
|
|
_setiserrno2(EFNAME, 9, 0);
|
|
return (ISERROR);
|
|
}
|
|
|
|
/*
|
|
* Open the file
|
|
*/
|
|
if ((isfd = isopen(oldname, ISINOUT)) == -1)
|
|
return (ISERROR); /* iserrno is set */
|
|
|
|
/*
|
|
* Reject rename if 'newfile' exists.
|
|
*/
|
|
if ((isfd2 = isopen(newname, ISINOUT)) != -1 || iserrno != ENOENT) {
|
|
|
|
_setiserrno2(EEXIST, 9, 0);
|
|
if (isfd2 >= 0) (void)isclose(isfd2);
|
|
return (ISERROR); /* iserrno is set */
|
|
}
|
|
|
|
/*
|
|
* Get File Access Block.
|
|
*/
|
|
if ((fab = _isfd_find(isfd)) == NULL) {
|
|
_isfatal_error("isrename() cannot find FAB");
|
|
_setiserrno2(EFATAL,'9','0');
|
|
return (ISERROR);
|
|
}
|
|
|
|
if (_amrename(&fab->isfhandle, _lastelement(newname), &fab->errcode)) {
|
|
_seterr_errcode(&fab->errcode);
|
|
(void)isclose(isfd);
|
|
return (ISERROR);
|
|
}
|
|
|
|
_fab_destroy(fab); /* Deallocate Fab object */
|
|
_isfd_delete(isfd);
|
|
|
|
/*
|
|
* We must unlink() the .rec file, or isbuild() with the same
|
|
* following immediatly would fail because for NFS files the client
|
|
* still thinks that the file exists for a few seconds.
|
|
*/
|
|
|
|
snprintf(datfname, sizeof(datfname), "%s", oldname);
|
|
_makedat_isfname(datfname);
|
|
(void)unlink(datfname);
|
|
|
|
return (ISOK); /* Successful isrename() */
|
|
}
|
|
|
|
/*
|
|
* _removelast2(path)
|
|
*
|
|
* Remove last element of path. E.g. /usr/db/part yields /usr/db.
|
|
* Unlike _removelast() that path does not have to start with '/'.
|
|
*/
|
|
|
|
Static void
|
|
_removelast2(char *path)
|
|
{
|
|
char *p;
|
|
|
|
for (p = path + strlen(path); *--p != '/' && p >= path; )
|
|
*p = '\0';
|
|
}
|
|
|
|
/*
|
|
* _amrename(isfhandle, newname)
|
|
*
|
|
* _amrename() renames ISAM file
|
|
*
|
|
* Input params:
|
|
* isfhandle Handle of ISAM file
|
|
*
|
|
* Output params:
|
|
* errcode Error code
|
|
*
|
|
*/
|
|
|
|
|
|
static int
|
|
_amrename(Bytearray *isfhandle, char *newname, struct errcode *errcode)
|
|
{
|
|
Fcb *fcb;
|
|
char *isfname = _getisfname(isfhandle);
|
|
|
|
_isam_entryhook();
|
|
|
|
/*
|
|
* Get FCB corresponding to the isfhandle handle.
|
|
*/
|
|
if ((fcb = _openfcb(isfhandle, errcode)) == NULL) {
|
|
goto ERROR;
|
|
}
|
|
|
|
/*
|
|
* Delete FCB and remove it from FCB cache.
|
|
*/
|
|
(void) _watchfd_decr(_isfcb_nfds(fcb));
|
|
_isfcb_close(fcb);
|
|
_mngfcb_delete(isfhandle);
|
|
|
|
/*
|
|
* Rename all UNIX files.
|
|
*/
|
|
_rename_datfile(isfname, newname);
|
|
_rename_indfile(isfname, newname);
|
|
_rename_varfile(isfname, newname);
|
|
|
|
_isam_exithook();
|
|
return (ISOK);
|
|
|
|
ERROR:
|
|
|
|
_isam_exithook();
|
|
return (ISERROR);
|
|
}
|
|
|
|
|
|
/* newname, with no prefix */
|
|
Static void
|
|
_rename_datfile(char *isfname, char *newname)
|
|
{
|
|
char namebuf[MAXPATHLEN];
|
|
char newbuf[MAXPATHLEN];
|
|
char newbuftemp[sizeof(newbuf)];
|
|
|
|
snprintf(namebuf, sizeof(namebuf), "%s", isfname);
|
|
snprintf(newbuf, sizeof(newbuf), "%s", isfname);
|
|
|
|
/*
|
|
* Replace the last element of the old path with newname.
|
|
*/
|
|
_removelast(newbuf);
|
|
if (strcmp(newbuf, "/") != 0) {
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s/", newbuf);
|
|
strcpy(newbuf, newbuftemp);
|
|
}
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s%s", newbuf, newname);
|
|
strcpy(newbuf, newbuftemp);
|
|
|
|
_makedat_isfname(namebuf);
|
|
_makedat_isfname(newbuf);
|
|
|
|
(void)rename(namebuf, newbuf);
|
|
}
|
|
|
|
/* newname, with no prefix */
|
|
Static void
|
|
_rename_indfile(char *isfname, char *newname)
|
|
{
|
|
char namebuf[MAXPATHLEN];
|
|
char newbuf[MAXPATHLEN];
|
|
char newbuftemp[MAXPATHLEN];
|
|
|
|
snprintf(namebuf, sizeof(namebuf), "%s", isfname);
|
|
snprintf(newbuf, sizeof(newbuf), "%s", isfname);
|
|
|
|
/*
|
|
* Replace the last element of the old path with newname.
|
|
*/
|
|
_removelast(newbuf);
|
|
if (strcmp(newbuf, "/") != 0) {
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s/", newbuf);
|
|
strcpy(newbuf, newbuftemp);
|
|
}
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s%s", newbuf, newname);
|
|
strcpy(newbuf, newbuftemp);
|
|
|
|
_makeind_isfname(namebuf);
|
|
_makeind_isfname(newbuf);
|
|
|
|
(void)rename(namebuf, newbuf);
|
|
}
|
|
|
|
/* newname, with no prefix */
|
|
Static void
|
|
_rename_varfile(char *isfname, char *newname)
|
|
{
|
|
char namebuf[MAXPATHLEN];
|
|
char newbuf[MAXPATHLEN];
|
|
char newbuftemp[MAXPATHLEN];
|
|
|
|
snprintf(namebuf, sizeof(namebuf), "%s", isfname);
|
|
snprintf(newbuf, sizeof(newbuf), "%s", isfname);
|
|
|
|
/*
|
|
* Replace the last element of the old path with newname.
|
|
*/
|
|
_removelast(newbuf);
|
|
if (strcmp(newbuf, "/") != 0) {
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s/", newbuf);
|
|
strcpy(newbuf, newbuftemp);
|
|
}
|
|
snprintf(newbuftemp, sizeof(newbuftemp), "%s%s", newbuf, newname);
|
|
strcpy(newbuf, newbuftemp);
|
|
|
|
_makevar_isfname(namebuf);
|
|
_makevar_isfname(newbuf);
|
|
|
|
(void)rename(namebuf, newbuf);
|
|
}
|
|
|