external/openurl/library/stubs-morphos.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-2013 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 // only the return type must be defined for the MorphOS stub functions
  27 // all parameters are taken from the emulated 68k registers
  28
  29 LIBSTUB(URL_OpenA, ULONG)
  30 {
  31   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  32   return CALL_LFUNC(URL_OpenA, (STRPTR)REG_A0, (struct TagItem *)REG_A1);
  33 }
  34
  35 LIBSTUB(URL_OldGetPrefs, struct URL_Prefs *)
  36 {
  37   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  38   return CALL_LFUNC_NP(URL_OldGetPrefs);
  39 }
  40
  41 LIBSTUB(URL_OldFreePrefs, void)
  42 {
  43   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  44   CALL_LFUNC(URL_OldFreePrefs, (struct URL_Prefs *)REG_A0);
  45 }
  46
  47 LIBSTUB(URL_OldSetPrefs, ULONG)
  48 {
  49   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  50   return CALL_LFUNC(URL_OldSetPrefs, (struct URL_Prefs *)REG_A0, (ULONG)REG_D0);
  51 }
  52
  53 LIBSTUB(URL_OldGetDefaultPrefs, struct URL_Prefs *)
  54 {
  55   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  56   return CALL_LFUNC_NP(URL_OldGetDefaultPrefs);
  57 }
  58
  59 LIBSTUB(URL_OldLaunchPrefsApp, ULONG)
  60 {
  61   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  62   return CALL_LFUNC_NP(URL_OldLaunchPrefsApp);
  63 }
  64
  65 LIBSTUB(dispatch, LONG)
  66 {
  67   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  68   return CALL_LFUNC(dispatch, (struct RexxMsg *)REG_A0, (STRPTR *)REG_A1);
  69 }
  70
  71 LIBSTUB(URL_GetPrefsA, struct URL_Prefs *)
  72 {
  73   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  74   return CALL_LFUNC(URL_GetPrefsA, (struct TagItem *)REG_A0);
  75 }
  76
  77 LIBSTUB(URL_FreePrefsA, void)
  78 {
  79   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  80   CALL_LFUNC(URL_FreePrefsA, (struct URL_Prefs *)REG_A0, (struct TagItem *)REG_A1);
  81 }
  82
  83 LIBSTUB(URL_SetPrefsA, ULONG)
  84 {
  85   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  86   return CALL_LFUNC(URL_SetPrefsA, (struct URL_Prefs *)REG_A0, (struct TagItem *)REG_A1);
  87 }
  88
  89 LIBSTUB(URL_LaunchPrefsAppA, ULONG)
  90 {
  91   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  92   return CALL_LFUNC(URL_LaunchPrefsAppA, (struct TagItem *)REG_A0);
  93 }
  94
  95 LIBSTUB(URL_GetAttr, ULONG)
  96 {
  97   __BASE_OR_IFACE = (__BASE_OR_IFACE_TYPE)REG_A6;
  98   return CALL_LFUNC(URL_GetAttr, (ULONG)REG_D0, (ULONG *)REG_A0);
  99 }