JehanneOS/newlib
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* libc/sys/mmixware/*: Correct spacing in all source files.

Browse Source 
* libc/sys/mmixware/syscall.h: Move misplaced file...
	* libc/sys/mmixware/sys/syscall.h: ...here.
This commit is contained in:
Hans-Peter Nilsson 2001-11-13 02:49:12 +00:00
parent f513298e18
commit 4cede8c4ce
31 changed files with 203 additions and 226 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
newlib/ChangeLog
View File

@ -1,3 +1,9 @@
2001-11-13 Hans-Peter Nilsson <hp@bitrange.com>
* libc/sys/mmixware/*: Correct spacing in all source files.
* libc/sys/mmixware/syscall.h: Move misplaced file...
* libc/sys/mmixware/sys/syscall.h: ...here.
2001-11-12 Hans-Peter Nilsson <hp@bitrange.com> 2001-11-12 Hans-Peter Nilsson <hp@bitrange.com>
* libc/include/machine/ieeefp.h: Add support for mmix target. * libc/include/machine/ieeefp.h: Add support for mmix target.

7
newlib/libc/sys/mmixware/_exit.c
View File

@ -1,7 +1,6 @@
/* _exit for MMIXware. /* _exit for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -20,7 +19,7 @@ void _exit (int n)
simulator, so it seems in effect ineffective. We set it anyway; simulator, so it seems in effect ineffective. We set it anyway;
there may be a purpose. */ there may be a purpose. */
__asm__ ("SET $255,%0\n\tTRAP 0,0,0" __asm__ ("SET $255,%0\n\tTRAP 0,0,0"
: /* No outputs. */ : /* No outputs. */
: "r" (n) : "r" (n)
: "memory"); : "memory");
} }

5
newlib/libc/sys/mmixware/access.c
View File

@ -1,7 +1,6 @@
/* access for MMIXware. /* access for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -30,8 +29,8 @@ access (const char *fn, int flags)
if (ret == 0) if (ret == 0)
{ {
/* Yes, this was readable. As in other simulator access functions, /* Yes, this was readable. As in other simulator access functions,
we always return success in this case (though the others check we always return success in this case (though the others check
for directory access). */ for directory access). */
TRAP1f (SYS_Fclose, TMPFNO); TRAP1f (SYS_Fclose, TMPFNO);
return 0; return 0;
} }

1
newlib/libc/sys/mmixware/chmod.c
View File

