Add retry stream wrapper

src/RetryWrapper.php

@@ -0,0 +1,66 @@
+<?php
+/**
+ * Copyright (c) 2016 Robin Appelman <icewind@owncloud.com>
+ * This file is licensed under the Licensed under the MIT license:
+ * http://opensource.org/licenses/MIT
+ */
+
+namespace Icewind\Streams;
+
+/**
+ * Wrapper that retries reads/writes to remote streams that dont deliver/recieve all requested data at once
+ */
+class RetryWrapper extends Wrapper {
+
+	/**
+	 * Wraps a stream with the provided callbacks
+	 *
+	 * @param resource $source
+	 * @return resource
+	 */
+	public static function wrap($source) {
+		$context = stream_context_create(array(
+			'callback' => array(
+				'source' => $source
+			)
+		));
+		return Wrapper::wrapSource($source, $context, 'retry', '\Icewind\Streams\RetryWrapper');
+	}
+
+	protected function open() {
+		$this->loadContext('retry');
+		return true;
+	}
+
+	public function dir_opendir($path, $options) {
+		return false;
+	}
+
+	public function stream_open($path, $mode, $options, &$opened_path) {
+		return $this->open();
+	}
+
+	public function stream_read($count) {
+		$result = parent::stream_read($count);
+
+		$bytesReceived = strlen($result);
+		while ($bytesReceived < $count && !$this->stream_eof()) {
+			$result .= parent::stream_read($count - $bytesReceived);
+			$bytesReceived = strlen($result);
+		}
+
+		return $result;
+	}
+
+	public function stream_write($data) {
+		$bytesToSend = strlen($data);
+		$result = parent::stream_write($data);
+
+		while ($result < $bytesToSend && !$this->stream_eof()) {
+			$dataLeft = substr($data, $result);
+			$result += parent::stream_write($dataLeft);
+		}
+
+		return $result;
+	}
+}