さくらのレンタルサーバにQuicklispをインストールする

2013/05/13

前回のさくらのレンタルサーバにClozure Clをインストールに引き続き、Common Lispのライブラリを利用するために、Quicklispをインストールする。

Quicklispをダウンロードする

% cd ~/work
% wget http://beta.quicklisp.org/quicklisp.lisp

Clozure CL を起動して、Quilklisp をインストールする

%ccl
Welcome to Clozure Common Lisp Version 1.9-r15760  (FreebsdX8632)!
? (load "quicklisp.lisp")

  ==== quicklisp quickstart loaded ====

    To continue with installation, evaluate: (quicklisp-quickstart:install)

    For installation options, evaluate: (quicklisp-quickstart:help)

#P"/home/bty/quicklisp.lisp"
? (quicklisp-quickstart:install :path ".quicklisp/")
; Fetching #<URL "http://beta.quicklisp.org/quickstart/asdf.lisp">
; 194.07KB
==================================================
198,729 bytes in 0.02 seconds (8437.88KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/quickstart/quicklisp.tar">
; 210.00KB
==================================================
215,040 bytes in 0.02 seconds (10500.00KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/quickstart/setup.lisp">
; 4.96KB
==================================================
5,078 bytes in 0.00 seconds (4958.98KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/dist/quicklisp.txt">
; 0.40KB
==================================================
408 bytes in 0.00 seconds (398.44KB/sec)

  ==== quicklisp installed ====

    To load a system, use: (ql:quickload "system-name")

    To find systems, use: (ql:system-apropos "term")

    To load Quicklisp every time you start Lisp, use: (ql:add-to-init-file)

    For more information, see http://www.quicklisp.org/beta/

NIL
? (ql:add-to-init-file)
I will append the following lines to #P"/home/bty/\\.ccl-init.lisp":

  ;;; The following lines added by ql:add-to-init-file:
  #-quicklisp
  (let ((quicklisp-init (merge-pathnames ".quicklisp/setup.lisp" (user-homedir-pathname))))
    (when (probe-file quicklisp-init)
      (load quicklisp-init)))

Press Enter to continue.

#P"/home/bty/\\.ccl-init.lisp"
? (quit)
%

試しに WEBクライアントの drakmaライブラリをインストールして、単純なHTMLを記述した http://bty.sakura.ne.jp を読んでみる。

Windows でインストールしたときは OpenSSL 関連のライブラリが無いというエラーがでて苦労したが、さくらのインターネットではすんなりインストールできた。

%ccl
Welcome to Clozure Common Lisp Version 1.9-r15760  (FreebsdX8632)!
? (ql:quickload :drakma)
; Fetching #<URL "http://beta.quicklisp.org/dist/quicklisp/2013-03-12/systems.txt">
; 142.18KB
==================================================
145,597 bytes in 0.01 seconds (11848.71KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/dist/quicklisp/2013-03-12/releases.txt">
; 211.98KB
==================================================
217,068 bytes in 0.01 seconds (23553.38KB/sec)
To load "drakma":
  Install 15 Quicklisp releases:
    alexandria babel bordeaux-threads cffi chunga cl+ssl
    cl-base64 cl-ppcre drakma flexi-streams puri
    trivial-features trivial-garbage trivial-gray-streams
    usocket
; Fetching #<URL "http://beta.quicklisp.org/archive/usocket/2013-01-28/usocket-0.6.0.1.tgz">
; 67.33KB
==================================================

    ( 省略 )

[package trivial-garbage].........................
[package cl+ssl]..................................
[package drakma].............
(:DRAKMA)
? (drakma:http-request "http://bty.sakura.ne.jp/")
"<html>
<head>
<title>bty.sakura.ne.jp</title>
</head>
<body>
<p>bty.saura.ne.jp</p>
</body>
</html>

"
200
((:DATE . "Mon, 15 Apr 2013 14:35:17 GMT") (:SERVER . "Apache/1.3.42 (Unix) mod_ssl/2.8.31 OpenSSL/0.9.8e") (:LAST-MODIFIED . "Sun, 03 Mar 2013 08:07:05 GMT") (:ETAG . "\"65-513304a9\"") (:ACCEPT-RANGES . "bytes") (:CONTENT-LENGTH . "101") (:CONNECTION . "close") (:CONTENT-TYPE . "text/html"))
#<URI http://bty.sakura.ne.jp/>
#<FLEXI-STREAMS:FLEXI-IO-STREAM #x3972A786>
T
"OK"
? 

おお、できた。よくわからんけど、できた。そろそろ、本も買おうと思った。ANSI Common Lisp が良さそうだ。

参考にしたサイト