@ -1,7 +1,6 @@
/* chmod stub for MMIXware. /* chmod stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/chown.c
View File

@ -1,7 +1,6 @@
/* chown stub for MMIXware. /* chown stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/close.c
View File

@ -1,7 +1,6 @@
/* close for MMIXware. /* close for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/creat.c
View File

@ -1,7 +1,6 @@
/* creat for MMIXware. /* creat for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/crt0.c
View File

@ -1,7 +1,6 @@
/* crt0 stub for MMIXware. /* crt0 stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/execv.c
View File

@ -1,7 +1,6 @@
/* execv stub for MMIXware. /* execv stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/execve.c
View File

@ -1,7 +1,6 @@
/* execve stub for MMIXware. /* execve stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/fork.c
View File

@ -1,7 +1,6 @@
/* fork stub for MMIXware. /* fork stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

3
newlib/libc/sys/mmixware/fstat.c
View File

@ -1,7 +1,6 @@
/* fstat for MMIXware. /* fstat for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -16,7 +15,7 @@
int int
_fstat (int file, _fstat (int file,
struct stat *st) struct stat *st)
{ {
st->st_mode = S_IFCHR; st->st_mode = S_IFCHR;
st->st_blksize = 4096; st->st_blksize = 4096;

1
newlib/libc/sys/mmixware/getpid.c
View File

@ -1,7 +1,6 @@
/* getpid stub for MMIXware. /* getpid stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/gettime.c
View File

@ -1,7 +1,6 @@
/* gettime stub for MMIXware. /* gettime stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/isatty.c
View File

@ -1,7 +1,6 @@
/* isatty for MMIXware. /* isatty for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/kill.c
View File

@ -1,7 +1,6 @@
/* kill for MMIXware. /* kill for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

13
newlib/libc/sys/mmixware/lseek.c
View File

@ -1,7 +1,6 @@
/* lseek for MMIXware. /* lseek for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -18,8 +17,8 @@
off_t off_t
_lseek (int file, _lseek (int file,
off_t ptr, off_t ptr,
int dir) int dir)
{ {
off_t simoff = dir == SEEK_END ? -(ptr + 1) : ptr; off_t simoff = dir == SEEK_END ? -(ptr + 1) : ptr;
long ret; long ret;
@ -35,10 +34,10 @@ _lseek (int file,
long curpos = TRAP2f (SYS_Ftell, file, 0); long curpos = TRAP2f (SYS_Ftell, file, 0);
if (curpos == -1) if (curpos == -1)
{ {
errno = EIO; errno = EIO;
return -1; return -1;
} }
ptr += (off_t) curpos; ptr += (off_t) curpos;
} }

9
newlib/libc/sys/mmixware/open.c
View File

@ -1,7 +1,6 @@
/* open for MMIXware. /* open for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -40,13 +39,13 @@ _open (const char *path,
for (fileno = 0; for (fileno = 0;
fileno < (sizeof (_MMIX_allocated_filehandle) / fileno < (sizeof (_MMIX_allocated_filehandle) /
sizeof (_MMIX_allocated_filehandle[0])); sizeof (_MMIX_allocated_filehandle[0]));
fileno++) fileno++)
if (_MMIX_allocated_filehandle[fileno] == 0) if (_MMIX_allocated_filehandle[fileno] == 0)
break; break;
if (fileno == (sizeof (_MMIX_allocated_filehandle) / if (fileno == (sizeof (_MMIX_allocated_filehandle) /
sizeof (_MMIX_allocated_filehandle[0]))) sizeof (_MMIX_allocated_filehandle[0])))
{ {
errno = EMFILE; errno = EMFILE;
return -1; return -1;
@ -74,7 +73,7 @@ _open (const char *path,
fffile = 1; fffile = 1;
} }
else if ((flags & (O_WRONLY | O_CREAT)) == (O_WRONLY | O_CREAT) else if ((flags & (O_WRONLY | O_CREAT)) == (O_WRONLY | O_CREAT)
|| (flags & (O_WRONLY | O_TRUNC)) == (O_WRONLY | O_TRUNC)) || (flags & (O_WRONLY | O_TRUNC)) == (O_WRONLY | O_TRUNC))
mode = BinaryWrite; mode = BinaryWrite;
else if ((flags & (O_RDWR | O_CREAT)) == (O_RDWR | O_CREAT)) else if ((flags & (O_RDWR | O_CREAT)) == (O_RDWR | O_CREAT))
mode = BinaryReadWrite; mode = BinaryReadWrite;
@ -90,7 +89,7 @@ _open (const char *path,
if (ret < 0) if (ret < 0)
{ {
/* It's totally unknown what the error was. We'll just take our /* It's totally unknown what the error was. We'll just take our
chances and assume ENOENT. */ chances and assume ENOENT. */
errno = ENOENT; errno = ENOENT;
return -1; return -1;
} }

1
newlib/libc/sys/mmixware/pipe.c
View File

@ -1,7 +1,6 @@
/* pipe stub for MMIXware. /* pipe stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

3
newlib/libc/sys/mmixware/read.c
View File

@ -1,7 +1,6 @@
/* read for MMIXware. /* read for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -40,7 +39,7 @@ _read (int file,
if (ret == -1 - (long) len) if (ret == -1 - (long) len)
{ {
/* We don't know the nature of the failure, so this is an /* We don't know the nature of the failure, so this is an
approximation. */ approximation. */
errno = EIO; errno = EIO;
return -1; return -1;
} }

7
newlib/libc/sys/mmixware/sbrk.c
View File

