+++ /dev/null
-/*
- * This Cplant(TM) source code is the property of Sandia National
- * Laboratories.
- *
- * This Cplant(TM) source code is copyrighted by Sandia National
- * Laboratories.
- *
- * The redistribution of this Cplant(TM) source code is subject to the
- * terms of the GNU Lesser General Public License
- * (see cit/LGPL or http://www.gnu.org/licenses/lgpl.html)
- *
- * Cplant(TM) Copyright 1998-2003 Sandia Corporation.
- * Under the terms of Contract DE-AC04-94AL85000, there is a non-exclusive
- * license for use of this work by or on behalf of the US Government.
- * Export of this program may require a license from the United States
- * Government.
- */
-
-/*
- * 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
- *
- * Questions or comments about this library should be sent to:
- *
- * Lee Ward
- * Sandia National Laboratories, New Mexico
- * P.O. Box 5800
- * Albuquerque, NM 87185-1110
- *
- * lee@sandia.gov
- */
-
-#include <unistd.h>
-#include <string.h>
-#include <fcntl.h>
-#include <errno.h>
-#include <assert.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <sys/queue.h>
-
-#include "sysio.h"
-#include "inode.h"
-#include "file.h"
-#include "fs.h"
-#include "mount.h"
-
-#include "sysio-symbols.h"
-
-/*
- * Truncate file, given path (alias) or index node.
- */
-static int
-do_truncate(struct pnode *pno, struct inode *ino, _SYSIO_OFF_T length)
-{
- struct intnl_stat stbuf;
- unsigned mask;
-
- if (length < 0)
- return -EINVAL;
-
- if (!ino && pno->p_base->pb_ino)
- ino = pno->p_base->pb_ino;
- if (!ino)
- return -EBADF;
- if (S_ISDIR(ino->i_stbuf.st_mode)) /* for others too? */
- return -EISDIR;
- if (!S_ISREG(ino->i_stbuf.st_mode))
- return -EINVAL;
-
- (void )memset(&stbuf, 0, sizeof(stbuf));
- stbuf.st_size = length;
- mask = SETATTR_LEN;
- return _sysio_setattr(pno, ino, mask, &stbuf);
-}
-
-static int
-PREPEND(_, SYSIO_INTERFACE_NAME(truncate))(const char *path,
- _SYSIO_OFF_T length)
-{
- int err;
- struct pnode *pno;
- SYSIO_INTERFACE_DISPLAY_BLOCK;
-
- SYSIO_INTERFACE_ENTER;
- err = _sysio_namei(_sysio_cwd, path, 0, NULL, &pno);
- if (err)
- goto out;
- err = do_truncate(pno, pno->p_base->pb_ino, length);
- P_RELE(pno);
-
-out:
- SYSIO_INTERFACE_RETURN(err ? -1 : 0, err);
-}
-
-#ifdef _LARGEFILE64_SOURCE
-#undef truncate64
-sysio_sym_weak_alias(PREPEND(_, SYSIO_INTERFACE_NAME(truncate)),
- SYSIO_INTERFACE_NAME(truncate64))
-
-#undef truncate
-int
-SYSIO_INTERFACE_NAME(truncate)(const char *path, off_t length)
-{
-
- return PREPEND(_, SYSIO_INTERFACE_NAME(truncate))(path, length);
-}
-#else
-#undef truncate
-sysio_sym_weak_alias(PREPEND(_, SYSIO_INTERFACE_NAME(truncate)),
- SYSIO_INTERFACE_NAME(truncate))
-#endif
-
-static int
-PREPEND(_, SYSIO_INTERFACE_NAME(ftruncate))(int fd, _SYSIO_OFF_T length)
-{
- int err;
- struct file *fil;
- SYSIO_INTERFACE_DISPLAY_BLOCK;
-
- SYSIO_INTERFACE_ENTER;
- err = 0;
- fil = _sysio_fd_find(fd);
- if (!fil) {
- err = -EBADF;
- goto out;
- }
- if (!F_CHKRW(fil, 'w')) {
- err = -EBADF;
- goto out;
- }
- err = do_truncate(NULL, fil->f_ino, length);
-out:
- SYSIO_INTERFACE_RETURN(err ? -1 : 0, err);
-}
-
-#ifdef _LARGEFILE64_SOURCE
-#undef ftruncate64
-sysio_sym_weak_alias(PREPEND(_, SYSIO_INTERFACE_NAME(ftruncate)),
- SYSIO_INTERFACE_NAME(ftruncate64))
-
-#undef ftruncate
-int
-SYSIO_INTERFACE_NAME(ftruncate)(int fd, off_t length)
-{
-
- return PREPEND(_, SYSIO_INTERFACE_NAME(ftruncate))(fd, length);
-}
-#else
-#undef ftruncate
-sysio_sym_weak_alias(PREPEND(_, SYSIO_INTERFACE_NAME(ftruncate)),
- SYSIO_INTERFACE_NAME(ftruncate))
-#endif