Skip to content

Commit

Permalink
ose: Update ddll interface after rebase to 17.0-rc1
Browse files Browse the repository at this point in the history
Also deleted all the copy-paste stuff
  • Loading branch information
garazdawi committed Feb 24, 2014
1 parent ff463a1 commit e48c536
Showing 1 changed file with 3 additions and 74 deletions.
77 changes: 3 additions & 74 deletions erts/emulator/sys/ose/erl_ose_sys_ddll.c
Original file line number Diff line number Diff line change
Expand Up @@ -19,7 +19,7 @@

/*
* Interface functions to the dynamic linker using dl* functions.
* (As far as I know it works on SunOS 4, 5, Linux and FreeBSD. /Seb)
* (No support in OSE, we use static linkage instead)
*/

#ifdef HAVE_CONFIG_H
Expand All @@ -29,68 +29,15 @@
#include "sys.h"
#include "erl_vm.h"
#include "global.h"
#ifdef HAVE_DLFCN_H
#include <dlfcn.h>
#endif


/* some systems do not have RTLD_NOW defined, and require the "mode"
* argument to dload() always be 1.
*/
#ifndef RTLD_NOW
# define RTLD_NOW 1
#endif

#define MAX_NAME_LEN 255 /* XXX should we get the system path size? */
#define EXT_LEN 3
#define FILE_EXT ".so" /* extension appended to the filename */

static char **errcodes = NULL;
static int num_errcodes = 0;
static int num_errcodes_allocated = 0;

#define my_strdup(WHAT) my_strdup_in(ERTS_ALC_T_DDLL_ERRCODES, WHAT);

static char *my_strdup_in(ErtsAlcType_t type, char *what)
{
char *res = erts_alloc(type, strlen(what) + 1);
strcpy(res, what);
return res;
}


static int find_errcode(char *string, ErtsSysDdllError* err)
{
int i;

if (err != NULL) {
erts_sys_ddll_free_error(err); /* in case we ignored an earlier error */
err->str = my_strdup_in(ERTS_ALC_T_DDLL_TMP_BUF, string);
return 0;
}
for(i=0;i<num_errcodes;++i) {
if (!strcmp(string, errcodes[i])) {
return i;
}
}
if (num_errcodes_allocated == num_errcodes) {
errcodes = (num_errcodes_allocated == 0)
? erts_alloc(ERTS_ALC_T_DDLL_ERRCODES,
(num_errcodes_allocated = 10) * sizeof(char *))
: erts_realloc(ERTS_ALC_T_DDLL_ERRCODES, errcodes,
(num_errcodes_allocated += 10) * sizeof(char *));
}
errcodes[num_errcodes++] = my_strdup(string);
return (num_errcodes - 1);
}

void erl_sys_ddll_init(void) {
}

/*
* Open a shared object
*/
int erts_sys_ddll_open2(const char *full_name, void **handle, ErtsSysDdllError* err)
int erts_sys_ddll_open(const char *full_name, void **handle, ErtsSysDdllError* err)
{
return ERL_DE_ERROR_NO_DDLL_FUNCTIONALITY;
}
Expand Down Expand Up @@ -168,25 +115,7 @@ int erts_sys_ddll_close2(void *handle, ErtsSysDdllError* err)
*/
char *erts_sys_ddll_error(int code)
{
int actual_code;

if (code > ERL_DE_DYNAMIC_ERROR_OFFSET) {
return "Unspecified error";
}
actual_code = -1*(code - ERL_DE_DYNAMIC_ERROR_OFFSET);
#if defined(HAVE_DLOPEN)
{
char *msg;

if (actual_code >= num_errcodes) {
msg = "Unknown dlload error";
} else {
msg = errcodes[actual_code];
}
return msg;
}
#endif
return "no error";
return "Unspecified error";
}

void erts_sys_ddll_free_error(ErtsSysDdllError* err)
Expand Down

0 comments on commit e48c536

Please sign in to comment.