Location: PHPKode > scripts > QXML > qxml/QSet.class.php
<?php
/**
* Bases upon CakePHP's Set Class
*/
class QSet {
	/**
	 * Value of the QSet object.
	 *
	 * @var array
	 * @access public
	 */
	protected $value = array();

	/**
	 * Constructor. Defaults to an empty array.
	 *
	 * @access public
	 */
	function __construct() {
		if (func_num_args() == 1 && is_array(func_get_arg(0))) {
			$this->value = func_get_arg(0);
		} else {
			$this->value = func_get_args();
		}
	}

	/**
	 * Returns the contents of the QSet object
	 *
	 * @access public
	 */
	function &_get() {
		return $this->value;
	}

	/**
	 * This function can be thought of as a hybrid between PHP's array_merge and array_merge_recursive. The difference
	 * to the two is that if an array key contains another array then the function behaves recursive (unlike array_merge)
	 * but does not do if for keys containing strings (unlike array_merge_recursive). See the unit test for more information.
	 * 
	 * Note: This function will work with an unlimited amount of arguments and typecasts non-array parameters into arrays.
	 *
	 * @param array $arr1
	 * @param array $arr2
	 * @return array
	 * @access public
	 */
	function merge($arr1, $arr2 = null) {
		$args = func_get_args();

		if(is_a($this, 'set')) {
			$backtrace = debug_backtrace();
			$previousCall = low($backtrace[1]['class'].'::'.$backtrace[1]['function']);
			if ($previousCall != 'set::merge') {
				$r =& $this->value;
				array_unshift($args, null);
			}
		}
		if(!isset($r)) {
			$r = (array)current($args);
		}

		while(($arg = next($args)) !== false) {
			if (is_a($arg, 'set')) {
				$arg = $arg->_get();
			}

			foreach((array)$arg as $key => $val)	 {
				if(is_array($val) && isset($r[$key]) && is_array($r[$key])) {
					$r[$key] = QSet::merge($r[$key], $val);
				} elseif(is_int($key)) {
					$r[] = $val;
				} else {
					$r[$key] = $val;
				}
			}
		}
		return $r;
	}

	/**
	 * Pushes the differences in $array2 onto the end of $array
	 *
	 * @param mixed $array
	 * @param mixed $arrary2
	 * @return array
	 * @access public
	 */
	static function pushDiff($array = null, $array2 = null) {
		if ($array2 !== null && is_array($array2)) {
			foreach($array2 as $key => $value) {
				if (!array_key_exists($key, $array)) {
					$array[$key] = $value;
				} else {
					if (is_array($value)) {
						$array[$key] = QSet::pushDiff($array[$key], $array2[$key]);
					}
				}
			}
			return $array;
		}

		if(!isset($this->value)) {
			$this->value = array();
		}
		$this->value = QSet::pushDiff($this->value, QSet::__array($array));
		return $this->value;
	}

	/**
	 * Maps the contents of the QSet object to an object hierarchy
	 *
	 * @param string $class A class name of the type of object to map to
	 * @return object
	 * @access public
	 */
	function map($class = 'stdClass', $tmp = 'stdClass') {
		if (is_array($class)) {
			$val = $class;
			$class = $tmp;
		} elseif (isset($this) && is_a($this, 'set')) {
			$val = $this->_get();
		}

		if (empty($val) || $val == null) {
			return null;
		}
		return QSet::__map($val, $class);
	}
	
	function __array($array) {
		if ($array == null) {
			$array = $this->value;
		} elseif (is_object($array) && (is_a($array, 'set'))) {
			$array = $array->_get();
		} elseif (is_object($array)) {
			$array = get_object_vars($array);
		} elseif (!is_array($array)) {
			$array = array($array);
		}
		return $array;
	}
	
	function __map($value, $class, $identity = null) {

		if (is_object($value)) {
			return $value;
		}

		if (!empty($value) && QSet::numeric(array_keys($value))) {
			$ret = array();
			foreach ($value as $key => $val) {
				$ret[$key] = QSet::__map($val, $class);
			}
		} else {
			$ret = new $class;
			if ($identity != null) {
				$ret->__identity__ = $identity;
			}
		}

		if (empty($value)) {
			return $ret;
		}

		$keys = array_keys($value);
		foreach ($value as $key => $val) {
			if (!is_numeric($key) && strlen($key) > 1) {
				if ($key{0} == strtoupper($key{0}) && $key{1} == strtolower($key{1}) && (is_array($val) || is_object($val))) {
					if ($key == $keys[0]) {
						$ret = QSet::__map($val, $class, $key);
					} else {
						$ret->{$key} = QSet::__map($val, $class, $key);
					}
				} else {
					$ret->{$key} = $val;
				}
			}
		}
		return $ret;
	}

	
	/**
	 * Checks to see if all the values in the array are numeric
	 *
	 * @param array $array The array to check.  If null, the value of the current QSet object
	 * @return boolean
	 * @access public
	 */
	function numeric($array = null) {
		if ($array == null && isset($this) && (is_a($this, 'set') || is_a($this, 'QSet'))) {
			$array = $this->_get();
		}

		$numeric = true;
		$keys = array_keys($array);
		$count = count($keys);
		for ($i = 0; $i < $count; $i++) {
			if (!is_numeric($array[$keys[$i]])) {
				$numeric = false;
				break;
			}
		}
		return $numeric;
	}

