Class: DL::Handle

Inherits:
Object
  • Object
show all
Defined in:
handle.c,
handle.c

Overview

The DL::Handle is the manner to access the dynamic library

Example

Setup

libc_so = "/lib64/libc.so.6"
=> "/lib64/libc.so.6"
@handle = DL::Handle.new(libc_so)
=> #<DL::Handle:0x00000000d69ef8>

Setup, with flags

libc_so = "/lib64/libc.so.6"
=> "/lib64/libc.so.6"
@handle = DL::Handle.new(libc_so, DL::RTLD_LAZY | DL::RTLD_GLOBAL)
=> #<DL::Handle:0x00000000d69ef8>

Addresses to symbols

strcpy_addr = @handle['strcpy']
=> 140062278451968

or

strcpy_addr = @handle.sym('strcpy')
=> 140062278451968

Constant Summary collapse

NEXT =

A predefined pseudo-handle of RTLD_NEXT

Which will find the next occurrence of a function in the search order after the current library.

predefined_dlhandle(RTLD_NEXT)
DEFAULT =

A predefined pseudo-handle of RTLD_DEFAULT

Which will find the first occurrence of the desired symbol using the default library search order

predefined_dlhandle(RTLD_DEFAULT)

Class Method Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(lib = nil, flags = DL::RTLD_LAZY|DL::RTLD_GLOBAL) ⇒ Object

Create a new handler that opens library named lib with flags. If no library is specified, RTLD_DEFAULT is used.


118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
# File 'handle.c', line 118

VALUE
rb_dlhandle_initialize(int argc, VALUE argv[], VALUE self)
{
    void *ptr;
    struct dl_handle *dlhandle;
    VALUE lib, flag;
    char  *clib;
    int   cflag;
    const char *err;

    switch( rb_scan_args(argc, argv, "02", &lib, &flag) ){
      case 0:
  clib = NULL;
  cflag = RTLD_LAZY | RTLD_GLOBAL;
  break;
      case 1:
  clib = NIL_P(lib) ? NULL : StringValuePtr(lib);
  cflag = RTLD_LAZY | RTLD_GLOBAL;
  break;
      case 2:
  clib = NIL_P(lib) ? NULL : StringValuePtr(lib);
  cflag = NUM2INT(flag);
  break;
      default:
  rb_bug("rb_dlhandle_new");
    }

    rb_secure(2);

#if defined(_WIN32)
    if( !clib ){
  HANDLE rb_libruby_handle(void);
  ptr = rb_libruby_handle();
    }
    else if( STRCASECMP(clib, "libc") == 0
# ifdef RUBY_COREDLL
       || STRCASECMP(clib, RUBY_COREDLL) == 0
       || STRCASECMP(clib, RUBY_COREDLL".dll") == 0
# endif
  ){
# ifdef _WIN32_WCE
  ptr = dlopen("coredll.dll", cflag);
# else
  ptr = w32_coredll();
# endif
    }
    else
#endif
  ptr = dlopen(clib, cflag);
#if defined(HAVE_DLERROR)
    if( !ptr && (err = dlerror()) ){
  rb_raise(rb_eDLError, "%s", err);
    }
#else
    if( !ptr ){
  err = dlerror();
  rb_raise(rb_eDLError, "%s", err);
    }
#endif
    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    if( dlhandle->ptr && dlhandle->open && dlhandle->enable_close ){
  dlclose(dlhandle->ptr);
    }
    dlhandle->ptr = ptr;
    dlhandle->open = 1;
    dlhandle->enable_close = 0;

    if( rb_block_given_p() ){
  rb_ensure(rb_yield, self, rb_dlhandle_close, self);
    }

    return Qnil;
}

Class Method Details

.[]Object

call-seq: sym(name)

Get the address as an Integer for the function named name. The function is searched via dlsym on RTLD_NEXT. See man(3) dlsym() for more info.


292
293
294
295
296
# File 'handle.c', line 292

VALUE
rb_dlhandle_s_sym(VALUE self, VALUE sym)
{
    return dlhandle_sym(RTLD_NEXT, StringValueCStr(sym));
}

.symObject

call-seq: sym(name)

Get the address as an Integer for the function named name. The function is searched via dlsym on RTLD_NEXT. See man(3) dlsym() for more info.


292
293
294
295
296
# File 'handle.c', line 292

VALUE
rb_dlhandle_s_sym(VALUE self, VALUE sym)
{
    return dlhandle_sym(RTLD_NEXT, StringValueCStr(sym));
}

Instance Method Details

#[]Object

call-seq: sym(name)

Get the address as an Integer for the function named name.


263
264
265
266
267
268
269
270
271
272
273
274
# File 'handle.c', line 263

VALUE
rb_dlhandle_sym(VALUE self, VALUE sym)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    if( ! dlhandle->open ){
  rb_raise(rb_eDLError, "closed handle");
    }

    return dlhandle_sym(dlhandle->ptr, StringValueCStr(sym));
}

#closeObject

Close this DL::Handle. Calling close more than once will raise a DL::DLError exception.


60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
# File 'handle.c', line 60

VALUE
rb_dlhandle_close(VALUE self)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    if(dlhandle->open) {
  int ret = dlclose(dlhandle->ptr);
  dlhandle->open = 0;

  /* Check dlclose for successful return value */
  if(ret) {
#if defined(HAVE_DLERROR)
      rb_raise(rb_eDLError, "%s", dlerror());
#else
      rb_raise(rb_eDLError, "could not close handle");
#endif
  }
  return INT2NUM(ret);
    }
    rb_raise(rb_eDLError, "dlclose() called too many times");

    UNREACHABLE;
}

#close_enabled?Boolean

Returns true if dlclose() will be called when this DL::Handle is garbage collected.


228
229
230
231
232
233
234
235
236
237
# File 'handle.c', line 228

static VALUE
rb_dlhandle_close_enabled_p(VALUE self)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);

    if(dlhandle->enable_close) return Qtrue;
    return Qfalse;
}

#disable_closeObject

Disable a call to dlclose() when this DL::Handle is garbage collected.


212
213
214
215
216
217
218
219
220
# File 'handle.c', line 212

VALUE
rb_dlhandle_disable_close(VALUE self)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    dlhandle->enable_close = 0;
    return Qnil;
}

#enable_closeObject

Enable a call to dlclose() when this DL::Handle is garbage collected.


197
198
199
200
201
202
203
204
205
# File 'handle.c', line 197

VALUE
rb_dlhandle_enable_close(VALUE self)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    dlhandle->enable_close = 1;
    return Qnil;
}

#symObject

call-seq: sym(name)

Get the address as an Integer for the function named name.


263
264
265
266
267
268
269
270
271
272
273
274
# File 'handle.c', line 263

VALUE
rb_dlhandle_sym(VALUE self, VALUE sym)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    if( ! dlhandle->open ){
  rb_raise(rb_eDLError, "closed handle");
    }

    return dlhandle_sym(dlhandle->ptr, StringValueCStr(sym));
}

#to_iObject

Returns the memory address for this handle.


244
245
246
247
248
249
250
251
# File 'handle.c', line 244

VALUE
rb_dlhandle_to_i(VALUE self)
{
    struct dl_handle *dlhandle;

    TypedData_Get_Struct(self, struct dl_handle, &dlhandle_data_type, dlhandle);
    return PTR2NUM(dlhandle);
}