本次实验的目的是了解Emacs如何能在Linux内核上很好的工作.
仅需要的外部命令是: mount .
文章中的”root_fs_emacs”可以做为一个标准分区或在live CD上使用. 这次实验, 我们用于User Mode Linux上.
1. 初始化root_fs(至少150MB)
cd ~/umldd if=/dev/zero of=root_fs_emacs bs=1k count=200kyes ymke2fs root_fs_emacsmkdir /emacsmount -o loop root_fs_emacs /emacscd /emacsln -s . emacs # 简单配置 emacs 的 –prefix 参数cp -a /dev dev # 我们大胆拷贝整个/devmkdir etc sbin tmp # 创建emacs没有创建的其它目录cat >etc/fstab </dev/ubd0 / ext2 defaults 0 1EOF
2. 在字符环境下静态编译emacs
cd ~/srctar jxvf emacs-21.3.tar.bz2cd emacs-21.3CFLAGS=-static LDFLAGS=-static ./configure –without-x –prefix=/emacsmake && make install
3. 以/sbin/init方式安装emacs
cd /emacsln bin/emacs sbin/initcat >.emacs <(message “init starting”)(setq auto-save-interval 0)(defun shutdown ()(interactive)(when (yes-or-no-p “Really shut down the system? “);; actually, kill-emacs signals emacs ie. init, which makes linux panic.(kill-emacs)))(global-set-key “\C-x\C-c” ’shutdown)(global-set-key “^\” ‘keyboard-quit) ;; strangely, C-g does not work.(call-process “/bin/mount” nil “*log*” t “-n” “-o” “rw,remount” “/”)(if (file-exists-p “/etc/mtab”) (delete-file “/etc/mtab”))(call-process “/bin/mount” nil “*log*” t “-f” “/dev/ubd0″ “/”)(message “init done”)EOF
4. 静态编译mount
cd ~/srctar jxvf util-linux-2.12a.tar.bz2cd util-linux-2.12aCFLAGS=-static LDFLAGS=-static ./configuremake && install -m 755 mount/umount mount/mount /emacs/bin/
5. 引导linux
cd ~/umlumount /emacslinux ubd0=root_fs_emacs
现在, 你可以通过下面命令运行一个emacs脚本:
M-x eshell RETls -l RET
运行结果是:
File Edit Options Buffers Tools HelpWelcome to the Emacs shell
/ # ls -ltotal 21drwxr-xr-x 2 0 0 1024 Jul 26 08:42 bindrwxr-xr-x 1 0 0 0 Jan 1 1970 devlrwxrwxrwx 1 0 0 1 Jul 26 08:11 emacs -> .drwxr-xr-x 2 0 0 1024 Jul 26 09:20 etcdrwxr-xr-x 2 0 0 2048 Jul 26 08:11 infodrwxr-xr-x 3 0 0 1024 Jul 26 08:11 libexecdrwx—— 2 0 0 12288 Jul 26 08:10 lost+founddrwxr-xr-x 3 0 0 1024 Jul 26 08:10 mandrwxr-xr-x 2 0 0 1024 Jul 26 08:11 sbindrwxr-xr-x 3 0 0 1024 Jul 26 08:10 sharedrwxr-xr-x 2 0 0 1024 Jul 26 09:15 tmp/ #
–1-:—F1 *eshell* (EShell)–L20–All———————
当然, emacs缺少很多系统调用(同样elisp原语中也没有), 所以, 我们很难用emacs去做任何事情. 不过这只是一个开始.
另外, 你也可以使用具有FFI和可移植Hemlock功能的Common-Lisp方法来实现.
Emacs做为shell程序
Emacs可以很容易做为shell程序使用:
echo /usr/bin/emacs >> /etc/shellschsh -s /usr/bin/emacs GOODUSER
[1] [2] 下一页
echo ‘(setenv “SHELL” “/bin/bash”)’ >> ~GOODUSER/.emacs# 这种情况用户想使用 M-x shell# [ 我更想使用: (setenv “SHELL” “/usr/bin/clisp”) ]
echo ‘(eshell)’ >> ~GOODUSER/.emacs# 自动启动eshell.# 也可使用: (dired default-Directory) 替代…
su - GOODUSER# 很好!
（出处：http://www.sheup.com）