/* @tier medium @module cm @transform common-batch */
/*
 * cm_bt_0003.pgc - 영업일 캘린더 생성 배치  [tier=medium]
 *
 * 시작 영업일(argv1)부터 연속 31일의 달력을 생성한다. 각 일자를 하루씩
 * 증가시키며 주말/평일 여부를 date_is_weekend 로 판정하고, 결과를
 * cm_calendar 에 raw INSERT 로 적재한다. 영업일/휴일 건수를 리포트한다.
 *
 * 실행:  cm_bt_0003 <YYYYMMDD> [db@host]
 */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "txcore.h"
#include "txcore_dbio.h"
#include "acq_util.h"
#include "cm_core.h"

EXEC SQL INCLUDE sqlca;

#define CM_CAL_DAYS 31

/* YYYYMMDD 를 하루 증가시켜 out 에 채운다 (월/년 롤오버 포함) */
static void cm_date_plus_one(const char *ymd, char *out)
{
    int y, m, d;
    int mdays[13] = { 0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };

    y = (ymd[0]-'0')*1000 + (ymd[1]-'0')*100 + (ymd[2]-'0')*10 + (ymd[3]-'0');
    m = (ymd[4]-'0')*10 + (ymd[5]-'0');
    d = (ymd[6]-'0')*10 + (ymd[7]-'0');

    if ((y % 4 == 0 && y % 100 != 0) || (y % 400 == 0))
        mdays[2] = 29;

    d++;
    if (m >= 1 && m <= 12 && d > mdays[m]) {
        d = 1;
        m++;
        if (m > 12) { m = 1; y++; }
    }
    sprintf(out, "%04d%02d%02d", y, m, d);
}

static int run_cm_bt_0003(const char *biz_date)
{
    EXEC SQL BEGIN DECLARE SECTION;
    char h_cal_date[9];
    char h_day_type[2];
    int  h_week_day;
    EXEC SQL END DECLARE SECTION;

    char cur_date[9], next_date[9];
    long biz_cnt = 0, holi_cnt = 0, errcnt = 0;
    int  i;

    strncpy(cur_date, biz_date, sizeof(cur_date) - 1);
    cur_date[sizeof(cur_date) - 1] = '\0';

    if (tx_begin() != TX_OK)
        tx_log(TX_LOG_WARN, "[cm_bt_0003] tx_begin 경고");

    for (i = 0; i < CM_CAL_DAYS; i++) {
        strncpy(h_cal_date, cur_date, sizeof(h_cal_date) - 1);
        h_cal_date[sizeof(h_cal_date) - 1] = '\0';
        h_week_day = date_weekday(cur_date);

        if (date_is_weekend(cur_date)) {
            strncpy(h_day_type, "H", sizeof(h_day_type));
            holi_cnt++;
        } else {
            strncpy(h_day_type, "B", sizeof(h_day_type));
            biz_cnt++;
        }

        EXEC SQL INSERT INTO cm_calendar (cal_date, day_type, week_day)
            VALUES (:h_cal_date, :h_day_type, :h_week_day);

        if (sqlca.sqlcode != TX_SQL_OK) {
            TX_DBIO_LOG_ERR("INSERT cm_calendar");
            errcnt++;
        }

        cm_date_plus_one(cur_date, next_date);
        strncpy(cur_date, next_date, sizeof(cur_date) - 1);
        cur_date[sizeof(cur_date) - 1] = '\0';
    }

    if (errcnt == 0)
        tx_commit();
    else
        tx_abort();

    tx_log(TX_LOG_INFO,
           "[cm_bt_0003] 캘린더 생성 시작=%s 일수=%d 영업일=%ld 휴일=%ld 오류=%ld",
           biz_date, CM_CAL_DAYS, biz_cnt, holi_cnt, errcnt);

    printf("========== 영업일 캘린더 생성 [cm_bt_0003] ==========\n");
    printf("  시작 영업일 : %s\n", biz_date);
    printf("  생성 일수   : %d\n", CM_CAL_DAYS);
    printf("  영업일 수   : %ld\n", biz_cnt);
    printf("  휴일 수     : %ld\n", holi_cnt);
    printf("  적재 오류   : %ld\n", errcnt);
    printf("=============================================\n");

    return (errcnt == 0) ? TX_OK : TX_FAIL;
}

int main(int argc, char **argv)
{
    const char *biz_date;
    const char *target;
    int rc;

    tx_set_loglevel(TX_LOG_INFO);

    if (argc < 2) {
        fprintf(stderr, "사용법: %s <YYYYMMDD> [db@host]\n", argv[0]);
        return 2;
    }
    biz_date = argv[1];
    target   = (argc >= 3) ? argv[2] : NULL;

    if (!date_is_valid(biz_date)) {
        fprintf(stderr, "오류: 유효하지 않은 영업일 '%s'\n", biz_date);
        return 2;
    }

    tx_log(TX_LOG_INFO, "[cm_bt_0003] 캘린더 생성 배치 시작 date=%s", biz_date);

    rc = cm_dbio_connect(target);
    if (rc != TX_OK) {
        tx_log(TX_LOG_ERROR, "[cm_bt_0003] DB 접속 실패 rc=%d", rc);
        return 1;
    }

    rc = run_cm_bt_0003(biz_date);

    cm_dbio_disconnect();

    tx_log(TX_LOG_INFO, "[cm_bt_0003] 배치 종료 rc=%d(%s)", rc, tx_strerror(rc));
    return (rc == TX_OK) ? 0 : 1;
}
