/* * Legal Notice * * This document and associated source code (the "Work") is a part of a * benchmark specification maintained by the TPC. * * The TPC reserves all right, title, and interest to the Work as provided * under U.S. and international laws, including without limitation all patent * and trademark rights therein. * * No Warranty * * 1.1 TO THE MAXIMUM EXTENT PERMITTED BY APPLICABLE LAW, THE INFORMATION * CONTAINED HEREIN IS PROVIDED "AS IS" AND WITH ALL FAULTS, AND THE * AUTHORS AND DEVELOPERS OF THE WORK HEREBY DISCLAIM ALL OTHER * WARRANTIES AND CONDITIONS, EITHER EXPRESS, IMPLIED OR STATUTORY, * INCLUDING, BUT NOT LIMITED TO, ANY (IF ANY) IMPLIED WARRANTIES, * DUTIES OR CONDITIONS OF MERCHANTABILITY, OF FITNESS FOR A PARTICULAR * PURPOSE, OF ACCURACY OR COMPLETENESS OF RESPONSES, OF RESULTS, OF * WORKMANLIKE EFFORT, OF LACK OF VIRUSES, AND OF LACK OF NEGLIGENCE. * ALSO, THERE IS NO WARRANTY OR CONDITION OF TITLE, QUIET ENJOYMENT, * QUIET POSSESSION, CORRESPONDENCE TO DESCRIPTION OR NON-INFRINGEMENT * WITH REGARD TO THE WORK. * 1.2 IN NO EVENT WILL ANY AUTHOR OR DEVELOPER OF THE WORK BE LIABLE TO * ANY OTHER PARTY FOR ANY DAMAGES, INCLUDING BUT NOT LIMITED TO THE * COST OF PROCURING SUBSTITUTE GOODS OR SERVICES, LOST PROFITS, LOSS * OF USE, LOSS OF DATA, OR ANY INCIDENTAL, CONSEQUENTIAL, DIRECT, * INDIRECT, OR SPECIAL DAMAGES WHETHER UNDER CONTRACT, TORT, WARRANTY, * OR OTHERWISE, ARISING IN ANY WAY OUT OF THIS OR ANY OTHER AGREEMENT * RELATING TO THE WORK, WHETHER OR NOT SUCH AUTHOR OR DEVELOPER HAD * ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. * * Contributors: * Gradient Systems */ #include "config.h" #include "porting.h" #include #include #include #include #include #ifndef USE_STDLIB_H #include #endif #include #ifdef AIX #include #endif /* AIX */ #include #include #include "date.h" #include "decimal.h" #include "dist.h" #include "misc.h" #include "tdefs.h" #include "r_params.h" #include "genrand.h" static char alpha_num[65] = "0123456789abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ,"; char *getenv(const char *name); int print_separator(int sep); extern long Seed[]; #ifdef _WIN32 #define PATH_SEP '\\' #else #define PATH_SEP '/' #endif int file_num = -1; /* * * Various routines that handle distributions, value selections and * seed value management for the DSS benchmark. Current functions: * env_config -- set config vars with optional environment override * a_rnd(min, max) -- random alphanumeric within length range */ /* * env_config: look for a environmental variable setting and return its * value; otherwise return the default supplied */ char *env_config(char *var, char *dflt) { static char *evar; if ((evar = getenv(var)) != NULL) return (evar); else return (dflt); } /* * generate a random string with length randomly selected in [min, max] * and using the characters in alphanum (currently includes a space * and comma) */ int a_rnd(int min, int max, int column, char *dest) { int i, len, char_int; genrand_integer(&len, DIST_UNIFORM, min, max, 0, column); for (i = 0; i < len; i++) { if (i % 5 == 0) genrand_integer(&char_int, DIST_UNIFORM, 0, 1 << 30, 0, column); *(dest + i) = alpha_num[char_int & 077]; char_int >>= 6; } *(dest + len) = '\0'; return (len); }