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

Subversion Repositories or1k

[/] [or1k/] [branches/] [newlib/] [newlib/] [libgloss/] [mn10300/] [access.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 39 lampret
/* This is file ACCESS.C */
2
/*
3
** Copyright (C) 1993 DJ Delorie, 24 Kirsten Ave, Rochester NH 03867-2954
4
**
5
** This file is distributed under the terms listed in the document
6
** "copying.dj", available from DJ Delorie at the address above.
7
** A copy of "copying.dj" should accompany this file; if not, a copy
8
** should be available from where this file was obtained.  This file
9
** may not be distributed without a verbatim copy of "copying.dj".
10
**
11
** This file is distributed WITHOUT ANY WARRANTY; without even the implied
12
** warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13
*/
14
 
15
#include <fcntl.h>
16
#include <sys/stat.h>
17
#include <unistd.h>
18
 
19
int access(const char *fn, int flags)
20
{
21
  struct stat s;
22
  if (stat(fn, &s))
23
    return -1;
24
  if (s.st_mode & S_IFDIR)
25
    return 0;
26
  if (flags & W_OK)
27
  {
28
    if (s.st_mode & S_IWRITE)
29
      return 0;
30
    return -1;
31
  }
32
  return 0;
33
}
34
 

powered by: WebSVN 2.1.0

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