mlibc: Cleanup.
[mes.git] / lib / linux-mini-gcc.c
1 /* -*-comment-start: "//";comment-end:""-*-
2  * Mes --- Maxwell Equations of Software
3  * Copyright © 2016,2017 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
4  *
5  * This file is part of Mes.
6  *
7  * Mes is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * Mes is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 void
22 exit (int code)
23 {
24 #if !__TINYC__
25   asm (
26        "mov    %0,%%ebx\n\t"
27        "mov    $1,%%eax\n\t"
28        "int    $0x80\n\t"
29        : // no outputs "=" (r)
30        : "" (code)
31        );
32 #else // __TINYC__
33   asm (
34        "mov    %0,%%ebx\n\t"
35        "mov    $1,%%eax\n\t"
36        "int    $128\n\t"
37        : // no outputs "=" (r)
38        : "Ir" (code)
39        );
40 #endif // __TINYC__
41   // not reached
42   exit (0);
43 }
44
45 int
46 write (int fd, char const* s, int n)
47 {
48   int r;
49 #if __GNUC__
50   asm (
51        "mov    %1,%%ebx\n\t"
52        "mov    %2,%%ecx\n\t"
53        "mov    %3,%%edx\n\t"
54
55        "mov    $0x04,%%eax\n\t"
56        "int    $0x80\n\t"
57        "mov    %%eax,%0\n\t"
58        : "=r" (r)
59        : "" (fd), "" (s), "" (n)
60        : "eax", "ebx", "ecx", "edx"
61        );
62
63   //syscall (SYS_write, fd, s, n));
64 #elif __TINYC__
65   asm (
66        "mov    %1,%%ebx\n\t"
67        "mov    %2,%%ecx\n\t"
68        "mov    %3,%%edx\n\t"
69
70        "mov    $4, %%eax\n\t"
71        "int    $128\n\t"
72        "mov    %%eax,%0\n\t"
73        : "=r" (r)
74        : "Ir" (fd), "Ir" (s), "Ir" (n)
75        : "eax", "ebx", "ecx"//, "edx"
76        );
77 #endif
78   return r;
79 }