|
|
| version 1.48.2.1, 2003/01/27 17:17:06 | version 1.48.2.18.2.1, 2003/03/18 15:14:18 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: program executing for different OS-es. | Parser: program executing for different OS-es. |
| Copyright(c) 2000,2001, 2003 ArtLebedev Group(http://www.artlebedev.com) | Copyright(c) 2000,2001-2003 ArtLebedev Group(http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) |
| @todo setrlimit | @todo setrlimit |
| Line 111 error: | Line 111 error: |
| return result; | return result; |
| } | } |
| static void read_pipe(String& result, HANDLE hOutRead, const char *file_spec, | static const String& read_pipeHANDLE hOutRead, const char* file_spec, |
| String::Untaint_lang lang){ | String::Untaint_lang lang){ |
| const String& result(new String); | |
| while(true) { | while(true) { |
| char *buf=(char *)result.pool().malloc(MAX_STRING); | char *buf=new char[MAX_STRING]; |
| unsigned long size; | unsigned long size; |
| if(!ReadFile(hOutRead, buf, MAX_STRING, &size, NULL) || !size) | if(!ReadFile(hOutRead, buf, MAX_STRING, &size, NULL) || !size) |
| break; | break; |
| result.APPEND(buf, size, lang, file_spec, 0); | result->APPEND(buf, size, lang, file_spec, 0); |
| } | } |
| return result; | |
| } | } |
| static const char* buildCommand(const char* file_spec_cstr, const ArrayString& argv) { | |
| static const char *buildCommand(Pool& pool, | const char* result=file_spec_cstr; |
| const String& origin_string, | |
| const char *file_spec_cstr, const Array *argv) { | |
| const char *result=file_spec_cstr; | |
| if(FILE *f=fopen(file_spec_cstr, "r")) { | if(FILE *f=fopen(file_spec_cstr, "r")) { |
| try { | |
| char buf[MAX_STRING]; | char buf[MAX_STRING]; |
| size_t size=fread(buf, 1, MAX_STRING-1, f); | size_t size=fread(buf, 1, MAX_STRING-1, f); |
| if(size>2) { | if(size>2) { |
| buf[size]=0; | buf[size]=0; |
| if(strncmp(buf, "#!", 2)==0) { | if(strncmp(buf, "#!", 2)==0) { |
| const char *begin=buf+2; | const char* begin=buf+2; |
| if(*begin==' ') // alx: were an old magic for some linux-es | if(*begin==' ') // alx: were an old magic for some linux-es |
| begin++; | begin++; |
| if(char *end=strchr(begin, '\n')) { | if(char *end=strchr(begin, '\n')) { |
| String string(pool); | String string(begin, end-begin); |
| string.APPEND_AS_IS(begin, end-begin, | |
| origin_string.origin().file, 0); | |
| string << " " << file_spec_cstr; | string << " " << file_spec_cstr; |
| result=string.cstr(); | result=string.cstr(); |
| } | } |
| } | } |
| } | } |
| } catch(...) { | |
| fclose(f); | |
| rethrow; | |
| } | |
| fclose(f); | fclose(f); |
| } | } |
| if(argv) { | { // appending argv |
| String buf(pool); | String string(result); |
| buf << result; | for(int i=0; i<argv.count(); i++) { |
| for(int i=0; i<argv->size(); i++) { | string << " "; |
| buf << " "; | string << *argv[i]; |
| buf << argv->get(i); | |
| } | } |
| result=buf.cstr(); | result=string.cstr(); |
| } | } |
| return result; | return result; |
| Line 163 static const char *buildCommand(Pool& po | Line 164 static const char *buildCommand(Pool& po |
| #else | #else |
| static pid_t execve_piped(const char *file_spec_cstr, | static pid_t execve_piped(const char* file_spec_cstr, |
| char * const argv[], char * const env[], | char * const argv[], char * const env[], |
| int *pipe_in, int *pipe_out, int *pipe_err) { | int *pipe_in, int *pipe_out, int *pipe_err) { |
| pid_t pid; | pid_t pid; |
| Line 278 static int get_exit_status(int pid) { | Line 279 static int get_exit_status(int pid) { |
| WEXITSTATUS(status) : -2; | WEXITSTATUS(status) : -2; |
| } | } |
| static void read_pipe(String& result, int file, const char *file_spec, String::Untaint_lang lang){ | static const String& read_pipeint file, const char* file_spec, String::Untaint_lang lang){ |
| const String& result(new String); | |
| while(true) { | while(true) { |
| char *buf=(char *)result.pool().malloc(MAX_STRING); | char *buf=new char[MAX_STRING]; |
| ssize_t size=read(file, buf, MAX_STRING); | ssize_t size=read(file, buf, MAX_STRING); |
| if(size<=0) | if(size<=0) |
| break; | break; |
| result.APPEND(buf, size, lang, file_spec, 0); | result->APPEND(buf, size, lang, file_spec, 0); |
| } | } |
| return result; | |
| } | } |
| #endif | #endif |
| #ifndef DOXYGEN | |
| struct Append_env_pair_info { | |
| #ifdef WIN32 | |
| String* string; | |
| #else | |
| ; | |
| char **env_ref; | |
| #endif | |
| }; | |
| #endif | |
| ///@test maybe here and at argv construction --- cstr(String::UL_UNSPECIFIED | ///@test maybe here and at argv construction --- cstr(String::UL_UNSPECIFIED |
| static void append_env_pair(const Hash::Key& key, Hash::Val *value, void *info) { | static void append_env_pair(HashStringString::key_type key, HashStringString::value_type value, |
| Append_env_pair_info *info) { | |
| #ifdef WIN32 | #ifdef WIN32 |
| String& string=*static_cast<String *>(info); | *info->string << key << "=" << value; |
| info->string->APPEND_AS_IS("", 1, 0, 0); // zero byte | |
| string << key << "=" << value; | |
| string.APPEND_AS_IS("", 1, 0, 0); // zero byte | |
| #else | #else |
| String string(key.pool()); | String string; |
| string << key << "=" << value; | string << key << "=" << value; |
| char ***env_ref=static_cast<char ***>(info); | *(info->env_ref++)=string.cstr(*info->pool, String::UL_UNSPECIFIED); |
| **env_ref=string.cstr(String::UL_UNSPECIFIED); (*env_ref)++; | |
| #endif | #endif |
| } | } |
| int pa_exec( | /// @todonow unix part to smart_ptr |
| bool forced_allow, | PA_exec_result pa_exec( |
| bool forced_allow, | |
| const String& file_spec, | const String& file_spec, |
| const Hash *env, | const HashStringString* env, |
| const Array *argv, | const ArrayString& argv, |
| const String& in, String& out, String& err) { | String& in) { |
| Pool& pool=file_spec.pool(); | PA_exec_result result; |
| #ifdef NO_PA_EXECS | #ifdef NO_PA_EXECS |
| if(!forced_allow) | if(!forced_allow) |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| &file_spec, | file_spec, |
| "parser execs are disabled [recompile parser without --disable-execs configure option]"); | "parser execs are disabled [recompile parser without --disable-execs configure option]"); |
| #endif | #endif |
| char* file_spec_cstr=file_spec->cstr(pool, String::UL_FILE_SPEC); | |
| #ifdef WIN32 | #ifdef WIN32 |
| PROCESS_INFORMATION pi; | PROCESS_INFORMATION pi; |
| HANDLE hInWrite, hOutRead, hErrRead; | HANDLE hInWrite, hOutRead, hErrRead; |
| char *file_spec_cstr=file_spec.cstr(String::UL_FILE_SPEC); | const char* cmd=buildCommand(file_spec->cstr(String::UL_FILE_SPEC), argv); |
| const char *cmd=buildCommand(file_spec.pool(), file_spec, file_spec_cstr, argv); | const char* env_cstr; |
| char *env_cstr=0; | |
| if(env) { | if(env) { |
| String string(env->pool()); | String string; |
| env->for_each(append_env_pair, &string); | Append_env_pair_info info={&string}; |
| env_cstr=string.cstr(String::UL_UNSPECIFIED); | env->for_each(append_env_pair, &info); |
| env_cstr=info.string->cstr(String::UL_UNSPECIFIED); | |
| } | } |
| if(DWORD error=CreateHiddenConsoleProcess(cmd, env_cstr, &pi, &hInWrite, &hOutRead, &hErrRead)) { | if(DWORD error=CreateHiddenConsoleProcess(cmd, env_cstr, &pi, &hInWrite, &hOutRead, &hErrRead)) { |
| char szErrorDesc[MAX_STRING]; | char szErrorDesc[MAX_STRING]; |
| char *param="the file you tried to run"; | const char *param="the file you tried to run"; |
| size_t error_size=FormatMessage( | size_t error_size=FormatMessage( |
| FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_ARGUMENT_ARRAY , NULL, error, | FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_ARGUMENT_ARRAY , NULL, error, |
| MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), | MAKELANGID(LANG_NEUTRAL, SUBLANG_NEUTRAL), |
| szErrorDesc, sizeof(szErrorDesc), ¶m); | szErrorDesc, sizeof(szErrorDesc), (va_list *)¶m); |
| if(error_size>3) // ".\r\n" | if(error_size>3) // ".\r\n" |
| szErrorDesc[error_size-3]=0; | szErrorDesc[error_size-3]=0; |
| throw Exception(0, | throw Exception(0, |
| &file_spec, | file_spec, |
| "exec failed - %s (%ld). Consider adding shbang line (#!x:\\interpreter\\command line)", | "exec failed - %s (%ld). Consider adding shbang line (#!x:\\interpreter\\command line)", |
| error_size?szErrorDesc:"<unknown>", (long)error); | error_size?szErrorDesc:"<unknown>", (long)error); |
| } else { | } else { |
| const char *in_cstr=in.cstr(); | const char* in_cstr=in.cstr(); |
| DWORD written_size; | DWORD written_size; |
| WriteFile(hInWrite, in_cstr, in.size(), &written_size, NULL); | WriteFile(hInWrite, in_cstr, in.size(), &written_size, NULL); |
| // EOF for stupid text reads | // EOF for stupid text reads |
| Line 356 int pa_exec( | Line 369 int pa_exec( |
| // without this char | // without this char |
| WriteFile(hInWrite, "\x1A", 1, &written_size, NULL); | WriteFile(hInWrite, "\x1A", 1, &written_size, NULL); |
| CloseHandle(hInWrite); | CloseHandle(hInWrite); |
| read_pipe(out, hOutRead, file_spec_cstr, String::UL_AS_IS); | result.out=read_pipe(pool, hOutRead, file_spec_cstr, String::UL_AS_IS); |
| CloseHandle(hOutRead); | CloseHandle(hOutRead); |
| read_pipe(err, hErrRead, file_spec_cstr, String::UL_TAINTED); | result.err=read_pipe(pool, hErrRead, file_spec_cstr, String::UL_TAINTED); |
| CloseHandle(hErrRead); | CloseHandle(hErrRead); |
| /* | /* |
| from http://www.apache.org/websrc/cvsweb.cgi/apache-1.3/src/main/util_script.c?rev=1.151&content-type=text/vnd.viewcvs-markup | from http://www.apache.org/websrc/cvsweb.cgi/apache-1.3/src/main/util_script.c?rev=1.151&content-type=text/vnd.viewcvs-markup |
| Line 373 from http://www.apache.org/websrc/cvsweb | Line 386 from http://www.apache.org/websrc/cvsweb |
| #else | #else |
| int pipe_write, pipe_read, pipe_err; | int pipe_write, pipe_read, pipe_err; |
| char *file_spec_cstr=file_spec.cstr(String::UL_FILE_SPEC); | |
| #ifdef PA_SAFE_MODE | #ifdef PA_SAFE_MODE |
| if(!forced_allow) { | if(!forced_allow) { |
| struct stat finfo; | struct stat finfo; |
| if(stat(file_spec_cstr, &finfo)!=0) | if(stat(file_spec_cstr, &finfo)!=0) |
| throw Exception("file.missing", | throw Exception("file.missing", |
| &file_spec, | file_spec, |
| "stat failed: %s (%d), actual filename '%s'", | "stat failed: %s (%d), actual filename '%s'", |
| strerror(errno), errno, file_spec_cstr); | strerror(errno), errno, file_spec_cstr); |
| if(finfo.st_uid/*foreign?*/!=geteuid() | if(finfo.st_uid/*foreign?*/!=geteuid() |
| && finfo.st_gid/*foreign?*/!=getegid()) | && finfo.st_gid/*foreign?*/!=getegid()) |
| throw Exception("parser.runtime", | throw Exception("parser.runtime", |
| &file_spec, | file_spec, |
| "parser is in safe mode: executing files of foreign group and user disabled [recompile parser with --disable-safe-mode configure option], actual filename '%s'", | "parser is in safe mode: executing files of foreign group and user disabled [recompile parser with --disable-safe-mode configure option], actual filename '%s'", |
| file_spec_cstr); | file_spec_cstr); |
| } | } |
| #endif | #endif |
| char *argv_cstrs[1+10+1]={file_spec_cstr, 0}; | char * argv_cstrs[1+10+1]={file_spec_cstr, 0}; |
| if(argv) { | const int argv_size=argv.count(); |
| const int argv_size=argv->size(); | const int argv_max=sizeof(argv_cstrs)/sizeof(argv_cstrs[0])-1-1; |
| const int argv_max=sizeof(argv_cstrs)/sizeof(argv_cstrs[0])-1-1; | if(argv_size>argv_max) |
| if(argv_size>argv_max) | throw Exception("parser.runtime", |
| throw Exception("parser.runtime", | file_spec, |
| &file_spec, | "too many arguments (%d > max %d)", argv_size, argv_max); |
| "too many arguments (%d > max %d)", argv_size, argv_max); | for(int i=0; i<argv_size; i++) |
| for(int i=0; i<argv_size; i++) | argv_cstrs[1+i]=argv[i]->cstr(); |
| argv_cstrs[1+i]=argv->get_string(i)->cstr(); | argv_cstrs[1+argv_size]=0; |
| argv_cstrs[1+argv_size]=0; | |
| } | char **env_cstrs; |
| char **env_cstrs=0; | |
| if(env) { | if(env) { |
| env_cstrs= | env_cstrs=new char *[env->count()+1/*0*/]; |
| (char **)env->pool().malloc(sizeof(char *)*(env->size()+1/*0*/)); | Append_env_pair_info info={&pool, env_cstrs}; |
| char **env_ref=env_cstrs; | env->for_each(append_env_pair, &info); |
| env->for_each(append_env_pair, &env_ref); | *info.env_ref=0; |
| *env_ref=0; | } else |
| } | env_cstrs=0; |
| pid_t pid=execve_piped( | pid_t pid=execve_piped( |
| file_spec_cstr, | file_spec_cstr, |
| Line 420 from http://www.apache.org/websrc/cvsweb | Line 431 from http://www.apache.org/websrc/cvsweb |
| &pipe_write, &pipe_read, &pipe_err); | &pipe_write, &pipe_read, &pipe_err); |
| if(pid>0) { | if(pid>0) { |
| // in child | // in child |
| const char *in_cstr=in.cstr(); | if(in.size()) {// there is some in data |
| if(*in_cstr) // there is some in data | const char* in_cstr=in.cstr(); |
| write(pipe_write, in_cstr, in.size()); | write(pipe_write, in_cstr, in.size()); |
| } | |
| close(pipe_write); | close(pipe_write); |
| read_pipe(out, pipe_read, file_spec_cstr, String::UL_AS_IS); | result.out=read_pipe(pool, pipe_read, file_spec_cstr, String::UL_AS_IS); |
| close(pipe_read); | close(pipe_read); |
| read_pipe(err, pipe_err, file_spec_cstr, String::UL_TAINTED); | result.err=read_pipe(pool, pipe_err, file_spec_cstr, String::UL_TAINTED); |
| close(pipe_err); | close(pipe_err); |
| return get_exit_status(pid); // negative may mean "-errno[execl()]" | result.status=get_exit_status(pid); // negative may mean "-errno[execl()]" |
| } else | } else |
| throw Exception(0, | throw Exception(0, |
| &file_spec, | file_spec, |
| "%s error: %s (%d)", pid<0?"fork":"pipe", strerror(errno), errno); | "%s error: %s (%d)", pid<0?"fork":"pipe", strerror(errno), errno); |
| #endif | #endif |
| return 0; | return result; |
| } | } |