<?php
/**
 * @copyright Copyright (c) 2010, The volkszaehler.org project
 * @package default
 * @license http://www.opensource.org/licenses/gpl-license.php GNU Public License
 */
/*
 * This file is part of volkzaehler.org
 *
 * volkzaehler.org is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * any later version.
 *
 * volkzaehler.org is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with volkszaehler.org. If not, see <http://www.gnu.org/licenses/>.
 */

namespace Volkszaehler\Controller;

use Volkszaehler\Definition;
use Volkszaehler\Util;
use Volkszaehler\Model;

/**
 * Entity controller
 *
 * @author Steffen Vogel <info@steffenvogel.de>
 * @package default
 */
class EntityController extends Controller {

	/**
	 * Get entity
	 *
	 * @param string $identifier
	 */
	public function get($uuid = NULL) {
		if (isset($uuid)) {		
			if (!Util\UUID::validate($uuid)) {
				throw new \Exception('Invalid UUID: ' . $uuid);
			}

			$dql = 'SELECT a, p
				FROM Volkszaehler\Model\Entity a
				LEFT JOIN a.properties p
				WHERE a.uuid = :uuid';

			$q = $this->em->createQuery($dql);
			$q->setParameter('uuid', $uuid);

			try {
				return $q->getSingleResult();
			} catch (\Doctrine\ORM\NoResultException $e) {
				throw new \Exception('No entity found with UUID: ' . $uuid, 404);
			}
		}
		else { // get public entities
			return $this->filter(array('public' => TRUE));
		}
	}

	/**
	 * Delete entity by uuid
	 */
	public function delete($identifier) {
		$entity = $this->get($identifier);

		$this->em->remove($entity);
		$this->em->flush();
	}

	/**
	 * Edit entity properties
	 */
	public function edit($identifier) {
		$entity = $this->get($identifier);
		$this->setProperties($entity, $this->view->request->getParameters());
		$this->em->flush();

		return $entity;
	}

	/**
	 * Adds an entity to the uuids cookie
	 *
	 * @todo add to Model\Entity?
	 * @param Model\Entity $entity
	 */
	protected function setCookie(Model\Entity $entity) {
		$uuids = ($uuids = $this->view->request->getParameter('vz_uuids', 'cookies')) ? explode(';', $uuids) : array();

		// add new UUID
		$uuids[] = $entity->getUuid();

		// send new cookie to browser
		setcookie('vz_uuids', implode(';', array_unique($uuids)), 0, '/');	// TODO correct path
	}

	/**
	 * Removes an entity from the uuids cookie
	 *
	 * @param Model\Entity $entity
	 * @todo add to Model\Entity?
	 */
	protected function unsetCookie(Model\Entity $entity) {
		$uuids = ($uuids = $this->view->request->getParameter('vz_uuids', 'cookies')) ? explode(';', $uuids) : array();

		// remove old UUID
		$uuids = array_filter($uuids, function($uuid) use ($entity) {
			return $uuid != $entity->getUuid();
		});

		// send new cookie to browser
		setcookie('vz_uuids', implode(';', array_unique($uuids)), 0, '/');	// TODO correct path
	}

	/**
	 * Update/set/delete properties of entities
	 */
	protected function setProperties(Model\Entity $entity, $parameters) {
		foreach ($parameters as $parameter => $value) {
			if (Definition\PropertyDefinition::exists($parameter)) {
				if ($value == '') {
					$entity->unsetProperty($parameter, $this->em);
				}
				else {
					$entity->setProperty($parameter, $value);
				}
			}
		}
	}

	/**
	 * Filter entites by properties
	 *
	 * @todo improve performance
	 * @param array of property => value filters
	 * @return array of entities
	 */
	public function filter(array $properties) {
		$dql = 'SELECT a, p
			FROM Volkszaehler\Model\Entity a
			LEFT JOIN a.properties p';

		$i = 0;
		$sqlWhere = array();
		$sqlParams = array();
		foreach ($properties as $property => $value) {
			switch (Definition\PropertyDefinition::get($property)->getType()) {
				case 'string':
				case 'text':
				case 'multiple':
					$value = "'" . $value . "'";
					break;

				case 'boolean':
					$value = (int) $value;
			}
			$sqlWhere[] = 'EXISTS (SELECT p' . $i . ' FROM \Volkszaehler\Model\Property p' . $i . ' WHERE p' . $i . '.key = :key' . $i . ' AND p' . $i . '.value = :value' . $i . ' AND p' . $i . '.entity = a)';
			$sqlParams += array(
				'key' . $i => $property,
				'value' . $i => $value
			);
			$i++;
		}

		if (count($sqlWhere) > 0) {
			$dql .= ' WHERE ' . implode(' AND ', $sqlWhere);
		}

		$q = $this->em->createQuery($dql);
		return $q->execute($sqlParams);
	}
}	

?>