freelang-v4 4.3.0

package/src/api/user.fl

@@ -0,0 +1,385 @@
+// FreeLang v4.2 — Gogs CLI UserService
+// 사용자 관리 API 서비스
+// 300라인: list, get, create, update, delete, ensure, lock, unlock
+
+/// 사용자 서비스
+struct UserService {
+    client: HttpClient
+    cache: CacheManager
+}
+
+/// UserService 생성
+fn new_user_service(client: HttpClient, cache: CacheManager) -> UserService {
+    UserService {
+        client: client,
+        cache: cache
+    }
+}
+
+// ==================== 사용자 CRUD ====================
+
+/// 사용자 목록 조회 (관리자 전용)
+async fn list_users(service: UserService) -> Result<[User]> {
+    var cache_key = "users:list"
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: users list")
+        var users_arr = json_parse(cached) as [User]
+        return Result::Ok(users_arr)
+    }
+
+    // API 호출 (관리자 권한 필요)
+    var resp = await http_get(service.client, "/api/v1/admin/users")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var users_arr = json_parse(resp.body) as [User]
+    Result::Ok(users_arr)
+}
+
+/// 사용자 상세 조회
+async fn get_user(service: UserService, username: str) -> Result<User> {
+    var cache_key = "user:" + username
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: " + cache_key)
+        var user = json_parse(cached) as User
+        return Result::Ok(user)
+    }
+
+    // API 호출
+    var path = "/api/v1/users/" + username
+    var resp = await http_get(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var user = json_parse(resp.body) as User
+    Result::Ok(user)
+}
+
+/// 현재 사용자 정보 조회
+async fn get_current_user(service: UserService) -> Result<User> {
+    var cache_key = "user:current"
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: current user")
+        var user = json_parse(cached) as User
+        return Result::Ok(user)
+    }
+
+    // API 호출
+    var resp = await http_get(service.client, "/api/v1/user")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var user = json_parse(resp.body) as User
+    Result::Ok(user)
+}
+
+/// 사용자 생성 (관리자 전용)
+async fn create_user(service: UserService, req: CreateUserRequest) -> Result<User> {
+    var json_data = json_stringify(req)
+    var resp = await http_post_json(service.client, "/api/v1/admin/users", json_data)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    cache_invalidate(service.cache, "users:list")
+
+    // 파싱
+    var user = json_parse(resp.body) as User
+    Result::Ok(user)
+}
+
+/// 사용자 업데이트 (관리자 전용)
+async fn update_user(service: UserService, username: str, req: UpdateUserRequest) -> Result<User> {
+    var path = "/api/v1/admin/users/" + username
+    var json_data = json_stringify(req)
+    var resp = await http_patch(service.client, path, json_data)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "user:" + username
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "users:list")
+
+    // 파싱
+    var user = json_parse(resp.body) as User
+    Result::Ok(user)
+}
+
+/// 사용자 삭제 (관리자 전용)
+async fn delete_user(service: UserService, username: str) -> Result<str> {
+    var path = "/api/v1/admin/users/" + username
+    var resp = await http_delete(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "user:" + username
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "users:list")
+
+    Result::Ok("User deleted")
+}
+
+// ==================== Ensure 패턴 ====================
+
+/// 사용자 ensure (멱등성 보증)
+async fn ensure_user(service: UserService, req: CreateUserRequest) -> Result<EnsureAction> {
+    var path = "/api/v1/users/" + req.username
+
+    // desired 상태 정의
+    var desired_json = json_stringify(req)
+
+    var ctx = EnsureContext {
+        name: req.username,
+
+        get_fn: async fn() -> Result<str> {
+            var resp = await http_get(service.client, path)
+            if is_error(resp.status) {
+                if resp.status == 404 {
+                    Result::Ok("")  // 없음
+                } else {
+                    Result::Err(response_to_error(resp))
+                }
+            } else {
+                Result::Ok(resp.body)
+            }
+        },
+
+        create_fn: async fn() -> Result<str> {
+            var json_data = json_stringify(req)
+            var resp = await http_post_json(service.client, "/api/v1/admin/users", json_data)
+            if is_error(resp.status) {
+                Result::Err(response_to_error(resp))
+            } else {
+                // 캐시 무효화
+                cache_invalidate(service.cache, "users:list")
+                Result::Ok(resp.body)
+            }
+        },
+
+        update_fn: async fn(changes: [str]) -> Result<str> {
+            var update_req = UpdateUserRequest {
+                email: req.email,
+                is_admin: req.is_admin
+            }
+            var json_data = json_stringify(update_req)
+            var resp = await http_patch(service.client, path, json_data)
+            if is_error(resp.status) {
+                Result::Err(response_to_error(resp))
+            } else {
+                // 캐시 무효화
+                var cache_key = "user:" + req.username
+                cache_invalidate(service.cache, cache_key)
+                cache_invalidate(service.cache, "users:list")
+                Result::Ok(resp.body)
+            }
+        },
+
+        delete_fn: async fn() -> Result<str> {
+            var resp = await http_delete(service.client, path)
+            if is_error(resp.status) {
+                Result::Err(response_to_error(resp))
+            } else {
+                // 캐시 무효화
+                var cache_key = "user:" + req.username
+                cache_invalidate(service.cache, cache_key)
+                cache_invalidate(service.cache, "users:list")
+                Result::Ok("")
+            }
+        },
+
+        desired: desired_json
+    }
+
+    var action = await ensure(ctx)
+    Result::Ok(action)
+}
+
+// ==================== 사용자 계정 관리 ====================
+
+/// 사용자 잠금 (관리자 전용)
+async fn lock_user(service: UserService, username: str) -> Result<str> {
+    var path = "/api/v1/admin/users/" + username + "/lock"
+    var resp = await http_put(service.client, path, "{}")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "user:" + username
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "users:list")
+
+    Result::Ok("User locked")
+}
+
+/// 사용자 잠금 해제 (관리자 전용)
+async fn unlock_user(service: UserService, username: str) -> Result<str> {
+    var path = "/api/v1/admin/users/" + username + "/lock"
+    var resp = await http_delete(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "user:" + username
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "users:list")
+
+    Result::Ok("User unlocked")
+}
+
+/// 사용자 권한 변경
+async fn set_admin(service: UserService, username: str, is_admin: bool) -> Result<User> {
+    var req = UpdateUserRequest {
+        email: "",
+        is_admin: is_admin
+    }
+    await update_user(service, username, req)
+}
+
+// ==================== 사용자 저장소 ====================
+
+/// 사용자 저장소 목록
+async fn list_user_repos(service: UserService, username: str) -> Result<[Repo]> {
+    var cache_key = "user_repos:" + username
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: " + cache_key)
+        var repos_arr = json_parse(cached) as [Repo]
+        return Result::Ok(repos_arr)
+    }
+
+    // API 호출
+    var path = "/api/v1/users/" + username + "/repos"
+    var resp = await http_get(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var repos_arr = json_parse(resp.body) as [Repo]
+    Result::Ok(repos_arr)
+}
+
+// ==================== 사용자 검색 ====================
+
+/// 사용자 검색
+async fn search_users(service: UserService, query: str) -> Result<[User]> {
+    var path = "/api/v1/users/search?q=" + query
+    var resp = await http_get(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 파싱
+    var users_arr = json_parse(resp.body) as [User]
+    Result::Ok(users_arr)
+}
+
+// ==================== 사용자 팔로우 ====================
+
+/// 사용자 팔로우
+async fn follow_user(service: UserService, username: str) -> Result<str> {
+    var path = "/api/v1/user/following/" + username
+    var resp = await http_put(service.client, path, "{}")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    Result::Ok("Following user")
+}
+
+/// 사용자 팔로우 해제
+async fn unfollow_user(service: UserService, username: str) -> Result<str> {
+    var path = "/api/v1/user/following/" + username
+    var resp = await http_delete(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    Result::Ok("Unfollowing user")
+}
+
+// ==================== 별명 (Alias) ====================
+
+/// 사용자 목록 조회 (별명)
+async fn list_all_users(service: UserService) -> Result<[User]> {
+    await list_users(service)
+}
+
+/// 사용자 생성 (별명)
+async fn new_user(service: UserService, username: str, email: str, password: str) -> Result<User> {
+    var req = CreateUserRequest {
+        username: username,
+        email: email,
+        password: password,
+        send_notify: true,
+        is_admin: false
+    }
+    await create_user(service, req)
+}
+
+/// 사용자 삭제 (별명)
+async fn rm_user(service: UserService, username: str) -> Result<str> {
+    await delete_user(service, username)
+}
+
+// UpdateUserRequest 모델 정의
+struct UpdateUserRequest {
+    email: str
+    is_admin: bool
+}
+
+// 필요한 함수들 (다른 모듈에서 임포트):
+// - http_get, http_post_json, http_delete, http_patch, http_put
+// - is_error, response_to_error
+// - cache_get, cache_set, cache_invalidate
+// - json_stringify, json_parse
+// - ensure, EnsureContext, EnsureAction
+// - println, length

package/src/api/webhook.fl

@@ -0,0 +1,273 @@
+// FreeLang v4.2 — Gogs CLI WebhookService
+// 웹훅 관리 API 서비스
+// 200라인: create, list, get, delete, update, test
+
+/// 웹훅 서비스
+struct WebhookService {
+    client: HttpClient
+    cache: CacheManager
+}
+
+/// WebhookService 생성
+fn new_webhook_service(client: HttpClient, cache: CacheManager) -> WebhookService {
+    WebhookService {
+        client: client,
+        cache: cache
+    }
+}
+
+// ==================== 웹훅 CRUD ====================
+
+/// 웹훅 목록 조회 (저장소 단위)
+async fn list_webhooks(service: WebhookService, owner: str, repo: str) -> Result<[Webhook]> {
+    var cache_key = "webhooks:" + owner + "/" + repo
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: " + cache_key)
+        var webhooks_arr = json_parse(cached) as [Webhook]
+        return Result::Ok(webhooks_arr)
+    }
+
+    // API 호출
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks"
+    var resp = await http_get(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var webhooks_arr = json_parse(resp.body) as [Webhook]
+    Result::Ok(webhooks_arr)
+}
+
+/// 웹훅 상세 조회
+async fn get_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<Webhook> {
+    var cache_key = "webhook:" + owner + "/" + repo + "/" + str(hook_id)
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: " + cache_key)
+        var webhook = json_parse(cached) as Webhook
+        return Result::Ok(webhook)
+    }
+
+    // API 호출
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks/" + str(hook_id)
+    var resp = await http_get(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var webhook = json_parse(resp.body) as Webhook
+    Result::Ok(webhook)
+}
+
+/// 웹훅 생성
+async fn create_webhook(service: WebhookService, owner: str, repo: str, req: CreateWebhookRequest) -> Result<Webhook> {
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks"
+    var json_data = json_stringify(req)
+    var resp = await http_post_json(service.client, path, json_data)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    cache_invalidate(service.cache, "webhooks:" + owner + "/" + repo)
+
+    // 파싱
+    var webhook = json_parse(resp.body) as Webhook
+    Result::Ok(webhook)
+}
+
+/// 웹훅 업데이트
+async fn update_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32, req: UpdateWebhookRequest) -> Result<Webhook> {
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks/" + str(hook_id)
+    var json_data = json_stringify(req)
+    var resp = await http_patch(service.client, path, json_data)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "webhook:" + owner + "/" + repo + "/" + str(hook_id)
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "webhooks:" + owner + "/" + repo)
+
+    // 파싱
+    var webhook = json_parse(resp.body) as Webhook
+    Result::Ok(webhook)
+}
+
+/// 웹훅 삭제
+async fn delete_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<str> {
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks/" + str(hook_id)
+    var resp = await http_delete(service.client, path)
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 무효화
+    var cache_key = "webhook:" + owner + "/" + repo + "/" + str(hook_id)
+    cache_invalidate(service.cache, cache_key)
+    cache_invalidate(service.cache, "webhooks:" + owner + "/" + repo)
+
+    Result::Ok("Webhook deleted")
+}
+
+// ==================== 웹훅 테스트 ====================
+
+/// 웹훅 테스트
+async fn test_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<str> {
+    var path = "/api/v1/repos/" + owner + "/" + repo + "/hooks/" + str(hook_id) + "/tests"
+    var resp = await http_post_json(service.client, path, "{}")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    Result::Ok("Webhook test triggered")
+}
+
+// ==================== 웹훅 활성화/비활성화 ====================
+
+/// 웹훅 활성화
+async fn enable_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<Webhook> {
+    var req = UpdateWebhookRequest {
+        url: "",
+        content_type: "",
+        events: [],
+        active: true
+    }
+    await update_webhook(service, owner, repo, hook_id, req)
+}
+
+/// 웹훅 비활성화
+async fn disable_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<Webhook> {
+    var req = UpdateWebhookRequest {
+        url: "",
+        content_type: "",
+        events: [],
+        active: false
+    }
+    await update_webhook(service, owner, repo, hook_id, req)
+}
+
+// ==================== 웹훅 이벤트 ====================
+
+/// 기본 웹훅 이벤트 목록
+fn get_default_webhook_events() -> [str] {
+    var events: [str] = []
+    events.push("push")
+    events.push("pull_request")
+    events.push("issues")
+    events.push("commit_comment")
+    events.push("pull_request_review_comment")
+    events.push("create")
+    events.push("delete")
+    events.push("deployment")
+    events.push("fork")
+    events.push("gollum")
+    events.push("page_build")
+    events.push("public")
+    events.push("release")
+    events
+}
+
+/// 웹훅 이벤트 목록 조회
+async fn get_webhook_events(service: WebhookService) -> Result<[str]> {
+    var cache_key = "webhook_events"
+
+    // 캐시 확인
+    var cached = cache_get(service.cache, cache_key)
+    if cached != "" {
+        println("[cache] hit: webhook_events")
+        var events_arr = json_parse(cached) as [str]
+        return Result::Ok(events_arr)
+    }
+
+    // API 호출
+    var resp = await http_get(service.client, "/api/v1/repos/events")
+
+    if is_error(resp.status) {
+        return Result::Err(response_to_error(resp))
+    }
+
+    // 캐시 저장
+    cache_set(service.cache, cache_key, resp.body)
+
+    // 파싱
+    var events_arr = json_parse(resp.body) as [str]
+    Result::Ok(events_arr)
+}
+
+// ==================== 웹훅 기본 설정 ====================
+
+/// Gogs 호환 기본 웹훅 생성
+async fn create_gogs_webhook(service: WebhookService, owner: str, repo: str, webhook_url: str) -> Result<Webhook> {
+    var req = CreateWebhookRequest {
+        url: webhook_url,
+        content_type: "json",
+        events: get_default_webhook_events(),
+        active: true
+    }
+    await create_webhook(service, owner, repo, req)
+}
+
+/// JSON 콘텐츠 타입으로 웹훅 생성
+async fn create_json_webhook(service: WebhookService, owner: str, repo: str, webhook_url: str, events: [str]) -> Result<Webhook> {
+    var req = CreateWebhookRequest {
+        url: webhook_url,
+        content_type: "json",
+        events: events,
+        active: true
+    }
+    await create_webhook(service, owner, repo, req)
+}
+
+// ==================== 별명 (Alias) ====================
+
+/// 웹훅 생성 (별명)
+async fn new_webhook(service: WebhookService, owner: str, repo: str, url: str) -> Result<Webhook> {
+    var req = CreateWebhookRequest {
+        url: url,
+        content_type: "json",
+        events: get_default_webhook_events(),
+        active: true
+    }
+    await create_webhook(service, owner, repo, req)
+}
+
+/// 웹훅 삭제 (별명)
+async fn rm_webhook(service: WebhookService, owner: str, repo: str, hook_id: i32) -> Result<str> {
+    await delete_webhook(service, owner, repo, hook_id)
+}
+
+// UpdateWebhookRequest 모델 정의
+struct UpdateWebhookRequest {
+    url: str
+    content_type: str
+    events: [str]
+    active: bool
+}
+
+// 필요한 함수들 (다른 모듈에서 임포트):
+// - http_get, http_post_json, http_delete, http_patch
+// - is_error, response_to_error
+// - cache_get, cache_set, cache_invalidate
+// - json_stringify, json_parse
+// - println, length, str