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>
50 lines
1.4 KiB
C
50 lines
1.4 KiB
C
/* @tier easy @module st @transform settlement-util */
|
|
/*
|
|
* st_cu_0005.c - 정산수수료 공통 유틸리티 (plain C) [tier=easy]
|
|
*/
|
|
#include "st_cu_0005.h"
|
|
|
|
#include <string.h>
|
|
|
|
/* 뱅커스 반올림(사사오입): num/den 을 최근접 정수로, 동점은 짝수 */
|
|
static long st_cu_0005_bankers(long num, long den)
|
|
{
|
|
long q = num / den;
|
|
long r = num % den;
|
|
long twice = 2 * (r < 0 ? -r : r);
|
|
long ad = den < 0 ? -den : den;
|
|
if (twice > ad)
|
|
q += (num < 0 ? -1 : 1);
|
|
else if (twice == ad && (q % 2 != 0))
|
|
q += (num < 0 ? -1 : 1);
|
|
return q;
|
|
}
|
|
|
|
/* 수수료: 초과분에만 요율 적용하는 누진 구간 */
|
|
long st_cu_0005_fee(long amount, int rate_bp)
|
|
{
|
|
long fee = 0, a = amount;
|
|
if (amount <= 0 || rate_bp < 0)
|
|
return 0;
|
|
if (a > 1000000L) { fee += (a - 1000000L) * (long)rate_bp / 10000L; a = 1000000L; }
|
|
if (a > 100000L) { fee += (a - 100000L) * (long)(rate_bp + 10) / 10000L; a = 100000L; }
|
|
fee += a * (long)(rate_bp + 20) / 10000L;
|
|
return fee;
|
|
}
|
|
|
|
/* 뱅커스 반올림 단위 정규화 */
|
|
long st_cu_0005_round_unit(long amount, long unit)
|
|
{
|
|
if (unit <= 0)
|
|
return amount;
|
|
return st_cu_0005_bankers(amount, unit) * unit;
|
|
}
|
|
|
|
/* 분류: 10의 거듭제곱 지수(로그10 정수부) */
|
|
int st_cu_0005_classify(long amount)
|
|
{
|
|
int e = 0;
|
|
long v = amount < 0 ? -amount : amount;
|
|
while (v >= 10) { v /= 10; e++; }
|
|
return e;
|
|
}
|