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 }