File: get_func.c

package info (click to toggle)
fudgit 2.42-6
  • links: PTS
  • area: non-free
  • in suites: potato, woody
  • size: 2,468 kB
  • ctags: 2,375
  • sloc: ansic: 27,729; makefile: 793; yacc: 724; lex: 102; asm: 29; fortran: 15
file content (59 lines) | stat: -rw-r--r-- 1,330 bytes parent folder | download
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
/* get_func.c -- return the entry point of the given function. */

/* 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"

/*  given a function name, return the location of that function (in core) */
unsigned long
dld_get_func (name)
char name[];
{
	register symbol *sp;
	register char *p;

	if (name == 0)
	return 0;

	if (setjmp (_dld_env))
	return 0;

	/* 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);

#ifdef linux
	if (sp) {
	while (sp->indirect) sp = sp->indirect;
	if ((sp->defined == (N_EXT | N_TEXT)) || (sp->defined == (N_EXT | N_ABS)))
		return sp->value;
	}
#else
	if (sp)
	if (sp->defined == (N_EXT | N_TEXT))
		return sp->value;
#endif
	return 0;
} /* dld_get_func */