#!/usr/bin/env nu
use common.nu *

def main [] {
    let env_vars = load-env-file
    let did = ($env_vars | get --optional TEST_REPO)
    let password = ($env_vars | get --optional TEST_PASSWORD)
    
    if ($did | is-empty) or ($password | is-empty) {
        print "error: TEST_REPO and TEST_PASSWORD must be set in .env"
        exit 1
    }

    let pds_url = resolve-pds $did
    
    let port = 3005
    let url = $"http://localhost:($port)"
    let ws_url = $"ws://localhost:($port)/stream"
    let db_path = (mktemp -d -t hydrant_auth_test.XXXXXX)
    
    # 1. authenticate
    print $"authenticating with ($pds_url)..."
    let session = authenticate $pds_url $did $password
    let jwt = $session.accessJwt
    print "authentication successful"

    # 2. start hydrant
    print $"starting hydrant on port ($port)..."
    let binary = build-hydrant
    let instance = start-hydrant $binary $db_path $port
    
    mut test_passed = false

    if (wait-for-api $url) {
        # 3. start listener (live stream)
        let output_file = $"($db_path)/stream_output.txt"
        print $"starting stream listener -> ($output_file)"
        # use websocat to capture output. 
        let stream_pid = (bash -c $"websocat '($ws_url)' > '($output_file)' & echo $!" | str trim | into int)
        print $"listener pid: ($stream_pid)"
        
        # 4. add repo to hydrant (backfill trigger)
        print $"adding repo ($did) to tracking..."
        try {
            http patch -t application/json $"($url)/filter" { dids: { ($did): true } }
        } catch {
            print "warning: failed to add repo (might already be tracked), continuing..."
        }
        
        sleep 5sec

        # 5. perform actions
        let collection = "app.bsky.feed.post"
        let timestamp = (date now | format date "%Y-%m-%dT%H:%M:%SZ")
        let record_data = {
            "$type": "app.bsky.feed.post",
            text: $"hydrant integration test ($timestamp)",
            createdAt: $timestamp
        }

        print "--- action: create ---"
        let create_res = create-record $pds_url $jwt $did $collection $record_data
        print $"created uri: ($create_res.uri)"
        print $"created cid: ($create_res.cid)"
        let rkey = ($create_res.uri | split row "/" | last)

        print "--- action: update ---"
        let update_data = ($record_data | update text $"updated text ($timestamp)")
        
        try {
            http post -t application/json -H ["Authorization" $"Bearer ($jwt)"] $"($pds_url)/xrpc/com.atproto.repo.putRecord" {
                repo: $did,
                collection: $collection,
                rkey: $rkey,
                record: $update_data,
            }
            print "updated record"
        } catch { |err|
            print $"update failed: ($err)"
            # try to continue to delete
        }

        print "--- action: delete ---"
        delete-record $pds_url $jwt $did $collection $rkey
        print "deleted record"

        print "--- action: deactivate ---"
        deactivate-account $pds_url $jwt

        sleep 1sec

        # we might need to re-auth if session was killed by deactivation
        print "re-authenticating..."
        let session = authenticate $pds_url $did $password
        let jwt = $session.accessJwt

        sleep 1sec

        print "--- action: activate ---"
        activate-account $pds_url $jwt
        
        # 6. verify
        sleep 3sec
        print "stopping listener..."
        try { kill -9 $stream_pid }
        
        if ($output_file | path exists) {
            let content = (open $output_file | str trim)
            if ($content | is-empty) {
                print "failed: no events captured"
            } else {
                # parse json lines
                let events = ($content | lines | each { |it| $it | from json })
                let display_events = ($events | each { |e|
                    let value = if $e.type == "record" { $e | get -o record } else if $e.type == "account" { $e | get -o account } else { $e | get -o identity }
                    $e | select id type | insert value $value
                })
                print $"captured ($events | length) events"
                $display_events | table -e | print

                # filter live events for the relevant entities
                let relevant_events = ($events | where { |it|
                    if $it.type == "record" {
                        if ($it.record | get -o live) == false {
                            return false
                        }
                    }
                    true
                })

                let checks = [
                    { |e| $e.type == "account" and $e.account.active == true },
                    { |e| $e.type == "record" and $e.record.action == "create" },
                    { |e| $e.type == "record" and $e.record.action == "update" },
                    { |e| $e.type == "record" and $e.record.action == "delete" },
                    { |e| $e.type == "account" and $e.account.active == false },
                    { |e| $e.type == "account" and $e.account.active == true },
                    { |e| $e.type == "identity" and $e.identity.did == $did }
                ]

                if ($relevant_events | length) != ($checks | length) {
                    print $"verification failed: expected ($checks | length) events, got ($relevant_events | length)"
                    $test_passed = false
                } else {

                    mut failed = false
                    for i in 0..(($relevant_events | length) - 1) {
                        let event = ($relevant_events | get $i)
                        let check = ($checks | get $i)
                        if not (do $check $event) {
                            print $"verification failed at event #($i + 1)"
                            print $"event: ($event)"
                            $failed = true
                            break
                        }
                    }
                    
                    if not $failed {
                        print "test success!"
                        $test_passed = true
                    } else {
                        $test_passed = false
                    }
                }
            }
        } else {
            print "failed: output file missing"
        }

    } else {
        print "hydrant failed to start"
    }

    # cleanup
    print "cleaning up..."
    try { kill -9 $instance.pid }
    
    if $test_passed {
        exit 0
    } else {
        exit 1
    }
}