libini/inifile_init.c

   1 /*
   2     Copyright © 1995-2006, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: bsdsocket initialization code.
   6     Lang: English.
   7 */
   8
   9 /****************************************************************************************/
  10
  11 #include <exec/types.h>
  12 #include <exec/libraries.h>
  13 #include <proto/exec.h>
  14 #include <aros/symbolsets.h>
  15 #include <aros/macros.h>
  16 #include <utility/utility.h>
  17
  18 #include "inifile_intern.h"
  19
  20 #define DEBUG 1
  21 #   include <aros/debug.h>
  22
  23 #include LC_LIBDEFS_FILE
  24
  25 /****************************************************************************************/
  26
  27 static int Init(LIBBASETYPEPTR LIBBASE)
  28 {
  29     D(bug(NAME_STRING ": Inside libinit func \n"));
  30
  31         return TRUE;
  32 }
  33
  34 /****************************************************************************************/
  35
  36 static int Open(LIBBASETYPEPTR LIBBASE)
  37 {
  38     /*
  39       This function is single-threaded by exec by calling Forbid.
  40       If you break the Forbid() another task may enter this function
  41       at the same time. Take care.
  42     */
  43     D(bug(NAME_STRING ": Inside libopen func \n"));
  44
  45         return TRUE;
  46 }
  47
  48 /****************************************************************************************/
  49
  50 static int Expunge(LIBBASETYPEPTR LIBBASE)
  51 {
  52     /*
  53         This function is single-threaded by exec by calling Forbid.
  54         Never break the Forbid() or strange things might happen.
  55     */
  56
  57     /* Test for openers. */
  58     D(bug(NAME_STRING ": Inside libexpunge func \n"));
  59
  60         return TRUE;
  61 }
  62
  63 /****************************************************************************************/
  64
  65 static void Close(LIBBASETYPEPTR LIBBASE)
  66 {
  67     /*
  68         This function is single-threaded by exec by calling Forbid.
  69         If you break the Forbid() another task may enter this function
  70         at the same time. Take care.
  71     */
  72
  73     D(bug(NAME_STRING ": Inside libclose func\n"));
  74
  75         return TRUE;
  76 }
  77
  78 /****************************************************************************************/
  79
  80 ADD2INITLIB(Init, 0);
  81 ADD2OPENLIB(Open, 0);
  82 ADD2CLOSELIB(Close, 0);
  83 ADD2EXPUNGELIB(Expunge, 0);