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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [lib/] [libc/] [write.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
 *  write() - POSIX 1003.1b 6.4.2 - Write to a File
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: write.c,v 1.2 2001-09-27 12:01:15 chris Exp $
12
 */
13
 
14
#include "libio_.h"
15
 
16
 
17
/*
18
 * write
19
 *
20
 * This routine writes count bytes from from buffer pointed to by buffer
21
 * to the file associated with the open file descriptor, fildes.
22
 */
23
 
24
ssize_t write(
25
  int         fd,
26
  const void *buffer,
27
  size_t      count
28
)
29
{
30
  rtems_status_code  rc;
31
  rtems_libio_t     *iop;
32
 
33
  rtems_libio_check_fd( fd );
34
  iop = rtems_libio_iop( fd );
35
  rtems_libio_check_is_open(iop);
36
  rtems_libio_check_buffer( buffer );
37
  rtems_libio_check_count( count );
38
  rtems_libio_check_permissions( iop, LIBIO_FLAGS_WRITE );
39
 
40
  /*
41
   *  Now process the write() request.
42
   */
43
 
44
  if ( !iop->handlers->write )
45
    set_errno_and_return_minus_one( ENOTSUP );
46
 
47
  rc = (*iop->handlers->write)( iop, buffer, count );
48
 
49
  if ( rc > 0 )
50
    iop->offset += rc;
51
 
52
  return rc;
53
}
54
 
55
/*
56
 *  _write_r
57
 *
58
 *  This is the Newlib dependent reentrant version of write().
59
 */
60
 
61
#if defined(RTEMS_NEWLIB)
62
 
63
#include <reent.h>
64
 
65
long _write_r(
66
  struct _reent *ptr,
67
  int            fd,
68
  const void    *buf,
69
  size_t         nbytes
70
)
71
{
72
  return write( fd, buf, nbytes );
73
}
74
#endif

powered by: WebSVN 2.1.0

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