DBD-cubrid
view release on metacpan or search on metacpan
cci-src/build.sh view on Meta::CPAN
sh_profile=$HOME/.profile
fi
;;
*/sh | */ksh | */ash | */bsh )
sh_profile=$HOME/.profile
;;
esac
case $SHELL in
*/csh | */tcsh )
echo "setenv CUBRID $target_dir" > $XDBMS_ENV_FILE1
echo "setenv CUBRID_DATABASES $target_dir/databases" >> $XDBMS_ENV_FILE1
echo 'if (${?LD_LIBRARY_PATH}) then' >> $XDBMS_ENV_FILE1
echo 'setenv LD_LIBRARY_PATH $CUBRID/lib:${LD_LIBRARY_PATH}' >> $XDBMS_ENV_FILE1
echo 'else' >> $XDBMS_ENV_FILE1
echo 'setenv LD_LIBRARY_PATH $CUBRID/lib' >> $XDBMS_ENV_FILE1
echo 'endif' >> $XDBMS_ENV_FILE1
echo 'setenv SHLIB_PATH $LD_LIBRARY_PATH' >> $XDBMS_ENV_FILE1
echo 'setenv LIBPATH $LD_LIBRARY_PATH' >> $XDBMS_ENV_FILE1
echo 'set path=($CUBRID/{bin,cubridmanager} $path)' >> $XDBMS_ENV_FILE1
;;
esac
#
# make $XDBMS_ENV_FILE2 (.cubrid.sh) to make demodb/subway in this script
#
echo "CUBRID=$target_dir" > $XDBMS_ENV_FILE2
echo "CUBRID_DATABASES=$target_dir/databases" >> $XDBMS_ENV_FILE2
cci-src/src/base/porting.c view on Meta::CPAN
}
password_buffer[pwlen] = '\0';
return password_buffer;
}
#endif /* WINDOWS */
#if defined(WINDOWS)
int
setenv (const char *name, const char *val, int overwrite)
{
errno_t ret;
if (!overwrite)
{
char *ptr = getenv (name);
if (ptr != NULL)
{
return -1;
}
cci-src/src/base/porting.h view on Meta::CPAN
#if defined (AIX) && !defined (DONT_HOOK_MALLOC)
void *aix_malloc (size_t size);
#define malloc(a) aix_malloc(a)
#endif
#if defined (AIX) && !defined (SOL_TCP)
#define SOL_TCP IPPROTO_TCP
#endif
#if defined (WINDOWS)
int setenv (const char *name, const char *value, int overwrite);
int cub_vsnprintf (char *buffer, size_t count, const char *format, va_list argptr);
#endif
#if defined (WINDOWS)
/* The following structure is used to generate uniformly distributed
* pseudo-random numbers reentrantly.
*/
struct drand48_data
{
unsigned short _rand48_seed[3];
( run in 0.459 second using v1.01-cache-2.11-cpan-3989ada0592 )