From: Michael Albinus <michael.albinus@gmx.de>
Date: Wed, 8 Mar 2017 16:27:24 +0000 (+0100)
Subject: Fix bug#26011
X-Git-Tag: emacs-26.0.90~610
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a158b351e754329c92f87178090df49824fdcb00;p=emacs.git

Fix bug#26011

* lisp/net/tramp-sh.el (tramp-do-copy-or-rename-file-via-buffer):
Check, whether file is too large.  (Bug#26011)
---

diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 071ef7982af..85619621d90 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -2147,6 +2147,11 @@ file names."
 First arg OP is either `copy' or `rename' and indicates the operation.
 FILENAME is the source file, NEWNAME the target file.
 KEEP-DATE is non-nil if NEWNAME should have the same timestamp as FILENAME."
+  ;; Check, whether file is too large.  Emacs checks in `insert-file-1'
+  ;; and `find-file-noselect', but that's not called here.
+  (abort-if-file-too-large
+   (tramp-compat-file-attribute-size (file-attributes (file-truename filename)))
+   (symbol-name op) filename)
   ;; We must disable multibyte, because binary data shall not be
   ;; converted.  We don't want the target file to be compressed, so we
   ;; let-bind `jka-compr-inhibit' to t.  `epa-file-handler' shall not