crypto/dso/dso_vms.c

63 #include <openssl/dso.h>
81 static int vms_load(DSO *dso);
82 static int vms_unload(DSO *dso);
83 static void *vms_bind_var(DSO *dso, const char *symname);
84 static DSO_FUNC_TYPE vms_bind_func(DSO *dso, const char *symname);
86 static int vms_unbind_var(DSO *dso, char *symname, void *symptr);
87 static int vms_unbind_func(DSO *dso, char *symname, DSO_FUNC_TYPE symptr);
88 static int vms_init(DSO *dso);
89 static int vms_finish(DSO *dso);
90 static long vms_ctrl(DSO *dso, int cmd, long larg, void *parg);
92 static char *vms_name_converter(DSO *dso, const char *filename);
93 static char *vms_merger(DSO *dso, const char *filespec1,
137 static int vms_load(DSO *dso)
141 	char *filename = DSO_convert_filename(dso, NULL);
218 	if(!sk_push(dso->meth_data, (char *)p))
225 	dso->loaded_filename = filename;
240 static int vms_unload(DSO *dso)
243 	if(dso == NULL)
248 	if(sk_num(dso->meth_data) < 1)
250 	p = (DSO_VMS_INTERNAL *)sk_pop(dso->meth_data);
282 void vms_bind_sym(DSO *dso, const char *symname, void **sym)
300 	if((dso == NULL) || (symname == NULL))
305 	if(sk_num(dso->meth_data) < 1)
310 	ptr = (DSO_VMS_INTERNAL *)sk_value(dso->meth_data,
311 		sk_num(dso->meth_data) - 1);
318 	if(dso->flags & DSO_FLAG_UPCASE_SYMBOL) flags = 0;
361 static void *vms_bind_var(DSO *dso, const char *symname)
364 	vms_bind_sym(dso, symname, &sym);
368 static DSO_FUNC_TYPE vms_bind_func(DSO *dso, const char *symname)
371 	vms_bind_sym(dso, symname, (void **)&sym);
375 static char *vms_merger(DSO *dso, const char *filespec1, const char *filespec2)
496 static char *vms_name_converter(DSO *dso, const char *filename)