URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [libgloss/] [rs6000/] [sol-cfuncs.c] - Rev 262
Go to most recent revision | Compare with Previous | Blame | View Log
/* * solaris-cfuncs.S -- C functions for Solaris. * * Copyright (c) 1996 Cygnus Support * * The authors hereby grant permission to use, copy, modify, distribute, * and license this software and its documentation for any purpose, provided * that existing copyright notices are retained in all copies and that this * notice is included verbatim in any distributions. No written agreement, * license, or royalty fee is required for any of the authorized uses. * Modifications to this software may be copyrighted by their authors * and need not follow the licensing terms described here, provided that * the new terms are clearly indicated on the first page of each file where * they apply. */ #include <errno.h> #include <sys/types.h> #include <sys/stat.h> #include <sys/unistd.h> #ifndef __STDC__ #define const #endif /* Solaris stat packet */ typedef long solaris_off_t; typedef long solaris_uid_t; typedef long solaris_gid_t; typedef long unsigned solaris_mode_t; typedef long unsigned solaris_nlink_t; typedef long unsigned solaris_dev_t; typedef long unsigned solaris_ino_t; typedef long solaris_time_t; typedef struct { solaris_time_t tv_sec; long tv_nsec; } solaris_timestruc_t; #define _ST_FSTYPSZ 16 struct solaris_stat { solaris_dev_t st_dev; long st_pad1[3]; solaris_ino_t st_ino; solaris_mode_t st_mode; solaris_nlink_t st_nlink; solaris_uid_t st_uid; solaris_gid_t st_gid; solaris_dev_t st_rdev; long st_pad2[2]; solaris_off_t st_size; long st_pad3; solaris_timestruc_t st_atim; solaris_timestruc_t st_mtim; solaris_timestruc_t st_ctim; long st_blksize; long st_blocks; char st_fstype[_ST_FSTYPSZ]; long st_pad4[8]; }; /* Solaris termios packet */ #define SOLARIS_NCCS 19 typedef unsigned long solaris_tcflag_t; typedef unsigned char solaris_cc_t; typedef unsigned long solaris_speed_t; struct solaris_termios { solaris_tcflag_t c_iflag; solaris_tcflag_t c_oflag; solaris_tcflag_t c_cflag; solaris_tcflag_t c_lflag; solaris_cc_t c_cc[SOLARIS_NCCS]; }; #define SOLARIS_TIOC ('T'<<8) #define SOLARIS_TCGETS (SOLARIS_TIOC|13) /* Debug support */ #ifdef DEBUG #define TRACE(msg) trace (msg) #define TRACE1(msg,num) trace1 (msg,(unsigned)num) static void trace (msg) const char *msg; { const char *p; for (p = msg; *p != '\0'; p++) ; (void) write (2, msg, p-msg); } static void trace1 (msg, num) const char *msg; unsigned int num; { char buffer[16]; char *p = &buffer[ sizeof(buffer) ]; trace (msg); *--p = '\0'; *--p = '\n'; do { *--p = '0' + (num % 10); num /= 10; } while (num != 0); trace (p); } #else #define TRACE(msg) #define TRACE1(msg,num) #endif /* Errno support */ int errno; int * __errno () { return &errno; } /* syscall handler branches here to set errno. Error codes that are common between newlib and Solaris are the same. */ int _cerror (e) int e; { TRACE1("got to _cerror ",e); errno = e; return -1; } /* Sbrk support */ extern char _end[]; static char *curbrk = _end; void * sbrk (incr) size_t incr; { char *oldbrk = curbrk; TRACE("got to sbrk\n"); curbrk += incr; if (brk (curbrk) == -1) return (char *) -1; return (void *)oldbrk; } /* Isatty support */ int isatty (fd) int fd; { struct solaris_termios t; int ret; ret = (ioctl (fd, SOLARIS_TCGETS, &t) == 0); TRACE1("got to isatty, returned ", ret); return ret; } /* Convert Solaris {,f}stat to newlib. Fortunately, the st_mode bits are the same. */ static void solaris_to_newlib_stat (solaris, newlib) struct solaris_stat *solaris; struct stat *newlib; { static struct stat zero_stat; *newlib = zero_stat; newlib->st_dev = solaris->st_dev; newlib->st_ino = solaris->st_ino; newlib->st_mode = solaris->st_mode; newlib->st_nlink = solaris->st_nlink; newlib->st_uid = solaris->st_uid; newlib->st_gid = solaris->st_gid; newlib->st_rdev = solaris->st_rdev; newlib->st_size = solaris->st_size; newlib->st_blksize = solaris->st_blksize; newlib->st_blocks = solaris->st_blocks; newlib->st_atime = solaris->st_atim.tv_sec; newlib->st_mtime = solaris->st_mtim.tv_sec; newlib->st_ctime = solaris->st_ctim.tv_sec; } int stat (file, newlib_stat) const char *file; struct stat *newlib_stat; { int ret; struct solaris_stat st; TRACE("got to stat\n"); ret = _stat (file, &st); if (ret >= 0) solaris_to_newlib_stat (&st, newlib_stat); return ret; } int lstat (file, newlib_stat) const char *file; struct stat *newlib_stat; { int ret; struct solaris_stat st; TRACE("got to lstat\n"); ret = _lstat (file, &st); if (ret >= 0) solaris_to_newlib_stat (&st, newlib_stat); return ret; } int fstat (fd, newlib_stat) int fd; struct stat *newlib_stat; { int ret; struct solaris_stat st; TRACE("got to fstat\n"); ret = _fstat (fd, &st); if (ret >= 0) solaris_to_newlib_stat (&st, newlib_stat); return ret; } /* Nops */ int getrusage () { _cerror (EINVAL); return -1; } char * getcwd(buf, size) char *buf; size_t size; { if (!buf || size < 2) return "."; buf[0] = '.'; buf[1] = '\0'; return buf; }
Go to most recent revision | Compare with Previous | Blame | View Log