- 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>
114 lines
3.2 KiB
Text
114 lines
3.2 KiB
Text
/* @tier medium @module cm @transform common-online */
|
|
/*
|
|
* cm_ol_0026.pgc - 캐시 무효화 요청 처리 서비스 (CM_OL_0026) [tier=medium]
|
|
*
|
|
* 캐시키(CKEY) 유효성을 검증한 뒤 무효화 이벤트를 로그로 남기고, 운영
|
|
* 파라미터(cm_param)의 캐시버전(cache_ver)을 1 증가시켜 하위 노드의 캐시
|
|
* 재적재를 유도한다. 증가된 버전과 무효화 결과를 응답한다.
|
|
* (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;
|
|
|
|
/* 캐시키 형식 검증: 영숫자/'_'/'.' 만 허용, 길이 3~30 */
|
|
static int cm_ckey_is_valid(const char *k)
|
|
{
|
|
int i;
|
|
int n = (int)strlen(k);
|
|
|
|
if (n < 3 || n > 30)
|
|
return 0;
|
|
for (i = 0; i < n; i++) {
|
|
char c = k[i];
|
|
if (!((c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z') ||
|
|
(c >= '0' && c <= '9') || c == '_' || c == '.')) {
|
|
return 0;
|
|
}
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
TX_SERVICE(CM_OL_0026, ctx)
|
|
{
|
|
EXEC SQL BEGIN DECLARE SECTION;
|
|
char h_ckey[32];
|
|
long h_ver;
|
|
long newver;
|
|
EXEC SQL END DECLARE SECTION;
|
|
|
|
char ckey[32];
|
|
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0026] 캐시 무효화 요청 처리 진입");
|
|
|
|
if (tx_buf_get(ctx->in, "CKEY", ckey, sizeof(ckey)) != TX_OK) {
|
|
tx_log(TX_LOG_ERROR, "[CM_OL_0026] CKEY 누락");
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
if (!cm_ckey_is_valid(ckey)) {
|
|
tx_log(TX_LOG_WARN, "[CM_OL_0026] 캐시키 형식 오류 ckey=%s", ckey);
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
memset(&h_ckey, 0, sizeof(h_ckey));
|
|
strncpy(h_ckey, ckey, sizeof(h_ckey) - 1);
|
|
h_ver = 0;
|
|
|
|
/* 현재 캐시버전 조회 */
|
|
EXEC SQL SELECT cache_ver
|
|
INTO :h_ver
|
|
FROM cm_param
|
|
WHERE param_key = :h_ckey;
|
|
|
|
if (sqlca.sqlcode == TX_SQL_NOTFOUND) {
|
|
tx_log(TX_LOG_WARN, "[CM_OL_0026] 캐시 대상 없음 ckey=%s", ckey);
|
|
tx_return(ctx, TX_ENOENT, ctx->out);
|
|
return;
|
|
}
|
|
if (sqlca.sqlcode != TX_SQL_OK) {
|
|
TX_DBIO_LOG_ERR("CM_OL_0026 SELECT cm_param");
|
|
tx_return(ctx, TX_EDB, ctx->out);
|
|
return;
|
|
}
|
|
|
|
newver = h_ver + 1;
|
|
|
|
/* 무효화 이벤트 기록 후 버전 증가 반영 */
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0026] 캐시 무효화 이벤트 ckey=%s %ld->%ld xid=%ld",
|
|
ckey, h_ver, newver, tx_current_xid());
|
|
|
|
if (tx_begin() != TX_OK) {
|
|
tx_return(ctx, TX_FAIL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
EXEC SQL UPDATE cm_param
|
|
SET cache_ver = :newver,
|
|
upd_ts = SYSTIMESTAMP
|
|
WHERE param_key = :h_ckey;
|
|
|
|
if (sqlca.sqlcode != TX_SQL_OK) {
|
|
TX_DBIO_LOG_ERR("CM_OL_0026 UPDATE cm_param");
|
|
tx_abort();
|
|
tx_return(ctx, TX_EDB, ctx->out);
|
|
return;
|
|
}
|
|
|
|
tx_commit();
|
|
|
|
tx_buf_reset(ctx->out);
|
|
tx_buf_sets(ctx->out, "CKEY", ckey);
|
|
tx_buf_setlong(ctx->out, "NEWVER", newver);
|
|
tx_buf_sets(ctx->out, "RESULT", "INVALIDATED");
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0026] 무효화 완료 ckey=%s newver=%ld", ckey, newver);
|
|
tx_return(ctx, TX_OK, ctx->out);
|
|
}
|