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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libc/] [stdio64/] [stdio64.c] - Diff between revs 158 and 816

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 158 Rev 816
/* No user fns here.  Pesch 15apr92. */
/* No user fns here.  Pesch 15apr92. */
 
 
/*
/*
 * Copyright (c) 1990 The Regents of the University of California.
 * Copyright (c) 1990 The Regents of the University of California.
 * All rights reserved.
 * All rights reserved.
 *
 *
 * Redistribution and use in source and binary forms are permitted
 * Redistribution and use in source and binary forms are permitted
 * provided that the above copyright notice and this paragraph are
 * provided that the above copyright notice and this paragraph are
 * duplicated in all such forms and that any documentation,
 * duplicated in all such forms and that any documentation,
 * advertising materials, and other materials related to such
 * advertising materials, and other materials related to such
 * distribution and use acknowledge that the software was developed
 * distribution and use acknowledge that the software was developed
 * by the University of California, Berkeley.  The name of the
 * by the University of California, Berkeley.  The name of the
 * University may not be used to endorse or promote products derived
 * University may not be used to endorse or promote products derived
 * from this software without specific prior written permission.
 * from this software without specific prior written permission.
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */
 */
 
 
#include <stdio.h>
#include <stdio.h>
#include <sys/types.h>
#include <sys/types.h>
#include <fcntl.h>
#include <fcntl.h>
#include <sys/unistd.h>
#include <sys/unistd.h>
#include <errno.h>
#include <errno.h>
#include "local.h"
#include "local.h"
 
 
#ifdef __LARGE64_FILES
#ifdef __LARGE64_FILES
_fpos64_t
_fpos64_t
_DEFUN(__sseek64, (ptr, cookie, offset, whence),
_DEFUN(__sseek64, (ptr, cookie, offset, whence),
       struct _reent *ptr _AND
       struct _reent *ptr _AND
       void *cookie _AND
       void *cookie _AND
       _fpos64_t offset _AND
       _fpos64_t offset _AND
       int whence)
       int whence)
{
{
  register FILE *fp = (FILE *) cookie;
  register FILE *fp = (FILE *) cookie;
  register _off64_t ret;
  register _off64_t ret;
 
 
  ret = _lseek64_r (ptr, fp->_file, (_off64_t) offset, whence);
  ret = _lseek64_r (ptr, fp->_file, (_off64_t) offset, whence);
  if (ret == (_fpos64_t)-1L)
  if (ret == (_fpos64_t)-1L)
    fp->_flags &= ~__SOFF;
    fp->_flags &= ~__SOFF;
  else
  else
    {
    {
      fp->_flags |= __SOFF;
      fp->_flags |= __SOFF;
      fp->_offset = ret;
      fp->_offset = ret;
    }
    }
  return ret;
  return ret;
}
}
 
 
_READ_WRITE_RETURN_TYPE
_READ_WRITE_RETURN_TYPE
_DEFUN(__swrite64, (ptr, cookie, buf, n),
_DEFUN(__swrite64, (ptr, cookie, buf, n),
       struct _reent *ptr _AND
       struct _reent *ptr _AND
       void *cookie _AND
       void *cookie _AND
       char const *buf _AND
       char const *buf _AND
       int n)
       int n)
{
{
  register FILE *fp = (FILE *) cookie;
  register FILE *fp = (FILE *) cookie;
  int w;
  int w;
#ifdef __SCLE
#ifdef __SCLE
  int oldmode=0;
  int oldmode=0;
#endif
#endif
 
 
  if (fp->_flags & __SAPP)
  if (fp->_flags & __SAPP)
    (void) _lseek64_r (ptr, fp->_file, (_off64_t)0, SEEK_END);
    (void) _lseek64_r (ptr, fp->_file, (_off64_t)0, SEEK_END);
  fp->_flags &= ~__SOFF;        /* in case O_APPEND mode is set */
  fp->_flags &= ~__SOFF;        /* in case O_APPEND mode is set */
 
 
#ifdef __SCLE
#ifdef __SCLE
  if (fp->_flags & __SCLE)
  if (fp->_flags & __SCLE)
    oldmode = setmode(fp->_file, O_BINARY);
    oldmode = setmode(fp->_file, O_BINARY);
#endif
#endif
 
 
  w = _write_r (ptr, fp->_file, buf, n);
  w = _write_r (ptr, fp->_file, buf, n);
 
 
#ifdef __SCLE
#ifdef __SCLE
  if (oldmode)
  if (oldmode)
    setmode(fp->_file, oldmode);
    setmode(fp->_file, oldmode);
#endif
#endif
 
 
  return w;
  return w;
}
}
 
 
#endif /* __LARGE64_FILES */
#endif /* __LARGE64_FILES */
 
 

powered by: WebSVN 2.1.0

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