mirror of
https://github.com/php/php-src.git
synced 2024-09-22 02:17:32 +00:00
83 lines
2.3 KiB
PHP
83 lines
2.3 KiB
PHP
--TEST--
|
|
ldap_exop() and ldap_parse_exop() - EXOP operations
|
|
--CREDITS--
|
|
Côme Chilliet <mcmic@php.net>
|
|
--SKIPIF--
|
|
<?php require_once('skipif.inc'); ?>
|
|
<?php require_once('skipifbindfailure.inc'); ?>
|
|
--FILE--
|
|
<?php
|
|
require "connect.inc";
|
|
|
|
$link = ldap_connect_and_bind($host, $port, $user, $passwd, $protocol_version);
|
|
insert_dummy_data($link, $base);
|
|
|
|
function build_reqdata_passwd($user, $oldpw, $newpw)
|
|
{
|
|
// This is basic and will only work for small strings
|
|
$hex = '';
|
|
if (!empty($user)) {
|
|
$hex .= '80'.sprintf("%'.02x", strlen($user)).bin2hex($user);
|
|
}
|
|
if (!empty($oldpw)) {
|
|
$hex .= '81'.sprintf("%'.02x", strlen($oldpw)).bin2hex($oldpw);
|
|
}
|
|
if (!empty($newpw)) {
|
|
$hex .= '82'.sprintf("%'.02x", strlen($newpw)).bin2hex($newpw);
|
|
}
|
|
return hex2bin('30'.sprintf("%'.02x", strlen($hex)/2).$hex);
|
|
}
|
|
|
|
function extract_genpw($retdata)
|
|
{
|
|
// Only works for small strings as well
|
|
return hex2bin(substr(bin2hex($retdata), 4*2));
|
|
}
|
|
|
|
$userAPassword = "oops";
|
|
|
|
// ldap_exop(resource link, string reqoid [, string reqdata [, array servercontrols [, string &retdata [, string &retoid]]]])
|
|
// bool ldap_parse_exop(resource link, resource result [, string &retdata [, string &retoid]])
|
|
var_dump(
|
|
ldap_exop($link, LDAP_EXOP_WHO_AM_I, NULL, NULL, $retdata, $retoid),
|
|
$retdata,
|
|
$retoid,
|
|
ldap_exop($link, LDAP_EXOP_WHO_AM_I, NULL, [['oid' => LDAP_CONTROL_PROXY_AUTHZ, 'value' => "dn:cn=userA,$base"]], $retdata),
|
|
$retdata,
|
|
$r = ldap_exop($link, LDAP_EXOP_WHO_AM_I),
|
|
ldap_parse_exop($link, $r, $retdata2),
|
|
$retdata2,
|
|
test_bind($host, $port, "cn=userA,$base", $userAPassword, $protocol_version),
|
|
$r = ldap_exop($link, LDAP_EXOP_MODIFY_PASSWD, build_reqdata_passwd("cn=userA,$base", $userAPassword, "")),
|
|
ldap_parse_exop($link, $r, $retpwdata, $retpwoid),
|
|
$genpw = extract_genpw($retpwdata),
|
|
$retpwoid,
|
|
test_bind($host, $port, "cn=userA,$base", $genpw, $protocol_version)
|
|
);
|
|
?>
|
|
===DONE===
|
|
--CLEAN--
|
|
<?php
|
|
require "connect.inc";
|
|
|
|
$link = ldap_connect_and_bind($host, $port, $user, $passwd, $protocol_version);
|
|
|
|
remove_dummy_data($link, $base);
|
|
?>
|
|
--EXPECTF--
|
|
bool(true)
|
|
string(%d) "dn:%s"
|
|
string(0) ""
|
|
bool(true)
|
|
string(%d) "dn:cn=user%s"
|
|
resource(%d) of type (ldap result)
|
|
bool(true)
|
|
string(%d) "dn:%s"
|
|
bool(true)
|
|
resource(%d) of type (ldap result)
|
|
bool(true)
|
|
string(%d) "%s"
|
|
string(0) ""
|
|
bool(true)
|
|
===DONE===
|