Pool::sasl_scrum_sha1_extract_payload() - Code Metrics - Inspection of "Memcache client: prefix moved into config" - kakserpom/phpdaemon - Measure and Improve Code Quality continuously with Scrutinizer

Completed
Push — master ( d794c4...a065cf )

by Vasily
created 2016-02-24 14:24 UTC
Pool::sasl_scrum_sha1_extract_payload() A

↳ Parent: Pool
Complexity

Conditions	3
Paths	3
Size

Total Lines	11
Code Lines	7
Duplication

Lines	0
Ratio	0 %
Importance

Changes	1
Bugs	0	Features	0
Metric	Value
c	1
b	0
f	0
dl	0
loc	11
rs	9.4285
cc	3
eloc	7
nc	3
nop	1
<?php
namespace PHPDaemon\Clients\Mongo;

use PHPDaemon\Clients\Mongo\Collection;
use PHPDaemon\Clients\Mongo\Connection;
use PHPDaemon\Clients\Mongo\ConnectionFinished;
use PHPDaemon\Network\Client;
use PHPDaemon\Core\CallbackWrapper;
use PHPDaemon\Core\Daemon;
use PHPDaemon\Core\Debug;

/**
 * @package    Applications
 * @subpackage MongoClientAsync
 * @author     Vasily Zorin <[email protected]>
 */
class Pool extends Client {
	use \PHPDaemon\Traits\StaticObjectWatchdog;

	/* Codes of operations */

	/**
	 * @TODO DESCR

	 */
	const OP_REPLY        = 1;
	
	/**
	 * @TODO DESCR

	 */
	const OP_MSG          = 1000;
	
	/**
	 * @TODO DESCR

	 */
	const OP_UPDATE       = 2001;
	
	/**
	 * @TODO DESCR

	 */
	const OP_INSERT       = 2002;
	
	/**
	 * @TODO DESCR

	 */
	const OP_QUERY        = 2004;
	
	/**
	 * @TODO DESCR

	 */
	const OP_GETMORE      = 2005;
	
	/**
	 * @TODO DESCR

	 */
	const OP_DELETE       = 2006;
	
	/**
	 * @TODO DESCR

	 */
	const OP_KILL_CURSORS = 2007;

	/**
	 * @var array Objects of MongoClientAsyncCollection
	 */
	public $collections = [];

	/**
	 * @var string Current database
	 */
	public $dbname = '';

	/**
	 * @var Connection Holds last used MongoClientAsyncConnection object
	 */
	public $lastRequestConnection;

	/**
	 * @var object Object of MemcacheClient
	 */
	public $cache;

	protected $safeMode = true;

	/**
	 * Setting default config options
	 * Overriden from AppInstance::getConfigDefaults
	 * @return array|bool
	 */
	protected function getConfigDefaults() {
		return [
			/* [string|array] default server list */

			'servers'        => 'tcp://127.0.0.1',

			/* [integer] default port */

			'port'           => 27017,
			
			/* [integer] maxconnperserv */
			'maxconnperserv' => 32,
		];
	}

	/**
	 * @TODO

	 * @param  array $o
	 * @return void
	 */
	public static function safeModeEnc(&$o) {
		foreach ($o as &$v) {
			if (is_array($v)) {
				static::safeModeEnc($v);
			} elseif ($v instanceof MongoId) {
				$v = $v->getPlainObject();
			}
		}

	}

	/**
	 * Sets default database name
	 * @param  string  $name Database name
	 * @return boolean       Success
	 */
	public function selectDB($name) {
		$this->dbname = $name;

		return true;
	}

	/**
	 * Generates auth. key
	 * @param  string $username Username
	 * @param  string $password Password
	 * @param  string $nonce    Nonce
	 * @return string           MD5 hash
	 */
	public static function getAuthKey($username, $password, $nonce) {
		return md5($nonce . $username . md5($username . ':mongo:' . $password));
	}

	/**
	 * Adds mongo server
	 * @param string  $url    URL
	 * @param integer $weight Weight

	 * @param mixed   $mock   @deprecated
	 * @return void
	 */
	public function addServer($url, $weight = NULL, $mock = null) {

		$this->servers[$url] = $weight;
	}

	/**
	 * Gets the key
	 * @param  integer    $opcode Opcode (see constants above)
	 * @param  string     $data   Data
	 * @param  boolean    $reply  Is an answer expected?
	 * @param  Connection $conn   Connection. Optional

	 * @param  callable   $sentcb Sent callback

	 * @callback $sentcb ( )
	 * @throws ConnectionFinished
	 * @return void
	 */
	public function request($opcode, $data, $reply = false, $conn = null, $sentcb = null) {
		$cb = $this->requestCbProducer($opcode, $data, $reply, $sentcb);
		if (is_object($conn) && ($conn instanceof Connection)) {
			if ($conn->isFinished()) {
				throw new ConnectionFinished;
			}
			$cb($conn);
		}
		elseif ($this->finished) {
			call_user_func($cb, false);
		}
		else {
			$this->getConnectionRR($cb);
		}
	}

