1/*
2    SDL - Simple DirectMedia Layer
3    Copyright (C) 1997-2012 Sam Lantinga
4
5    This library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    This library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with this library; if not, write to the Free Software
17    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
18
19    Sam Lantinga
20    slouken@libsdl.org
21*/
22#include "SDL_config.h"
23
24#ifdef SDL_LOADSO_BEOS
25
26/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
27/* System dependent library loading routines                           */
28
29#include <stdio.h>
30#include <be/kernel/image.h>
31
32#include "SDL_loadso.h"
33
34void *
35SDL_LoadObject(const char *sofile)
36{
37    void *handle = NULL;
38    image_id library_id = load_add_on(sofile);
39    if (library_id < 0) {
40        SDL_SetError(strerror((int) library_id));
41    } else {
42        handle = (void *) (library_id);
43    }
44    return (handle);
45}
46
47void *
48SDL_LoadFunction(void *handle, const char *name)
49{
50    void *sym = NULL;
51    image_id library_id = (image_id) handle;
52    status_t rc = get_image_symbol(library_id, name, B_SYMBOL_TYPE_TEXT, &sym);
53    if (rc != B_NO_ERROR) {
54        SDL_SetError(strerror(rc));
55    }
56    return (sym);
57}
58
59void
60SDL_UnloadObject(void *handle)
61{
62    image_id library_id;
63    if (handle != NULL) {
64        library_id = (image_id) handle;
65        unload_add_on(library_id);
66    }
67}
68
69#endif /* SDL_LOADSO_BEOS */
70
71/* vi: set ts=4 sw=4 expandtab: */
72
73