Décodage de corps de réponse gzip-ed avec url-retrieve

Question

Pour une extension Emacs, je souhaite récupérer des données via HTTP. Je ne suis pas particulièrement friand de l'idée de bombarder des choses comme , curl, ou w3m pour pouvoir le faire, alors j'utilise la fonction url-retrieve.

L'un des serveurs HTTP que je parle arrive à ignorer Accept-Encoding en-têtes et insiste pour toujours envoyer ses données avec Content-Encoding: gzip. En conséquence de cela, et du fait que url-retrieve ne décode pas automatiquement les corps de réponse, le tampon url-retrieve me présentera des données gzip binaires.

Je suis à la recherche d'un moyen de décoder le corps de la réponse, de préférence fragment par bloc, au fur et à mesure que les données arrivent. Y at-il un moyen d'instruire url-retrieve de le faire pour moi? Décoder la réponse en même temps, une fois complètement arrivé, serait également acceptable, mais je préfère éviter tout fubar impliqué dans la création d'un sous-processus asynchrone exécutant gzip, en redirigeant des parties de la réponse que j'ai eues vers ça, et lisant les morceaux décodés - je chercherais une fonction de bibliothèque ici.

Answer 1

Ce que auto-compression-mode exécute gzip sur le fichier à décompresser. Voir par exemple jka-compr-insert-file-contents dans jka-compr.el. Donc, si vous allez utiliser auto-compression-mode pour faire la décompression, vous devrez d'abord écrire la réponse à un fichier. Par exemple, quelque chose comme ceci:

(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) 

(. Si vous ne voulez pas créer un fichier temporaire, vous aurez faites votre propre gestion des sous-processus, mais ce n'est pas aussi difficile que vous le laissez entendre dans votre question)