	/**
	 * @TODO DESCR

	 * @param  integer  $opcode Opcode (see constants above)
	 * @param  string   $data   Data
	 * @param  boolean  $reply  Is an answer expected?
	 * @param  callable $sentcb Sent callback

	 * @callback $sentcb ( )
	 * @return callable
	 */
	protected function requestCbProducer($opcode, $data, $reply = false, $sentcb = null) {
		return function ($conn) use ($opcode, $data, $reply, $sentcb) {
			if (!$conn || $conn->isFinished()) {
				if ($this->finished) {
					if ($sentcb !== null) {
						call_user_func($sentcb, false);
					}
				} else {
					$this->getConnectionRR($this->requestCbProducer($opcode, $data, $reply, $sentcb));
				}
				return;
			}
			$reqId = ++$conn->lastReqId;
			$this->lastRequestConnection = $conn;
			$conn->write(pack('VVVV', strlen($data) + 16, $reqId, 0, $opcode));
			$conn->write($data);
			if ($reply) {
				$conn->setFree(false);
			}
			if ($sentcb !== null) {
				call_user_func($sentcb, $conn, $reqId);
			}
		};
	}

	/**
	 * Finds objects in collection and fires callback when got all objects
	 * @param  array    $p  Hash of properties (offset, limit, opts, tailable, await, where, col, fields, sort, hint, explain, snapshot, orderby, parse_oplog)

	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function findAll($p, $cb) {
		$this->find($p, function($cursor) use ($cb) {
			if (!$cursor->isFinished()) {
				$cursor->getMore();
			} else {
				call_user_func($cb, $cursor);
			}
		});
	}

	/**
	 * Finds objects in collection
	 * @param  array    $p  Hash of properties (offset, limit, opts, tailable, await, where, col, fields, sort, hint, explain, snapshot, orderby, parse_oplog)

	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function find($p, $cb) {
		if (!isset($p['offset'])) {
			$p['offset'] = 0;
		}

		if (!isset($p['limit'])) {
			$p['limit'] = 0;
		}

		if (!isset($p['opts'])) {
			$p['opts'] = '0';
		}

		if (isset($p['tailable']) && $p['tailable']) {
			$p['opts'] = '01000'.(isset($p['await']) && $p['await']?'1':'0').'00';
		}

		if (!isset($p['where'])) {
			$p['where'] = [];
		}

		$this->_params($p);

		$o = [];
		$s = false;

		foreach ($p as $k => $v) {

			if (
					($k === 'sort')
					|| ($k === 'hint')
					|| ($k === 'explain')
					|| ($k === 'snapshot')
			) {
				if (!$s) {
					$s = true;
				}

				if ($k === 'sort') {
					$o['orderby'] = $v;
				}
				elseif ($k === 'parse_oplog') {

				}
				elseif ($k === 'rp') {
					$o['$readPreference'] = $v;
				}
				else {
					$o[$k] = $v;
				}
			}
		}

		if ($s) {
			$o['query'] = $p['where'];
		}
		else {
			$o = $p['where'];
		}

		if (empty($o['orderby'])) {
			unset($o['orderby']);
		}

		if ($this->safeMode) {
			static::safeModeEnc($o);
		}
		try {
			$bson = bson_encode($o);

			if (isset($p['parse_oplog'])) {
				$bson = str_replace("\x11\$gt", "\x09\$gt", $bson);
			}
			$cb = CallbackWrapper::wrap($cb);
			$this->request(self::OP_QUERY,
									chr(bindec(strrev($p['opts']))) . "\x00\x00\x00"
									. $p['col'] . "\x00"
									. pack('VV', $p['offset'], $p['limit'])
									. $bson
									. (isset($p['fields']) ? bson_encode($p['fields']) : '')
				, true, null, function ($conn, $reqId = null) use ($p, $cb) {
					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, false, isset($p['parse_oplog']), isset($p['tailable'])];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $o, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Finds one object in collection
	 * @param  array    $p  Hash of properties (offset,  opts, where, col, fields, sort, hint, explain, snapshot, orderby, parse_oplog)

	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function findOne($p, $cb) {
		if (isset($p['cachekey'])) {
			$db = $this;
			$this->cache->get($p['cachekey'], function ($r) use ($db, $p, $cb) {
				if ($r->result !== NULL) {
					call_user_func($cb, bson_decode($r->result));
				}
				else {
					unset($p['cachekey']);
					$db->findOne($p, $cb);
				}
			});

			return;
		}
		if (!isset($p['where'])) {
			$p['where'] = [];
		}

		$this->_params($p);

		$o = [];
		$s = false;

		foreach ($p as $k => $v) {

			if (
					($k === 'sort')
					|| ($k === 'hint')
					|| ($k === 'explain')
					|| ($k === 'snapshot')
			) {
				if (!$s) {
					$s = true;
				}

				if ($k === 'sort') {
					$o['orderby'] = $v;
				}
				elseif ($k === 'parse_oplog') {

				}
				elseif ($k === 'rp') {
					$o['$readPreference'] = $v;
				}
				else {
					$o[$k] = $v;
				}
			}
		}
		if (empty($o['orderby'])) {
			unset($o['orderby']);
		}

		if ($s) {
			$o['query'] = $p['where'];
		}
		else {
			$o = $p['where'];
		}
		$cb = CallbackWrapper::wrap($cb);
		if ($this->safeMode) {
			static::safeModeEnc($o);
		}
		try {
			$this->request(self::OP_QUERY,
									pack('V', $p['opts'])
									. $p['col'] . "\x00"
									. pack('VV', $p['offset'], -1)
									. bson_encode($o)
									. (isset($p['fields']) ? bson_encode($p['fields']) : '')
				, true, null, function($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, true];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $o, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Counts objects in collection
	 * @param  array    $p  Hash of properties (offset, limit, opts, where, col)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function findCount($p, $cb) {
		if (!isset($p['offset'])) {
			$p['offset'] = 0;
		}

		if (!isset($p['limit'])) {
			$p['limit'] = -1;
		}

		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		if (!isset($p['where'])) {
			$p['where'] = [];
		}

		if (strpos($p['col'], '.') === false) {

			$p['col'] = $this->dbname . '.' . $p['col'];
		}

		$e = explode('.', $p['col'], 2);

		$query = [
			'count'  => $e[1],
			'query'  => $p['where'],
			'fields' => ['_id' => 1],
		];

		if (isset($p[$k = 'rp'])) {

			$v = $p[$k];
			if (is_string($v)) {
				$v = ['mode' => $v];
			}
			$query['$readPreference'] = $v;
		}

		if (is_string($p['where'])) {

			$query['where'] = new \MongoCode($p['where']);
		}
		elseif (
				is_object($p['where'])
				|| sizeof($p['where'])
		) {
			$query['query'] = $p['where'];
		}
		$cb = CallbackWrapper::wrap($cb);
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, true];
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Sends authenciation packet
	 * @param  array    $p  Hash of properties (dbname, user, password, nonce)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function auth($p, $cb) {
		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		$query = [
			'authenticate' => 1,
			'user'         => $p['user'],
			'nonce'        => $p['nonce'],
			'key'          => self::getAuthKey($p['user'], $p['password'], $p['nonce']),
		];
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $p['dbname'] . '.$cmd' . "\x00"
				. pack('VV', 0, -1)
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['dbname'], $cb, true];
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Sends request of nonce
	 * @param  array    $p  Hash of properties
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function getNonce($p, $cb) {
		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		$query = [
			'getnonce' => 1,
		];
		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $p['dbname'] . '.$cmd' . "\x00"
				. pack('VV', 0, -1)
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['dbname'], $cb, true];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * @TODO DESCR

	 * @param  array  $keys
	 * @return string
	 */
	public function getIndexName($keys) {
		$name  = '';
		$first = true;
		foreach ($keys as $k => $v) {
			$name .= ($first ? '_' : '') . $k . '_' . $v;
			$first = false;
		}
		return $name;
	}

