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