5.1 merge

increase xtradb verson from 13.0 to 13.01

1 files changed, 11 insertions, 1 deletions

diff --git a/mysys/my_write.c b/mysys/my_write.c
index 07dbfe8eb40..17f6131b617 100644
--- a/mysys/my_write.c
+++ b/mysys/my_write.c
@@ -40,7 +40,17 @@ size_t my_write(int Filedes, const uchar *Buffer, size_t Count, myf MyFlags)
   
   for (;;)
   {
-    if ((writenbytes= write(Filedes, Buffer, Count)) == Count)
+    writenbytes= write(Filedes, Buffer, Count);
+    /**
+       To simulate the write error set the errno = error code
+       and the number pf written bytes to -1.
+     */
+    DBUG_EXECUTE_IF ("simulate_file_write_error",
+                     {
+                       errno= ENOSPC;
+                       writenbytes= (size_t) -1;
+                     });
+    if (writenbytes == Count)
       break;
     if (writenbytes != (size_t) -1)
     {						/* Safeguard */