1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin * *
3da2e3ebdSchin * This software is part of the ast package *
4*3e14f97fSRoger A. Faulkner * Copyright (c) 1992-2010 AT&T Intellectual Property *
5da2e3ebdSchin * and is licensed under the *
6da2e3ebdSchin * Common Public License, Version 1.0 *
77c2fbfb3SApril Chin * by AT&T Intellectual Property *
8da2e3ebdSchin * *
9da2e3ebdSchin * A copy of the License is available at *
10da2e3ebdSchin * http://www.opensource.org/licenses/cpl1.0.txt *
11da2e3ebdSchin * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
12da2e3ebdSchin * *
13da2e3ebdSchin * Information and Software Systems Research *
14da2e3ebdSchin * AT&T Research *
15da2e3ebdSchin * Florham Park NJ *
16da2e3ebdSchin * *
17da2e3ebdSchin * Glenn Fowler <gsf@research.att.com> *
18da2e3ebdSchin * David Korn <dgk@research.att.com> *
19da2e3ebdSchin * *
20da2e3ebdSchin ***********************************************************************/
21da2e3ebdSchin #pragma prototyped
22da2e3ebdSchin /*
23da2e3ebdSchin * AT&T Research
24da2e3ebdSchin *
25da2e3ebdSchin * builtin cmd definitions
26da2e3ebdSchin */
27da2e3ebdSchin
28da2e3ebdSchin #ifndef _CMD_H
29da2e3ebdSchin #define _CMD_H
30da2e3ebdSchin
31da2e3ebdSchin #include <ast.h>
32da2e3ebdSchin #include <error.h>
33da2e3ebdSchin #include <stak.h>
347c2fbfb3SApril Chin #include <shcmd.h>
35da2e3ebdSchin
36da2e3ebdSchin #define cmdinit _cmd_init
37da2e3ebdSchin
3834f9b3eeSRoland Mainz #define ERROR_CALLBACK ERROR_SET
3934f9b3eeSRoland Mainz
40da2e3ebdSchin #if _BLD_cmd && defined(__EXPORT__)
41da2e3ebdSchin #define extern __EXPORT__
42da2e3ebdSchin #endif
43da2e3ebdSchin
44da2e3ebdSchin #include <cmdext.h>
45da2e3ebdSchin
46da2e3ebdSchin #undef extern
47da2e3ebdSchin
48da2e3ebdSchin #if defined(CMD_BUILTIN) && !defined(CMD_STANDALONE)
49da2e3ebdSchin #define CMD_STANDALONE CMD_BUILTIN
50da2e3ebdSchin #endif
51da2e3ebdSchin
52da2e3ebdSchin #ifdef CMD_STANDALONE
53da2e3ebdSchin
547c2fbfb3SApril Chin #define CMD_CONTEXT(c) ((Shbltin_t*)0)
557c2fbfb3SApril Chin
56da2e3ebdSchin #if CMD_DYNAMIC
57da2e3ebdSchin
58da2e3ebdSchin #include <dlldefs.h>
59da2e3ebdSchin
60da2e3ebdSchin #else
61da2e3ebdSchin
62da2e3ebdSchin extern int CMD_STANDALONE(int, char**, void*);
63da2e3ebdSchin
64da2e3ebdSchin #endif
65da2e3ebdSchin
66da2e3ebdSchin #ifndef CMD_BUILTIN
67da2e3ebdSchin
68da2e3ebdSchin /*
69da2e3ebdSchin * command initialization
70da2e3ebdSchin */
71da2e3ebdSchin
72da2e3ebdSchin static int
cmdinit(int argc,register char ** argv,void * context,const char * catalog,int flags)73da2e3ebdSchin cmdinit(int argc, register char** argv, void* context, const char* catalog, int flags)
74da2e3ebdSchin {
75da2e3ebdSchin register char* cp;
76da2e3ebdSchin register char* pp;
77da2e3ebdSchin
78da2e3ebdSchin if (cp = strrchr(argv[0], '/'))
79da2e3ebdSchin cp++;
80da2e3ebdSchin else
81da2e3ebdSchin cp = argv[0];
82da2e3ebdSchin if (pp = strrchr(cp, '_'))
83da2e3ebdSchin cp = pp + 1;
84da2e3ebdSchin error_info.id = cp;
85da2e3ebdSchin if (!error_info.catalog)
86da2e3ebdSchin error_info.catalog = (char*)catalog;
87da2e3ebdSchin opt_info.index = 0;
88da2e3ebdSchin if (context)
8934f9b3eeSRoland Mainz error_info.flags |= flags & ~(ERROR_CALLBACK|ERROR_NOTIFY);
90da2e3ebdSchin return 0;
91da2e3ebdSchin }
92da2e3ebdSchin
93da2e3ebdSchin #endif
94da2e3ebdSchin
95da2e3ebdSchin int
main(int argc,char ** argv)96da2e3ebdSchin main(int argc, char** argv)
97da2e3ebdSchin {
98da2e3ebdSchin #if CMD_DYNAMIC
99da2e3ebdSchin register char* s;
100da2e3ebdSchin register char* t;
101da2e3ebdSchin void* dll;
1027c2fbfb3SApril Chin Shbltin_f fun;
103da2e3ebdSchin char buf[64];
104da2e3ebdSchin
105da2e3ebdSchin if (s = strrchr(argv[0], '/'))
106da2e3ebdSchin s++;
107da2e3ebdSchin else if (!(s = argv[0]))
108da2e3ebdSchin return 127;
109da2e3ebdSchin if ((t = strrchr(s, '_')) && *++t)
110da2e3ebdSchin s = t;
111da2e3ebdSchin buf[0] = '_';
112da2e3ebdSchin buf[1] = 'b';
113da2e3ebdSchin buf[2] = '_';
114da2e3ebdSchin strncpy(buf + 3, s, sizeof(buf) - 4);
115da2e3ebdSchin buf[sizeof(buf) - 1] = 0;
116da2e3ebdSchin if (t = strchr(buf, '.'))
117da2e3ebdSchin *t = 0;
118da2e3ebdSchin for (;;)
119da2e3ebdSchin {
120da2e3ebdSchin if (dll = dlopen(NiL, RTLD_LAZY))
121da2e3ebdSchin {
1227c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf + 1))
123da2e3ebdSchin break;
1247c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf))
125da2e3ebdSchin break;
126da2e3ebdSchin }
127*3e14f97fSRoger A. Faulkner if (dll = dllplug(NiL, "cmd", NiL, RTLD_LAZY, NiL, 0))
128da2e3ebdSchin {
1297c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf + 1))
130da2e3ebdSchin break;
1317c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf))
132da2e3ebdSchin break;
133da2e3ebdSchin }
134da2e3ebdSchin return 127;
135da2e3ebdSchin }
136da2e3ebdSchin return (*fun)(argc, argv, NiL);
137da2e3ebdSchin #else
138da2e3ebdSchin return CMD_STANDALONE(argc, argv, NiL);
139da2e3ebdSchin #endif
140da2e3ebdSchin }
141da2e3ebdSchin
142da2e3ebdSchin #else
143da2e3ebdSchin
144da2e3ebdSchin #undef cmdinit
1457c2fbfb3SApril Chin #ifdef _MSC_VER
1467c2fbfb3SApril Chin #define CMD_CONTEXT(p) ((Shbltin_t*)(p))
147da2e3ebdSchin #define cmdinit(a,b,c,d,e) do{if(_cmd_init(a,b,c,d,e))return -1;}while(0)
1487c2fbfb3SApril Chin #else
1497c2fbfb3SApril Chin #define CMD_CONTEXT(p) (((p)&&((Shbltin_t*)(p))->version>=20071012&&((Shbltin_t*)(p))->version<20350101)?((Shbltin_t*)(p)):0)
1507c2fbfb3SApril Chin #define cmdinit(a,b,c,d,e) do{if((c)&&!CMD_CONTEXT(c))c=0;if(_cmd_init(a,b,c,d,e))return -1;}while(0)
151da2e3ebdSchin #endif
152da2e3ebdSchin
153da2e3ebdSchin #if _BLD_cmd && defined(__EXPORT__)
154da2e3ebdSchin #define extern extern __EXPORT__
155da2e3ebdSchin #endif
156da2e3ebdSchin
157da2e3ebdSchin extern int _cmd_init(int, char**, void*, const char*, int);
158da2e3ebdSchin
159da2e3ebdSchin #undef extern
160da2e3ebdSchin
161da2e3ebdSchin #endif
162da2e3ebdSchin
163da2e3ebdSchin #endif
164