--TEST--
mysqli_stmt_bind_param() - checking whether the parameters are modified (bug#44390)
--SKIPIF--
<?php
require_once('skipif.inc');
require_once('skipifemb.inc');
require_once('skipifconnectfailure.inc');
?>
--FILE--
<?php
	require('table.inc');
	$link->set_charset('latin1');

	class foo {
	  // @var $bar string
	  public $bar;
	}

	$foo = new foo;
	$foo->bar = "фубар";

	echo "Test 1:\n";
	$stmt = $link->prepare("SELECT ? FOO");
	var_dump($foo); // here you can see the bar member var beeing a string
	$stmt->bind_param("s", $foo->bar);
	var_dump($foo); // this will show $foo->bar beeing a reference string
	$stmt->bind_result($one);
	$stmt->execute();
	$stmt->fetch();
	$stmt->free_result();
	echo("$one\n\n");

	// it is getting worse. Binding the same var twice with different
	// types you can get unexpected results (e.g. binary trash for the
	// string and misc data for the integer. See next 2 tests.

	echo "Test 2:\n";
	$stmt = $link->prepare("SELECT ? FOO, ? BAR");
	var_dump($foo);
	$stmt->bind_param("si", $foo->bar, $foo->bar);
	echo "---\n";
	var_dump($foo);
	echo "---\n";
	$stmt->execute();
	var_dump($foo);
	echo "---\n";
	$stmt->bind_result($one, $two);
	$stmt->fetch();
	$stmt->free_result();
	echo("$one - $two\n\n");


	echo "Test 3:\n";
	$stmt = $link->prepare("SELECT ? FOO, ? BAR");
	var_dump($foo);
	$stmt->bind_param("is", $foo->bar, $foo->bar);
	var_dump($foo);
	$stmt->bind_result($one, $two);
	$stmt->execute();
	$stmt->fetch();
	$stmt->free_result();
	echo("$one - $two\n\n");
	echo "done!";
?>
--CLEAN--
<?php
	require_once("clean_table.inc");
?>
--EXPECTF--
Test 1:
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  %unicode|string%(%d) "фубар"
}
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  &%unicode|string%(%d) "фубар"
}
фубар

Test 2:
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  %unicode|string%(%d) "фубар"
}
---
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  &%unicode|string%(%d) "фубар"
}
---
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  &%unicode|string%(%d) "фубар"
}
---
фубар - 0

Test 3:
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  %unicode|string%(%d) "фубар"
}
object(foo)#%d (1) {
  [%u|b%"bar"]=>
  &%unicode|string%(%d) "фубар"
}
0 - фубар

done!