rom/exec/exec_autoinit.c

   1 /*
   2  * Copyright (C) 2015, The AROS Development Team
   3  * All right reserved.
   4  * Author: Jason S. McMullan <jason.mcmullan@gmail.com>
   5  *
   6  * Licensed under the AROS PUBLIC LICENSE (APL) Version 1.1
   7  */
   8
   9 #include <aros/symbolsets.h>
  10 #include <aros/asmcall.h>
  11 #include <aros/autoinit.h>
  12
  13 #include <exec/libraries.h>
  14
  15 #include <proto/exec.h>
  16 #include <proto/dos.h>
  17
  18 /* Linklib to provide a 'SysBase' symbol. Also verifies that
  19  * the symbol is set appropriately.
  20  */
  21 struct ExecBase *SysBase;
  22 extern const LONG __aros_libreq_SysBase __attribute__((weak));
  23
  24 static int SysBase_autoinit(struct ExecBase *sysBase)
  25 {
  26     if (sysBase == NULL)
  27         return FALSE;
  28
  29     SysBase = sysBase;
  30
  31     if (__aros_libreq_SysBase > SysBase->LibNode.lib_Version) {
  32         IPTR arr[] = {
  33                  (IPTR)(FindTask(NULL)->tc_Node.ln_Name),
  34                  __aros_libreq_SysBase,
  35                  SysBase->LibNode.lib_Version
  36         };
  37         __showerror("%s: Requires exec.library v%ld, found v%ld\n",arr);
  38         return FALSE;
  39     }
  40
  41     return TRUE;
  42 }
  43
  44 ADD2INIT(SysBase_autoinit,-128)