mescc: Support gcc-3.0: Implement atexit.
[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 #define SYS_exit   "0x01"
22 #define SYS_write  "0x04"
23
24 void
25 _exit (int code)
26 {
27 #if !__TINYC__
28   asm (
29        "mov    $"SYS_exit",%%eax\n\t"
30        "mov    %0,%%ebx\n\t"
31        "int    $0x80\n\t"
32        : // no outputs "=" (r)
33        : "" (code)
34        );
35 #else // __TINYC__
36   asm (
37        "mov    $"SYS_exit",%%eax\n\t"
38        "mov    %0,%%ebx\n\t"
39        "int    $128\n\t"
40        : // no outputs "=" (r)
41        : "Ir" (code)
42        );
43 #endif // __TINYC__
44   // not reached
45   _exit (0);
46 }
47
48 void (*__call_at_exit) (void);
49
50 void
51 exit (int code)
52 {
53   if (__call_at_exit)
54     (*__call_at_exit) ();
55   _exit (code);
56 }
57
58 ssize_t
59 write (int filedes, void const *buffer, size_t size)
60 {
61   int r;
62 #if __GNUC__
63   asm (
64        "mov    $"SYS_write",%%eax\n\t"
65        "mov    %1,%%ebx\n\t"
66        "mov    %2,%%ecx\n\t"
67        "mov    %3,%%edx\n\t"
68        "int    $0x80\n\t"
69        "mov    %%eax,%0\n\t"
70        : "=r" (r)
71        : "" (filedes), "" (buffer), "" (size)
72        : "eax", "ebx", "ecx", "edx"
73        );
74 #elif __TINYC__
75   asm (
76        "mov    $"SYS_write",%%eax\n\t"
77        "mov    %1,%%ebx\n\t"
78        "mov    %2,%%ecx\n\t"
79        "mov    %3,%%edx\n\t"
80        "int    $128\n\t"
81        "mov    %%eax,%0\n\t"
82        : "=r" (r)
83        : "Ir" (filedes), "Ir" (buffer), "Ir" (size)
84        : "eax", "ebx", "ecx"//, "edx"
85        );
86 #endif
87   return r;
88 }