<?php
  /**
   * Copyright (c) 2012 Robin Appelman <icewind@owncloud.com>
   * This file is licensed under the Affero General Public License version 3 or
   * later.
   * See the COPYING-README file.
   */
  
  namespace OC\Files\Cache;
  
  use OC\Files\Filesystem;
  use OC\Hooks\BasicEmitter;
  
  /**
   * Class Scanner
   *
   * Hooks available in scope \OC\Files\Cache\Scanner:
   *  - scanFile(string $path, string $storageId)
   *  - scanFolder(string $path, string $storageId)
   *
   * @package OC\Files\Cache
   */
  class Scanner extends BasicEmitter {
  	/**
  	 * @var \OC\Files\Storage\Storage $storage
  	 */
  	private $storage;
  
  	/**
  	 * @var string $storageId
  	 */
  	private $storageId;
  
  	/**
  	 * @var \OC\Files\Cache\Cache $cache
  	 */
  	private $cache;
  
  	const SCAN_RECURSIVE = true;
  	const SCAN_SHALLOW = false;
  
  	const REUSE_ETAG = 1;
  	const REUSE_SIZE = 2;
  
  	public function __construct(\OC\Files\Storage\Storage $storage) {
  		$this->storage = $storage;
  		$this->storageId = $this->storage->getId();
  		$this->cache = $storage->getCache();
  	}
  
  	/**
  	 * get all the metadata of a file or folder
  	 * *
  	 *
  	 * @param string $path
  	 * @return array with metadata of the file
  	 */
  	public function getData($path) {
  		$data = array();
  		if (!$this->storage->isReadable($path)) return null; //cant read, nothing we can do
  		$data['mimetype'] = $this->storage->getMimeType($path);
  		$data['mtime'] = $this->storage->filemtime($path);
  		if ($data['mimetype'] == 'httpd/unix-directory') {
  			$data['size'] = -1; //unknown
  		} else {
  			$data['size'] = $this->storage->filesize($path);
  		}
  		$data['etag'] = $this->storage->getETag($path);
  		return $data;
  	}
  
  	/**
  	 * scan a single file and store it in the cache
  	 *
  	 * @param string $file
  	 * @param int $reuseExisting
  	 * @param bool $parentExistsInCache
  	 * @return array with metadata of the scanned file
  	 */
  	public function scanFile($file, $reuseExisting = 0, $parentExistsInCache = false) {
  		if (!self::isPartialFile($file)
  			and !Filesystem::isFileBlacklisted($file)
  		) {
  			$this->emit('\OC\Files\Cache\Scanner', 'scanFile', array($file, $this->storageId));
  			\OC_Hook::emit('\OC\Files\Cache\Scanner', 'scan_file', array('path' => $file, 'storage' => $this->storageId));
  			$data = $this->getData($file);
  			if ($data) {
  				if ($file and !$parentExistsInCache) {
  					$parent = dirname($file);
  					if ($parent === '.' or $parent === '/') {
  						$parent = '';
  					}
  					if (!$this->cache->inCache($parent)) {
  						$this->scanFile($parent);
  					}
  				}
  				$newData = $data;
  				if ($reuseExisting and $cacheData = $this->cache->get($file)) {
  					// only reuse data if the file hasn't explicitly changed
  					if (isset($data['mtime']) && isset($cacheData['mtime']) && $data['mtime'] === $cacheData['mtime']) {
  						if (($reuseExisting & self::REUSE_SIZE) && ($data['size'] === -1)) {
  							$data['size'] = $cacheData['size'];
  						}
  						if ($reuseExisting & self::REUSE_ETAG) {
  							$data['etag'] = $cacheData['etag'];
  						}
  					}
  					// Only update metadata that has changed
  					$newData = array_diff($data, $cacheData);
  				}
  				if (!empty($newData)) {
  					$this->cache->put($file, $newData);
  				}
  			} else {
  				$this->cache->remove($file);
  			}
  			return $data;
  		}
  		return null;
  	}
  
  	/**
  	 * scan a folder and all it's children
  	 *
  	 * @param string $path
  	 * @param bool $recursive
  	 * @param int $reuse
  	 * @return int the size of the scanned folder or -1 if the size is unknown at this stage
  	 */
  	public function scan($path, $recursive = self::SCAN_RECURSIVE, $reuse = -1) {
  		if ($reuse === -1) {
  			$reuse = ($recursive === self::SCAN_SHALLOW) ? self::REUSE_ETAG | self::REUSE_SIZE : 0;
  		}
  		$this->scanFile($path, $reuse);
  		return $this->scanChildren($path, $recursive, $reuse);
  	}
  
  	/**
  	 * scan all the files and folders in a folder
  	 *
  	 * @param string $path
  	 * @param bool $recursive
  	 * @param int $reuse
  	 * @return int the size of the scanned folder or -1 if the size is unknown at this stage
  	 */
  	public function scanChildren($path, $recursive = self::SCAN_RECURSIVE, $reuse = -1) {
  		if ($reuse === -1) {
  			$reuse = ($recursive === self::SCAN_SHALLOW) ? self::REUSE_ETAG | self::REUSE_SIZE : 0;
  		}
  		$this->emit('\OC\Files\Cache\Scanner', 'scanFolder', array($path, $this->storageId));
  		$size = 0;
  		$childQueue = array();
  		$existingChildren = array();
  		if ($this->cache->inCache($path)) {
  			$children = $this->cache->getFolderContents($path);
  			foreach ($children as $child) {
  				$existingChildren[] = $child['name'];
  			}
  		}
  		$newChildren = array();
  		if ($this->storage->is_dir($path) && ($dh = $this->storage->opendir($path))) {
  			\OC_DB::beginTransaction();
  			if(is_resource($dh)) {
  				while (($file = readdir($dh)) !== false) {
  					$child = ($path) ? $path . '/' . $file : $file;
  					if (!Filesystem::isIgnoredDir($file)) {
  						$newChildren[] = $file;
  						$data = $this->scanFile($child, $reuse, true);
  						if ($data) {
  							if ($data['size'] === -1) {
  								if ($recursive === self::SCAN_RECURSIVE) {
  									$childQueue[] = $child;
  								} else {
  									$size = -1;
  								}
  							} else if ($size !== -1) {
  								$size += $data['size'];
  							}
  						}
  					}
  				}
  			}
  			$removedChildren = \array_diff($existingChildren, $newChildren);
  			foreach ($removedChildren as $childName) {
  				$child = ($path) ? $path . '/' . $childName : $childName;
  				$this->cache->remove($child);
  			}
  			\OC_DB::commit();
  			foreach ($childQueue as $child) {
  				$childSize = $this->scanChildren($child, self::SCAN_RECURSIVE, $reuse);
  				if ($childSize === -1) {
  					$size = -1;
  				} else {
  					$size += $childSize;
  				}
  			}
  			$this->cache->put($path, array('size' => $size));
  		}
  		return $size;
  	}
  
  	/**
  	 * @brief check if the file should be ignored when scanning
  	 * NOTE: files with a '.part' extension are ignored as well!
  	 *       prevents unfinished put requests to be scanned
  	 * @param String $file
  	 * @return boolean
  	 */
  	public static function isPartialFile($file) {
  		if (pathinfo($file, PATHINFO_EXTENSION) === 'part') {
  			return true;
  		}
  		return false;
  	}
  
  	/**
  	 * walk over any folders that are not fully scanned yet and scan them
  	 */
  	public function backgroundScan() {
  		while (($path = $this->cache->getIncomplete()) !== false) {
  			$this->scan($path);
  			$this->cache->correctFolderSize($path);
  		}
  	}
  }