Log for YSITD

我有檯高效伺服器但我不在他旁邊——
如何以伺服器虛擬化技術遠端玩轉steam遊戲

想玩遊戲嗎？
叔叔這裡有檯 server 借你玩

// tls=使用 TLS 連線的 net 函式
// 我有設 err handler，此處為 nil
conn, _ := tls.Dial("tcp", "irc.freenode.net:7000")
buff := make([]byte, 2048)
// 確認連線是否成功

// 開始檢查 SASL 能力
// 此處 err == nil
_, errWriting := io.WriteString(conn, "CAP LS")
// 開始接受回應
// 期望取得一字串，包含 "sasl" 字樣
for {
    // 此處不接 err，因空回應會導致 io.EOL 錯誤，我不想捕捉。
    buflen, _ := conn.Read(buff)

    if buflen == 0 {
        continue
    }

    if strings.Contains(string(buff[:buflen]), "sasl") {
        break // 進行驗證作業
   } else {
        goto stopConnection
   }
}

[pan93412@Arch-PC ~]$ go run GolangIRCBot.go 
2019/01/23 15:21:51 建立連線：連線到 irc.freenode.net:7000 (TLS 連線)
2019/01/23 15:21:57 連線成功：開始進行設定程序
2019/01/23 15:21:57 檢查能力：正在檢查 SASL 能力
ERROR :Closing Link: 127.0.0.1 (Connection timed out)

2019/01/23 15:22:32 檢查能力 [失敗]：SASL 能力不可用。
<nil> <nil>

CAP LS
:tolkien.freenode.net CAP * LS :account-notify extended-join identify-msg multi-prefix sasl
CAP REQ sasl
:tolkien.freenode.net CAP * ACK :sasl

import System.Random
import Data.Maybe

millerTest :: Int -> Int -> Int -> Bool
millerTest d n rnd = (n2f (third (until test loop (x0,d0,s0)))) where
    n2f (Just x) = x
    n2f Nothing = False
    a = rnd
    third (_,_,x) = x
    x0 = (a^d) `mod` n
    d0 = d
    s0 = Nothing
    loop (x,d,s) = (x',d',s') where
        x' = (x*x) `mod` n
        d' = d*2
        s' = 
            if (x==1) 
                then Just False
                else if (x == n-1)
                    then Just True
                    else Nothing
    test (x,d,s) = (d==n-1) || isJust s

isPrime :: StdGen -> Int -> Int -> Bool
isPrime rng k n
    | n<=1 || n== 4 = False
    | n<=3 = True
    | otherwise = all (millerTest d n) rnds where
        rnds = randomRs (2,n-2) rng
        loop x = x `div` 2
        cond x = ((x `mod` 2) /= 0)
        d = until cond loop (n-1)

*Main> rng = mkStdGen 128309213
*Main> rng
128309214 1
*Main> fn = isPrime rng 10
*Main> fn 87
False
*Main> fn 23
False

[15:38] >> :tolkien.freenode.net NOTICE * :*** Looking up your hostname...%0A
[15:38] >> :tolkien.freenode.net NOTICE * :*** Checking Ident%0A
[15:38] >> :tolkien.freenode.net NOTICE * :*** Found your hostname%0A
[15:38] << CAP LS%0A
[15:38] << NICK pan93412%0A
[15:38] << USER pan93412 8 * :pan93412%0A
[15:38] >> :tolkien.freenode.net NOTICE * :*** No Ident response%0A
[15:38] >> :tolkien.freenode.net CAP * LS :account-notify extended-join identify-msg multi-prefix sasl%0A
[15:38] << CAP REQ :account-notify extended-join multi-prefix sasl%0A
[15:38] >> :tolkien.freenode.net CAP pan93412 ACK :account-notify extended-join multi-prefix sasl %0A
[15:38] << AUTHENTICATE PLAIN%0A

var nullChar = "\0"

var code = "pan93412" + nullChar + "pan93412" + nullChar + "神奇密碼"

:tolkien.freenode.net NOTICE * :*** Looking up your hostname...
:tolkien.freenode.net NOTICE * :*** Checking Ident
:tolkien.freenode.net NOTICE * :*** Found your hostname
CAP LS
:tolkien.freenode.net NOTICE * :*** No Ident response
:tolkien.freenode.net CAP * LS :account-notify extended-join identify-msg multi-prefix sasl
CAP LS
:tolkien.freenode.net CAP * LS :account-notify extended-join identify-msg multi-prefix sasl
CAP REQ sasl
:tolkien.freenode.net CAP * ACK :sasl

*Main> rng = mkStdGen 128309213
*Main> rng
128309214 1
*Main> fn = isPrime rng 10
*Main> fn 87
False
*Main> fn 23
False