external/openurl/library/stubs-amigaos4.c

   1 /***************************************************************************
   2
   3  openurl.library - universal URL display and browser launcher library
   4  Copyright (C) 1998-2005 by Troels Walsted Hansen, et al.
   5  Copyright (C) 2005-2009 by openurl.library Open Source Team
   6
   7  This library is free software; it has been placed in the public domain
   8  and you can freely redistribute it and/or modify it. Please note, however,
   9  that some components may be under the LGPL or GPL license.
  10
  11  This library is distributed in the hope that it will be useful,
  12  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  14
  15  openurl.library project: http://sourceforge.net/projects/openurllib/
  16
  17  $Id$
  18
  19 ***************************************************************************/
  20
  21 #include "lib.h"
  22
  23 #include "SDI_lib.h"
  24 #include "SDI_stdarg.h"
  25
  26 LIBSTUB(URL_OpenA, ULONG, REG(a0, STRPTR url), REG(a1, struct TagItem *attrs))
  27 {
  28   return URL_OpenA(url, attrs);
  29 }
  30
  31 LIBSTUBVA(URL_Open, ULONG, REG(a0, STRPTR url), ...)
  32 {
  33   ULONG res;
  34   VA_LIST args;
  35
  36   VA_START(args, url);
  37   res = URL_OpenA(url, VA_ARG(args, struct TagItem *));
  38   VA_END(args);
  39
  40   return res;
  41 }
  42
  43 LIBSTUB(URL_OldGetPrefs, struct URL_Prefs *)
  44 {
  45   return URL_OldGetPrefs();
  46 }
  47
  48 LIBSTUB(URL_OldFreePrefs, void, REG(a0, struct URL_Prefs *up))
  49 {
  50   URL_OldFreePrefs( up );
  51 }
  52
  53 LIBSTUB(URL_OldSetPrefs, ULONG, REG(a0, struct URL_Prefs *p), REG(d0, ULONG permanent))
  54 {
  55   return URL_OldSetPrefs(p, permanent);
  56 }
  57
  58 LIBSTUB(URL_OldGetDefaultPrefs, struct URL_Prefs *)
  59 {
  60   return URL_OldGetDefaultPrefs();
  61 }
  62
  63 LIBSTUB(URL_OldLaunchPrefsApp, ULONG)
  64 {
  65   return URL_OldLaunchPrefsApp();
  66 }
  67
  68 LIBSTUB(dispatch, LONG, REG(a0, struct RexxMsg *msg), REG(a1, STRPTR *resPtr))
  69 {
  70   return dispatch(msg, resPtr);
  71 }
  72
  73 LIBSTUB(URL_GetPrefsA, struct URL_Prefs *, REG(a0, struct TagItem *attrs))
  74 {
  75   return URL_GetPrefsA(attrs);
  76 }
  77
  78 LIBSTUBVA(URL_GetPrefs, struct URL_Prefs *, ...)
  79 {
  80   struct URL_Prefs *res;
  81   VA_LIST args;
  82
  83   VA_START(args, self);
  84   res = URL_GetPrefsA(VA_ARG(args, struct TagItem *));
  85   VA_END(args);
  86
  87   return res;
  88 }
  89
  90 LIBSTUB(URL_FreePrefsA, void, REG(a0, struct URL_Prefs *up), REG(a1, struct TagItem *attrs))
  91 {
  92   URL_FreePrefsA(up, attrs);
  93 }
  94
  95 LIBSTUBVA(URL_FreePrefs, void, REG(a0, struct URL_Prefs *up), ...)
  96 {
  97   VA_LIST args;
  98
  99   VA_START(args, up);
 100   URL_FreePrefsA(up, VA_ARG(args, struct TagItem *));
 101   VA_END(args);
 102 }
 103
 104 LIBSTUB(URL_SetPrefsA, ULONG, REG(a0, struct URL_Prefs *p), REG(a1, struct TagItem *attrs))
 105 {
 106   return URL_SetPrefsA(p, attrs);
 107 }
 108
 109 LIBSTUBVA(URL_SetPrefs, ULONG, REG(a0, struct URL_Prefs *p), ...)
 110 {
 111   ULONG res;
 112   VA_LIST args;
 113
 114   VA_START(args, p);
 115   res = URL_SetPrefsA(p, VA_ARG(args, struct TagItem *));
 116   VA_END(args);
 117
 118   return res;
 119 }
 120
 121 LIBSTUB(URL_LaunchPrefsAppA, ULONG, REG(a0, struct TagItem *attrs))
 122 {
 123   return URL_LaunchPrefsAppA(attrs);
 124 }
 125
 126 LIBSTUBVA(URL_LaunchPrefsApp, ULONG, ...)
 127 {
 128   ULONG res;
 129   VA_LIST args;
 130
 131   VA_START(args, self);
 132   res = URL_LaunchPrefsAppA(VA_ARG(args, struct TagItem *));
 133   VA_END(args);
 134
 135   return res;
 136 }
 137
 138 LIBSTUB(URL_GetAttr, ULONG, REG(d0, ULONG attr), REG(a0, ULONG *storage))
 139 {
 140   return URL_GetAttr(attr, storage);
 141 }