Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
 Path: blob/master/src/lib/libcodex/codexmeth.c
1808 views
1
/***********************************************************************

2
*                                                                      *

3
*               This software is part of the ast package               *

4
*          Copyright (c) 2003-2011 AT&T Intellectual Property          *

5
*                      and is licensed under the                       *

6
*                 Eclipse Public License, Version 1.0                  *

7
*                    by AT&T Intellectual Property                     *

8
*                                                                      *

9
*                A copy of the License is available at                 *

10
*          http://www.eclipse.org/org/documents/epl-v10.html           *

11
*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *

12
*                                                                      *

13
*              Information and Software Systems Research               *

14
*                            AT&T Research                             *

15
*                           Florham Park NJ                            *

16
*                                                                      *

17
*                 Glenn Fowler <[email protected]>                  *

18
*                  David Korn <[email protected]>                   *

19
*                   Phong Vo <[email protected]>                    *

20
*                                                                      *

21
***********************************************************************/

22
#pragma prototyped

23


24
/*

25
 * return the codex method for name

26
 */

27


28
#include <codex.h>

29
#include <dlldefs.h>

30


31
Codexmeth_t*

32
codexmeth(const char* name)

33
{

34
	register Codexmeth_t*	meth;

35
	register const char*	s;

36
	register const char*	t;

37
	Codexmeth_t*		last;

38
	void*			dll;

39
	int			plugin;

40
	Codexlib_f		lib;

41
	char			tmp[CODEX_NAME];

42


43
	if (!name)

44
		return CODEXERROR->meth;

45
	plugin = 0;

46
	meth = codexstate.first;

47
	while (meth)

48
	{

49
		if (!codexcmp(name, meth->name))

50
			return meth;

51
		last = meth;

52
		if (!(meth = meth->next) && !plugin)

53
		{

54
			plugin = 1;

55
			for (s = name, t = 0; *s && *s != '+'; s++)

56
				if (*s == '-')

57
				{

58
					if (t)

59
						break;

60
					t = s;

61
				}

62
			do

63
			{

64
				sfsprintf(tmp, sizeof(tmp), "%-.*s", s - name, name);

65
				if (dll = dllplug("codex", tmp, NiL, RTLD_LAZY, NiL, 0))

66
				{

67
					if ((lib = (Codexlib_f)dlllook(dll, "codex_lib")) && (meth = (*lib)(name)))

68
						last->next = meth;

69
					break;

70
				}

71
			} while (s != t && (s = t));

72
		}

73
	}

74
	return meth;

75
}

76


77