clojure - Compojure に単一の IP をリッスンさせるにはどうすればよいですか

Question

Compojure (Jetty) サーバーを次のように起動しました。

(defonce *server* (run-server {:host "localhost" :port 8080} "/*" (servlet routes)))

しかし、netstat は、0.0.0.0:8080、つまりすべての IP でリッスンしていることを示しています。

単一の IP でリッスンするために run-server に渡す正しいパラメーターは何ですか?

Answer 1

Compojureにパッチを適用する必要があると思います。:hostパラメータには何もしていません。この変更をに加えることserver/jetty.cljはうまくいくようですが、私はそれを徹底的にテストしていません。

（defn- create-server
  「Jettyサーバーインスタンスを構築します。」
  [オプションサーブレット]
  （[ポート（オプション：ポート80）
        ホスト（オプション：host "0.0.0.0"）
        コネクタ（doto（org.mortbay.jetty.bio.SocketConnector。）
                    （.setPortポート）
                    （.setHostホスト））
        サーバー（doto（サーバー）
                   （.addConnectorコネクタ））
        サーブレット（パーティション2サーブレット）]
    （when（または（options：ssl）（options：ssl-port））
      （add-ssl-connector！サーバーオプション））
    （doseq[[url-or-pathサーブレット]サーブレット]
      （add-servlet！server url-or-pathサーブレット））
    サーバ））

user> (run-server {:port 12346})
2009-07-22 13:48:53.999::INFO:  jetty-6.1.15
2009-07-22 13:48:54.002::INFO:  Started SocketConnector@0.0.0.0:12346
nil
user> (run-server {:host "127.0.0.1" :port 12345})
2009-07-22 13:48:08.061::INFO:  jetty-6.1.15
2009-07-22 13:48:08.129::INFO:  Started SocketConnector@127.0.0.1:12345