OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [lib/] [libc/] [unlink.c] - Blame information for rev 507

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback
/*
2
 *  unlink() - POSIX 1003.1b - 5.5.1 - Remove an existing link
3
 *
4
 *  COPYRIGHT (c) 1989-1999.
5
 *  On-Line Applications Research Corporation (OAR).
6
 *
7
 *  The license and distribution terms for this file may be
8
 *  found in the file LICENSE in this distribution or at
9
 *  http://www.OARcorp.com/rtems/license.html.
10
 *
11
 *  $Id: unlink.c,v 1.2 2001-09-27 12:01:15 chris Exp $
12
 */
13
 
14
#include <errno.h>
15
 
16
#include "libio_.h"
17
 
18
int unlink(
19
  const char *path
20
)
21
{
22
  rtems_filesystem_location_info_t  loc;
23
  int                               result;
24
 
25
  /*
26
   * Get the node to be unlinked.
27
   */
28
 
29
  result = rtems_filesystem_evaluate_path( path, 0, &loc, FALSE );
30
  if ( result != 0 )
31
     return -1;
32
 
33
  if ( !loc.ops->node_type ) {
34
    rtems_filesystem_freenode( &loc );
35
    set_errno_and_return_minus_one( ENOTSUP );
36
  }
37
 
38
  if (  (*loc.ops->node_type)( &loc ) == RTEMS_FILESYSTEM_DIRECTORY ) {
39
    rtems_filesystem_freenode( &loc );
40
    set_errno_and_return_minus_one( EISDIR );
41
  }
42
 
43
  if ( !loc.ops->unlink ) {
44
    rtems_filesystem_freenode( &loc );
45
    set_errno_and_return_minus_one( ENOTSUP );
46
  }
47
 
48
  result = (*loc.ops->unlink)( &loc );
49
 
50
  rtems_filesystem_freenode( &loc );
51
 
52
  return result;
53
}
54
 
55
/*
56
 *  _unlink_r
57
 *
58
 *  This is the Newlib dependent reentrant version of unlink().
59
 */
60
 
61
#if defined(RTEMS_NEWLIB)
62
 
63
#include <reent.h>
64
 
65
int _unlink_r(
66
  struct _reent *ptr,
67
  const char    *path
68
)
69
{
70
  return unlink( path );
71
}
72
#endif
73
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.