emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 72bcc6f: Fix parsing error in exif


From: Lars Ingebrigtsen
Subject: master 72bcc6f: Fix parsing error in exif
Date: Fri, 11 Dec 2020 09:16:14 -0500 (EST)

branch: master
commit 72bcc6f988350329f3c0eb2f86af17f3ed97cf40
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix parsing error in exif
    
    * lisp/image/exif.el (exif--parse-exif-chunk): The offset is a
    four-byte number.  Reported by Alan Light <lightalan@gmail.com>.
---
 lisp/image/exif.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/image/exif.el b/lisp/image/exif.el
index 6aeb52c..e328fcc 100644
--- a/lisp/image/exif.el
+++ b/lisp/image/exif.el
@@ -165,7 +165,7 @@ If the orientation isn't present in the data, return nil."
       ;; Another magical number.
       (unless (= (exif--read-number 2 le) #x002a)
         (signal 'exif-error "Invalid TIFF header length"))
-      (let ((offset (exif--read-number 2 le)))
+      (let ((offset (exif--read-number 4 le)))
         ;; Jump to where the IFD (directory) starts and parse it.
         (when (> (1+ offset) (point-max))
           (signal 'exif-error "Invalid IFD (directory) offset"))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]