nextstep.c
上传用户:blenddy
上传日期:2007-01-07
资源大小:6495k
文件大小:1k
- #include <mach-o/rld.h>
- #include <streams/streams.h>
- #include <stdlib.h>
- static char *lastError = NULL;
- static NXStream *
- OpenError()
- {
- return NXOpenMemory(NULL, 0, NX_WRITEONLY);
- }
- static void
- CloseError(NXStream * s)
- {
- if (s)
- NXCloseMemory(s, NX_FREEBUFFER);
- }
- static void
- TransferError(NXStream * s)
- {
- char *buffer;
- int len,
- maxlen;
- if (lastError)
- free(lastError);
- NXGetMemoryBuffer(s, &buffer, &len, &maxlen);
- lastError = malloc(len + 1);
- strcpy(lastError, buffer);
- }
- void *
- next_dlopen(char *name)
- {
- int rld_success;
- NXStream *errorStream;
- char *result = NULL;
- char **p;
- errorStream = OpenError();
- p = calloc(2, sizeof(void *));
- p[0] = name;
- rld_success = rld_load(errorStream, NULL, p, NULL);
- free(p);
- if (!rld_success)
- {
- TransferError(errorStream);
- result = (char *) 1;
- }
- CloseError(errorStream);
- return result;
- }
- int
- next_dlclose(void *handle)
- {
- return 0;
- }
- void *
- next_dlsym(void *handle, char *symbol)
- {
- NXStream *errorStream = OpenError();
- char symbuf[1024];
- unsigned long symref = 0;
- sprintf(symbuf, "_%s", symbol);
- if (!rld_lookup(errorStream, symbuf, &symref))
- TransferError(errorStream);
- CloseError(errorStream);
- return (void *) symref;
- }
- char *
- next_dlerror(void)
- {
- return lastError;
- }