workbench/libs/openurl/library/amigaos4_68k.c

   1 /*
   2 **  openurl.library - universal URL display and browser
   3 **  launcher library
   4 **
   5 **  AmigaOS4 68k Jump table - Provides jump table for old
   6 **  68k programs.
   7 **
   8 **  Written by Alexandre Balaban <alexandre@balaban.name>
   9 */
  10
  11 #undef __USE_INLINE__
  12
  13 #if !defined(__amigaos4__)
  14 #  error This file is AmigaOS4 specific and should not be used on other platforms
  15 #endif
  16
  17 // ABA, DON'T KNOW WHY, BUT SOMETHING SEEMS TO BE MESSED INTO OPENURL.H
  18 #define URL_GetPrefs_Default URL_GetPrefs_Mode
  19
  20 #include <exec/emulation.h>
  21 #include <libraries/openurl.h>
  22 #include <interfaces/openurl.h>
  23
  24 /* amigaos4 *****************************************************************/
  25
  26 STATIC ULONG stub_OpenPPC(ULONG *regarray)
  27 {
  28         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
  29         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
  30         struct LibraryManagerInterface *Self = (struct LibraryManagerInterface *) ExtLib->ILibrary;
  31
  32         return (ULONG)Self->Open(0);
  33 }
  34 struct EmuTrap stub_Open = { TRAPINST, TRAPTYPE, stub_OpenPPC };
  35
  36 /* amigaos4 *****************************************************************/
  37
  38 STATIC ULONG stub_ClosePPC(ULONG *regarray)
  39 {
  40         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
  41         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
  42         struct LibraryManagerInterface *Self = (struct LibraryManagerInterface *) ExtLib->ILibrary;
  43
  44         return (ULONG)Self->Close();
  45 }
  46 struct EmuTrap stub_Close = { TRAPINST, TRAPTYPE, stub_ClosePPC };
  47
  48 /* amigaos4 *****************************************************************/
  49
  50 STATIC ULONG stub_ExpungePPC(ULONG *regarray)
  51 {
  52         return 0UL;
  53 }
  54 struct EmuTrap stub_Expunge = { TRAPINST, TRAPTYPE, stub_ExpungePPC };
  55
  56 /* amigaos4 *****************************************************************/
  57
  58 STATIC ULONG stub_ReservedPPC(ULONG *regarray)
  59 {
  60         return 0UL;
  61 }
  62 struct EmuTrap stub_Reserved = { TRAPINST, TRAPTYPE, stub_ReservedPPC };
  63
  64 /* amigaos4 *****************************************************************/
  65
  66 static ULONG stub_URL_OpenAPPC(ULONG *regarray)
  67 {
  68         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
  69         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
  70         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
  71
  72         return Self->URL_OpenA(
  73                 (STRPTR)regarray[REG68K_A0/4],
  74                 (struct TagItem *)regarray[REG68K_A1/4]
  75         );
  76 }
  77 struct EmuTrap stub_URL_OpenA = { TRAPINST, TRAPTYPE, stub_URL_OpenAPPC };
  78
  79 /* amigaos4 *****************************************************************/
  80
  81 static struct URL_Prefs * stub_URL_OldGetPrefsPPC(ULONG *regarray)
  82 {
  83         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
  84         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
  85         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
  86
  87         return Self->URL_GetPrefsA(
  88                   NULL
  89         );
  90 }
  91 struct EmuTrap stub_URL_OldGetPrefs = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_OldGetPrefsPPC };
  92
  93 /* amigaos4 *****************************************************************/
  94
  95 static void stub_URL_OldFreePrefsPPC(ULONG *regarray)
  96 {
  97         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
  98         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
  99         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 100
 101         Self->URL_FreePrefs(
 102                 (struct URL_Prefs *)regarray[REG68K_A0/4],
 103                   NULL
 104         );
 105 }
 106 struct EmuTrap stub_URL_OldFreePrefs = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_OldFreePrefsPPC };
 107
 108 /* amigaos4 *****************************************************************/
 109
 110 static ULONG stub_URL_OldSetPrefsPPC(ULONG *regarray)
 111 {
 112         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 113         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 114         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 115
 116          struct TagItem stags[] = {URL_SetPrefs_Save,0,TAG_DONE};
 117
 118          stags[0].ti_Data = regarray[REG68K_D0/4];
 119
 120         return Self->URL_SetPrefsA(
 121                 (struct URL_Prefs *)regarray[REG68K_A0/4],
 122                 stags
 123         );
 124 }
 125 struct EmuTrap stub_URL_OldSetPrefs = { TRAPINST, TRAPTYPE, stub_URL_OldSetPrefsPPC };
 126
 127 /* amigaos4 *****************************************************************/
 128
 129 static struct URL_Prefs * stub_URL_OldGetDefaultPrefsPPC(ULONG *regarray)
 130 {
 131         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 132         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 133         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 134
 135         return Self->URL_GetPrefs(
 136                   URL_GetPrefs_Default,
 137                   TRUE,
 138                   TAG_DONE
 139         );
 140 }
 141 struct EmuTrap stub_URL_OldGetDefaultPrefs = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_OldGetDefaultPrefsPPC };
 142
 143 /* amigaos4 *****************************************************************/
 144
 145 static ULONG stub_URL_OldLaunchPrefsAppPPC(ULONG *regarray)
 146 {
 147         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 148         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 149         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 150
 151         return Self->URL_LaunchPrefsAppA(
 152                  NULL
 153          );
 154 }
 155 struct EmuTrap stub_URL_OldLaunchPrefsApp = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_OldLaunchPrefsAppPPC };
 156
 157 /* amigaos4 *****************************************************************/
 158 LONG VARARGS68K OS4_dispatch ( struct OpenURLIFace * Self, struct RexxMsg *msg, UBYTE ** resPtr );
 159
 160 static LONG stub_dispatchPPC(ULONG *regarray)
 161 {
 162         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 163         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 164         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 165     UBYTE * pRes = NULL;
 166
 167         LONG res= OS4_dispatch(
 168                   Self,
 169                 (struct RexxMsg*)regarray[REG68K_A0/4],
 170                                 &pRes
 171         );
 172
 173     regarray[REG68K_A0/4] = (ULONG)pRes;
 174
 175     return res;
 176 }
 177 struct EmuTrap stub_dispatch = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_dispatchPPC };
 178
 179 /* amigaos4 *****************************************************************/
 180
 181 static struct URL_Prefs * stub_URL_GetPrefsAPPC(ULONG *regarray)
 182 {
 183         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 184         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 185         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 186
 187         return Self->URL_GetPrefsA(
 188                 (struct TagItem *)regarray[REG68K_A0/4]
 189         );
 190 }
 191 struct EmuTrap stub_URL_GetPrefsA = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_GetPrefsAPPC };
 192
 193 /* amigaos4 *****************************************************************/
 194
 195 static void stub_URL_FreePrefsAPPC(ULONG *regarray)
 196 {
 197         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 198         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 199         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 200
 201         Self->URL_FreePrefsA(
 202                 (struct URL_Prefs *)regarray[REG68K_A0/4],
 203                 (struct TagItem *)regarray[REG68K_A1/4]
 204         );
 205 }
 206 struct EmuTrap stub_URL_FreePrefsA = { TRAPINST, TRAPTYPE, (ULONG (*)(ULONG *))stub_URL_FreePrefsAPPC };
 207
 208 /* amigaos4 *****************************************************************/
 209
 210 static ULONG stub_URL_SetPrefsAPPC(ULONG *regarray)
 211 {
 212         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 213         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 214         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 215
 216         return Self->URL_SetPrefsA(
 217                 (struct URL_Prefs *)regarray[REG68K_A0/4],
 218                 (struct TagItem *)regarray[REG68K_A1/4]
 219         );
 220 }
 221 struct EmuTrap stub_URL_SetPrefsA = { TRAPINST, TRAPTYPE, stub_URL_SetPrefsAPPC };
 222
 223 /* amigaos4 *****************************************************************/
 224
 225 static ULONG stub_URL_LaunchPrefsAppAPPC(ULONG *regarray)
 226 {
 227         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 228         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 229         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 230
 231         return Self->URL_LaunchPrefsAppA(
 232                 (struct TagItem *)regarray[REG68K_A1/4]
 233         );
 234 }
 235 struct EmuTrap stub_URL_LaunchPrefsAppA = { TRAPINST, TRAPTYPE, stub_URL_LaunchPrefsAppAPPC };
 236
 237 /* amigaos4 *****************************************************************/
 238
 239 static ULONG stub_URL_GetAttrPPC(ULONG *regarray)
 240 {
 241         struct Library *Base = (struct Library *) regarray[REG68K_A6/4];
 242         struct ExtendedLibrary *ExtLib = (struct ExtendedLibrary *) ((ULONG)Base + Base->lib_PosSize);
 243         struct OpenURLIFace *Self = (struct OpenURLIFace *) ExtLib->MainIFace;
 244
 245         return Self->URL_GetAttr(
 246                 (ULONG)regarray[REG68K_D0/4],
 247                 (ULONG*)regarray[REG68K_A0/4]
 248         );
 249 }
 250 struct EmuTrap stub_URL_GetAttr = { TRAPINST, TRAPTYPE, stub_URL_GetAttrPPC };
 251
 252 /* amigaos4 *****************************************************************/
 253
 254 ULONG VecTable68K[] = {
 255         (ULONG)&stub_Open,
 256         (ULONG)&stub_Close,
 257         (ULONG)&stub_Expunge,
 258         (ULONG)&stub_Reserved,
 259
 260          (ULONG)&stub_URL_OpenA,
 261          (ULONG)&stub_URL_OldGetPrefs,
 262          (ULONG)&stub_URL_OldFreePrefs,
 263          (ULONG)&stub_URL_OldSetPrefs,
 264          (ULONG)&stub_URL_OldGetDefaultPrefs,
 265          (ULONG)&stub_URL_OldLaunchPrefsApp,
 266          (ULONG)&stub_dispatch,
 267          (ULONG)&stub_URL_GetPrefsA,
 268          (ULONG)&stub_URL_FreePrefsA,
 269          (ULONG)&stub_URL_SetPrefsA,
 270          (ULONG)&stub_URL_LaunchPrefsAppA,
 271          (ULONG)&stub_URL_GetAttr,
 272
 273         (ULONG)-1
 274 };