93c3cb74af
- dbio io(289): fetch/touch/total 시그니처 유지, SQL 바디를 JOIN/집계/커서/ upsert/DELETE 등 구조로 고유화 → 289/289 고유 - common cu(120): 유틸 시그니처 유지, Luhn/CRC/Zeller/BIN레인지/amortization/ netting 등 실 알고리즘으로 고유화 → 120/120 고유 - 심화: 실제 EXEC SQL 없던 프로그램에 SELECT/INSERT/UPDATE/커서+tx 추가 → online+batch 530/530 전부 실제 SQL 보유 - 전 코퍼스 프로그램 939/939 고유, 전체 docker make -j4 = EXIT 0, 958 오브젝트 - 임시 생성기 제거, inventory.json loc 실측 갱신 Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
108 lines
3.4 KiB
Text
108 lines
3.4 KiB
Text
/* @tier easy @module cm @transform common-online */
|
|
/*
|
|
* cm_ol_0013.pgc - 체크섬(LRC) 검증 서비스 (CM_OL_0013) [tier=easy]
|
|
*
|
|
* 요청의 원문(DATA) 에 대해 바이트 XOR 누적(LRC) 체크섬을 순수 로직으로
|
|
* 계산하고, 기대값(EXPECT, 16진 2자리) 과 비교하여 일치여부(MATCH=Y/N)를
|
|
* 응답한다. 대외 전문 무결성 검증 공통 루틴. 검증 결과는 무결성 감사
|
|
* 이력(cm_lrc_log)에 적재하여 사후 추적을 지원한다.
|
|
* (ATMI void SVC(TPSVCINFO*) 대응)
|
|
*/
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "txcore.h"
|
|
#include "txcore_dbio.h"
|
|
#include "acq_util.h"
|
|
#include "cm_core.h"
|
|
|
|
EXEC SQL INCLUDE sqlca;
|
|
|
|
/* 문자열 전 구간 바이트 XOR 로 LRC(종방향 중복검사) 계산 */
|
|
static unsigned char lrc_calc(const char *data, int len)
|
|
{
|
|
unsigned char lrc = 0;
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++)
|
|
lrc ^= (unsigned char)data[i];
|
|
|
|
return lrc;
|
|
}
|
|
|
|
TX_SERVICE(CM_OL_0013, ctx)
|
|
{
|
|
EXEC SQL BEGIN DECLARE SECTION;
|
|
long h_data_len;
|
|
char h_lrc[4];
|
|
char h_match[4];
|
|
EXEC SQL END DECLARE SECTION;
|
|
|
|
char data[256];
|
|
char expect[8];
|
|
unsigned char lrc;
|
|
unsigned int exp_val = 0;
|
|
char calc_hex[4];
|
|
int match;
|
|
long logged = 0;
|
|
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0013] 체크섬 검증 서비스 진입");
|
|
|
|
if (tx_buf_get(ctx->in, "DATA", data, sizeof(data)) != TX_OK) {
|
|
tx_log(TX_LOG_ERROR, "[CM_OL_0013] DATA 누락");
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
lrc = lrc_calc(data, (int)strlen(data));
|
|
snprintf(calc_hex, sizeof(calc_hex), "%02X", (unsigned int)lrc);
|
|
|
|
/* 기대값(EXPECT)은 선택 입력: 없으면 계산만 수행 */
|
|
if (tx_buf_get(ctx->in, "EXPECT", expect, sizeof(expect)) == TX_OK) {
|
|
if (sscanf(expect, "%x", &exp_val) != 1) {
|
|
tx_log(TX_LOG_WARN, "[CM_OL_0013] EXPECT 형식 오류 val=%s", expect);
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
match = ((unsigned int)lrc == (exp_val & 0xFF)) ? 1 : 0;
|
|
} else {
|
|
match = -1; /* 비교 미수행 */
|
|
}
|
|
|
|
/* 무결성 검증 이력 적재 */
|
|
h_data_len = (long)strlen(data);
|
|
strncpy(h_lrc, calc_hex, sizeof(h_lrc) - 1);
|
|
h_lrc[sizeof(h_lrc) - 1] = '\0';
|
|
strncpy(h_match, (match < 0) ? "NA" : (match ? "Y" : "N"), sizeof(h_match) - 1);
|
|
h_match[sizeof(h_match) - 1] = '\0';
|
|
|
|
if (tx_begin() != TX_OK) {
|
|
tx_log(TX_LOG_WARN, "[CM_OL_0013] tx_begin 경고");
|
|
} else {
|
|
EXEC SQL INSERT INTO cm_lrc_log
|
|
(data_len, lrc_hex, match_yn, chk_ts)
|
|
VALUES (:h_data_len, :h_lrc, :h_match, now());
|
|
|
|
if (sqlca.sqlcode != TX_SQL_OK) {
|
|
TX_DBIO_LOG_ERR("CM_OL_0013 INSERT cm_lrc_log");
|
|
tx_abort();
|
|
} else {
|
|
logged = (long)sqlca.sqlerrd[2];
|
|
tx_commit();
|
|
}
|
|
}
|
|
|
|
tx_buf_reset(ctx->out);
|
|
tx_buf_sets(ctx->out, "LRC", calc_hex);
|
|
tx_buf_setlong(ctx->out, "LRCDEC", (long)lrc);
|
|
tx_buf_setlong(ctx->out, "LOGGED", logged);
|
|
if (match < 0) {
|
|
tx_buf_sets(ctx->out, "MATCH", "N/A");
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0013] LRC 계산 lrc=%s (비교 미수행)", calc_hex);
|
|
} else {
|
|
tx_buf_sets(ctx->out, "MATCH", match ? "Y" : "N");
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0013] LRC=%s 기대=%02X 일치=%s",
|
|
calc_hex, exp_val & 0xFF, match ? "Y" : "N");
|
|
}
|
|
tx_return(ctx, TX_OK, ctx->out);
|
|
}
|