created bug 6511 test ref£ 79/15679/2
Anais AUBERT [Tue, 9 Dec 2014 15:53:09 +0000 (16:53 +0100)]
Change-Id: Ie8d7e85d9bec2735b5cfd53be89b0e7d9cb1a36d

scilab/modules/fileio/tests/nonreg_tests/bug_6511.dia.ref [new file with mode: 0644]

diff --git a/scilab/modules/fileio/tests/nonreg_tests/bug_6511.dia.ref b/scilab/modules/fileio/tests/nonreg_tests/bug_6511.dia.ref
new file mode 100644 (file)
index 0000000..dc45d54
--- /dev/null
@@ -0,0 +1,38 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2010 - DIGITEO - Allan CORNET
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- LONG TIME EXECUTION -->
+// <-- Non-regression test for bug 6511 -->
+//
+// <-- Bugzilla URL -->
+// http://bugzilla.scilab.org/show_bug.cgi?id=6511
+//
+// <-- Short Description -->
+// mseek and mtell do not manage files > 2 Gbytes on 64 bits
+// creates a very big file > 2 Go and try to read
+// resquires 10 minutes or more to execute
+SIZE_FILE = 4e8;
+file3 = TMPDIR + "/test3.bin";
+fd1= mopen(file3,"wb");
+for i=1:SIZE_FILE, mput(i,"d"); end
+mseek(0);
+mput(678,"d");
+mseek(0,fd1,"end");
+lastpos = mtell(fd1);
+mput(932,"d");
+mtell(fd1);
+mclose(fd1);
+fd2= mopen(file3,"rb");
+mseek(0,fd2,"set");
+res = mget(1,"d",fd2);
+if res <> 678 then bugmes();quit;end;
+mseek(0,fd2);
+mseek(lastpos,fd2);
+res = mget(1,"d",fd2);
+if res <> 932 then bugmes();quit;end;
+mclose(fd2);
+// delete file after (to save space on disk)
+mdelete(file3);