1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
/* unlink_symbol.c -- unlink the object file defining the given symbol. */
/* This file is part of DLD, a dynamic link/unlink editor for C.
Copyright (C) 1990 by W. Wilson Ho.
The author can be reached electronically by how@cs.ucdavis.edu or
through physical mail at:
W. Wilson Ho
Division of Computer Science
University of California at Davis
Davis, CA 95616
*/
/* This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 1, or (at your option) any
later version. */
#include "defs.h"
int
dld_unlink_by_symbol (name, force)
const char *name;
int force;
{
register symbol *sp;
register char *p;
if (name == 0) {
dld_errno = DLD_EUNDEFSYM;
return dld_errno;
}
if (setjmp (_dld_env))
return dld_errno;
/* prepend a '_' to name, as required by C's convention */
p = (char *) _dld_malloc (strlen(name) + 2);
*p = '_';
strcpy (p+1, name);
sp = _dld_getsym_soft (p);
free (p);
if (sp && sp->defined_by) {
if (sp->defined_by != _dld_dummy_entry)
_dld_unlink_entry (sp->defined_by, force);
else dld_remove_defined_symbol (name);
return 0;
}
dld_errno = DLD_EUNDEFSYM;
return dld_errno;
} /* dld_unlink_by_symbol */
|
