Ping is a project mainly written in Common Lisp, it's free.
icmp ping
・SBCLによるicmpのpingの実装 ・実行にはroot権限が必要
・0.0.3
・(ping:ping target &key (loop-count 10) dont-route) - target: ping先のIPアドレスかホスト名。文字列 or #(x x x x)形式 - loop-count: pingメッセージを送信する回数 - dont-route: MSG_DONTROUTEをフラグに指定してpingメッセージを送信する