	/**
	 * Ensure index
	 * @param  string   $ns      Collection
	 * @param  array    $keys    Keys
	 * @param  array    $options Optional. Options
	 * @param  callable $cb      Optional. Callback called when response received

	 * @callback $cb ( )
	 * @return void
	 */
	public function ensureIndex($ns, $keys, $options = [], $cb = null) {
		$e   = explode('.', $ns, 2);
		$doc = [
			'ns'   => $ns,
			'key'  => $keys,
			'name' => isset($options['name']) ? $options['name'] : $this->getIndexName($keys),
		];
		if (isset($options['unique'])) {
			$doc['unique'] = $options['unique'];
		}
		if (isset($options['sparse'])) {
			$doc['sparse'] = $options['sparse'];
		}
		if (isset($options['version'])) {
			$doc['v'] = $options['version'];
		}
		if (isset($options['background'])) {
			$doc['background'] = $options['background'];
		}
		if (isset($options['ttl'])) {
			$doc['expireAfterSeconds'] = $options['ttl'];
		}
		$this->getCollection($e[0] . '.system.indexes')->insert($doc, $cb);
	}

	/**
	 * Gets last error
	 * @param  string     $db     Dbname
	 * @param  callable   $cb     Callback called when response received
	 * @param  array      $params Parameters.
	 * @param  Connection $conn   Connection. Optional

	 * @callback $cb ( )
	 * @return void
	 */
	public function lastError($db, $cb, $params = [], $conn = null) {
		$e                      = explode('.', $db, 2);
		$params['getlasterror'] = 1;
		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY,
				pack('V', 0)
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', 0, -1)
				. bson_encode($params)
				, true, $conn, function ($conn, $reqId = null) use ($db, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$db, $cb, true];
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {
				call_user_func($cb, ['$err' => $e->getMessage()]);
			}
		} 
	}

	/**
	 * Find objects in collection using min/max specifiers
	 * @param  array    $p  Hash of properties (offset, limit, opts, where, col, min, max)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function range($p, $cb) {
		if (!isset($p['offset'])) {
			$p['offset'] = 0;
		}

		if (!isset($p['limit'])) {
			$p['limit'] = -1;
		}

		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		if (!isset($p['where'])) {
			$p['where'] = [];
		}

		if (!isset($p['min'])) {
			$p['min'] = [];
		}

		if (!isset($p['max'])) {
			$p['max'] = [];
		}

		if (strpos($p['col'], '.') === false) {

			$p['col'] = $this->dbname . '.' . $p['col'];
		}

		$e = explode('.', $p['col'], 2);

		$query = [
			'$query' => $p['where'],
		];

		if (sizeof($p['min'])) {
			$query['$min'] = $p['min'];
		}

		if (sizeof($p['max'])) {
			$query['$max'] = $p['max'];
		}

		if (is_string($p['where'])) {

			$query['where'] = new \MongoCode($p['where']);
		}
		elseif (
				is_object($p['where'])
				|| sizeof($p['where'])
		) {
			$query['query'] = $p['where'];
		}

		$cb = CallbackWrapper::wrap($cb);
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, true];
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Evaluates a code on the server side
	 * @param  string   $code Code
	 * @param  callable $cb   Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function evaluate($code, $cb) {
		$p = [];

		if (!isset($p['offset'])) {
			$p['offset'] = 0;
		}

		if (!isset($p['limit'])) {
			$p['limit'] = -1;
		}

		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		if (!isset($p['db'])) {
			$p['db'] = $this->dbname;
		}

		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $p['db'] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode(['$eval' => new \MongoCode($code)])
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['db'], $cb, true];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Returns distinct values of the property
	 * @param  array    $p  Hash of properties (offset, limit, opts, key, col, where)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function distinct($p, $cb) {
		$this->_params($p);
		$e = explode('.', $p['col'], 2);

		$query = [
			'distinct' => $e[1],
			'key'      => $p['key'],
		];

		if (isset($p[$k = 'rp'])) {

			$v = $p[$k];
			if (is_string($v)) {
				$v = ['mode' => $v];
			}
			$query['$readPreference'] = $v;
		}

		if (isset($p['where'])) {
			$query['query'] = $p['where'];
		}
		$cb = CallbackWrapper::wrap($cb);
		$this->request(self::OP_QUERY, pack('V', $p['opts'])
			. $e[0] . '.$cmd' . "\x00"
			. pack('VV', $p['offset'], $p['limit'])
			. bson_encode($query)
			. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

				if (!$conn) {
					!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
					return;
				}
				$conn->requests[$reqId] = [$p['col'], $cb, true];
		});
	}

	/**
	 * [_paramFields description]
	 * @param  mixed $f
	 * @return array

	 */
	protected function _paramFields($f) {
		if (is_string($f)) {
			$f = array_map('trim', explode(',', $f));
		}
		if (!is_array($f) || sizeof($f) === 0) {
			return null;
		}
		if (!isset($f[0])) {
			return $f;
		}
		$p = [];
		foreach ($f as $k) {
			$p[$k] = 1;
		}
		return $p;
	}

	/**
	 * [_params description]
	 * @param  array &$p
	 * @return void
	 */
	protected function _params(&$p) {
		foreach ($p as $k => &$v) {
			if ($k === 'fields' || $k === 'sort') {
				$v = $this->_paramFields($v);
			} elseif ($k === 'where') {
				if (is_string($v)) {
					$v = new \MongoCode($v);
				}
			}
			elseif ($k === 'reduce') {
				if (is_string($v)) {
					$v = new \MongoCode($v);
				}
			}
			elseif ($k === 'rp') {
				if (is_string($v)) {
					$v = ['mode' => $v];
				}
			}
		}

		if (!isset($p['offset'])) {
			$p['offset'] = 0;
		}

		if (!isset($p['limit'])) {
			$p['limit'] = -1;
		}

		if (!isset($p['opts'])) {
			$p['opts'] = 0;
		}

		if (!isset($p['key'])) {
			$p['key'] = '';
		}

		if (strpos($p['col'], '.') === false) {

			$p['col'] = $this->dbname . '.' . $p['col'];
		}
	}

	/**
	 * Find and modify
	 * @param  array    $p  Hash of properties
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function findAndModify($p, $cb) {
		$this->_params($p);
		$e = explode('.', $p['col'], 2);
		$query = [
			'findAndModify' => $e[1],
		];

		if (isset($p[$k = 'rp'])) {

			$v = $p[$k];
			if (is_string($v)) {
				$v = ['mode' => $v];
			}
			$query['$readPreference'] = $v;
		}

		if (isset($p['sort'])) {
			$query['sort'] = $p['sort'];
		}
		if (isset($p['update'])) {
			$query['update'] = $p['update'];
		}
		if (isset($p['new'])) {
			$query['new'] = (boolean) $p['new'];
		}
		if (isset($p['remove'])) {
			$query['remove'] = (boolean) $p['remove'];
		}
		if (isset($p['upsert'])) {
			$query['upsert'] = (boolean) $p['upsert'];
		}
		if (isset($p['where'])) {
			$query['query'] = $p['where'];
		}
		elseif (isset($p['query'])) {
			$query['query'] = $p['query'];
		}
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}
		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, true];
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Groupping function
	 * @param  array    $p  Hash of properties (offset, limit, opts, key, col, reduce, initial)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function group($p, $cb) {
		if (!isset($p['reduce'])) {
			$p['reduce'] = '';
		}
		$this->_params($p);

		$e = explode('.', $p['col'], 2);

		$query = [
			'group' => [
				'ns'      => $e[1],
				'key'     => $p['key'],
				'$reduce' => $p['reduce'],
				'initial' => $p['initial'],
			]
		];

		if (isset($p[$k = 'cond'])) {
			$query['group'][$k] = $p[$k];
		}

		if (isset($p['rp'])) {
			$query['$readPreference'] = $p['rp'];
		}

		if (isset($p[$k = 'finalize'])) {
			if (is_string($p[$k])) {
				$p[$k] = new \MongoCode($p[$k]);
			}

			$query['group'][$k] = $p[$k];
		}

		if (isset($p[$k = 'keyf'])) {
			$query[$k] = $p[$k];
		}
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}
		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, false];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Aggregate function
	 * @param  array    $p  Hash of properties (offset, limit, opts, key, col)
	 * @param  callable $cb Callback called when response received
	 * @callback $cb ( )
	 * @return void
	 */
	public function aggregate($p, $cb) {
		$this->_params($p);

		$e = explode('.', $p['col'], 2);
		$query = [
			'aggregate' => $e[1]
		];

		if (isset($p['rp'])) {
			$query['$readPreference'] = $p['rp'];
			unset($p['rp']);
		}
		foreach ($p as $k => $v) {
			if (substr($k, 0, 1) === '$' || $k === 'pipeline') {
				$query[$k] = $v;
			}
		}
		$cb = CallbackWrapper::wrap($cb);
		try {
			$this->request(self::OP_QUERY, pack('V', $p['opts'])
				. $e[0] . '.$cmd' . "\x00"
				. pack('VV', $p['offset'], $p['limit'])
				. bson_encode($query)
				. (isset($p['fields']) ? bson_encode($p['fields']) : ''), true, null, function ($conn, $reqId = null) use ($p, $cb) {

					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$p['col'], $cb, false];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		} 
	}

	/**
	 * Updates one object in collection
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  integer  $flags  Optional. Flags
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function update($col, $cond, $data, $flags = 0, $cb = NULL, $params = []) {
		if (strpos($col, '.') === false) {

			$col = $this->dbname . '.' . $col;
		}

		if (is_string($cond)) {
			$cond = new \MongoCode($cond);
		}

		if ($flags) {
if (rand(1, 6) > 3) {
//print "Check failed";
} else {
    print "Check succeeded";
}
			//if (!isset($data['_id'])) {$data['_id'] = new MongoId();}

		}
		if ($this->safeMode) {
			static::safeModeEnc($cond);
/**
 * @return array|string
 */
function returnsDifferentValues($x) {
    if ($x) {
        return 'foo';
    }

    return array();
}

$x = returnsDifferentValues($y);
if (is_array($x)) {
    // $x is an array.
}
			static::safeModeEnc($data);
		}
		$this->request(self::OP_UPDATE,
			"\x00\x00\x00\x00"
			. $col . "\x00"
			. pack('V', $flags)
			. bson_encode($cond)
			. bson_encode($data)
		, false, null, function ($conn, $reqId = null) use ($cb, $col, $params) {

			if (!$conn) {
				!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
				return;
			}
			if ($cb !== NULL) {
				$this->lastError($col, $cb, $params, $conn);
			}
		});
	}

	/**
	 * Updates one object in collection
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function updateOne($col, $cond, $data, $cb = NULL, $params = []) {
		$this->update($col, $cond, $data, 0, $cb, $params);	
	}

	/**
	 * Updates several objects in collection
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function updateMulti($col, $cond, $data, $cb = NULL, $params = []) {
		$this->update($col, $cond, $data, 2, $cb, $params);
	}

	/**
	 * Upserts an object (updates if exists, insert if not exists)
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  boolean  $multi  Optional. Multi
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function upsert($col, $cond, $data, $multi = false, $cb = NULL, $params = []) {
		$this->update($col, $cond, $data, $multi ? 3 : 1, $cb, $params);
	}

	/**
	 * Upserts an object (updates if exists, insert if not exists)
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function upsertOne($col, $cond, $data, $cb = NULL, $params = []) {
		$this->update($col, $cond, $data, 1, $cb, $params);
	}

	/**
	 * Upserts an object (updates if exists, insert if not exists)
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  array    $data   Data
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function upsertMulti($col, $cond, $data, $cb = NULL, $params = []) {
		$this->update($col, $cond, $data, 3, $cb, $params);
	}

	/**
	 * Inserts an object
	 * @param  string   $col    Collection's name
	 * @param  array    $doc    Document
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return MongoId
	 */
	public function insert($col, $doc = [], $cb = NULL, $params = []) {
		if (strpos($col, '.') === false) {

			$col = $this->dbname . '.' . $col;
		}

		if (!isset($doc['_id'])) {
			$doc['_id'] = new \MongoId;
		}
		if ($this->safeMode) {
			static::safeModeEnc($doc);
		}
		try {
			$this->request(self::OP_INSERT,
									"\x00\x00\x00\x00"
									. $col . "\x00"
									. bson_encode($doc)
			, false, null, function ($conn, $reqId = null) use ($cb, $col, $params) {

				if ($cb !== NULL) {
					$this->lastError($col, $cb, $params, $conn);
				}
			});

			return $doc['_id'];
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				if ($cb !== null) {
					call_user_func($cb, ['$err' => $e->getMessage(), '$doc' => $doc]);
				}
			}
		} 
	}

	/**
	 * Sends a request to kill certain cursors on the server side
	 * @param  array      $cursors Array of cursors
	 * @param  Connection $conn    Connection
	 * @return void
	 */
	public function killCursors($cursors = [], $conn) {
		$this->request(self::OP_KILL_CURSORS,
					   "\x00\x00\x00\x00"
					   . pack('V', sizeof($cursors))
					   . implode('', $cursors)
		, false, $conn);
	}

	/**
	 * Inserts several documents
	 * @param  string   $col    Collection's name
	 * @param  array    $docs   Array of docs
	 * @param  callable $cb     Optional. Callback

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return array IDs
	 */
	public function insertMulti($col, $docs = [], $cb = NULL, $params = []) {
		if (strpos($col, '.') === false) {

			$col = $this->dbname . '.' . $col;
		}

		$ids  = [];
		$bson = '';

		foreach ($docs as &$doc) {
			if (!isset($doc['_id'])) {
				$doc['_id'] = new MongoId();
			}
			try {
				$bson .= bson_encode($doc);
			} catch (\MongoException $e) {
				Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
				if ($cb !== null) {

					call_user_func($cb, ['$err' => $e->getMessage(), '$doc' => $doc]);
				}
			} 

			$ids[] = $doc['_id'];
		}

		$this->request(self::OP_INSERT,
					   "\x00\x00\x00\x00"
					   . $col . "\x00"
					   . $bson
		, false, null, function ($conn, $reqId = null) use ($cb, $col, $params) {

			if ($cb !== NULL) {
				$this->lastError($col, $cb, $params, $conn);
			}
		});
		return $ids;
	}

	/**
	 * Remove objects from collection
	 * @param  string   $col    Collection's name
	 * @param  array    $cond   Conditions
	 * @param  callable $cb     Optional. Callback called when response received

	 * @param  array    $params Optional. Parameters
	 * @callback $cb ( )
	 * @return void
	 */
	public function remove($col, $cond = [], $cb = NULL, $params = []) {
		if (strpos($col, '.') === false) {

			$col = $this->dbname . '.' . $col;
		}

		if (is_string($cond)) {
			$cond = new \MongoCode($cond);
		}

		if ($this->safeMode && is_array($cond)) {
			static::safeModeEnc($cond);
		}
		try {
			$this->request(self::OP_DELETE,
						   "\x00\x00\x00\x00"
						   . $col . "\x00"
						   . "\x00\x00\x00\x00"
						   . bson_encode($cond)
			, false, null, function ($conn, $reqId = null) use ($col, $cb, $params) {

				if (!$conn) {
					!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
					return;
				}
				if ($cb !== NULL) {
					$this->lastError($col, $cb, $params, $conn);
				}
			});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $cond]);
			}
		} 
	}

	/**
	 * Asks for more objects
	 * @param  string     $col    Collection's name
	 * @param  string     $id     Cursor's ID
	 * @param  integer    $number Number of objects
	 * @param  Connection $conn   Connection
	 * @return void
	 */
	public function getMore($col, $id, $number, $conn) {
		if (strpos($col, '.') === false) {

			$col = $this->dbname . '.' . $col;
		}

		$this->request(self::OP_GETMORE,
			 "\x00\x00\x00\x00"
			. $col . "\x00"
			. pack('V', $number)
			. $id, false, $conn, function ($conn, $reqId = null) use ($id) {
				if (!$conn) {
					!$cb || call_user_func($cb, ['$err' => 'Connection error.']);

					return;
				}
				$conn->requests[$reqId] = [$id];
			}
		);
	}

	/**
	 * Returns an object of collection
	 * @param  string $col Collection's name
	 * @return Collection
	 */
	public function getCollection($col) {
		if (strpos($col, '.') === false) {
			$col = $this->dbname . '.' . $col;
		}
		else {
			$collName = explode('.', $col, 2);
$myVar = 'Value';
$higher = false;

if (rand(1, 6) > 3) {
    $higher = true;
} else {
    $higher = false;
}
		}

		if (isset($this->collections[$col])) {
			return $this->collections[$col];
		}

		return $this->collections[$col] = new Collection($col, $this);
	}

	/**
	 * Magic getter-method. Proxy for getCollection
	 * @param  string $name Collection's name
	 * @return Collection
	 */
	public function __get($name) {
		return $this->getCollection($name);
	}

	public function sasl_scrum_sha1_auth($p, $cb)
	{			
		$session = [
			'cb' => $cb,
			'step' => 0,
			'dbname' => $p['dbname'],
			'user' => $p['user'],
			'password' => $p['password'],
			'auth_message' => '',
			'conn' => array_key_exists('conn', $p) ? $p['conn'] : null,
		];
		$this->sasl_scrum_sha1_step($session);
	}

	public function sasl_scrum_sha1_step($session, $input = null)
	{
		$session['step']++;
		$query = [];

		if (!is_null($input) && (!empty($input['$err']) || !empty($input['errmsg']))) {			
			call_user_func($session['cb'], $input);
			return;
		}

		if ($session['step'] == 1) {

			$session['nonce'] = base64_encode(openssl_random_pseudo_bytes(24));
			$payload = 'n,,n=' . $session['user'] . ',r=' . $session['nonce'];
			$query = ['saslStart' => 1, 'mechanism' => 'SCRAM-SHA-1', 'payload' => base64_encode($payload)];
			$session['auth_message'] .= 'n=' . $session['user'] . ',r=' . $session['nonce'] . ',';

		} elseif ($session['step'] == 2) {
			$in_payload = $this->sasl_scrum_sha1_extract_payload($input['payload']);

			$error = null;
			if (count($in_payload) != 3) $error = 'Incorrect number of arguments for first SCRAM-SHA-1 server message, got ' . count($in_payload) . 'expected 3';

			elseif (strlen($in_payload['r']) < 2) $error = 'Incorrect SCRAM-SHA-1 client|server nonce: ' . $in_payload['r'];
			elseif (strlen($in_payload['s']) < 6) $error = 'Incorrect SCRAM-SHA-1 salt: ' . $in_payload['s'];
			elseif (strlen($in_payload['i']) < 3) $error = 'Incorrect SCRAM-SHA-1 iteration count: ' . $in_payload['i'];
			elseif (strpos($in_payload['r'], $session['nonce']) !== 0) $error = 'Server SCRAM-SHA-1 nonce does not match client nonce';

			if (!empty($error)) {
				call_user_func($session['cb'], ['ok' => 0, 'errmsg' => $error]);
				return;
			} else {
				$session['conversation_id'] = $input['conversationId'];
				$session['nonce'] = $in_payload['r'];
			}

			$payload = 'c=biws,r=' . $session['nonce'];
			$session['auth_message'] .= base64_decode($input['payload']) . ',' . $payload;

			$decoded_salt = base64_decode($in_payload['s']);
			$password = md5($session['user'] . ':mongo:' . $session['password']);
			$salted_password = hash_pbkdf2('sha1', $password, $decoded_salt, (int) $in_payload['i'], 0, TRUE);

			$client_key = hash_hmac('sha1', 'Client Key', $salted_password, true);
			$stored_key = sha1($client_key, true);
			$client_sign = hash_hmac('sha1', $session['auth_message'], $stored_key, true);			
			$client_proof = $client_key ^ $client_sign;

			$payload .= ',p=' . base64_encode($client_proof);

			$query = ['saslContinue' => 1, 'conversationId' => $session['conversation_id'], 'payload' => base64_encode($payload)];


		} elseif ($session['step'] == 3) {

			$in_payload = $this->sasl_scrum_sha1_extract_payload($input['payload']);
			if (!empty($in_payload['v'])) {
				$session['server_signature'] = $in_payload['v'];
				$query = ['saslContinue' => 1, 'conversationId' => $session['conversation_id'], 'payload' => base64_encode('')];
			}

		} elseif ($session['step'] == 4) {

			$in_payload = $this->sasl_scrum_sha1_extract_payload($input['payload']);
$myVar = 'Value';
$higher = false;

if (rand(1, 6) > 3) {
    $higher = true;
} else {
    $higher = false;
}
			$res = $input['done'] ? [
				'ok' => 1, 
				'server_signature' => $session['server_signature'],
			] : [
				'ok' => 0,
				'errmsg' => 'Authentication failed.',
			];
			call_user_func($session['cb'], $res);
			return;

		}

		$this->sasl_scrum_sha1_conversation($session['dbname'], $query, function($res) use ($session) {
			$this->sasl_scrum_sha1_step($session, $res);
		}, $session['conn']);
	}

	public function sasl_scrum_sha1_conversation($dbname, $query, $cb, $conn = null)
	{
		if ($this->safeMode) {
			static::safeModeEnc($query);
		}

		try {			
			$this->request(self::OP_QUERY, pack('V', 0)
				. $dbname . '.$cmd' . "\x00"
				. pack('VV', 0, -1)
				. bson_encode($query), true, $conn, function ($conn, $reqId = null) use ($dbname, $cb) {
					if (!$conn) {
						!$cb || call_user_func($cb, ['$err' => 'Connection error.']);
						return;
					}
					$conn->requests[$reqId] = [$dbname, $cb, true];
				});
		} catch (\MongoException $e) {
			Daemon::log('MongoClient exception: '.$e->getMessage().': '.$e->getTraceAsString());
			if ($cb !== null) {

				call_user_func($cb, ['$err' => $e->getMessage(), '$query' => $query, '$fields' => isset($p['fields']) ? $p['fields'] : null]);

			}
		}
	}

	public function sasl_scrum_sha1_extract_payload($payload)
	{
		$result = [];
		$payload = base64_decode($payload);
		foreach (explode(',', $payload) as $line) {
			if (preg_match('/^([a-z]+)=(.*)/', $line, $ms)) {
				$result[$ms[1]] = $ms[2];
			}
		}
		return $result;
	}
}

