URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [lib/] [libc/] [ftruncate.c] - Rev 227
Go to most recent revision | Compare with Previous | Blame | View Log
/* * ftruncate() - Truncate a File to the Specified Length * * COPYRIGHT (c) 1989-1999. * On-Line Applications Research Corporation (OAR). * * The license and distribution terms for this file may be * found in the file LICENSE in this distribution or at * http://www.OARcorp.com/rtems/license.html. * * $Id: ftruncate.c,v 1.2 2001-09-27 12:01:15 chris Exp $ */ #include <unistd.h> #include <errno.h> #include "libio_.h" int ftruncate( int fd, off_t length ) { rtems_libio_t *iop; rtems_filesystem_location_info_t loc; rtems_libio_check_fd( fd ); iop = rtems_libio_iop( fd ); rtems_libio_check_is_open(iop); /* * Now process the ftruncate() request. */ /* * Make sure we are not working on a directory */ loc = iop->pathinfo; if ( !loc.ops->node_type ) set_errno_and_return_minus_one( ENOTSUP ); if ( (*loc.ops->node_type)( &loc ) == RTEMS_FILESYSTEM_DIRECTORY ) set_errno_and_return_minus_one( EISDIR ); rtems_libio_check_permissions( iop, LIBIO_FLAGS_WRITE ); if ( !iop->handlers->ftruncate ) set_errno_and_return_minus_one( ENOTSUP ); return (*iop->handlers->ftruncate)( iop, length ); }
Go to most recent revision | Compare with Previous | Blame | View Log