第十一章 系统接口

一个有用的Scheme程序经常需要与底层操作系统进行交互。

11.1 检查和删除文件

file-exists?会检查它的参数字符串是否是一个文件。delete-file接受一个文件名字符串作为参数并删除相应的文件。这些程序并不是Scheme标准的一部分，但是在大多数Scheme实现中都能找到它们。用这些过程操作目录（而不是文件）并不是很可靠。（用它们操作目录的结果与具体的Scheme实现有关。）

file-or-directory-modify-seconds过程接受一个文件名或目录名为参数，并返回这个目录或文件的最后修改时间。时间是从格林威治标准时间1970年1月1日0点开始记时的。例如：

  1. (file-or-directory-modify-seconds "hello.scm")
  2. =>  893189629

假定hello.scm文件最后一次修改的时间是1998年4月21日的某个时间。

11.2 调用操作系统命令

system程序把它的参数字符串当作操作系统命令来执行 [1]。如果命令成功执行并返回0，则它会返回真，如果命令执行失败并返回某非0值，则它会返回假。命令产生的任何输出都会进入标准的输出。

  1. (system "ls")
  2. ;lists current directory
  4. (define fname "spot")
  6. (system (string-append "test -f " fname)) 
  7. ;tests if file `spot' exists
  9. (system (string-append "rm -f " fname)) 
  10. ;removes `spot'

最后两个命令等价于：

  1. (file-exists? fname)
  3. (delete-file fname)

11.3 环境变量

过程getenv返回操作系统环境变量的设定值，如：

  1. (getenv "HOME")
  2. =>  "/home/dorai"
  4. (getenv "SHELL")
  5. =>  "/bin/bash"

[1] MzScheme在process库中提供了system过程。使用(require (lib "process.ss"))来加载这个库。