--- parser3/src/include/pa_common.h 2001/03/12 13:13:20 1.7 +++ parser3/src/include/pa_common.h 2003/02/14 17:38:28 1.89.2.13 @@ -1,28 +1,241 @@ -/* - Parser - Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) - Author: Alexander Petrosyan (http://design.ru/paf) +/** @file + Parser: commonly used functions. - $Id: pa_common.h,v 1.7 2001/03/12 13:13:20 paf Exp $ + Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com) + Author: Alexandr Petrosian (http://paf.design.ru) */ #ifndef PA_COMMON_H #define PA_COMMON_H -#include -#include "pa_pool.h" +static const char* IDENT_COMMON_H="$Date: 2003/02/14 17:38:28 $"; -#ifdef WIN32 +#include "pa_pool.h" +#include "pa_string.h" +#include "pa_hash.h" +#include "pa_value.h" + +typedef Hash HashStringValue; + +// replace system s*nprintf with our versions +#undef vsnprintf +int __vsnprintf(char *, size_t, const char* , va_list); #define vsnprintf __vsnprintf +#undef snprintf +int __snprintf(char *, size_t, const char* , ...); #define snprintf __snprintf -int __vsnprintf(char *, size_t, const char *, va_list); -int __snprintf(char *, size_t, const char *, ...); +#if _MSC_VER +/* +inline int open( const char* filename, int oflag ) { return _open(filename, oflag); } +inline int close( int handle ) { return _close(handle); } +inline int read( int handle, void *buffer, unsigned int count ) { return _read(handle,buffer,count); } +inline int write( int handle, const void *buffer, unsigned int count ) { return _write(handle,buffer,count); } +inline int stat( const char* path, struct _stat *buffer ) { return _stat(path, buffer); } +inline long lseek( int handle, long offset, int origin ) { return _lseek(handle, offset, origin); } +*/ + +//access +#define F_OK 0 +#define X_OK 1 +#define W_OK 2 +#define R_OK 4 + +#ifndef strcasecmp +# define strcasecmp _stricmp +#endif +#ifndef strncasecmp +# define strncasecmp _strnicmp +#endif +#ifndef mkdir +# define mkdir(path, mode) _mkdir(path) +#endif + +#ifndef putenv +# define putenv _putenv #endif -char *file_read(Pool& pool, const char *fname, bool fail_on_read_problem); +#endif + +#ifdef HAVE_TRUNC +# ifndef trunc +extern "C" double trunc(double); +# endif +#else +inline double trunc(double param) { return param > 0? floor(param) : ceil(param); } +#endif + +#ifdef HAVE_ROUND +# ifndef round +extern "C" double round(double); +# endif +#else +inline double round(double param) { return floor(param+0.5); } +#endif +#ifdef HAVE_SIGN +# ifndef sign +extern "C" double sign(double); +# endif +#else +inline double sign(double param) { return param > 0 ? 1 : ( param < 0 ? -1 : 0 ); } +#endif + +/// yields to OS for secs secs and usecs milliseconds +int pa_sleep(unsigned long secs, unsigned long usecs); + +/** under WIN32 "t" mode fixes DOS chars OK, + can't say that about other systems/ line break styles +*/ +void fix_line_breaks( + char *buf, + size_t& size ///< may change! used to speedup next actions + ); + +typedef void (*File_read_action)(Pool& pool, + struct stat& finfo, + int f, + StringPtr file_spec, const char* fname, bool as_text, + void *context); + +/** + shared-lock specified file, + do actions under lock. + if fail_on_read_problem is true[default] throws an exception + + @returns true if read OK +*/ +bool file_read_action_under_lock(Pool& pool, StringPtr file_spec, + const char* action_name, File_read_action action, void *context, + bool as_text=false, + bool fail_on_read_problem=true); +/** + read specified text file using pool, + if fail_on_read_problem is true[default] throws an exception + + WARNING: charset is used for http header case conversion, it's not a charset of input file! + + @returns true if read OK +*/ +char *file_read_text(Pool& pool, Charset& charset, + StringPtr file_spec, + bool fail_on_read_problem=true, + HashStringValue* options=0/*, HashStringValuePtr* out_fields=0*/); + +struct File_read_result { + bool success; + char* data; size_t size; + HashStringValuePtr headers; +}; + +/** + read specified file using pool, + if fail_on_read_problem is true[default] throws an exception + + WARNING: charset is used for http header case conversion, it's not a charset of input file! + + @returns true if read OK +*/ +File_read_result file_read(Pool& pool, Charset& charset, + StringPtr file_spec, + bool as_text, + HashStringValue* options=0, + bool fail_on_read_problem=true); + +typedef void (*File_write_action)(int f, void *context); + +/** + lock specified file exclusively, + do actions under lock. + throws an exception in case of problems + + if block=false does non-blocking lock + @returns true if locked OK, or false if non-blocking locking failed +*/ +bool file_write_action_under_lock( + StringPtr file_spec, + const char* action_name, File_write_action action, void *context, + bool as_text=false, + bool do_append=false, + bool do_block=true, + bool fail_on_lock_problem=true); + +/** + write data to specified file, + throws an exception in case of problems +*/ +void file_write( + StringPtr file_spec, + const char* data, size_t size, + bool as_text, + bool do_append=false); + +/** + delete specified file + throws an exception in case of problems +*/ +bool file_delete(StringPtr file_spec, bool fail_on_read_problem=true); +/** + move specified file + throws an exception in case of problems +*/ +void file_move(StringPtr old_spec, StringPtr new_spec); + +bool entry_exists(const char* fname, struct stat *afinfo=0); +bool entry_exists(StringPtr file_spec); +bool file_readable(StringPtr file_spec); +bool dir_readable(StringPtr file_spec); +StringPtr file_readable(String& path, String& name); +bool file_executable(StringPtr file_spec); + +bool file_stat(StringPtr file_spec, + size_t& rsize, + time_t& ratime, + time_t& rmtime, + time_t& rctime, + bool fail_on_read_problem=true); + +/** + scans for @a delim[default \n] in @a *row_ref, + @return piece of line before it or end of string, if no @a delim found + assigns @a *row_ref to point right after delimiter if there were one + or to zero if no @a delim were found. +*/ char *getrow(char **row_ref,char delim='\n'); -//char *lsplit(char *,char); +char *lsplit(char *string, char delim); char *lsplit(char **string_ref,char delim); +char *rsplit(char *string, char delim); +const char* format(Pool& pool, double value, char *fmt); + +#ifndef max +inline int max(int a, int b) { return a>b?a:b; } +inline int min(int a, int b){ return ab?a:b; } +inline size_t min(size_t a, size_t b){ return a