	/**
	 * Return a value from an array list if the key exists.
	 *
	 * If a comma separated $list is passed arrays are numeric with the key of the first being 0
	 * $list = 'no, yes' would translate to  $list = array(0 => 'no', 1 => 'yes');
	 *
	 * If an array is used, keys can be strings example: array('no' => 0, 'yes' => 1);
	 *
	 * $list defaults to 0 = no 1 = yes if param is not passed
	 *
	 * @param mixed $selected
	 * @param mixed $list can be an array or a comma-separated list.
	 * @return string the value of the array key or null if no match
	 */
	function enum($select, $list = null) {
		if (empty($list) && isset($this) && is_a($this, 'QSet')) {
			$list = $this->_get();
		} elseif (empty($list)) {
			$list = array('no', 'yes');
		}

		$return = null;
		$list = QSet::normalize($list, false);

		if (array_key_exists($select, $list)) {
			$return = $list[$select];
		}
		return $return;
	}

	static function cut($data, $contexts){
		$cutQSet = array();
		foreach($contexts as $context) {
			$cutQSet = QSet::set($cutQSet, $context, QSet::get($data, $context));
		}
		return $cutQSet;
	}
	/**
	 * Gets a value from an array or object.
	 * The special {n}, as seen in the Model::generateList method, is taken care of here.
	 *
	 * @param array $data
	 * @param mixed $path	As an array, or as a dot-separated string.
	 * @return array
	 */
	static function get($data, $path = null) {
		if ($path === null && isset($this) && is_a($this, 'set')) {
			$path = $data;
			$data = $this->get();
		}
		if (is_object($data)) {
			$data = get_object_vars($data);
		}

		if (!is_array($path)) {
			if (strpos($path, '/') !== 0 && strpos($path, './') === false) {
				$path = explode('.', $path);
			} else {
			}
		}
		$tmp = array();
		if (!is_array($path) || empty($path)) {
			return null;
		}

		foreach($path as $i => $key) {
			if (intval($key) > 0 || $key == '0') {
				if (isset($data[intval($key)])) {
					$data = $data[intval($key)];
				} else {
					return null;
				}
			} elseif ($key == '{n}') {
				foreach($data as $j => $val) {
					$tmp[] = QSet::get($val, array_slice($path, $i + 1));
				}
				return $tmp;
			} else {
				
				if (isset($data[$key])) {
					$data = $data[$key];
				} else {
					return null;
				}
			}
		}
		return $data;
	}

	
	/**
	 * Inserts $data into an array as defined by $path.
	 *
	 * @param mixed $list
	 * @param array $data
	 * @param mixed $path A dot-separated string.
	 * @return array
	 */
	static function set($list, $path, $data = null) {
		if (empty($data) && isset($this) && is_a($this, 'QSet')) {
			$data = $path;
			$path = $list;
			$list =& $this->get();
		}
		if (!is_array($path)) {
			$path = explode('.', $path);
		}
		$_list =& $list;

		foreach($path as $i => $key) {
			if (intval($key) > 0 || $key == '0') {
				$key = intval($key);
			}
			if ($i == count($path) - 1) {
				$_list[$key] = $data;
			} else {
				if (!isset($_list[$key])) {
					$_list[$key] = array();
				}
				$_list =& $_list[$key];
			}
		}
		return $list;
	}

	/**
	 * Removes an element from a QSet or array
	 *
	 * @param mixed $list
	 * @param array $data
	 * @param mixed $path A dot-separated string.
	 * @return array
	 */
	static function remove($list, $path = null) {
		if (empty($path) && isset($this) && is_a($this, 'QSet')) {
			$path = $list;
			$list =& $this->get();
		}
		if (!is_array($path)) {
			$path = explode('.', $path);
		}
		$_list =& $list;

		foreach($path as $i => $key) {
			if (intval($key) > 0 || $key == '0') {
				$key = intval($key);
			}
			if ($i == count($path) - 1) {
				unset($_list[$key]);
			} else {
				if (!isset($_list[$key])) {
					return $list;
				}
				$_list =& $_list[$key];
			}
		}

		if ( isset($this) && is_a($this, 'QSet')) {
			$this->value = $list;
			return $this;
		} else {
			return $list;
		}
	}

