Mercurial > pub > dyncall > dyncall
annotate test/syscall/syscall.c @ 663:127b569978cc default tip
- another tweak handling clang trying to be too smart (see last commit)
| author | Tassilo Philipp |
|---|---|
| date | Sun, 24 Mar 2024 13:52:44 +0100 |
| parents | 6a34dcb2bbd7 |
| children |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 | |
| 3 Package: dyncall | |
| 4 Library: test | |
| 5 File: test/syscall/syscall.c | |
| 6 Description: | |
| 7 License: | |
| 8 | |
| 617 | 9 Copyright (c) 2011-2022 Daniel Adler <dadler@uni-goettingen.de>, |
| 0 | 10 Tassilo Philipp <tphilipp@potion-studios.com> |
| 11 | |
| 12 Permission to use, copy, modify, and distribute this software for any | |
| 13 purpose with or without fee is hereby granted, provided that the above | |
| 14 copyright notice and this permission notice appear in all copies. | |
| 15 | |
| 16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |
| 17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
| 18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
| 19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
| 20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
| 21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
| 22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
| 23 | |
| 24 */ | |
| 25 | |
| 26 #include "dyncall.h" | |
| 617 | 27 #if defined(DC__OS_Minix) |
| 28 # include <minix/callnr.h> | |
| 29 # define SYS_write WRITE | |
| 30 #elif defined(DC_UNIX) && !defined(DC__OS_BeOS) | |
| 31 # include <sys/syscall.h> | |
| 32 #endif | |
| 0 | 33 DCCallVM* callvm; |
| 34 | |
| 35 | |
| 36 int syscall_write(int fd, char* buf, size_t len) | |
| 37 { | |
| 38 dcReset(callvm); | |
| 39 dcArgInt(callvm, fd); | |
| 40 dcArgPointer(callvm, buf); | |
| 41 dcArgInt(callvm, len); | |
| 42 return dcCallInt(callvm, (DCpointer)(ptrdiff_t)SYS_write); | |
| 43 } | |
| 44 | |
| 45 int main(int argc, char* argv[]) | |
| 46 { | |
|
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
47 int r = -1; |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
48 callvm = dcNewCallVM(4096); |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
49 dcMode(callvm, DC_CALL_SYS_DEFAULT); |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
50 |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
51 if(dcGetError(callvm) == DC_ERROR_NONE) |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
52 { |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
53 r = syscall_write(1/*stdout*/, "result: syscall: ", 17); |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
54 r += syscall_write(1/*stdout*/, r==17?"1":"0", 2); |
|
588
dfc2e6ee8782
- more robust endian detection, on some platforms inclusion of endian.h led to assuming wrong endianness (subtle if inclusion was in
Tassilo Philipp
parents:
410
diff
changeset
|
55 r += syscall_write(1/*stdout*/, "\n", 2); |
|
410
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
56 } |
|
7608e34098b0
- cleanups, simplifications, some api clarification, ...
Tassilo Philipp
parents:
281
diff
changeset
|
57 return !(r == 19); |
| 0 | 58 } |
| 59 |