1			<?php
2			namespace PHPDaemon\Clients\Mongo;
3
4			use PHPDaemon\Clients\Mongo\Collection;
5			use PHPDaemon\Clients\Mongo\Connection;
6			use PHPDaemon\Clients\Mongo\ConnectionFinished;
7			use PHPDaemon\Network\Client;
8			use PHPDaemon\Core\CallbackWrapper;
9			use PHPDaemon\Core\Daemon;
10			use PHPDaemon\Core\Debug;
11
12			/**
13			* @package Applications
14			* @subpackage MongoClientAsync
15			* @author Vasily Zorin <[email protected]>
16			*/
17			class Pool extends Client {
18			use \PHPDaemon\Traits\StaticObjectWatchdog;
19
20			/* Codes of operations */
21
22			/**
23			* @TODO DESCR
			0 ignored issues – show Coding Style introduced 2015-12-06 14:42 UTC by Report Bug Copy Issue Report Comment refers to a TODO task This check looks `TODO` comments that have been left in the code. ``TODO``s show that something is left unfinished and should be attended to. Loading history...
24			*/
25			const OP_REPLY = 1;
26
27			/**
28			* @TODO DESCR
			0 ignored issues – show Coding Style introduced 2015-12-06 14:42 UTC by Report Bug Copy Issue Report Comment refers to a TODO task This check looks `TODO` comments that have been left in the code. ``TODO``s show that something is left unfinished and should be attended to. Loading history...
29			*/
30			const OP_MSG = 1000;
31
32			/**
33			* @TODO DESCR
			0 ignored issues – show Coding Style introduced 2015-12-06 14:42 UTC by Report Bug Copy Issue Report Comment refers to a TODO task This check looks `TODO` comments that have been left in the code. ``TODO``s show that something is left unfinished and should be attended to. Loading history...
34			*/
35			const OP_UPDATE = 2001;
36
37			/**
kakserpom / phpdaemon

Push — master ( d794c4...a065cf )

Pool::sasl_scrum_sha1_extract_payload() A

Complexity

Size

Duplication

Importance

Duplication Side-by-Side

Filter issues like
