From: Stephen Leake <stephen_leake@stephe-leake.org>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 18626@debbugs.gnu.org
Subject: bug#18626: 24.3.94; communication with subprocess is slow
Date: Sun, 05 Oct 2014 08:41:08 -0500 [thread overview]
Message-ID: <85zjdad47f.fsf@stephe-leake.org> (raw)
In-Reply-To: <858ukuejps.fsf@stephe-leake.org> (Stephen Leake's message of "Sun, 05 Oct 2014 08:20:47 -0500")
Stephen Leake <stephen_leake@stephe-leake.org> writes:
> Eli Zaretskii <eliz@gnu.org> writes:
>
>> Can you present similar timings from some Posix platform for
>> comparison?
>
> On Debian wheezy, with emacs 24.3.94:
>
> $ cd /tmp
> $ time cat < /home/Projects/emacs/emacs-24.3.94/src/xdisp.c > xdisp.c
> real 0m0.007s
> user 0m0.000s
> sys 0m0.004s
>
>
> (find-file "emacs-24.3.94/src/xdisp.c")
> (pipe-torture "cat.exe")
> 1.556597
>
> much faster than Windows, but still slow relative to plain file IO.
>
> (pipe-torture "debug.exe" "4096")
>
> This dies, because "debug.exe" exits early. It turns out that Emacs is
> sending one line of the buffer at a time. I have not yet tried to figure
> out why that doesn't happen on Windows.
I rewrote debug.adb to handle this case by exiting when the total bytes
read equals the file size:
with Ada.Command_Line;
with Ada.Text_IO; use Ada.Text_IO;
with GNAT.OS_Lib;
procedure Debug_Counted
is
use GNAT.OS_Lib;
Chunk : constant Integer := Integer'Value (Ada.Command_Line.Argument (1));
File_Size : constant Integer := Integer'Value (Ada.Command_Line.Argument (2));
File : constant File_Descriptor := GNAT.OS_Lib.Standin;
Read_Bytes : Integer;
Total_Read_Bytes : Integer := 0;
Text : aliased String (1 .. Chunk);
Short_Count : Integer := 0;
Count : Integer := 0;
begin
loop
Read_Bytes := Read (File, Text'Address, Chunk);
Total_Read_Bytes := Total_Read_Bytes + Read_Bytes;
if Read_Bytes < Chunk then
Short_Count := Short_Count + 1;
else
Count := Count + 1;
end if;
exit when Total_Read_Bytes >= File_Size;
end loop;
Put_Line ("Short_Count => " & Integer'Image (Short_Count) & " Count => " & Integer'Image (Count));
end Debug_Counted;
(find-file "xdisp.c")
(pipe-torture
"/home/Projects/org.emacs.ada-mode.stephe-1/build/wisi/debug_counted"
"4096" "974230")
0.344027
This is comparable to the time on Windows with a large buffer in the
subprocess. So apparently it is not using the same delay in
send_process. Or the IO system is providing a large buffer.
--
-- Stephe
next prev parent reply other threads:[~2014-10-05 13:41 UTC|newest]
Thread overview: 19+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-10-04 6:47 bug#18626: 24.3.94; communication with subprocess is slow stephen_leake
2014-10-04 8:07 ` Eli Zaretskii
2014-10-05 13:20 ` Stephen Leake
2014-10-05 13:41 ` Stephen Leake [this message]
2014-10-05 14:43 ` Eli Zaretskii
2014-10-05 18:19 ` Stephen Leake
2014-10-04 8:11 ` Stephen Leake
2014-10-04 8:32 ` Eli Zaretskii
2014-10-04 22:29 ` Stefan Monnier
2014-10-05 2:46 ` Eli Zaretskii
2014-10-05 13:34 ` Stephen Leake
2014-10-05 14:40 ` Eli Zaretskii
2014-10-05 18:25 ` Stephen Leake
2014-10-05 19:04 ` Eli Zaretskii
2014-10-08 13:29 ` Stephen Leake
2014-10-08 13:53 ` Eli Zaretskii
2014-10-10 8:07 ` Stephen Leake
2014-10-10 9:13 ` Eli Zaretskii
2014-10-10 8:47 ` Stephen Leake
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=85zjdad47f.fsf@stephe-leake.org \
--to=stephen_leake@stephe-leake.org \
--cc=18626@debbugs.gnu.org \
--cc=eliz@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.