@ -1,7 +1,6 @@
/* sbrk for MMIXware. /* sbrk for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -26,13 +25,13 @@ extern char *_Sbrk_high;
Pool_Segment and any other symbols that would be predefined in mmixal. */ Pool_Segment and any other symbols that would be predefined in mmixal. */
__asm__ (" .global _Sbrk_high\n" __asm__ (" .global _Sbrk_high\n"
"_Sbrk_high IS Pool_Segment\n" "_Sbrk_high IS Pool_Segment\n"
"Pool_Segment IS 0x40<<56"); "Pool_Segment IS 0x40<<56");
caddr_t caddr_t
_sbrk (size_t incr) _sbrk (size_t incr)
{ {
extern char end; /* Defined by the linker */ extern char end; /* Defined by the linker */
char *prev_heap_end; char *prev_heap_end;
prev_heap_end = _Sbrk_high; prev_heap_end = _Sbrk_high;

77
newlib/libc/sys/mmixware/setjmp.S
View File

@ -1,7 +1,6 @@
/* Setjmp and longjmp for mmix. /* Setjmp and longjmp for mmix.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -10,11 +9,11 @@
PURPOSE. PURPOSE.
jmp_buf[5]: jmp_buf[5]:
0: fp 0: fp
1: rJ (return-address) 1: rJ (return-address)
2: sp 2: sp
3: rO *before* the setjmp call. 3: rO *before* the setjmp call.
4: temporary storage. Reserved between setjmp and longjmp. */ 4: temporary storage. Reserved between setjmp and longjmp. */
#ifdef __MMIX_ABI_GNU__ #ifdef __MMIX_ABI_GNU__
#define arg1 $231 #define arg1 $231
@ -28,38 +27,38 @@
#define popval 1 #define popval 1
#endif #endif
.section .text.setjmp,"ax",@progbits .section .text.setjmp,"ax",@progbits
.global setjmp .global setjmp
setjmp: setjmp:
% Store fp, sp and return address. Recycle the static-chain and % Store fp, sp and return address. Recycle the static-chain and
% structure-return registers as temporary register, since we need to keep % structure-return registers as temporary register, since we need to keep
% the jmp_buf (parameter 1) and the return address across a "POP". % the jmp_buf (parameter 1) and the return address across a "POP".
SET $251,arg1 SET $251,arg1
STOU $253,$251,0 STOU $253,$251,0
GET $252,rJ GET $252,rJ
STOU $252,$251,8 STOU $252,$251,8
STOU $254,$251,16 STOU $254,$251,16
SETL outret,0 SETL outret,0
% Jump through hoops to get the value of rO *before* the setjmp call. % Jump through hoops to get the value of rO *before* the setjmp call.
GETA $255,0f GETA $255,0f
PUT rJ,$255 PUT rJ,$255
POP popval,0 POP popval,0
0: 0:
GET $255,rO GET $255,rO
STOU $255,$251,24 STOU $255,$251,24
GO $255,$252,0 GO $255,$252,0
.size setjmp,.-setjmp .size setjmp,.-setjmp
.section .text.longjmp,"ax",@progbits .section .text.longjmp,"ax",@progbits
.global longjmp .global longjmp
longjmp: longjmp:
% Reset arg2 to 1 if it is 0 (see longjmp(2)) and store it in jmp_buf. % Reset arg2 to 1 if it is 0 (see longjmp(2)) and store it in jmp_buf.
% Save arg1 in a global register, since it will be destroyed by the POPs % Save arg1 in a global register, since it will be destroyed by the POPs
% (in the mmixware ABI). % (in the mmixware ABI).
CSZ arg2,arg2,1 CSZ arg2,arg2,1
STOU arg2,arg1,32 STOU arg2,arg1,32
SET $251,arg1 SET $251,arg1
% Loop and "POP 0,0" until rO is the expected value, like % Loop and "POP 0,0" until rO is the expected value, like
% the expansion of nonlocal_goto_receiver, except that we put the return % the expansion of nonlocal_goto_receiver, except that we put the return
@ -68,18 +67,18 @@ longjmp:
% GNU ABI, it is unnecessary to do this in the loop and perhaps the memory % GNU ABI, it is unnecessary to do this in the loop and perhaps the memory
% access can be hoisted outside the loop, but this is safe and simple and % access can be hoisted outside the loop, but this is safe and simple and
% I see no need to optimize longjmps. % I see no need to optimize longjmps.
GETA $255,0f GETA $255,0f
PUT rJ,$255 PUT rJ,$255
LDOU $255,$251,24 LDOU $255,$251,24
0: 0:
GET $252,rO GET $252,rO
CMPU $252,$252,$255 CMPU $252,$252,$255
BNP $252,1f BNP $252,1f
LDOU outret,$251,32 LDOU outret,$251,32
POP popval,0 POP popval,0
1: 1:
LDOU $253,$251,0 LDOU $253,$251,0
LDOU $255,$251,8 LDOU $255,$251,8
LDOU $254,$251,16 LDOU $254,$251,16
GO $255,$255,0 GO $255,$255,0
.size longjmp,.-longjmp .size longjmp,.-longjmp

1
newlib/libc/sys/mmixware/stat.c
View File

@ -1,7 +1,6 @@
/* stat stub for MMIXware. /* stat stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

137
newlib/libc/sys/mmixware/sys/syscall.h Normal file
View File

@ -0,0 +1,137 @@
/* syscall defines for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE. */
/* These are the mmixware simulator calls that are of use in newlib. */
#define SYS_halt 0
#define SYS_Fopen 1
#define SYS_Fclose 2
#define SYS_Fread 3
#define SYS_Fwrite 6
#define SYS_Fseek 9
#define SYS_Ftell 10
enum MMIX_filemode
{
TextRead = 0,
TextWrite = 1,
BinaryRead = 2,
BinaryWrite = 3,
BinaryReadWrite = 4
};
#define N_MMIX_FILEHANDLES 32
/* We store a bitmap of allocated filehandles
_MMIX_allocated_filehandle[fileno] in an array. There are 32 of them.
Indexes 0, 1 and 2 are allocated from start. The reason we keep track
of them is that *we* have to allocate a filehandle when opening a file.
Had we got a filehandle from the simulator, we wouldn't have to keep
track of it. A value of 0 denotes a free handle. */
extern unsigned char _MMIX_allocated_filehandle[N_MMIX_FILEHANDLES];
/* We use this file-handle number as a temporary; not used by usual file
I/O. */
#define TMPFNO 127
/* Simulator call with one argument. Also used for zero-argument calls;
pass a zero as ARG1. */
#define TRAP1i(FUN, ARG1) \
({ long ret_; \
__asm__ ("TRAP 0,%1,%2\n\tSET %0,$255" \
: "=r" (ret_) : "i" (FUN), "i" (ARG1) \
: "memory"); \
ret_; \
})
/* Helper macros to cope with the file-handle parameter to the simulator
being *constant*. We support up to 32 simultaneously open files. */
#define I3f(FUN, ARG1, N, ARGS) \
if (ARG1 == N) \
__asm__ ("SET $255,%3\n\tTRAP 0,%1,%2\n\tSET %0,$255" \
: "=r" (ret_) : "i" (FUN), "i" (N), "r" (ARGS) \
: "memory")
/* Using if:s rather than switches to help GCC optimize the rest away. */
#define DO32(FUN, ARG1, ARGS) \
I3f (FUN, ARG1, 0, ARGS); \
else I3f (FUN, ARG1, 1, ARGS); \
else I3f (FUN, ARG1, 2, ARGS); \
else I3f (FUN, ARG1, 3, ARGS); \
else I3f (FUN, ARG1, 4, ARGS); \
else I3f (FUN, ARG1, 5, ARGS); \
else I3f (FUN, ARG1, 6, ARGS); \
else I3f (FUN, ARG1, 7, ARGS); \
else I3f (FUN, ARG1, 8, ARGS); \
else I3f (FUN, ARG1, 9, ARGS); \
else I3f (FUN, ARG1, 10, ARGS); \
else I3f (FUN, ARG1, 11, ARGS); \
else I3f (FUN, ARG1, 12, ARGS); \
else I3f (FUN, ARG1, 13, ARGS); \
else I3f (FUN, ARG1, 14, ARGS); \
else I3f (FUN, ARG1, 15, ARGS); \
else I3f (FUN, ARG1, 16, ARGS); \
else I3f (FUN, ARG1, 17, ARGS); \
else I3f (FUN, ARG1, 18, ARGS); \
else I3f (FUN, ARG1, 19, ARGS); \
else I3f (FUN, ARG1, 20, ARGS); \
else I3f (FUN, ARG1, 21, ARGS); \
else I3f (FUN, ARG1, 22, ARGS); \
else I3f (FUN, ARG1, 23, ARGS); \
else I3f (FUN, ARG1, 24, ARGS); \
else I3f (FUN, ARG1, 25, ARGS); \
else I3f (FUN, ARG1, 26, ARGS); \
else I3f (FUN, ARG1, 27, ARGS); \
else I3f (FUN, ARG1, 28, ARGS); \
else I3f (FUN, ARG1, 29, ARGS); \
else I3f (FUN, ARG1, 30, ARGS); \
else I3f (FUN, ARG1, 31, ARGS); \
else \
{ \
errno = EBADF; \
return -1; \
}
#define TRAP1f(FUN, ARG1) \
({ long ret_; \
DO32 (FUN, ARG1, 0); \
ret_; \
})
#define TRAP2f(FUN, ARG1, ARG2) \
({ long ret_; \
DO32 (FUN, ARG1, ARG2); \
ret_; \
})
#define TRAP3f(FUN, ARG1, ARG2, ARG3) \
({ long ret_; \
unsigned long args_[] \
= { (unsigned long) (ARG2), (unsigned long) (ARG3) }; \
DO32 (FUN, ARG1, args_); \
ret_; \
})
#ifndef __GNUC__
/* Probably will not happen. Nevertheless... */
# define UNIMPLEMENTED(MSG)
#else
# define UNIMPLEMENTED(MSG) UNIMPLEMENTEDi MSG
# define UNIMPLEMENTEDi(MSG, ARGS...) \
do { \
char buf[2000]; \
sprintf (buf, "UNIMPLEMENTED %s in %s\n", __FUNCTION__, __FILE__); \
write (2, buf, strlen (buf)); \
sprintf (buf, MSG , ##ARGS); \
write (2, buf, strlen (buf)); \
write (2, "\n", 1); \
} while (0)
#endif

138
newlib/libc/sys/mmixware/syscall.h
View File

@ -1,138 +0,0 @@
/* syscall defines for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE. */
/* These are the mmixware simulator calls that are of use in newlib. */
#define SYS_halt 0
#define SYS_Fopen 1
#define SYS_Fclose 2
#define SYS_Fread 3
#define SYS_Fwrite 6
#define SYS_Fseek 9
#define SYS_Ftell 10
enum MMIX_filemode
{
TextRead = 0,
TextWrite = 1,
BinaryRead = 2,
BinaryWrite = 3,
BinaryReadWrite = 4
};
#define N_MMIX_FILEHANDLES 32
/* We store a bitmap of allocated filehandles
_MMIX_allocated_filehandle[fileno] in an array. There are 32 of them.
Indexes 0, 1 and 2 are allocated from start. The reason we keep track
of them is that *we* have to allocate a filehandle when opening a file.
Had we got a filehandle from the simulator, we wouldn't have to keep
track of it. A value of 0 denotes a free handle. */
extern unsigned char _MMIX_allocated_filehandle[N_MMIX_FILEHANDLES];
/* We use this file-handle number as a temporary; not used by usual file
I/O. */
#define TMPFNO 127
/* Simulator call with one argument. Also used for zero-argument calls;
pass a zero as ARG1. */
#define TRAP1i(FUN, ARG1) \
({ long ret_; \
__asm__ ("TRAP 0,%1,%2\n\tSET %0,$255" \
: "=r" (ret_) : "i" (FUN), "i" (ARG1) \
: "memory"); \
ret_; \
})
/* Helper macros to cope with the file-handle parameter to the simulator
being *constant*. We support up to 32 simultaneously open files. */
#define I3f(FUN, ARG1, N, ARGS) \
if (ARG1 == N) \
__asm__ ("SET $255,%3\n\tTRAP 0,%1,%2\n\tSET %0,$255" \
: "=r" (ret_) : "i" (FUN), "i" (N), "r" (ARGS) \
: "memory")
/* Using if:s rather than switches to help GCC optimize the rest away. */
#define DO32(FUN, ARG1, ARGS) \
I3f (FUN, ARG1, 0, ARGS); \
else I3f (FUN, ARG1, 1, ARGS); \
else I3f (FUN, ARG1, 2, ARGS); \
else I3f (FUN, ARG1, 3, ARGS); \
else I3f (FUN, ARG1, 4, ARGS); \
else I3f (FUN, ARG1, 5, ARGS); \
else I3f (FUN, ARG1, 6, ARGS); \
else I3f (FUN, ARG1, 7, ARGS); \
else I3f (FUN, ARG1, 8, ARGS); \
else I3f (FUN, ARG1, 9, ARGS); \
else I3f (FUN, ARG1, 10, ARGS); \
else I3f (FUN, ARG1, 11, ARGS); \
else I3f (FUN, ARG1, 12, ARGS); \
else I3f (FUN, ARG1, 13, ARGS); \
else I3f (FUN, ARG1, 14, ARGS); \
else I3f (FUN, ARG1, 15, ARGS); \
else I3f (FUN, ARG1, 16, ARGS); \
else I3f (FUN, ARG1, 17, ARGS); \
else I3f (FUN, ARG1, 18, ARGS); \
else I3f (FUN, ARG1, 19, ARGS); \
else I3f (FUN, ARG1, 20, ARGS); \
else I3f (FUN, ARG1, 21, ARGS); \
else I3f (FUN, ARG1, 22, ARGS); \
else I3f (FUN, ARG1, 23, ARGS); \
else I3f (FUN, ARG1, 24, ARGS); \
else I3f (FUN, ARG1, 25, ARGS); \
else I3f (FUN, ARG1, 26, ARGS); \
else I3f (FUN, ARG1, 27, ARGS); \
else I3f (FUN, ARG1, 28, ARGS); \
else I3f (FUN, ARG1, 29, ARGS); \
else I3f (FUN, ARG1, 30, ARGS); \
else I3f (FUN, ARG1, 31, ARGS); \
else \
{ \
errno = EBADF; \
return -1; \
}
#define TRAP1f(FUN, ARG1) \
({ long ret_; \
DO32 (FUN, ARG1, 0); \
ret_; \
})
#define TRAP2f(FUN, ARG1, ARG2) \
({ long ret_; \
DO32 (FUN, ARG1, ARG2); \
ret_; \
})
#define TRAP3f(FUN, ARG1, ARG2, ARG3) \
({ long ret_; \
unsigned long args_[] \
= { (unsigned long) (ARG2), (unsigned long) (ARG3) }; \
DO32 (FUN, ARG1, args_); \
ret_; \
})
#ifndef __GNUC__
/* Probably will not happen. Nevertheless... */
# define UNIMPLEMENTED(MSG)
#else
# define UNIMPLEMENTED(MSG) UNIMPLEMENTEDi MSG
# define UNIMPLEMENTEDi(MSG, ARGS...) \
do { \
char buf[2000]; \
sprintf (buf, "UNIMPLEMENTED %s in %s\n", __FUNCTION__, __FILE__); \
write (2, buf, strlen (buf)); \
sprintf (buf, MSG , ##ARGS); \
write (2, buf, strlen (buf)); \
write (2, "\n", 1); \
} while (0)
#endif

1
newlib/libc/sys/mmixware/time.c
View File

@ -1,7 +1,6 @@
/* time stub for MMIXware. /* time stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/times.c
View File

@ -1,7 +1,6 @@
/* times stub for MMIXware. /* times stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/unlink.c
View File

@ -1,7 +1,6 @@
/* unlink stub for MMIXware. /* unlink stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/utime.c
View File

@ -1,7 +1,6 @@
/* utime stub for MMIXware. /* utime stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

1
newlib/libc/sys/mmixware/wait.c
View File

@ -1,7 +1,6 @@
/* wait stub for MMIXware. /* wait stub for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR

5
newlib/libc/sys/mmixware/write.c
View File

@ -1,7 +1,6 @@
/* write for MMIXware. /* write for MMIXware.
Copyright (C) 2001 Hans-Peter Nilsson. Copyright (C) 2001 Hans-Peter Nilsson.
Permission to use, copy, modify, and distribute this software is freely Permission to use, copy, modify, and distribute this software is freely
granted, provided that this notice is preserved with no changes. granted, provided that this notice is preserved with no changes.
THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
@ -17,8 +16,8 @@
int int
_write ( int file, _write ( int file,
char *ptr, char *ptr,
size_t len) size_t len)
{ {
long ret; long ret;