Emacs keylogger

Question

Tôi đang cố gắng thực hiện một keylogger trong Emacs (cho mục đích riêng của tôi, không bất chính).

Dường như tôi chắc chắn có thể nắm bắt được lệnh cuối cùng thông qua real-last-command trong pre-command-hook

Vì vậy, tôi có thể làm điều gì đó như:

(setq keylog-list nil) 

(defun my-keylogger-function() 
    (setq keylog-list (cons real-last-command keylog-list))) 

(add-hook 'pre-command-hook 'my-keylogger-function) 

Sau một vài lệnh phong trào, chúng tôi nhận

keylog-list's value is 
(describe-variable left-char left-char previous-line previous-line left-char eval-last-sexp) 

Tuy nhiên, tôi cũng quan tâm đến việc nắm bắt các đối số cho các lệnh này (ví dụ: đối số cho left-char, mặc định là 1 nhưng có thể khác nếu các đối số tiền tố được sử dụng.

Có cách nào để truy cập vào args không? Một cái gì đó như real-last-command-arglist?

Answer 1

Tại sao bạn đăng nhập lệnh cuối cùng (tức là trước đó)? Nếu bạn đăng nhập this-command thay vào đó, bạn có thể đăng nhập current-prefix-arg, tương ứng với đối số tiền tố được sử dụng.

Answer 2

Một keylogger cũng được tích hợp vào các emacs: (tệp mở-dribble).