1da2e3ebdSchin /*********************************************************************** 2da2e3ebdSchin * * 3da2e3ebdSchin * This software is part of the ast package * 4*7c2fbfb3SApril Chin * Copyright (c) 1992-2008 AT&T Intellectual Property * 5da2e3ebdSchin * and is licensed under the * 6da2e3ebdSchin * Common Public License, Version 1.0 * 7*7c2fbfb3SApril 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> 34*7c2fbfb3SApril Chin #include <shcmd.h> 35da2e3ebdSchin 36da2e3ebdSchin #define cmdinit _cmd_init 37da2e3ebdSchin 38da2e3ebdSchin #if _BLD_cmd && defined(__EXPORT__) 39da2e3ebdSchin #define extern __EXPORT__ 40da2e3ebdSchin #endif 41da2e3ebdSchin 42da2e3ebdSchin #include <cmdext.h> 43da2e3ebdSchin 44da2e3ebdSchin #undef extern 45da2e3ebdSchin 46da2e3ebdSchin #if defined(CMD_BUILTIN) && !defined(CMD_STANDALONE) 47da2e3ebdSchin #define CMD_STANDALONE CMD_BUILTIN 48da2e3ebdSchin #endif 49da2e3ebdSchin 50da2e3ebdSchin #ifdef CMD_STANDALONE 51da2e3ebdSchin 52*7c2fbfb3SApril Chin #define CMD_CONTEXT(c) ((Shbltin_t*)0) 53*7c2fbfb3SApril Chin 54da2e3ebdSchin #if CMD_DYNAMIC 55da2e3ebdSchin 56da2e3ebdSchin #include <dlldefs.h> 57da2e3ebdSchin 58*7c2fbfb3SApril Chin typedef int (*Shbltin_f)(int, char**, void*); 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 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) 89da2e3ebdSchin error_info.flags |= flags; 90da2e3ebdSchin return 0; 91da2e3ebdSchin } 92da2e3ebdSchin 93da2e3ebdSchin #endif 94da2e3ebdSchin 95da2e3ebdSchin int 96da2e3ebdSchin main(int argc, char** argv) 97da2e3ebdSchin { 98da2e3ebdSchin #if CMD_DYNAMIC 99da2e3ebdSchin register char* s; 100da2e3ebdSchin register char* t; 101da2e3ebdSchin void* dll; 102*7c2fbfb3SApril 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 { 122*7c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf + 1)) 123da2e3ebdSchin break; 124*7c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf)) 125da2e3ebdSchin break; 126da2e3ebdSchin } 127da2e3ebdSchin if (dll = dllfind("cmd", NiL, RTLD_LAZY)) 128da2e3ebdSchin { 129*7c2fbfb3SApril Chin if (fun = (Shbltin_f)dlsym(dll, buf + 1)) 130da2e3ebdSchin break; 131*7c2fbfb3SApril 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 145*7c2fbfb3SApril Chin #ifdef _MSC_VER 146*7c2fbfb3SApril 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) 148*7c2fbfb3SApril Chin #else 149*7c2fbfb3SApril Chin #define CMD_CONTEXT(p) (((p)&&((Shbltin_t*)(p))->version>=20071012&&((Shbltin_t*)(p))->version<20350101)?((Shbltin_t*)(p)):0) 150*7c2fbfb3SApril 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