emacs elisp中的简单tcp客户端示例?

时间:2011-05-28 16:41:56

标签: emacs elisp tcpclient

我正在尝试学习emacs elisp并尝试编写一个小程序来连接到TCP / IP端口并处理返回的记录。在一种情况下,我将解析CSV数据,在另一种情况下,我将解析JSON(例如来自GPSD,而json.el谢天谢地附带了emacs)。我查看了echo-server示例,但我正在寻找一个客户端示例,该示例显示了与make-network-process和处理面向行的数据的连接。它不是http,所以我不能同时使用url-retrieve-。

我的elisp技能非常弱,所以我正在寻找真正基本的例子。

谢谢!

3 个答案:

答案 0 :(得分:15)

我正在寻找更简单的东西。我终于设法从一个剥离的TcpClient示例编写代码。如果您将其保存为client.el,请执行chmod + x client.el和./client.el,这可以从命令行运行。它将打印出服务器决定发送的内容,并在300秒后退出。它确实需要一些评论来解释它发生了什么。

#!/usr/bin/emacs --script

(defvar listen-port 9999
    "port of the server")

(defvar listen-host "127.0.0.1"
    "host of the server")

(defun listen-start nil
    "starts an emacs tcp client listener"
    (interactive)
    (make-network-process :name "listen" :buffer "*listen*" :family 'ipv4 :host listen-host :service listen-port :sentinel 'listen-sentinel :filter 'listen-filter))

(defun listen-stop nil
  "stop an emacs tcp listener"
  (interactive)
  (delete-process "listen"))

(defun listen-filter (proc string)   
  (message string))

(defun listen-sentinel (proc msg)
  (when (string= msg "connection broken by remote peer\n")
    (message (format "client %s has quit" proc))))

(listen-start)
(sleep-for 300)
(listen-stop)

答案 1 :(得分:6)

Emacs wiki是一个值得关注的好地方。

请参阅TcpClient

答案 2 :(得分:4)

如果您想要更加可靠且可能支持加密的内容,您应该查看network-stream.elproto-stream.el