Mode Daemon: Menunda permintaan interaktif saat memulai?

(Perhatikan bahwa, sebaliknya, pertanyaan ini tidak sama dengan Bagaimana memulai dalam mode daemon dan menekan dialog interaktif?, Karena pertanyaan itu "dijawab" oleh submitter yang menghilangkan apa yang menyebabkan prompt tertentu muncul.)

Saya ingin tahu apakah ada cara umum untuk tidak emacs --daemonmenggantung selamanya menunggu jawaban prompt yang ditampilkan di minibuffer yang belum ada.

Mustahil untuk terhubung dengan emacsclient untuk menjawab prompt ini, karena server tidak memulai sampai Emacs menyelesaikan urutan startup. (Ini berarti, jika Anda memiliki ALTERNATE_EDITOR yang disetel ke string kosong, yang membuat emacsclientserver yang tidak dapat menemukan memulai daemon baru, Anda dapat berakhir dengan beberapa daemon Emacs yang semuanya macet dan menunggu.) Saya harus killall emacsmemperbaiki masalahnya sebelum melanjutkan.

Saya dapat memainkan whack-a-mole dengan setiap hal menyebabkan prompt pada startup ketika saya mengidentifikasinya (dengan memulai Emacs dalam mode non-daemon dan melihat apa yang ditanyakan), tetapi itu bukan solusi karena tidak dapat menghentikan daemon berikutnya dari menggantung di startup karena alasan baru.

Untuk memberikan contoh: alasan umum itu akan hang adalah setelah sistem reboot atau crash Emacs, ketika Emacs pasca-reboot pertama ingin tahu apakah itu boleh saja mencuri lockfiles dari Emacs yang sudah tidak berfungsi. Saya bisa memperbaikinya dengan membuat saran agar prompt itu selalu menjawab "ya" tanpa interaksi. Tapi kemudian, salah satu file yang terbuka di sesi sebelumnya simpan adalah file TRAMP yang membutuhkan sudo atau kata sandi SSH, sehingga daemon macet menunggu pada prompt kata sandi. Jadi saya memperbaikinya dengan mengedit file sesi secara manual (dengan viatau emacs -q!) Untuk menghapus file yang menyinggung — tetapi itu tidak mencegahnya terjadi di waktu berikutnya.

Jadi, saya bisa berhenti memuat sesi saya secara otomatis saat startup dan mengubahnya menjadi perintah yang harus saya jalankan secara manual dari emacsclient pertama saya. Tetapi jika itu tidak memuat sesi saya di latar belakang sehingga siap pada saat saya siap menggunakannya, seluruh tujuan daemon hilang!

Jadi yang saya suka adalah:

• (Terbaik) Beberapa cara untuk menunda minibuffer meminta hingga saya membuka emacsclient, sambil tetap menyelesaikan sisa inisialisasi.
• (OK) Beberapa cara untuk membuat semua minibuffer meminta saya belum menyarankan sebaliknya seperti yang dijelaskan di atas hanya kembali nokecuali emacsclient sedang berjalan. Saya dapat hidup dengan buffer TRAMP saya yang gagal asalkan sebagian besar berfungsi.

Apakah ada cara untuk mencapai salah satu dari tujuan ini?

Diskusi kami menyatakan bahwa Anda tidak memiliki X-server yang menjalankan ini membuat solusi pertama saya tidak berguna untuk Anda.

Berikut ini saya sajikan solusi kedua yang bekerja dengan bingkai terminal teks.

Ketika inisialisasi Anda memerlukan input pengguna melalui salah satu fungsi yang disarankan dengan avoid-initial-terminalEmacs menunggu hingga Anda membuka bingkai terminal teks. Prompt muncul di minibuffer frame itu dan Anda dapat memberikan respons interaktif Anda.

Informasi terkait kode diberikan sebagai komentar dalam kode. Ada TODOspidol dengan deskripsi yang menunjukkan tempat untuk memasukkan konfigurasi Anda sendiri. Saat ini ada formulir tes di sana yang memvalidasi kode.

;; TODO: Do here configure the server if needed.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Startup the server:
;; Analysis of read_from_minibuffer in src/minibuf.c and daemon_type in src/emacs.c
;; shows that daemon-initialized must have run before read-passwd / read-string
;; works on frames. Before it only works on stdin & stdout.
(server-start) ;;< early start
(let ((after-init-time before-init-time))
  (daemon-initialized)) ;; Finalize the daemon, 

