should be it

This commit is contained in:
2025-10-24 19:21:19 -05:00
parent a4b23fc57c
commit f09560c7b1
14047 changed files with 3161551 additions and 1 deletions

View File

@@ -0,0 +1,175 @@
/*
* 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 "w_datetbl.h"
#include "append_info.h"
#include "build_support.h"
#include "columns.h"
#include "config.h"
#include "genrand.h"
#include "nulls.h"
#include "porting.h"
#include "tables.h"
#include "tdefs.h"
#include <stdio.h>
struct W_DATE_TBL g_w_date;
/* extern tdef w_tdefs[]; */
/*
* Routine: mk_datetbl
* Purpose: populate the date dimension
* Algorithm:
* Data Structures:
*
* Params:
* Returns:
* Called By:
* Calls:
* Assumptions:
* Side Effects:
* TODO:
*/
int mk_w_date(void *info_arr, ds_key_t index) {
int res = 0;
/* begin locals declarations */
static date_t base_date;
int day_index, nTemp;
date_t temp_date, dTemp2;
struct W_DATE_TBL *r;
tdef *pT = getSimpleTdefsByNumber(DATET);
r = &g_w_date;
if (!InitConstants::mk_w_date_init) {
r->d_month_seq = 0;
r->d_week_seq = 1;
r->d_quarter_seq = 1;
r->d_current_month = 0;
r->d_current_quarter = 0;
r->d_current_week = 0;
strtodt(&base_date, "1900-01-01");
/* Make exceptions to the 1-rng-call-per-row rule */
InitConstants::mk_w_date_init = 1;
}
nullSet(&pT->kNullBitMap, D_NULLS);
nTemp = (long)index + base_date.julian;
r->d_date_sk = nTemp;
mk_bkey(&r->d_date_id[0], nTemp, D_DATE_ID);
jtodt(&temp_date, nTemp);
r->d_year = temp_date.year;
r->d_dow = set_dow(&temp_date);
r->d_moy = temp_date.month;
r->d_dom = temp_date.day;
/* set the sequence counts; assumes that the date table starts on a year
* boundary */
r->d_week_seq = ((int)index + 6) / 7;
r->d_month_seq = (r->d_year - 1900) * 12 + r->d_moy - 1;
r->d_quarter_seq = (r->d_year - 1900) * 4 + r->d_moy / 3 + 1;
day_index = day_number(&temp_date);
dist_member(&r->d_qoy, "calendar", day_index, 6);
/* fiscal year is identical to calendar year */
r->d_fy_year = r->d_year;
r->d_fy_quarter_seq = r->d_quarter_seq;
r->d_fy_week_seq = r->d_week_seq;
r->d_day_name = weekday_names[r->d_dow + 1];
dist_member(&r->d_holiday, "calendar", day_index, 8);
if ((r->d_dow == 5) || (r->d_dow == 6))
r->d_weekend = 1;
else
r->d_weekend = 0;
if (day_index == 1)
dist_member(&r->d_following_holiday, "calendar", 365 + is_leap(r->d_year - 1), 8);
else
dist_member(&r->d_following_holiday, "calendar", day_index - 1, 8);
date_t_op(&dTemp2, OP_FIRST_DOM, &temp_date, 0);
r->d_first_dom = dTemp2.julian;
date_t_op(&dTemp2, OP_LAST_DOM, &temp_date, 0);
r->d_last_dom = dTemp2.julian;
date_t_op(&dTemp2, OP_SAME_LY, &temp_date, 0);
r->d_same_day_ly = dTemp2.julian;
date_t_op(&dTemp2, OP_SAME_LQ, &temp_date, 0);
r->d_same_day_lq = dTemp2.julian;
r->d_current_day = (r->d_date_sk == CURRENT_DAY) ? 1 : 0;
r->d_current_year = (r->d_year == CURRENT_YEAR) ? 1 : 0;
if (r->d_current_year) {
r->d_current_month = (r->d_moy == CURRENT_MONTH) ? 1 : 0;
r->d_current_quarter = (r->d_qoy == CURRENT_QUARTER) ? 1 : 0;
r->d_current_week = (r->d_week_seq == CURRENT_WEEK) ? 1 : 0;
}
char sQuarterName[7];
void *info = append_info_get(info_arr, DATET);
append_row_start(info);
append_key(info, r->d_date_sk);
append_varchar(info, r->d_date_id);
append_date(info, r->d_date_sk);
append_integer(info, r->d_month_seq);
append_integer(info, r->d_week_seq);
append_integer(info, r->d_quarter_seq);
append_integer(info, r->d_year);
append_integer(info, r->d_dow);
append_integer(info, r->d_moy);
append_integer(info, r->d_dom);
append_integer(info, r->d_qoy);
append_integer(info, r->d_fy_year);
append_integer(info, r->d_fy_quarter_seq);
append_integer(info, r->d_fy_week_seq);
append_varchar(info, r->d_day_name);
sprintf(sQuarterName, "%4dQ%d", r->d_year, r->d_qoy);
append_varchar(info, sQuarterName);
append_varchar(info, r->d_holiday ? "Y" : "N");
append_varchar(info, r->d_weekend ? "Y" : "N");
append_varchar(info, r->d_following_holiday ? "Y" : "N");
append_integer(info, r->d_first_dom);
append_integer(info, r->d_last_dom);
append_integer(info, r->d_same_day_ly);
append_integer(info, r->d_same_day_lq);
append_varchar(info, r->d_current_day ? "Y" : "N");
append_varchar(info, r->d_current_week ? "Y" : "N");
append_varchar(info, r->d_current_month ? "Y" : "N");
append_varchar(info, r->d_current_quarter ? "Y" : "N");
append_varchar(info, r->d_current_year ? "Y" : "N");
append_row_end(info);
return (res);
}