compiler/clib/stubs/genstubs.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: stub function generator for clib functions
   6     Lang: english
   7 */
   8
   9 #include <stdio.h>
  10 #include <string.h>
  11 #include <stdlib.h>
  12 #include <aros/cpu.h>
  13 #include <exec/libraries.h>
  14
  15 #define SYSTEM_CALL(name, alias...) { #name , #alias },
  16
  17 struct
  18 {
  19     char *name;
  20     char *alias;
  21 } syscalls [] =
  22 {
  23     #include "../include/sys/syscall.def"
  24     { NULL, NULL }
  25 };
  26
  27 int main(int argc, char *argv[])
  28 {
  29     int n;
  30
  31     if (argc != 2)
  32     {
  33         fprintf(stderr, "Argument required: either '-list' or the name of the function\n");
  34         return 1;
  35     }
  36
  37     if (!strcmp(argv[1], "-list"))
  38     {
  39         for (n=0; syscalls[n].name; n++)
  40             printf("%s\n",syscalls[n].name);
  41
  42         return 0;
  43     }
  44
  45     for (n=0; syscalls[n].name != NULL; n++)
  46         if (!strcmp(syscalls[n].name, argv[1]))
  47         {
  48             printf(STUBCODE_INIT);
  49             printf(STUBCODE,
  50                    syscalls[n].name, "aroscbase",
  51                    &(__AROS_GETJUMPVEC(NULL, (n+1+LIB_RESERVED))->vec)
  52             );
  53             if (syscalls[n].alias[0] != '\0' )
  54             {
  55                 printf(ALIASCODE,
  56                        syscalls[n].name, syscalls[n].alias
  57                 );
  58             }
  59
  60             return 0;
  61         }
  62
  63     fprintf(stderr, "Invalid function name \"%s\"\n", argv[1]);
  64
  65     return 1;
  66 }