coolguyandClaude Opus 5
088e1992a5
파일에 없던 셋을 압박했다: 자원 두 층(풀/lease), 반납이 파괴가 아님, 획득이
실패할 수 있음. 셋 다 설계가 버텼다.
D8 — 인자 안에서 소비와 사용을 섞을 수 없다.
release_then(db, pool, l, db.query(l, sql))가 거부된다. move 검사가 인자를
왼쪽부터 걷기 때문이고, 실제 평가 순서와 무관하다. 우회는 쉽지만 왜 안 되는지가
코드에서 안 보인다.
두 사례 비교:
naive careful 배수 match 중첩
Atomic 18 58 3.2 4단
DB Pool 25 58 2.3 1단
공통(2/2): 자원을 들면 ?를 한 번도 못 쓴다. "정리하고 결과를 실어나르는
도우미"를 양쪽이 각자 발명했다. 누수는 조용히 통과한다.
다른 점: 고통이 자원 개수가 아니라 정리의 균일성에 비례한다. 파일은 단계마다
정리가 달라 4단이 되고, 풀은 언제나 반납이라 1단으로 접힌다.
결정: resource/with를 넣는다. 다만 D4가 먼저다.
with l = db.acquire(pool)? { } 가 나갈 때 무엇을 부를지 알려면 자원만으로
정리를 표현할 수 있어야 하는데, 반납은 db.release(pool, l)이라 풀과 권한이
필요하다. 자원이 자기 정리를 스스로 선언하려면 수신자를 소비하는 메서드가
있어야 하고(own self), 지금은 own이 파라미터에만 붙는다.
파일 쪽도 같다 — Fs.close(own f)는 Fs 권한을 요구한다.
따라서 순서: D4 → resource/with → Mini Shell로 세 번째 점.
Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_019ZVDeU6KLuUVL3gs18Hm3E
52 lines
2.3 KiB
Plaintext
52 lines
2.3 KiB
Plaintext
// 데이터베이스 연결 풀 — 개밥 먹기용 초안.
|
|
//
|
|
// 세 층이 있고 수명을 관리하는 주체가 각각 다르다.
|
|
// Conn 실제 연결. 풀이 소유한다. 사용자는 존재도 모른다
|
|
// Pool 연결 묶음. 프로그램 수명. 사용자가 만들고 닫는다
|
|
// Lease 빌린 한 자리. 요청 하나 수명. 반드시 반납해야 한다
|
|
//
|
|
// 사용자가 관리하는 것은 연결의 수명이 아니라 lease의 수명이다.
|
|
// 그래서 반납은 "파괴"가 아니다 — 연결은 풀로 돌아간다.
|
|
|
|
// ※ List[String]의 List는 내장 타입이라 import가 필요 없다. 모듈 List를
|
|
// 가져오는 것은 그 타입에 딸린 함수(len, map...)를 쓸 때뿐이다.
|
|
|
|
pub enum DbError {
|
|
// 연결 자체가 안 된다
|
|
Unreachable(String),
|
|
// 풀이 가득 찼고 기다릴 수 없다. 호출자가 대처할 수 있다 — 재시도든 포기든
|
|
Exhausted,
|
|
// 질의가 틀렸다. 프로그램의 결함에 가깝지만 런타임 값에서 오므로 Result다
|
|
BadQuery(String),
|
|
Other(String),
|
|
}
|
|
|
|
// 풀. capability이므로 affine이다 — 복제되지 않는다.
|
|
pub capability Pool {
|
|
}
|
|
|
|
// 빌린 한 자리. 반드시 반납해야 한다.
|
|
// ※ 언어는 아직 그 "반드시"를 강제하지 못한다 (D3).
|
|
pub capability Lease {
|
|
}
|
|
|
|
// 데이터베이스에 손댈 권한. 풀을 만들 수 있는 유일한 출처다.
|
|
pub capability Db {
|
|
// 풀을 연다. size는 최대 동시 연결 수.
|
|
fn pool(url: String, size: Int) effects {Db.pool} -> Result[Pool, DbError]
|
|
|
|
// 풀을 닫는다. 안에 있는 연결이 전부 정리된다.
|
|
// 아직 빌려나간 lease가 있으면? — 아래 발견 참고.
|
|
fn close_pool(own p: Pool) effects {Db.close_pool} -> Result[Unit, DbError]
|
|
|
|
// 한 자리를 빌린다. 없으면 Exhausted — 기다리지 않는다.
|
|
// 기다리는 형태(timeout)는 취소를 정해야 해서 미룬다.
|
|
fn acquire(p: Pool) effects {Db.acquire} -> Result[Lease, DbError]
|
|
|
|
// 반납한다. 연결은 풀로 돌아간다 — 파괴가 아니다.
|
|
fn release(p: Pool, own l: Lease) effects {Db.release} -> Result[Unit, DbError]
|
|
|
|
// 빌린 자리로 질의한다. lease는 빌린다.
|
|
fn query(l: Lease, sql: String) effects {Db.query} -> Result[List[String], DbError]
|
|
}
|