(advice-add 'daemon-initialized :override #'ignore)
;;< Ignore `daemon-initialized' after initialization. It may only run once!
;; Now the background emacs is no longer marked as daemon. It just runs the server.

(defun prevent-server-start (&rest _ignore)
  "Prevent starting a server one time after `server-start' has been advised with this."
  (advice-remove 'server-start #'prevent-server-start))

(advice-add 'server-start :override #'prevent-server-start)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Prepare waiting for a real terminal frame when user input is required:

(defun avoid-initial-terminal (fun &rest args)
  "Wait until we are no longer on \"intial-terminal\".
Afterwards run `fun' with frame on the other terminal selected."
  (message "Avoiding initial terminal. Terminal: %S" (get-device-terminal nil))
  (while (string-equal
      (terminal-name (get-device-terminal nil))
      "initial_terminal")
    (sleep-for 1))
  ;; (message "Selected frame: %S; Running %S with %S." (selected-frame) fun args)
  (apply fun args))

(advice-add 'read-string :around #'avoid-initial-terminal)

(advice-add 'read-passwd :around #'avoid-initial-terminal)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; TODO: Your initialization that is not daemon related
;; and may require user input:

;; Currently this is just a test.
(read-passwd "Passwd: ")

(read-string "String: ")

(y-or-n-p "y-or-n query")

Uji: Emacs-versi: 26.1

1) Jalankan emacs --daemondi konsol.

2) Jalankan emacsclient --ttydi konsol lain. Anda diminta kata sandi dan sebuah string. Setelah itu Anda juga diminta untuk menjawab kueri y-atau-np.

Tidak persis apa yang Anda minta, tetapi mungkin solusi untuk masalah awal Anda:

Saya ingin tahu apakah ada cara umum untuk menjaga emacs --daemon agar tidak menggantung selamanya menunggu jawaban prompt yang ditampilkan di minibuffer yang belum ada.

Jika daemon memberi Anda bingkai grafis untuk menjawab pertanyaan yang muncul pada fase startup Anda tidak terjebak lagi.

Kode di bawah ini mendefinisikan saran umum my-with-initial-frameyang membuka bingkai pada tampilan pertama yang tersedia (misalnya, :0.0).

Saran itu dapat ditambahkan dengan mudah ke perintah kueri seperti y-or-n-patau read-passwd, seperti yang ditunjukkan di bawah ini.

Hanya dengan membuka bingkai memberi Anda kemungkinan yang agak kasar untuk menjawab pertanyaan pada antarmuka pengguna. Orang juga bisa menggunakan kotak dialog untuk y-or-n-ptetapi itu akan membutuhkan solusi khusus untuk perintah permintaan tertentu. Saya ingin menghindarinya.

Jika Anda mencoba kode itu di file init Anda, pastikan itu adalah hal pertama di sana.

(when (daemonp)

  (defun my-with-initial-frame (&rest _)
    "Ensure a frame on display :0.0 and ignore args."
    (let* ((display-list (x-display-list))
           (display-re (and display-list (regexp-opt display-list)))
           (term (and display-re (cl-some (lambda (term) (and (string-match display-re (terminal-name term)) term)) (terminal-list))))
           (frame (and term (cl-some (lambda (frame) (and (frame-live-p frame) frame)) (frames-on-display-list term)))))
      (select-frame (or frame (make-frame-on-display (getenv "DISPLAY"))))))

  (message "Advising querying functions with `my-with-initial-frame'.")
  (advice-add 'y-or-n-p :before #'my-with-initial-frame)
  (advice-add 'read-passwd :before #'my-with-initial-frame))

Uji:

Asumsi:

Memiliki xserver yang sedang berjalan yang dapat dihubungkan oleh program melalui DISPLAYvariabel lingkungan.

Masukan di xterm:

emacs --daemon

emacsclient --eval '(y-or-n-p "A")'

Ada membuka bingkai dengan y-or-n-pprompt permintaan A (y or n). Jawab kueri itu dan coba lagi:

emacsclient --eval '(y-or-n-p "B")'

Kueri baru dengan prompt B (y or n)di bingkai yang sama. Tutup frame itu, misalnya dengan C-x 5 0dan coba lagi:

emacsclient --eval '(y-or-n-p "C")'

Frame baru terbuka dengan prompt permintaan C (y or n).

Hal yang sama berlaku untuk input kata sandi.

Saya pikir menunda permintaan akan sulit secara umum, tetapi harus cukup mudah untuk mengubah Emacs sehingga permintaan tersebut segera memberi sinyal kesalahan.

Tidak hanya itu, tetapi jika Anda tidak dapat menjawab permintaan tersebut tanpa banyak senam, saya pikir itu memenuhi syarat sebagai bug, jadi saya sarankan Anda mengirimkan laporan bug untuk itu.