115 lines
3.4 KiB
C++
115 lines
3.4 KiB
C++
/*
|
|
* 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 <stdio.h>
|
|
#include <time.h>
|
|
#include <errno.h>
|
|
#include <ctype.h>
|
|
#include <math.h>
|
|
#ifndef USE_STDLIB_H
|
|
#include <malloc.h>
|
|
#endif
|
|
#include <fcntl.h>
|
|
#ifdef AIX
|
|
#include <sys/mode.h>
|
|
#endif /* AIX */
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#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);
|
|
}
|