Subversion Repositories openrisc

/*

 *  IMFS file change mode routine.

 *

 *  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: imfs_fchmod.c,v 1.2 2001-09-27 12:01:15 chris Exp $

 */

#include <errno.h>

#include "libio_.h"

#include "imfs.h"

int IMFS_fchmod(

  rtems_filesystem_location_info_t *loc,

  mode_t                            mode

)

{

  IMFS_jnode_t  *jnode;

#if defined(RTEMS_POSIX_API)

  uid_t          st_uid;

#endif

  jnode = loc->node_access;

  /*

   *  Verify I am the owner of the node or the super user.

   */

#if defined(RTEMS_POSIX_API)

  st_uid = geteuid();

  if ( ( st_uid != jnode->st_uid ) && ( st_uid != 0 ) )

    set_errno_and_return_minus_one( EPERM );

#endif

  /*

   * Change only the RWX permissions on the jnode to mode.

   */

  if ( mode & (~ (S_IRWXU | S_IRWXG | S_IRWXO ) ) )

    set_errno_and_return_minus_one( EPERM );

  jnode->st_mode &= ~(S_IRWXU | S_IRWXG | S_IRWXO);

  jnode->st_mode |= mode;

  IMFS_update_ctime( jnode );

  return 0;

}