Giải mã nội dung phản hồi gzip-ed với url-truy xuất

Question

Đối với phần mở rộng Emacs, tôi muốn truy xuất dữ liệu qua HTTP. Tôi không đặc biệt thích ý tưởng bắn phá những thứ như wget, curl hoặc w3m để có thể làm điều đó, vì vậy tôi đang sử dụng hàm url-retrieve.

Một trong các máy chủ HTTP tôi đang nói chuyện xảy ra để bỏ qua các tiêu đề Accept-Encoding và luôn nhấn mạnh vào việc gửi dữ liệu của mình với Content-Encoding: gzip.

Kết quả là, và thực tế là url-retrieve không tự động giải mã nội dung phản hồi, bộ đệm url-retrieve sẽ hiển thị cho tôi sẽ chứa dữ liệu gzip nhị phân.

Tôi đang tìm cách giải mã nội dung phản hồi, tốt nhất là chunk theo đoạn, khi dữ liệu đến. Có cách nào để hướng dẫn url-retrieve làm điều này cho tôi không?

Giải mã đáp ứng cùng một lúc, khi nó hoàn toàn đến, cũng sẽ được chấp nhận, nhưng tôi muốn tránh tất cả các fubar liên quan đến việc tạo một tiến trình con không đồng bộ chạy gzip, các phần đường dẫn của phản hồi mà tôi nhận được và đọc các đoạn đã được giải mã trở lại - Tôi sẽ tìm một số chức năng thư viện ở đây.

Answer 1

Điều auto-compression-mode hoạt động là chạy gzip trên tệp để được giải nén. Xem ví dụ: jka-compr-insert-file-contents trong jka-compr.el. Vì vậy, nếu bạn định sử dụng auto-compression-mode để thực hiện giải nén, bạn sẽ cần ghi phản hồi vào tệp trước. Ví dụ, một cái gì đó như thế này:

(defun uncompress-callback (status) 
    (let ((filename (make-temp-file "download" nil ".gz"))) 
    (search-forward "\n\n")    ; Skip response headers. 
    (write-region (point) (point-max) filename) 
    (with-auto-compression-mode 
     (find-file filename)))) 

(url-retrieve "http://packages.ubuntu.com/hardy/allpackages?format=txt.gz" 
       #'uncompress-callback) 

(. Nếu bạn không muốn tạo ra một tập tin tạm thời, bạn sẽ phải làm quản lý tiến trình con của riêng mình, nhưng nó không phải là khó khăn như bạn hàm ý trong câu hỏi của bạn)