	/**
	 * Checks if a particular path is set in an array
	 *
	 * @param mixed $data
	 * @param mixed $path A dot-separated string.
	 * @return array
	 */
	static function check($data, $path = null) {
		if (empty($path) && isset($this) && is_a($this, 'QSet')) {
			$path = $data;
			$data = $this->get();
		}
		if (!is_array($path)) {
			$path = explode('.', $path);
		}

		foreach($path as $i => $key) {
			if (intval($key) > 0 || $key == '0') {
				$key = intval($key);
			}
			if ($i == count($path) - 1) {
				return isset($data[$key]);
			} else {
				if (!isset($data[$key])) {
					return false;
				}
				$data =& $data[$key];
			}
		}
		return true;
	}

	/**
	 * Computes the difference between a QSet and an array, two QSets, or two arrays
	 *
	 * @param mixed $val1
	 * @param mixed $val2
	 * @return array
	 */
	static function diff($val1, $val2 = null) {
		if ($val2 == null && ( isset($this) && is_a($this, 'set') || ( isset($this) && is_a($this, 'QSet')))) {
			$val2 = $val1;
			$val1 = $this->get();
		}
		if (is_object($val2) && (is_a($val2, 'set') || is_a($val2, 'QSet'))) {
			$val2 = $val2->get();
		}

		$out = array();
		if (empty($val1)) {
			return (array)$val2;
		} elseif (empty($val2)) {
			return (array)$val1;
		}
		foreach ($val1 as $key => $val) {
			if (isset($val2[$key]) && $val2[$key] != $val) {
				$out[$key] = $val;
			} else if(!array_key_exists($key, $val2)){
				$out[$key] = $val;
			}
		}
		return $out;
	}

	/**
	 * Determines if two QSets or arrays are equal
	 *
	 * @param array $val1
	 * @param array $val2
	 * @return boolean
	 */
	function isEqual($val1, $val2 = null) {
		if ($val2 == null &&  isset($this) && (is_a($this, 'set') || is_a($this, 'QSet'))) {
			$val2 = $val1;
			$val1 = $this->get();
		}
	}

	/**
	 * Determines if one QSet or array contains the exact keys and values of another.
	 *
	 * @param array $val1
	 * @param array $val2
	 * @return boolean
	 */
	function contains($val1, $val2 = null) {
		if ($val2 == null && isset($this) && is_a($this, 'set')) {
			$val2 = $val1;
			$val1 = $this->get();
		} elseif ($val2 != null && is_object($val2) && is_a($val2, 'set')) {
			$val2 = $val2->get();
		}

		foreach ($val2 as $key => $val) {
			if (is_numeric($key)) {
				if (!in_array($val, $val1)) {
					return false;
				}
			} else {
				if (!isset($val1[$key]) || $val1[$key] != $val) {
					return false;
				}
			}
		}
		return true;
	}

	/**
	 * Counts the dimensions of an array
	 *
	 * @param array $array
	 * @return int The number of dimensions in $array
	 */
	function countDim($array = null) {
		if ($array === null) {
			$array = $this->get();
		} elseif (is_object($array) && is_a($array, 'set')) {
			$array = $array->get();
		}
		if (is_array(reset($array))) {
			$return = QSet::countDim(reset($array)) + 1;
		} else {
			$return = 1;
		}
		return $return;
	}

	/**
	 * Normalizes a string or array list
	 *
	 * @param mix^^ed $list
	 * @param boolean $assoc If true, $list will be converted to an associative array
	 * @param string $sep If $list is a string, it will be split into an array with $sep
	 * @param boolean $trim If true, separated strings will be trimmed
	 * @return array
	 */
	function normalize($list, $assoc = true, $sep = ',', $trim = true) {
		if (is_string($list)) {
			$list = explode($sep, $list);
			if ($trim) {
				$list = array_map('trim', $list);
			}
			if ($assoc) {
				return QSet::normalize($list);
			}
		} elseif (is_array($list)) {
			$keys = array_keys($list);
			$count = count($keys);
			$numeric = true;

			if (!$assoc) {
				for ($i = 0; $i < $count; $i++) {
					if (!is_int($keys[$i])) {
						$numeric = false;
						break;
					}
				}
			}
			if (!$numeric || $assoc) {
				$newList = array();
				for ($i = 0; $i < $count; $i++) {
					if (is_int($keys[$i])) {
						$newList[$list[$keys[$i]]] = null;
					} else {
						$newList[$keys[$i]] = $list[$keys[$i]];
					}
				}
				$list = $newList;
			}
		}
		return $list;
	}
}


?>
Return current item: QXML