ClojureでMagicPacket送信ツールを作ってみた - (otabat)Clojureで書くとこんな感じかな。 (ns #^{:author "otabat", :doc "Magic packet sender"} masquerade (:gen-class)) (import '(java.net InetSocketAddress DatagramPacket DatagramSocket)) (use '[clojure.contrib.str-utils :only (re-split)]) (def default-port 2304) (def buf-length 102) (defn send-magic-packet "Send magic packet to specified host" [ip port mac-byte] (let [mac-byte-array (into-array (Byte/TYPE) mac-byte)
