--TEST--
MySQL PDO->__construct() - Generic + DSN
--SKIPIF--
<?php
require_once(dirname(__FILE__) . DIRECTORY_SEPARATOR . 'skipif.inc');
require_once(dirname(__FILE__) . DIRECTORY_SEPARATOR . 'mysql_pdo_test.inc');
MySQLPDOTest::skip();
?>
--FILE--
<?php
	require_once(dirname(__FILE__) . DIRECTORY_SEPARATOR . 'mysql_pdo_test.inc');

	function tryandcatch($offset, $code) {

		try {
			eval($code);
			assert(sprintf("[%03d] Should have failed\n", $offset) != '');
		} catch (PDOException $e) {
			return sprintf("[%03d] %s, [%s] %s\n",
				$offset,
				$e->getMessage(),
				(isset($db) && is_object($db)) ? $db->errorCode() : 'n/a',
				(isset($db) && is_object($db)) ? implode(' ', $db->errorInfo()) : 'n/a');
		}

		return '';
	}

	try {

		if (NULL !== ($db = @new PDO()))
			printf("[001] Too few parameters\n");

		print tryandcatch(2, '$db = new PDO(chr(0));');
		print tryandcatch(3, '$db = new PDO("a" . chr(0) . "b");');
		print tryandcatch(4, '$db = new PDO("MYSQL");');
		print tryandcatch(5, '$db = new PDO("mysql");');
		print tryandcatch(6, '$db = new PDO("mysql ");');
		print tryandcatch(7, '$db = new PDO("fantasyandfriends :");');

		$dsn = PDO_MYSQL_TEST_DSN;
		// MySQL Server might accept anonymous connections, don't
		// print anything
		tryandcatch(8, '$db = new PDO("' . $dsn . '");');

		$user = 'dontcreatesuchauser';
		$pass = 'withthispassword';
		print tryandcatch(9, '$db = new PDO("' . $dsn . '", "' . $user . '", "' . $pass . '");');

		// should fail
		$dsn = 'mysql:';
		print tryandcatch(10, '$db = new PDO("' . $dsn . '", "' . $user . '", "' . $pass . '");');

		$dsn = PDO_MYSQL_TEST_DSN;
		$user = PDO_MYSQL_TEST_USER;
		$pass	= PDO_MYSQL_TEST_PASS;
		// should work...
		$db = new PDO($dsn, $user, $pass);

		$dsn = 'mysql:invalid=foo';
		print tryandcatch(11, '$db = new PDO("' . $dsn . '", "' . $user . '", "' . $pass . '");');

		$dsn = 'mysql:' . str_repeat('howmuch=canpdoeat;', 1000);
		print tryandcatch(12, '$db = new PDO("' . $dsn . '", "' . $user . '", "' . $pass . '");');

		$dsn = 'mysql:' . str_repeat('abcdefghij', 1024 * 10) . '=somevalue';
		print tryandcatch(13, '$db = new PDO("' . $dsn . '", "' . $user . '", "' . $pass . '");');

		if (PDO_MYSQL_TEST_HOST) {
			$host = PDO_MYSQL_TEST_HOST;
			$invalid_host = $host . 'invalid';

			// last host specification should be the one used
			$dsn = MySQLPDOTest::getDSN(array('host' => $host), 'host=' . $invalid_host);
			try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
				$tmp = $e->getMessage();
				if (!stristr($tmp, 'HY000') && !stristr($tmp, '2005') && !stristr($tmp, '2002'))
					printf("[014] Cannot find proper error codes: %s\n", $tmp);
			}

			$dsn = MySQLPDOTest::getDSN(array('host' => $invalid_host), 'host=' . $host);
			try { $db = @new PDO($dsn, $user, $pass); } catch (PDOException $e) {
				printf("[015] DSN=%s, %s\n", $dsn, $e->getMessage());
			}

			$invalid_host = '-' . chr(0);

			$dsn = MySQLPDOTest::getDSN(array('host' => $invalid_host));
			try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
				$tmp = $e->getMessage();
				if (!stristr($tmp, 'HY000') && !stristr($tmp, '2005') && !stristr($tmp, '2002'))
					printf("[016] Cannot find proper error codes: %s\n", $tmp);
			}

			// parsing should not get confused by chr(0)
			$dsn = MySQLPDOTest::getDSN(array('host' => $invalid_host), 'host=' . $host);
			try { $db = @new PDO($dsn, $user, $pass); } catch (PDOException $e) {
				printf("[017] DSN=%s, %s\n", $dsn, $e->getMessage());
			}

		}

		// what about long values for a valid option ...
		// hostnames > 1024 chars break on some NIS-enabled FreeBSD...
		$dsn = MySQLPDOTest::getDSN(array('host' => str_repeat('0123456789', 100)));
		try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
			$tmp = $e->getMessage();
			if (!stristr($tmp, 'HY000') && !stristr($tmp, '2005') && !stristr($tmp, '2002'))
				printf("[018] Cannot find proper error codes: %s\n", $tmp);
		}

		if (PDO_MYSQL_TEST_PORT && (PDO_MYSQL_TEST_SOCKET == '')) {
			// Playing with the port makes only sense if no socket gets used

			$port = PDO_MYSQL_TEST_PORT;
			// let's hope we don't hit a MySQL running on that port...
			$invalid_port = $port * 2;

			$dsn = MySQLPDOTest::getDSN(array('port' => $port), 'port=' . $invalid_port);
			try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
				$tmp = $e->getMessage();
				if (!stristr($tmp, 'HY000') && !stristr($tmp, '2005'))
					printf("[019] Cannot find proper error codes: %s\n", $tmp);
			}

			$dsn = MySQLPDOTest::getDSN(array('port' => $invalid_port), 'port=' . $port);
			try { $db = @new PDO($dsn, $user, $pass); } catch (PDOException $e) {
				printf("[020] DSN=%s, %s\n", $dsn, $e->getMessage());
			}

			$invalid_port = 'abc';
			$dsn = MySQLPDOTest::getDSN(array('port' => $port), 'port=' . $invalid_port);
			try {
				$db = @new PDO($dsn, $user, $pass);
				// atoi('abc') = 0, 0 -> fallback to default 3306 -> may or may not fail!
			} catch (PDOException $e) {
			}

		}

		if (PDO_MYSQL_TEST_DB) {
			$db = PDO_MYSQL_TEST_DB;
			$invalid_db = 'letshopeitdoesnotexist';

			$dsn = MySQLPDOTest::getDSN(array('dbname' => $db), 'dbname=' . $invalid_db);
			try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
				$tmp = $e->getMessage();
				if (!stristr($tmp, '42000') && !stristr($tmp, '1049'))
					printf("[022] Cannot find proper error codes: %s\n", $tmp);
			}

			$dsn = MySQLPDOTest::getDSN(array('dbname' => $invalid_db), 'dbname=' . $db);
			try { $db = @new PDO($dsn, $user, $pass); } catch (PDOException $e) {
				printf("[023] DSN=%s, %s\n", $dsn, $e->getMessage());
			}

		}

		if (PDO_MYSQL_TEST_SOCKET && (stristr(PDO_MYSQL_TEST_DSN, PDO_MYSQL_TEST_SOCKET) !== false)) {
			$socket = PDO_MYSQL_TEST_SOCKET;
			$invalid_socket = '/lets/hope/it/does/not/exist';

			$dsn = MySQLPDOTest::getDSN(array('unix_socket' => $socket), 'unix_socket=' . $invalid_socket);
			try { $db = @new PDO($dsn, $user, $pass); assert(false); printf("%s\n", $dsn); } catch (PDOException $e) {
				$tmp = $e->getMessage();
				if (!stristr($tmp, 'HY000') && !stristr($tmp, '2002'))
					printf("[024] Cannot find proper error codes: %s\n", $tmp);
			}

			$dsn = MySQLPDOTest::getDSN(array('unix_socket' => $invalid_socket), 'unix_socket=' . $socket);
			try { $db = @new PDO($dsn, $user, $pass); } catch (PDOException $e) {
				printf("[025] DSN=%s, %s\n", $dsn, $e->getMessage());
			}

		}

		$have_charset_support = false;
		$dsn = MySQLPDOTest::getDSN();
		try {
			$db = new PDO($dsn, $user, $pass);
			$stmt = $db->query('SELECT VERSION() as _version');
			$version = $stmt->fetch(PDO::FETCH_ASSOC);

			$tmp = explode('.', $version['_version']);
			if ((count($tmp) == 3) &&
					(($tmp[0] >= 4 && $tmp[1] >= 1) || ($tmp[0] >= 5))) {
				// MySQL Server 4.1 - charset support available
				$have_charset_support = true;
			}

		} catch (PDOException $e) {
			printf("[026] DSN=%s, %s\n", $dsn, $e->getMessage());
		}

		if (PDO_MYSQL_TEST_CHARSET) {
			$charset = PDO_MYSQL_TEST_CHARSET;
			$invalid_charset = 'invalid';

			if ($have_charset_support) {
				$dsn = MySQLPDOTest::getDSN();
				$db = new PDO($dsn, $user, $pass);
				$stmt = $db->query(sprintf('SHOW CHARACTER SET LIKE "%s"', $charset));
				$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
				$have_charset = (empty($tmp)) ? false : true;

				if ($have_charset) {
					$dsn = MySQLPDOTest::getDSN(array('charset' => $charset), 'charset=' . $invalid_charset);
					try {
						$db = @new PDO($dsn, $user, $pass);
						/* NOTE: MySQL does a fallback to the charset suggested during the handshake - no error - no bug! */
					} catch (PDOException $e) {
						$tmp = $e->getMessage();
						/* TODO: add proper codes */
						if (!stristr($tmp, 'sqlstatecode') || !stristr($tmp, 'mysqlinternalerrcode'))
							printf("[027] TODO - Cannot find proper error codes: %s\n", $tmp);
					}

					$dsn = MySQLPDOTest::getDSN(array('charset' => $invalid_charset), 'charset=' . $charset);
					try {
						$db = @new PDO($dsn, $user, $pass);
						/* Strictly speaking we should test more: character_set_client, character_set_results, and character_set_connection */
						$stmt = $db->query('SELECT @@character_set_connection AS _charset');
						$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
						if ($tmp['_charset'] != $charset)
							printf("[028] Character sets has not been set, @@character_set_connection reports '%s', expecting '%s'",
								$tmp['_charset'], $charset);
					} catch (PDOException $e) {
						printf("[029] DSN=%s, %s\n", $dsn, $e->getMessage());
					}
				} else {
					printf("[030] You're trying to run the tests with charset '%s' which seems not supported by the server!", $charset);
				}

			}

		}

		if ($have_charset_support) {
			// In case the PDO_MYSQL_TEST_CHARSET interferes with any defaults
			// we do another test to verify that the charset has been set.
			$dsn = MySQLPDOTest::getDSN();
			$db = new PDO($dsn, $user, $pass);
			$stmt = $db->query('SHOW CHARACTER SET LIKE "latin1"');
			$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
			$have_latin1 =(empty($tmp)) ? false : true;
			$stmt = $db->query('SHOW CHARACTER SET LIKE "latin2"');
			$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
			$have_latin2 =(empty($tmp)) ? false : true;

			if ($have_latin1 && $have_latin2) {
				// very likely we do have both of them...
				try {
					$dsn = MySQLPDOTest::getDSN(array('charset' => 'latin1'));
					$db = new PDO($dsn, $user, $pass);
					$stmt = $db->query('SELECT @@character_set_connection AS _charset');
					$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
					if ($tmp['_charset'] != 'latin1')
						printf("[031] DSN = %s, Character sets has not been set, @@character_set_connection reports '%s', expecting '%s'",
							$dsn, $tmp['_charset'], 'latin1');

				} catch (PDOException $e) {
					printf("[032] %s\n", $e->getMessage());
				}

				try {
					$dsn = MySQLPDOTest::getDSN(array('charset' => 'latin2'));
					$db = new PDO($dsn, $user, $pass);
					$stmt = $db->query('SELECT @@character_set_connection AS _charset');
					$tmp = $stmt->fetch(PDO::FETCH_ASSOC);
					if ($tmp['_charset'] != 'latin2')
						printf("[033] DSN = %s, character sets has not been set, @@character_set_connection reports '%s', expecting '%s'",
							$dsn, $tmp['_charset'], 'latin2');

				} catch (PDOException $e) {
					printf("[034] %s\n", $e->getMessage());
				}

			}
		}

	} catch (PDOException $e) {
		printf("[001] %s, [%s] %s\n",
			$e->getMessage(),
			(is_object($db)) ? $db->errorCode() : 'n/a',
			(is_object($db)) ? implode(' ', $db->errorInfo()) : 'n/a');
	}

	print "done!";
?>
--EXPECTF--
[002] invalid data source name, [n/a] n/a
[003] invalid data source name, [n/a] n/a
[004] invalid data source name, [n/a] n/a
[005] invalid data source name, [n/a] n/a
[006] invalid data source name, [n/a] n/a
[007] could not find driver, [n/a] n/a
[009] SQLSTATE[%s] [1045] Access denied for user 'dont%s'@'%s' (using password: YES), [n/a] n/a
[010] SQLSTATE[%s] [1045] Access denied for user 'dont%s'@'%s' (using password: YES), [n/a] n/a
[017] DSN=%s, SQLSTATE[%s] [%d] %s
[033] DSN = mysql:%s, character sets has not been set, @@character_set_connection reports 'latin1', expecting 'latin2'done!