Annotation of embedaddon/php/ext/ldap/ldap.c, revision 1.1
1.1 ! misho 1: /*
! 2: +----------------------------------------------------------------------+
! 3: | PHP Version 5 |
! 4: +----------------------------------------------------------------------+
! 5: | Copyright (c) 1997-2012 The PHP Group |
! 6: +----------------------------------------------------------------------+
! 7: | This source file is subject to version 3.01 of the PHP license, |
! 8: | that is bundled with this package in the file LICENSE, and is |
! 9: | available through the world-wide-web at the following url: |
! 10: | http://www.php.net/license/3_01.txt |
! 11: | If you did not receive a copy of the PHP license and are unable to |
! 12: | obtain it through the world-wide-web, please send a note to |
! 13: | license@php.net so we can mail you a copy immediately. |
! 14: +----------------------------------------------------------------------+
! 15: | Authors: Amitay Isaacs <amitay@w-o-i.com> |
! 16: | Eric Warnke <ericw@albany.edu> |
! 17: | Rasmus Lerdorf <rasmus@php.net> |
! 18: | Gerrit Thomson <334647@swin.edu.au> |
! 19: | Jani Taskinen <sniper@iki.fi> |
! 20: | Stig Venaas <venaas@uninett.no> |
! 21: | Doug Goldstein <cardoe@cardoe.com> |
! 22: | PHP 4.0 updates: Zeev Suraski <zeev@zend.com> |
! 23: +----------------------------------------------------------------------+
! 24: */
! 25:
! 26: /* $Id: ldap.c 321634 2012-01-01 13:15:04Z felipe $ */
! 27: #define IS_EXT_MODULE
! 28:
! 29: #ifdef HAVE_CONFIG_H
! 30: #include "config.h"
! 31: #endif
! 32:
! 33: /* Additional headers for NetWare */
! 34: #if defined(NETWARE) && (NEW_LIBC)
! 35: #include <sys/select.h>
! 36: #include <sys/timeval.h>
! 37: #endif
! 38:
! 39: #include "php.h"
! 40: #include "php_ini.h"
! 41:
! 42: #include <stddef.h>
! 43:
! 44: #include "ext/standard/dl.h"
! 45: #include "php_ldap.h"
! 46:
! 47: #ifdef PHP_WIN32
! 48: #include <string.h>
! 49: #include "config.w32.h"
! 50: #if HAVE_NSLDAP
! 51: #include <winsock2.h>
! 52: #endif
! 53: #define strdup _strdup
! 54: #undef WINDOWS
! 55: #undef strcasecmp
! 56: #undef strncasecmp
! 57: #define WINSOCK 1
! 58: #define __STDC__ 1
! 59: #endif
! 60:
! 61: #include "ext/standard/php_string.h"
! 62: #include "ext/standard/info.h"
! 63:
! 64: #ifdef HAVE_LDAP_SASL_H
! 65: #include <sasl.h>
! 66: #elif defined(HAVE_LDAP_SASL_SASL_H)
! 67: #include <sasl/sasl.h>
! 68: #endif
! 69:
! 70: typedef struct {
! 71: LDAP *link;
! 72: #if defined(LDAP_API_FEATURE_X_OPENLDAP) && defined(HAVE_3ARG_SETREBINDPROC)
! 73: zval *rebindproc;
! 74: #endif
! 75: } ldap_linkdata;
! 76:
! 77: typedef struct {
! 78: LDAPMessage *data;
! 79: BerElement *ber;
! 80: int id;
! 81: } ldap_resultentry;
! 82:
! 83: ZEND_DECLARE_MODULE_GLOBALS(ldap)
! 84: static PHP_GINIT_FUNCTION(ldap);
! 85:
! 86: static int le_link, le_result, le_result_entry;
! 87:
! 88: #ifdef COMPILE_DL_LDAP
! 89: ZEND_GET_MODULE(ldap)
! 90: #endif
! 91:
! 92: static void _close_ldap_link(zend_rsrc_list_entry *rsrc TSRMLS_DC) /* {{{ */
! 93: {
! 94: ldap_linkdata *ld = (ldap_linkdata *)rsrc->ptr;
! 95:
! 96: ldap_unbind_s(ld->link);
! 97: #if defined(LDAP_API_FEATURE_X_OPENLDAP) && defined(HAVE_3ARG_SETREBINDPROC)
! 98: if (ld->rebindproc != NULL) {
! 99: zval_dtor(ld->rebindproc);
! 100: FREE_ZVAL(ld->rebindproc);
! 101: }
! 102: #endif
! 103: efree(ld);
! 104: LDAPG(num_links)--;
! 105: }
! 106: /* }}} */
! 107:
! 108: static void _free_ldap_result(zend_rsrc_list_entry *rsrc TSRMLS_DC) /* {{{ */
! 109: {
! 110: LDAPMessage *result = (LDAPMessage *)rsrc->ptr;
! 111: ldap_msgfree(result);
! 112: }
! 113: /* }}} */
! 114:
! 115: static void _free_ldap_result_entry(zend_rsrc_list_entry *rsrc TSRMLS_DC) /* {{{ */
! 116: {
! 117: ldap_resultentry *entry = (ldap_resultentry *)rsrc->ptr;
! 118:
! 119: if (entry->ber != NULL) {
! 120: ber_free(entry->ber, 0);
! 121: entry->ber = NULL;
! 122: }
! 123: zend_list_delete(entry->id);
! 124: efree(entry);
! 125: }
! 126: /* }}} */
! 127:
! 128: /* {{{ PHP_INI_BEGIN
! 129: */
! 130: PHP_INI_BEGIN()
! 131: STD_PHP_INI_ENTRY_EX("ldap.max_links", "-1", PHP_INI_SYSTEM, OnUpdateLong, max_links, zend_ldap_globals, ldap_globals, display_link_numbers)
! 132: PHP_INI_END()
! 133: /* }}} */
! 134:
! 135: /* {{{ PHP_GINIT_FUNCTION
! 136: */
! 137: static PHP_GINIT_FUNCTION(ldap)
! 138: {
! 139: ldap_globals->num_links = 0;
! 140: }
! 141: /* }}} */
! 142:
! 143: /* {{{ PHP_MINIT_FUNCTION
! 144: */
! 145: PHP_MINIT_FUNCTION(ldap)
! 146: {
! 147: REGISTER_INI_ENTRIES();
! 148:
! 149: /* Constants to be used with deref-parameter in php_ldap_do_search() */
! 150: REGISTER_LONG_CONSTANT("LDAP_DEREF_NEVER", LDAP_DEREF_NEVER, CONST_PERSISTENT | CONST_CS);
! 151: REGISTER_LONG_CONSTANT("LDAP_DEREF_SEARCHING", LDAP_DEREF_SEARCHING, CONST_PERSISTENT | CONST_CS);
! 152: REGISTER_LONG_CONSTANT("LDAP_DEREF_FINDING", LDAP_DEREF_FINDING, CONST_PERSISTENT | CONST_CS);
! 153: REGISTER_LONG_CONSTANT("LDAP_DEREF_ALWAYS", LDAP_DEREF_ALWAYS, CONST_PERSISTENT | CONST_CS);
! 154:
! 155: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 156: /* LDAP options */
! 157: REGISTER_LONG_CONSTANT("LDAP_OPT_DEREF", LDAP_OPT_DEREF, CONST_PERSISTENT | CONST_CS);
! 158: REGISTER_LONG_CONSTANT("LDAP_OPT_SIZELIMIT", LDAP_OPT_SIZELIMIT, CONST_PERSISTENT | CONST_CS);
! 159: REGISTER_LONG_CONSTANT("LDAP_OPT_TIMELIMIT", LDAP_OPT_TIMELIMIT, CONST_PERSISTENT | CONST_CS);
! 160: #ifdef LDAP_OPT_NETWORK_TIMEOUT
! 161: REGISTER_LONG_CONSTANT("LDAP_OPT_NETWORK_TIMEOUT", LDAP_OPT_NETWORK_TIMEOUT, CONST_PERSISTENT | CONST_CS);
! 162: #elif defined (LDAP_X_OPT_CONNECT_TIMEOUT)
! 163: REGISTER_LONG_CONSTANT("LDAP_OPT_NETWORK_TIMEOUT", LDAP_X_OPT_CONNECT_TIMEOUT, CONST_PERSISTENT | CONST_CS);
! 164: #endif
! 165: REGISTER_LONG_CONSTANT("LDAP_OPT_PROTOCOL_VERSION", LDAP_OPT_PROTOCOL_VERSION, CONST_PERSISTENT | CONST_CS);
! 166: REGISTER_LONG_CONSTANT("LDAP_OPT_ERROR_NUMBER", LDAP_OPT_ERROR_NUMBER, CONST_PERSISTENT | CONST_CS);
! 167: REGISTER_LONG_CONSTANT("LDAP_OPT_REFERRALS", LDAP_OPT_REFERRALS, CONST_PERSISTENT | CONST_CS);
! 168: #ifdef LDAP_OPT_RESTART
! 169: REGISTER_LONG_CONSTANT("LDAP_OPT_RESTART", LDAP_OPT_RESTART, CONST_PERSISTENT | CONST_CS);
! 170: #endif
! 171: #ifdef LDAP_OPT_HOST_NAME
! 172: REGISTER_LONG_CONSTANT("LDAP_OPT_HOST_NAME", LDAP_OPT_HOST_NAME, CONST_PERSISTENT | CONST_CS);
! 173: #endif
! 174: REGISTER_LONG_CONSTANT("LDAP_OPT_ERROR_STRING", LDAP_OPT_ERROR_STRING, CONST_PERSISTENT | CONST_CS);
! 175: #ifdef LDAP_OPT_MATCHED_DN
! 176: REGISTER_LONG_CONSTANT("LDAP_OPT_MATCHED_DN", LDAP_OPT_MATCHED_DN, CONST_PERSISTENT | CONST_CS);
! 177: #endif
! 178: REGISTER_LONG_CONSTANT("LDAP_OPT_SERVER_CONTROLS", LDAP_OPT_SERVER_CONTROLS, CONST_PERSISTENT | CONST_CS);
! 179: REGISTER_LONG_CONSTANT("LDAP_OPT_CLIENT_CONTROLS", LDAP_OPT_CLIENT_CONTROLS, CONST_PERSISTENT | CONST_CS);
! 180: #endif
! 181: #ifdef LDAP_OPT_DEBUG_LEVEL
! 182: REGISTER_LONG_CONSTANT("LDAP_OPT_DEBUG_LEVEL", LDAP_OPT_DEBUG_LEVEL, CONST_PERSISTENT | CONST_CS);
! 183: #endif
! 184:
! 185: #ifdef HAVE_LDAP_SASL
! 186: REGISTER_LONG_CONSTANT("LDAP_OPT_X_SASL_MECH", LDAP_OPT_X_SASL_MECH, CONST_PERSISTENT | CONST_CS);
! 187: REGISTER_LONG_CONSTANT("LDAP_OPT_X_SASL_REALM", LDAP_OPT_X_SASL_REALM, CONST_PERSISTENT | CONST_CS);
! 188: REGISTER_LONG_CONSTANT("LDAP_OPT_X_SASL_AUTHCID", LDAP_OPT_X_SASL_AUTHCID, CONST_PERSISTENT | CONST_CS);
! 189: REGISTER_LONG_CONSTANT("LDAP_OPT_X_SASL_AUTHZID", LDAP_OPT_X_SASL_AUTHZID, CONST_PERSISTENT | CONST_CS);
! 190: #endif
! 191:
! 192: #ifdef ORALDAP
! 193: REGISTER_LONG_CONSTANT("GSLC_SSL_NO_AUTH", GSLC_SSL_NO_AUTH, CONST_PERSISTENT | CONST_CS);
! 194: REGISTER_LONG_CONSTANT("GSLC_SSL_ONEWAY_AUTH", GSLC_SSL_ONEWAY_AUTH, CONST_PERSISTENT | CONST_CS);
! 195: REGISTER_LONG_CONSTANT("GSLC_SSL_TWOWAY_AUTH", GSLC_SSL_TWOWAY_AUTH, CONST_PERSISTENT | CONST_CS);
! 196: #endif
! 197:
! 198: le_link = zend_register_list_destructors_ex(_close_ldap_link, NULL, "ldap link", module_number);
! 199: le_result = zend_register_list_destructors_ex(_free_ldap_result, NULL, "ldap result", module_number);
! 200: le_result_entry = zend_register_list_destructors_ex(_free_ldap_result_entry, NULL, "ldap result entry", module_number);
! 201:
! 202: Z_TYPE(ldap_module_entry) = type;
! 203:
! 204: return SUCCESS;
! 205: }
! 206: /* }}} */
! 207:
! 208: /* {{{ PHP_MSHUTDOWN_FUNCTION
! 209: */
! 210: PHP_MSHUTDOWN_FUNCTION(ldap)
! 211: {
! 212: UNREGISTER_INI_ENTRIES();
! 213: return SUCCESS;
! 214: }
! 215: /* }}} */
! 216:
! 217: /* {{{ PHP_MINFO_FUNCTION
! 218: */
! 219: PHP_MINFO_FUNCTION(ldap)
! 220: {
! 221: char tmp[32];
! 222: #if HAVE_NSLDAP
! 223: LDAPVersion ver;
! 224: double SDKVersion;
! 225: #endif
! 226:
! 227: php_info_print_table_start();
! 228: php_info_print_table_row(2, "LDAP Support", "enabled");
! 229: php_info_print_table_row(2, "RCS Version", "$Id: ldap.c 321634 2012-01-01 13:15:04Z felipe $");
! 230:
! 231: if (LDAPG(max_links) == -1) {
! 232: snprintf(tmp, 31, "%ld/unlimited", LDAPG(num_links));
! 233: } else {
! 234: snprintf(tmp, 31, "%ld/%ld", LDAPG(num_links), LDAPG(max_links));
! 235: }
! 236: php_info_print_table_row(2, "Total Links", tmp);
! 237:
! 238: #ifdef LDAP_API_VERSION
! 239: snprintf(tmp, 31, "%d", LDAP_API_VERSION);
! 240: php_info_print_table_row(2, "API Version", tmp);
! 241: #endif
! 242:
! 243: #ifdef LDAP_VENDOR_NAME
! 244: php_info_print_table_row(2, "Vendor Name", LDAP_VENDOR_NAME);
! 245: #endif
! 246:
! 247: #ifdef LDAP_VENDOR_VERSION
! 248: snprintf(tmp, 31, "%d", LDAP_VENDOR_VERSION);
! 249: php_info_print_table_row(2, "Vendor Version", tmp);
! 250: #endif
! 251:
! 252: #if HAVE_NSLDAP
! 253: SDKVersion = ldap_version(&ver);
! 254: snprintf(tmp, 31, "%F", SDKVersion/100.0);
! 255: php_info_print_table_row(2, "SDK Version", tmp);
! 256:
! 257: snprintf(tmp, 31, "%F", ver.protocol_version/100.0);
! 258: php_info_print_table_row(2, "Highest LDAP Protocol Supported", tmp);
! 259:
! 260: snprintf(tmp, 31, "%F", ver.SSL_version/100.0);
! 261: php_info_print_table_row(2, "SSL Level Supported", tmp);
! 262:
! 263: if (ver.security_level != LDAP_SECURITY_NONE) {
! 264: snprintf(tmp, 31, "%d", ver.security_level);
! 265: } else {
! 266: strcpy(tmp, "SSL not enabled");
! 267: }
! 268: php_info_print_table_row(2, "Level of Encryption", tmp);
! 269: #endif
! 270:
! 271: #ifdef HAVE_LDAP_SASL
! 272: php_info_print_table_row(2, "SASL Support", "Enabled");
! 273: #endif
! 274:
! 275: php_info_print_table_end();
! 276: DISPLAY_INI_ENTRIES();
! 277: }
! 278: /* }}} */
! 279:
! 280: /* {{{ proto resource ldap_connect([string host [, int port [, string wallet [, string wallet_passwd [, int authmode]]]]])
! 281: Connect to an LDAP server */
! 282: PHP_FUNCTION(ldap_connect)
! 283: {
! 284: char *host = NULL;
! 285: int hostlen;
! 286: long port = 389; /* Default port */
! 287: #ifdef HAVE_ORALDAP
! 288: char *wallet = NULL, *walletpasswd = NULL;
! 289: int walletlen = 0, walletpasswdlen = 0;
! 290: long authmode = GSLC_SSL_NO_AUTH;
! 291: int ssl=0;
! 292: #endif
! 293: ldap_linkdata *ld;
! 294: LDAP *ldap;
! 295:
! 296: #ifdef HAVE_ORALDAP
! 297: if (ZEND_NUM_ARGS() == 3 || ZEND_NUM_ARGS() == 4) {
! 298: WRONG_PARAM_COUNT;
! 299: }
! 300:
! 301: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|slssl", &host, &hostlen, &port, &wallet, &walletlen, &walletpasswd, &walletpasswdlen, &authmode) != SUCCESS) {
! 302: RETURN_FALSE;
! 303: }
! 304:
! 305: if (ZEND_NUM_ARGS() == 5) {
! 306: ssl = 1;
! 307: }
! 308: #else
! 309: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sl", &host, &hostlen, &port) != SUCCESS) {
! 310: RETURN_FALSE;
! 311: }
! 312: #endif
! 313:
! 314: if (LDAPG(max_links) != -1 && LDAPG(num_links) >= LDAPG(max_links)) {
! 315: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Too many open links (%ld)", LDAPG(num_links));
! 316: RETURN_FALSE;
! 317: }
! 318:
! 319: ld = ecalloc(1, sizeof(ldap_linkdata));
! 320:
! 321: #ifdef LDAP_API_FEATURE_X_OPENLDAP
! 322: if (host != NULL && strchr(host, '/')) {
! 323: int rc;
! 324:
! 325: rc = ldap_initialize(&ldap, host);
! 326: if (rc != LDAP_SUCCESS) {
! 327: efree(ld);
! 328: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not create session handle: %s", ldap_err2string(rc));
! 329: RETURN_FALSE;
! 330: }
! 331: } else {
! 332: ldap = ldap_init(host, port);
! 333: }
! 334: #else
! 335: ldap = ldap_open(host, port);
! 336: #endif
! 337:
! 338: if (ldap == NULL) {
! 339: efree(ld);
! 340: RETURN_FALSE;
! 341: } else {
! 342: #ifdef HAVE_ORALDAP
! 343: if (ssl) {
! 344: if (ldap_init_SSL(&ldap->ld_sb, wallet, walletpasswd, authmode)) {
! 345: efree(ld);
! 346: php_error_docref(NULL TSRMLS_CC, E_WARNING, "SSL init failed");
! 347: RETURN_FALSE;
! 348: }
! 349: }
! 350: #endif
! 351: LDAPG(num_links)++;
! 352: ld->link = ldap;
! 353: ZEND_REGISTER_RESOURCE(return_value, ld, le_link);
! 354: }
! 355:
! 356: }
! 357: /* }}} */
! 358:
! 359: /* {{{ _get_lderrno
! 360: */
! 361: static int _get_lderrno(LDAP *ldap)
! 362: {
! 363: #if !HAVE_NSLDAP
! 364: #if LDAP_API_VERSION > 2000 || HAVE_ORALDAP_10
! 365: int lderr;
! 366:
! 367: /* New versions of OpenLDAP do it this way */
! 368: ldap_get_option(ldap, LDAP_OPT_ERROR_NUMBER, &lderr);
! 369: return lderr;
! 370: #else
! 371: return ldap->ld_errno;
! 372: #endif
! 373: #else
! 374: return ldap_get_lderrno(ldap, NULL, NULL);
! 375: #endif
! 376: }
! 377: /* }}} */
! 378:
! 379: /* {{{ proto bool ldap_bind(resource link [, string dn [, string password]])
! 380: Bind to LDAP directory */
! 381: PHP_FUNCTION(ldap_bind)
! 382: {
! 383: zval *link;
! 384: char *ldap_bind_dn = NULL, *ldap_bind_pw = NULL;
! 385: int ldap_bind_dnlen, ldap_bind_pwlen;
! 386: ldap_linkdata *ld;
! 387: int rc;
! 388:
! 389: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|ss", &link, &ldap_bind_dn, &ldap_bind_dnlen, &ldap_bind_pw, &ldap_bind_pwlen) != SUCCESS) {
! 390: RETURN_FALSE;
! 391: }
! 392:
! 393: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 394:
! 395: if ((rc = ldap_bind_s(ld->link, ldap_bind_dn, ldap_bind_pw, LDAP_AUTH_SIMPLE)) != LDAP_SUCCESS) {
! 396: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to bind to server: %s", ldap_err2string(rc));
! 397: RETURN_FALSE;
! 398: } else {
! 399: RETURN_TRUE;
! 400: }
! 401: }
! 402: /* }}} */
! 403:
! 404: #ifdef HAVE_LDAP_SASL
! 405: typedef struct {
! 406: char *mech;
! 407: char *realm;
! 408: char *authcid;
! 409: char *passwd;
! 410: char *authzid;
! 411: } php_ldap_bictx;
! 412:
! 413: /* {{{ _php_sasl_setdefs
! 414: */
! 415: static php_ldap_bictx *_php_sasl_setdefs(LDAP *ld, char *sasl_mech, char *sasl_realm, char *sasl_authc_id, char *passwd, char *sasl_authz_id)
! 416: {
! 417: php_ldap_bictx *ctx;
! 418:
! 419: ctx = ber_memalloc(sizeof(php_ldap_bictx));
! 420: ctx->mech = (sasl_mech) ? ber_strdup(sasl_mech) : NULL;
! 421: ctx->realm = (sasl_realm) ? ber_strdup(sasl_realm) : NULL;
! 422: ctx->authcid = (sasl_authc_id) ? ber_strdup(sasl_authc_id) : NULL;
! 423: ctx->passwd = (passwd) ? ber_strdup(passwd) : NULL;
! 424: ctx->authzid = (sasl_authz_id) ? ber_strdup(sasl_authz_id) : NULL;
! 425:
! 426: if (ctx->mech == NULL) {
! 427: ldap_get_option(ld, LDAP_OPT_X_SASL_MECH, &ctx->mech);
! 428: }
! 429: if (ctx->realm == NULL) {
! 430: ldap_get_option(ld, LDAP_OPT_X_SASL_REALM, &ctx->realm);
! 431: }
! 432: if (ctx->authcid == NULL) {
! 433: ldap_get_option(ld, LDAP_OPT_X_SASL_AUTHCID, &ctx->authcid);
! 434: }
! 435: if (ctx->authzid == NULL) {
! 436: ldap_get_option(ld, LDAP_OPT_X_SASL_AUTHZID, &ctx->authzid);
! 437: }
! 438:
! 439: return ctx;
! 440: }
! 441: /* }}} */
! 442:
! 443: /* {{{ _php_sasl_freedefs
! 444: */
! 445: static void _php_sasl_freedefs(php_ldap_bictx *ctx)
! 446: {
! 447: if (ctx->mech) ber_memfree(ctx->mech);
! 448: if (ctx->realm) ber_memfree(ctx->realm);
! 449: if (ctx->authcid) ber_memfree(ctx->authcid);
! 450: if (ctx->passwd) ber_memfree(ctx->passwd);
! 451: if (ctx->authzid) ber_memfree(ctx->authzid);
! 452: ber_memfree(ctx);
! 453: }
! 454: /* }}} */
! 455:
! 456: /* {{{ _php_sasl_interact
! 457: Internal interact function for SASL */
! 458: static int _php_sasl_interact(LDAP *ld, unsigned flags, void *defaults, void *in)
! 459: {
! 460: sasl_interact_t *interact = in;
! 461: const char *p;
! 462: php_ldap_bictx *ctx = defaults;
! 463:
! 464: for (;interact->id != SASL_CB_LIST_END;interact++) {
! 465: p = NULL;
! 466: switch(interact->id) {
! 467: case SASL_CB_GETREALM:
! 468: p = ctx->realm;
! 469: break;
! 470: case SASL_CB_AUTHNAME:
! 471: p = ctx->authcid;
! 472: break;
! 473: case SASL_CB_USER:
! 474: p = ctx->authzid;
! 475: break;
! 476: case SASL_CB_PASS:
! 477: p = ctx->passwd;
! 478: break;
! 479: }
! 480: if (p) {
! 481: interact->result = p;
! 482: interact->len = strlen(interact->result);
! 483: }
! 484: }
! 485: return LDAP_SUCCESS;
! 486: }
! 487: /* }}} */
! 488:
! 489: /* {{{ proto bool ldap_sasl_bind(resource link [, string binddn [, string password [, string sasl_mech [, string sasl_realm [, string sasl_authc_id [, string sasl_authz_id [, string props]]]]]]])
! 490: Bind to LDAP directory using SASL */
! 491: PHP_FUNCTION(ldap_sasl_bind)
! 492: {
! 493: zval *link;
! 494: ldap_linkdata *ld;
! 495: char *binddn = NULL;
! 496: char *passwd = NULL;
! 497: char *sasl_mech = NULL;
! 498: char *sasl_realm = NULL;
! 499: char *sasl_authz_id = NULL;
! 500: char *sasl_authc_id = NULL;
! 501: char *props = NULL;
! 502: int rc, dn_len, passwd_len, mech_len, realm_len, authc_id_len, authz_id_len, props_len;
! 503: php_ldap_bictx *ctx;
! 504:
! 505: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r|sssssss", &link, &binddn, &dn_len, &passwd, &passwd_len, &sasl_mech, &mech_len, &sasl_realm, &realm_len, &sasl_authc_id, &authc_id_len, &sasl_authz_id, &authz_id_len, &props, &props_len) != SUCCESS) {
! 506: RETURN_FALSE;
! 507: }
! 508:
! 509: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 510:
! 511: ctx = _php_sasl_setdefs(ld->link, sasl_mech, sasl_realm, sasl_authc_id, passwd, sasl_authz_id);
! 512:
! 513: if (props) {
! 514: ldap_set_option(ld->link, LDAP_OPT_X_SASL_SECPROPS, props);
! 515: }
! 516:
! 517: rc = ldap_sasl_interactive_bind_s(ld->link, binddn, ctx->mech, NULL, NULL, LDAP_SASL_QUIET, _php_sasl_interact, ctx);
! 518: if (rc != LDAP_SUCCESS) {
! 519: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to bind to server: %s", ldap_err2string(rc));
! 520: RETVAL_FALSE;
! 521: } else {
! 522: RETVAL_TRUE;
! 523: }
! 524: _php_sasl_freedefs(ctx);
! 525: }
! 526: /* }}} */
! 527: #endif /* HAVE_LDAP_SASL */
! 528:
! 529: /* {{{ proto bool ldap_unbind(resource link)
! 530: Unbind from LDAP directory */
! 531: PHP_FUNCTION(ldap_unbind)
! 532: {
! 533: zval *link;
! 534: ldap_linkdata *ld;
! 535:
! 536: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &link) != SUCCESS) {
! 537: RETURN_FALSE;
! 538: }
! 539:
! 540: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 541:
! 542: zend_list_delete(Z_LVAL_P(link));
! 543: RETURN_TRUE;
! 544: }
! 545: /* }}} */
! 546:
! 547: /* {{{ php_set_opts
! 548: */
! 549: static void php_set_opts(LDAP *ldap, int sizelimit, int timelimit, int deref, int *old_sizelimit, int *old_timelimit, int *old_deref)
! 550: {
! 551: /* sizelimit */
! 552: if (sizelimit > -1) {
! 553: #if (LDAP_API_VERSION >= 2004) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 554: ldap_get_option(ldap, LDAP_OPT_SIZELIMIT, old_sizelimit);
! 555: ldap_set_option(ldap, LDAP_OPT_SIZELIMIT, &sizelimit);
! 556: #else
! 557: *old_sizelimit = ldap->ld_sizelimit;
! 558: ldap->ld_sizelimit = sizelimit;
! 559: #endif
! 560: }
! 561:
! 562: /* timelimit */
! 563: if (timelimit > -1) {
! 564: #if (LDAP_API_VERSION >= 2004) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 565: ldap_get_option(ldap, LDAP_OPT_SIZELIMIT, old_timelimit);
! 566: ldap_set_option(ldap, LDAP_OPT_TIMELIMIT, &timelimit);
! 567: #else
! 568: *old_timelimit = ldap->ld_timelimit;
! 569: ldap->ld_timelimit = timelimit;
! 570: #endif
! 571: }
! 572:
! 573: /* deref */
! 574: if (deref > -1) {
! 575: #if (LDAP_API_VERSION >= 2004) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 576: ldap_get_option(ldap, LDAP_OPT_SIZELIMIT, old_deref);
! 577: ldap_set_option(ldap, LDAP_OPT_DEREF, &deref);
! 578: #else
! 579: *old_deref = ldap->ld_deref;
! 580: ldap->ld_deref = deref;
! 581: #endif
! 582: }
! 583: }
! 584: /* }}} */
! 585:
! 586: /* {{{ php_ldap_do_search
! 587: */
! 588: static void php_ldap_do_search(INTERNAL_FUNCTION_PARAMETERS, int scope)
! 589: {
! 590: zval *link, *base_dn, **filter, *attrs, **attr;
! 591: long attrsonly, sizelimit, timelimit, deref;
! 592: char *ldap_base_dn = NULL, *ldap_filter = NULL, **ldap_attrs = NULL;
! 593: ldap_linkdata *ld = NULL;
! 594: LDAPMessage *ldap_res;
! 595: int ldap_attrsonly = 0, ldap_sizelimit = -1, ldap_timelimit = -1, ldap_deref = -1;
! 596: int old_ldap_sizelimit = -1, old_ldap_timelimit = -1, old_ldap_deref = -1;
! 597: int num_attribs = 0, ret = 1, i, errno, argcount = ZEND_NUM_ARGS();
! 598:
! 599: if (zend_parse_parameters(argcount TSRMLS_CC, "zzZ|allll", &link, &base_dn, &filter, &attrs, &attrsonly,
! 600: &sizelimit, &timelimit, &deref) == FAILURE) {
! 601: return;
! 602: }
! 603:
! 604: /* Reverse -> fall through */
! 605: switch (argcount) {
! 606: case 8:
! 607: ldap_deref = deref;
! 608: case 7:
! 609: ldap_timelimit = timelimit;
! 610: case 6:
! 611: ldap_sizelimit = sizelimit;
! 612: case 5:
! 613: ldap_attrsonly = attrsonly;
! 614: case 4:
! 615: num_attribs = zend_hash_num_elements(Z_ARRVAL_P(attrs));
! 616: ldap_attrs = safe_emalloc((num_attribs+1), sizeof(char *), 0);
! 617:
! 618: for (i = 0; i<num_attribs; i++) {
! 619: if (zend_hash_index_find(Z_ARRVAL_P(attrs), i, (void **) &attr) != SUCCESS) {
! 620: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Array initialization wrong");
! 621: ret = 0;
! 622: goto cleanup;
! 623: }
! 624:
! 625: SEPARATE_ZVAL(attr);
! 626: convert_to_string_ex(attr);
! 627: ldap_attrs[i] = Z_STRVAL_PP(attr);
! 628: }
! 629: ldap_attrs[num_attribs] = NULL;
! 630: default:
! 631: break;
! 632: }
! 633:
! 634: /* parallel search? */
! 635: if (Z_TYPE_P(link) == IS_ARRAY) {
! 636: int i, nlinks, nbases, nfilters, *rcs;
! 637: ldap_linkdata **lds;
! 638: zval **entry, *resource;
! 639:
! 640: nlinks = zend_hash_num_elements(Z_ARRVAL_P(link));
! 641: if (nlinks == 0) {
! 642: php_error_docref(NULL TSRMLS_CC, E_WARNING, "No links in link array");
! 643: ret = 0;
! 644: goto cleanup;
! 645: }
! 646:
! 647: if (Z_TYPE_P(base_dn) == IS_ARRAY) {
! 648: nbases = zend_hash_num_elements(Z_ARRVAL_P(base_dn));
! 649: if (nbases != nlinks) {
! 650: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Base must either be a string, or an array with the same number of elements as the links array");
! 651: ret = 0;
! 652: goto cleanup;
! 653: }
! 654: zend_hash_internal_pointer_reset(Z_ARRVAL_P(base_dn));
! 655: } else {
! 656: nbases = 0; /* this means string, not array */
! 657: /* If anything else than string is passed, ldap_base_dn = NULL */
! 658: if (Z_TYPE_P(base_dn) == IS_STRING) {
! 659: ldap_base_dn = Z_STRVAL_P(base_dn);
! 660: } else {
! 661: ldap_base_dn = NULL;
! 662: }
! 663: }
! 664:
! 665: if (Z_TYPE_PP(filter) == IS_ARRAY) {
! 666: nfilters = zend_hash_num_elements(Z_ARRVAL_PP(filter));
! 667: if (nfilters != nlinks) {
! 668: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Filter must either be a string, or an array with the same number of elements as the links array");
! 669: ret = 0;
! 670: goto cleanup;
! 671: }
! 672: zend_hash_internal_pointer_reset(Z_ARRVAL_PP(filter));
! 673: } else {
! 674: nfilters = 0; /* this means string, not array */
! 675: convert_to_string_ex(filter);
! 676: ldap_filter = Z_STRVAL_PP(filter);
! 677: }
! 678:
! 679: lds = safe_emalloc(nlinks, sizeof(ldap_linkdata), 0);
! 680: rcs = safe_emalloc(nlinks, sizeof(*rcs), 0);
! 681:
! 682: zend_hash_internal_pointer_reset(Z_ARRVAL_P(link));
! 683: for (i=0; i<nlinks; i++) {
! 684: zend_hash_get_current_data(Z_ARRVAL_P(link), (void **)&entry);
! 685:
! 686: ld = (ldap_linkdata *) zend_fetch_resource(entry TSRMLS_CC, -1, "ldap link", NULL, 1, le_link);
! 687: if (ld == NULL) {
! 688: ret = 0;
! 689: goto cleanup_parallel;
! 690: }
! 691: if (nbases != 0) { /* base_dn an array? */
! 692: zend_hash_get_current_data(Z_ARRVAL_P(base_dn), (void **)&entry);
! 693: zend_hash_move_forward(Z_ARRVAL_P(base_dn));
! 694:
! 695: /* If anything else than string is passed, ldap_base_dn = NULL */
! 696: if (Z_TYPE_PP(entry) == IS_STRING) {
! 697: ldap_base_dn = Z_STRVAL_PP(entry);
! 698: } else {
! 699: ldap_base_dn = NULL;
! 700: }
! 701: }
! 702: if (nfilters != 0) { /* filter an array? */
! 703: zend_hash_get_current_data(Z_ARRVAL_PP(filter), (void **)&entry);
! 704: zend_hash_move_forward(Z_ARRVAL_PP(filter));
! 705: convert_to_string_ex(entry);
! 706: ldap_filter = Z_STRVAL_PP(entry);
! 707: }
! 708:
! 709: php_set_opts(ld->link, ldap_sizelimit, ldap_timelimit, ldap_deref, &old_ldap_sizelimit, &old_ldap_timelimit, &old_ldap_deref);
! 710:
! 711: /* Run the actual search */
! 712: rcs[i] = ldap_search(ld->link, ldap_base_dn, scope, ldap_filter, ldap_attrs, ldap_attrsonly);
! 713: lds[i] = ld;
! 714: zend_hash_move_forward(Z_ARRVAL_P(link));
! 715: }
! 716:
! 717: array_init(return_value);
! 718:
! 719: /* Collect results from the searches */
! 720: for (i=0; i<nlinks; i++) {
! 721: MAKE_STD_ZVAL(resource);
! 722: if (rcs[i] != -1) {
! 723: rcs[i] = ldap_result(lds[i]->link, LDAP_RES_ANY, 1 /* LDAP_MSG_ALL */, NULL, &ldap_res);
! 724: }
! 725: if (rcs[i] != -1) {
! 726: ZEND_REGISTER_RESOURCE(resource, ldap_res, le_result);
! 727: add_next_index_zval(return_value, resource);
! 728: } else {
! 729: add_next_index_bool(return_value, 0);
! 730: }
! 731: }
! 732:
! 733: cleanup_parallel:
! 734: efree(lds);
! 735: efree(rcs);
! 736: } else {
! 737: convert_to_string_ex(filter);
! 738: ldap_filter = Z_STRVAL_PP(filter);
! 739:
! 740: /* If anything else than string is passed, ldap_base_dn = NULL */
! 741: if (Z_TYPE_P(base_dn) == IS_STRING) {
! 742: ldap_base_dn = Z_STRVAL_P(base_dn);
! 743: }
! 744:
! 745: ld = (ldap_linkdata *) zend_fetch_resource(&link TSRMLS_CC, -1, "ldap link", NULL, 1, le_link);
! 746: if (ld == NULL) {
! 747: ret = 0;
! 748: goto cleanup;
! 749: }
! 750:
! 751: php_set_opts(ld->link, ldap_sizelimit, ldap_timelimit, ldap_deref, &old_ldap_sizelimit, &old_ldap_timelimit, &old_ldap_deref);
! 752:
! 753: /* Run the actual search */
! 754: errno = ldap_search_s(ld->link, ldap_base_dn, scope, ldap_filter, ldap_attrs, ldap_attrsonly, &ldap_res);
! 755:
! 756: if (errno != LDAP_SUCCESS
! 757: && errno != LDAP_SIZELIMIT_EXCEEDED
! 758: #ifdef LDAP_ADMINLIMIT_EXCEEDED
! 759: && errno != LDAP_ADMINLIMIT_EXCEEDED
! 760: #endif
! 761: #ifdef LDAP_REFERRAL
! 762: && errno != LDAP_REFERRAL
! 763: #endif
! 764: ) {
! 765: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Search: %s", ldap_err2string(errno));
! 766: ret = 0;
! 767: } else {
! 768: if (errno == LDAP_SIZELIMIT_EXCEEDED) {
! 769: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Partial search results returned: Sizelimit exceeded");
! 770: }
! 771: #ifdef LDAP_ADMINLIMIT_EXCEEDED
! 772: else if (errno == LDAP_ADMINLIMIT_EXCEEDED) {
! 773: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Partial search results returned: Adminlimit exceeded");
! 774: }
! 775: #endif
! 776:
! 777: ZEND_REGISTER_RESOURCE(return_value, ldap_res, le_result);
! 778: }
! 779: }
! 780:
! 781: cleanup:
! 782: if (ld) {
! 783: /* Restoring previous options */
! 784: php_set_opts(ld->link, old_ldap_sizelimit, old_ldap_timelimit, old_ldap_deref, &ldap_sizelimit, &ldap_timelimit, &ldap_deref);
! 785: }
! 786: if (ldap_attrs != NULL) {
! 787: efree(ldap_attrs);
! 788: }
! 789: if (!ret) {
! 790: RETVAL_BOOL(ret);
! 791: }
! 792: }
! 793: /* }}} */
! 794:
! 795: /* {{{ proto resource ldap_read(resource|array link, string base_dn, string filter [, array attrs [, int attrsonly [, int sizelimit [, int timelimit [, int deref]]]]])
! 796: Read an entry */
! 797: PHP_FUNCTION(ldap_read)
! 798: {
! 799: php_ldap_do_search(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_SCOPE_BASE);
! 800: }
! 801: /* }}} */
! 802:
! 803: /* {{{ proto resource ldap_list(resource|array link, string base_dn, string filter [, array attrs [, int attrsonly [, int sizelimit [, int timelimit [, int deref]]]]])
! 804: Single-level search */
! 805: PHP_FUNCTION(ldap_list)
! 806: {
! 807: php_ldap_do_search(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_SCOPE_ONELEVEL);
! 808: }
! 809: /* }}} */
! 810:
! 811: /* {{{ proto resource ldap_search(resource|array link, string base_dn, string filter [, array attrs [, int attrsonly [, int sizelimit [, int timelimit [, int deref]]]]])
! 812: Search LDAP tree under base_dn */
! 813: PHP_FUNCTION(ldap_search)
! 814: {
! 815: php_ldap_do_search(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_SCOPE_SUBTREE);
! 816: }
! 817: /* }}} */
! 818:
! 819: /* {{{ proto bool ldap_free_result(resource result)
! 820: Free result memory */
! 821: PHP_FUNCTION(ldap_free_result)
! 822: {
! 823: zval *result;
! 824: LDAPMessage *ldap_result;
! 825:
! 826: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &result) != SUCCESS) {
! 827: return;
! 828: }
! 829:
! 830: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 831:
! 832: zend_list_delete(Z_LVAL_P(result)); /* Delete list entry */
! 833: RETVAL_TRUE;
! 834: }
! 835: /* }}} */
! 836:
! 837: /* {{{ proto int ldap_count_entries(resource link, resource result)
! 838: Count the number of entries in a search result */
! 839: PHP_FUNCTION(ldap_count_entries)
! 840: {
! 841: zval *link, *result;
! 842: ldap_linkdata *ld;
! 843: LDAPMessage *ldap_result;
! 844:
! 845: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result) != SUCCESS) {
! 846: return;
! 847: }
! 848:
! 849: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 850: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 851:
! 852: RETURN_LONG(ldap_count_entries(ld->link, ldap_result));
! 853: }
! 854: /* }}} */
! 855:
! 856: /* {{{ proto resource ldap_first_entry(resource link, resource result)
! 857: Return first result id */
! 858: PHP_FUNCTION(ldap_first_entry)
! 859: {
! 860: zval *link, *result;
! 861: ldap_linkdata *ld;
! 862: ldap_resultentry *resultentry;
! 863: LDAPMessage *ldap_result, *entry;
! 864:
! 865: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result) != SUCCESS) {
! 866: return;
! 867: }
! 868:
! 869: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 870: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 871:
! 872: if ((entry = ldap_first_entry(ld->link, ldap_result)) == NULL) {
! 873: RETVAL_FALSE;
! 874: } else {
! 875: resultentry = emalloc(sizeof(ldap_resultentry));
! 876: ZEND_REGISTER_RESOURCE(return_value, resultentry, le_result_entry);
! 877: resultentry->id = Z_LVAL_P(result);
! 878: zend_list_addref(resultentry->id);
! 879: resultentry->data = entry;
! 880: resultentry->ber = NULL;
! 881: }
! 882: }
! 883: /* }}} */
! 884:
! 885: /* {{{ proto resource ldap_next_entry(resource link, resource result_entry)
! 886: Get next result entry */
! 887: PHP_FUNCTION(ldap_next_entry)
! 888: {
! 889: zval *link, *result_entry;
! 890: ldap_linkdata *ld;
! 891: ldap_resultentry *resultentry, *resultentry_next;
! 892: LDAPMessage *entry_next;
! 893:
! 894: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result_entry) != SUCCESS) {
! 895: return;
! 896: }
! 897:
! 898: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 899: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 900:
! 901: if ((entry_next = ldap_next_entry(ld->link, resultentry->data)) == NULL) {
! 902: RETVAL_FALSE;
! 903: } else {
! 904: resultentry_next = emalloc(sizeof(ldap_resultentry));
! 905: ZEND_REGISTER_RESOURCE(return_value, resultentry_next, le_result_entry);
! 906: resultentry_next->id = resultentry->id;
! 907: zend_list_addref(resultentry->id);
! 908: resultentry_next->data = entry_next;
! 909: resultentry_next->ber = NULL;
! 910: }
! 911: }
! 912: /* }}} */
! 913:
! 914: /* {{{ proto array ldap_get_entries(resource link, resource result)
! 915: Get all result entries */
! 916: PHP_FUNCTION(ldap_get_entries)
! 917: {
! 918: zval *link, *result;
! 919: LDAPMessage *ldap_result, *ldap_result_entry;
! 920: zval *tmp1, *tmp2;
! 921: ldap_linkdata *ld;
! 922: LDAP *ldap;
! 923: int num_entries, num_attrib, num_values, i;
! 924: BerElement *ber;
! 925: char *attribute;
! 926: size_t attr_len;
! 927: struct berval **ldap_value;
! 928: char *dn;
! 929:
! 930: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result) != SUCCESS) {
! 931: return;
! 932: }
! 933:
! 934: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 935: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 936:
! 937: ldap = ld->link;
! 938: num_entries = ldap_count_entries(ldap, ldap_result);
! 939:
! 940: array_init(return_value);
! 941: add_assoc_long(return_value, "count", num_entries);
! 942:
! 943: if (num_entries == 0) {
! 944: return;
! 945: }
! 946:
! 947: ldap_result_entry = ldap_first_entry(ldap, ldap_result);
! 948: if (ldap_result_entry == NULL) {
! 949: zval_dtor(return_value);
! 950: RETURN_FALSE;
! 951: }
! 952:
! 953: num_entries = 0;
! 954: while (ldap_result_entry != NULL) {
! 955: MAKE_STD_ZVAL(tmp1);
! 956: array_init(tmp1);
! 957:
! 958: num_attrib = 0;
! 959: attribute = ldap_first_attribute(ldap, ldap_result_entry, &ber);
! 960:
! 961: while (attribute != NULL) {
! 962: ldap_value = ldap_get_values_len(ldap, ldap_result_entry, attribute);
! 963: num_values = ldap_count_values_len(ldap_value);
! 964:
! 965: MAKE_STD_ZVAL(tmp2);
! 966: array_init(tmp2);
! 967: add_assoc_long(tmp2, "count", num_values);
! 968: for (i = 0; i < num_values; i++) {
! 969: add_index_stringl(tmp2, i, ldap_value[i]->bv_val, ldap_value[i]->bv_len, 1);
! 970: }
! 971: ldap_value_free_len(ldap_value);
! 972:
! 973: attr_len = strlen(attribute);
! 974: zend_hash_update(Z_ARRVAL_P(tmp1), php_strtolower(attribute, attr_len), attr_len+1, (void *) &tmp2, sizeof(zval *), NULL);
! 975: add_index_string(tmp1, num_attrib, attribute, 1);
! 976:
! 977: num_attrib++;
! 978: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 979: ldap_memfree(attribute);
! 980: #endif
! 981: attribute = ldap_next_attribute(ldap, ldap_result_entry, ber);
! 982: }
! 983: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 984: if (ber != NULL) {
! 985: ber_free(ber, 0);
! 986: }
! 987: #endif
! 988:
! 989: add_assoc_long(tmp1, "count", num_attrib);
! 990: dn = ldap_get_dn(ldap, ldap_result_entry);
! 991: add_assoc_string(tmp1, "dn", dn, 1);
! 992: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 993: ldap_memfree(dn);
! 994: #else
! 995: free(dn);
! 996: #endif
! 997:
! 998: zend_hash_index_update(Z_ARRVAL_P(return_value), num_entries, (void *) &tmp1, sizeof(zval *), NULL);
! 999:
! 1000: num_entries++;
! 1001: ldap_result_entry = ldap_next_entry(ldap, ldap_result_entry);
! 1002: }
! 1003:
! 1004: add_assoc_long(return_value, "count", num_entries);
! 1005:
! 1006: }
! 1007: /* }}} */
! 1008:
! 1009: /* {{{ proto string ldap_first_attribute(resource link, resource result_entry)
! 1010: Return first attribute */
! 1011: PHP_FUNCTION(ldap_first_attribute)
! 1012: {
! 1013: zval *link, *result_entry;
! 1014: ldap_linkdata *ld;
! 1015: ldap_resultentry *resultentry;
! 1016: char *attribute;
! 1017: long dummy_ber;
! 1018:
! 1019: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l", &link, &result_entry, &dummy_ber) != SUCCESS) {
! 1020: return;
! 1021: }
! 1022:
! 1023: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1024: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1025:
! 1026: if ((attribute = ldap_first_attribute(ld->link, resultentry->data, &resultentry->ber)) == NULL) {
! 1027: RETURN_FALSE;
! 1028: } else {
! 1029: RETVAL_STRING(attribute, 1);
! 1030: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1031: ldap_memfree(attribute);
! 1032: #endif
! 1033: }
! 1034: }
! 1035: /* }}} */
! 1036:
! 1037: /* {{{ proto string ldap_next_attribute(resource link, resource result_entry)
! 1038: Get the next attribute in result */
! 1039: PHP_FUNCTION(ldap_next_attribute)
! 1040: {
! 1041: zval *link, *result_entry;
! 1042: ldap_linkdata *ld;
! 1043: ldap_resultentry *resultentry;
! 1044: char *attribute;
! 1045: long dummy_ber;
! 1046:
! 1047: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr|l", &link, &result_entry, &dummy_ber) != SUCCESS) {
! 1048: return;
! 1049: }
! 1050:
! 1051: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1052: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1053:
! 1054: if (resultentry->ber == NULL) {
! 1055: php_error_docref(NULL TSRMLS_CC, E_WARNING, "called before calling ldap_first_attribute() or no attributes found in result entry");
! 1056: RETURN_FALSE;
! 1057: }
! 1058:
! 1059: if ((attribute = ldap_next_attribute(ld->link, resultentry->data, resultentry->ber)) == NULL) {
! 1060: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1061: if (resultentry->ber != NULL) {
! 1062: ber_free(resultentry->ber, 0);
! 1063: resultentry->ber = NULL;
! 1064: }
! 1065: #endif
! 1066: RETURN_FALSE;
! 1067: } else {
! 1068: RETVAL_STRING(attribute, 1);
! 1069: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1070: ldap_memfree(attribute);
! 1071: #endif
! 1072: }
! 1073: }
! 1074: /* }}} */
! 1075:
! 1076: /* {{{ proto array ldap_get_attributes(resource link, resource result_entry)
! 1077: Get attributes from a search result entry */
! 1078: PHP_FUNCTION(ldap_get_attributes)
! 1079: {
! 1080: zval *link, *result_entry;
! 1081: zval *tmp;
! 1082: ldap_linkdata *ld;
! 1083: ldap_resultentry *resultentry;
! 1084: char *attribute;
! 1085: struct berval **ldap_value;
! 1086: int i, num_values, num_attrib;
! 1087: BerElement *ber;
! 1088:
! 1089: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result_entry) != SUCCESS) {
! 1090: return;
! 1091: }
! 1092:
! 1093: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1094: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1095:
! 1096: array_init(return_value);
! 1097: num_attrib = 0;
! 1098:
! 1099: attribute = ldap_first_attribute(ld->link, resultentry->data, &ber);
! 1100: while (attribute != NULL) {
! 1101: ldap_value = ldap_get_values_len(ld->link, resultentry->data, attribute);
! 1102: num_values = ldap_count_values_len(ldap_value);
! 1103:
! 1104: MAKE_STD_ZVAL(tmp);
! 1105: array_init(tmp);
! 1106: add_assoc_long(tmp, "count", num_values);
! 1107: for (i = 0; i < num_values; i++) {
! 1108: add_index_stringl(tmp, i, ldap_value[i]->bv_val, ldap_value[i]->bv_len, 1);
! 1109: }
! 1110: ldap_value_free_len(ldap_value);
! 1111:
! 1112: zend_hash_update(Z_ARRVAL_P(return_value), attribute, strlen(attribute)+1, (void *) &tmp, sizeof(zval *), NULL);
! 1113: add_index_string(return_value, num_attrib, attribute, 1);
! 1114:
! 1115: num_attrib++;
! 1116: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1117: ldap_memfree(attribute);
! 1118: #endif
! 1119: attribute = ldap_next_attribute(ld->link, resultentry->data, ber);
! 1120: }
! 1121: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1122: if (ber != NULL) {
! 1123: ber_free(ber, 0);
! 1124: }
! 1125: #endif
! 1126:
! 1127: add_assoc_long(return_value, "count", num_attrib);
! 1128: }
! 1129: /* }}} */
! 1130:
! 1131: /* {{{ proto array ldap_get_values_len(resource link, resource result_entry, string attribute)
! 1132: Get all values with lengths from a result entry */
! 1133: PHP_FUNCTION(ldap_get_values_len)
! 1134: {
! 1135: zval *link, *result_entry;
! 1136: ldap_linkdata *ld;
! 1137: ldap_resultentry *resultentry;
! 1138: char *attr;
! 1139: struct berval **ldap_value_len;
! 1140: int i, num_values, attr_len;
! 1141:
! 1142: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrs", &link, &result_entry, &attr, &attr_len) != SUCCESS) {
! 1143: return;
! 1144: }
! 1145:
! 1146: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1147: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1148:
! 1149: if ((ldap_value_len = ldap_get_values_len(ld->link, resultentry->data, attr)) == NULL) {
! 1150: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot get the value(s) of attribute %s", ldap_err2string(_get_lderrno(ld->link)));
! 1151: RETURN_FALSE;
! 1152: }
! 1153:
! 1154: num_values = ldap_count_values_len(ldap_value_len);
! 1155: array_init(return_value);
! 1156:
! 1157: for (i=0; i<num_values; i++) {
! 1158: add_next_index_stringl(return_value, ldap_value_len[i]->bv_val, ldap_value_len[i]->bv_len, 1);
! 1159: }
! 1160:
! 1161: add_assoc_long(return_value, "count", num_values);
! 1162: ldap_value_free_len(ldap_value_len);
! 1163:
! 1164: }
! 1165: /* }}} */
! 1166:
! 1167: /* {{{ proto string ldap_get_dn(resource link, resource result_entry)
! 1168: Get the DN of a result entry */
! 1169: PHP_FUNCTION(ldap_get_dn)
! 1170: {
! 1171: zval *link, *result_entry;
! 1172: ldap_linkdata *ld;
! 1173: ldap_resultentry *resultentry;
! 1174: char *text;
! 1175:
! 1176: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result_entry) != SUCCESS) {
! 1177: return;
! 1178: }
! 1179:
! 1180: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1181: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1182:
! 1183: text = ldap_get_dn(ld->link, resultentry->data);
! 1184: if (text != NULL) {
! 1185: RETVAL_STRING(text, 1);
! 1186: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1187: ldap_memfree(text);
! 1188: #else
! 1189: free(text);
! 1190: #endif
! 1191: } else {
! 1192: RETURN_FALSE;
! 1193: }
! 1194: }
! 1195: /* }}} */
! 1196:
! 1197: /* {{{ proto array ldap_explode_dn(string dn, int with_attrib)
! 1198: Splits DN into its component parts */
! 1199: PHP_FUNCTION(ldap_explode_dn)
! 1200: {
! 1201: long with_attrib;
! 1202: char *dn, **ldap_value;
! 1203: int i, count, dn_len;
! 1204:
! 1205: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sl", &dn, &dn_len, &with_attrib) != SUCCESS) {
! 1206: return;
! 1207: }
! 1208:
! 1209: if (!(ldap_value = ldap_explode_dn(dn, with_attrib))) {
! 1210: /* Invalid parameters were passed to ldap_explode_dn */
! 1211: RETURN_FALSE;
! 1212: }
! 1213:
! 1214: i=0;
! 1215: while (ldap_value[i] != NULL) i++;
! 1216: count = i;
! 1217:
! 1218: array_init(return_value);
! 1219:
! 1220: add_assoc_long(return_value, "count", count);
! 1221: for (i = 0; i<count; i++) {
! 1222: add_index_string(return_value, i, ldap_value[i], 1);
! 1223: }
! 1224:
! 1225: ldap_value_free(ldap_value);
! 1226: }
! 1227: /* }}} */
! 1228:
! 1229: /* {{{ proto string ldap_dn2ufn(string dn)
! 1230: Convert DN to User Friendly Naming format */
! 1231: PHP_FUNCTION(ldap_dn2ufn)
! 1232: {
! 1233: char *dn, *ufn;
! 1234: int dn_len;
! 1235:
! 1236: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &dn, &dn_len) != SUCCESS) {
! 1237: return;
! 1238: }
! 1239:
! 1240: ufn = ldap_dn2ufn(dn);
! 1241:
! 1242: if (ufn != NULL) {
! 1243: RETVAL_STRING(ufn, 1);
! 1244: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 || WINDOWS
! 1245: ldap_memfree(ufn);
! 1246: #endif
! 1247: } else {
! 1248: RETURN_FALSE;
! 1249: }
! 1250: }
! 1251: /* }}} */
! 1252:
! 1253:
! 1254: /* added to fix use of ldap_modify_add for doing an ldap_add, gerrit thomson. */
! 1255: #define PHP_LD_FULL_ADD 0xff
! 1256: /* {{{ php_ldap_do_modify
! 1257: */
! 1258: static void php_ldap_do_modify(INTERNAL_FUNCTION_PARAMETERS, int oper)
! 1259: {
! 1260: zval *link, *entry, **value, **ivalue;
! 1261: ldap_linkdata *ld;
! 1262: char *dn;
! 1263: LDAPMod **ldap_mods;
! 1264: int i, j, num_attribs, num_values, dn_len;
! 1265: int *num_berval;
! 1266: char *attribute;
! 1267: ulong index;
! 1268: int is_full_add=0; /* flag for full add operation so ldap_mod_add can be put back into oper, gerrit THomson */
! 1269:
! 1270: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsa", &link, &dn, &dn_len, &entry) != SUCCESS) {
! 1271: return;
! 1272: }
! 1273:
! 1274: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1275:
! 1276: num_attribs = zend_hash_num_elements(Z_ARRVAL_P(entry));
! 1277: ldap_mods = safe_emalloc((num_attribs+1), sizeof(LDAPMod *), 0);
! 1278: num_berval = safe_emalloc(num_attribs, sizeof(int), 0);
! 1279: zend_hash_internal_pointer_reset(Z_ARRVAL_P(entry));
! 1280:
! 1281: /* added by gerrit thomson to fix ldap_add using ldap_mod_add */
! 1282: if (oper == PHP_LD_FULL_ADD) {
! 1283: oper = LDAP_MOD_ADD;
! 1284: is_full_add = 1;
! 1285: }
! 1286: /* end additional , gerrit thomson */
! 1287:
! 1288: for (i = 0; i < num_attribs; i++) {
! 1289: ldap_mods[i] = emalloc(sizeof(LDAPMod));
! 1290: ldap_mods[i]->mod_op = oper | LDAP_MOD_BVALUES;
! 1291: ldap_mods[i]->mod_type = NULL;
! 1292:
! 1293: if (zend_hash_get_current_key(Z_ARRVAL_P(entry), &attribute, &index, 0) == HASH_KEY_IS_STRING) {
! 1294: ldap_mods[i]->mod_type = estrdup(attribute);
! 1295: } else {
! 1296: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unknown attribute in the data");
! 1297: /* Free allocated memory */
! 1298: while (i >= 0) {
! 1299: if (ldap_mods[i]->mod_type) {
! 1300: efree(ldap_mods[i]->mod_type);
! 1301: }
! 1302: efree(ldap_mods[i]);
! 1303: i--;
! 1304: }
! 1305: efree(num_berval);
! 1306: efree(ldap_mods);
! 1307: RETURN_FALSE;
! 1308: }
! 1309:
! 1310: zend_hash_get_current_data(Z_ARRVAL_P(entry), (void **)&value);
! 1311:
! 1312: if (Z_TYPE_PP(value) != IS_ARRAY) {
! 1313: num_values = 1;
! 1314: } else {
! 1315: num_values = zend_hash_num_elements(Z_ARRVAL_PP(value));
! 1316: }
! 1317:
! 1318: num_berval[i] = num_values;
! 1319: ldap_mods[i]->mod_bvalues = safe_emalloc((num_values + 1), sizeof(struct berval *), 0);
! 1320:
! 1321: /* allow for arrays with one element, no allowance for arrays with none but probably not required, gerrit thomson. */
! 1322: if ((num_values == 1) && (Z_TYPE_PP(value) != IS_ARRAY)) {
! 1323: convert_to_string_ex(value);
! 1324: ldap_mods[i]->mod_bvalues[0] = (struct berval *) emalloc (sizeof(struct berval));
! 1325: ldap_mods[i]->mod_bvalues[0]->bv_len = Z_STRLEN_PP(value);
! 1326: ldap_mods[i]->mod_bvalues[0]->bv_val = Z_STRVAL_PP(value);
! 1327: } else {
! 1328: for (j = 0; j < num_values; j++) {
! 1329: if (zend_hash_index_find(Z_ARRVAL_PP(value), j, (void **) &ivalue) != SUCCESS) {
! 1330: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Value array must have consecutive indices 0, 1, ...");
! 1331: num_berval[i] = j;
! 1332: num_attribs = i + 1;
! 1333: RETVAL_FALSE;
! 1334: goto errexit;
! 1335: }
! 1336: convert_to_string_ex(ivalue);
! 1337: ldap_mods[i]->mod_bvalues[j] = (struct berval *) emalloc (sizeof(struct berval));
! 1338: ldap_mods[i]->mod_bvalues[j]->bv_len = Z_STRLEN_PP(ivalue);
! 1339: ldap_mods[i]->mod_bvalues[j]->bv_val = Z_STRVAL_PP(ivalue);
! 1340: }
! 1341: }
! 1342: ldap_mods[i]->mod_bvalues[num_values] = NULL;
! 1343: zend_hash_move_forward(Z_ARRVAL_P(entry));
! 1344: }
! 1345: ldap_mods[num_attribs] = NULL;
! 1346:
! 1347: /* check flag to see if do_mod was called to perform full add , gerrit thomson */
! 1348: if (is_full_add == 1) {
! 1349: if ((i = ldap_add_s(ld->link, dn, ldap_mods)) != LDAP_SUCCESS) {
! 1350: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Add: %s", ldap_err2string(i));
! 1351: RETVAL_FALSE;
! 1352: } else RETVAL_TRUE;
! 1353: } else {
! 1354: if ((i = ldap_modify_ext_s(ld->link, dn, ldap_mods, NULL, NULL)) != LDAP_SUCCESS) {
! 1355: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Modify: %s", ldap_err2string(i));
! 1356: RETVAL_FALSE;
! 1357: } else RETVAL_TRUE;
! 1358: }
! 1359:
! 1360: errexit:
! 1361: for (i = 0; i < num_attribs; i++) {
! 1362: efree(ldap_mods[i]->mod_type);
! 1363: for (j = 0; j < num_berval[i]; j++) {
! 1364: efree(ldap_mods[i]->mod_bvalues[j]);
! 1365: }
! 1366: efree(ldap_mods[i]->mod_bvalues);
! 1367: efree(ldap_mods[i]);
! 1368: }
! 1369: efree(num_berval);
! 1370: efree(ldap_mods);
! 1371:
! 1372: return;
! 1373: }
! 1374: /* }}} */
! 1375:
! 1376: /* {{{ proto bool ldap_add(resource link, string dn, array entry)
! 1377: Add entries to LDAP directory */
! 1378: PHP_FUNCTION(ldap_add)
! 1379: {
! 1380: /* use a newly define parameter into the do_modify so ldap_mod_add can be used the way it is supposed to be used , Gerrit THomson */
! 1381: php_ldap_do_modify(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_LD_FULL_ADD);
! 1382: }
! 1383: /* }}} */
! 1384:
! 1385: /* three functions for attribute base modifications, gerrit Thomson */
! 1386:
! 1387: /* {{{ proto bool ldap_mod_replace(resource link, string dn, array entry)
! 1388: Replace attribute values with new ones */
! 1389: PHP_FUNCTION(ldap_mod_replace)
! 1390: {
! 1391: php_ldap_do_modify(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_MOD_REPLACE);
! 1392: }
! 1393: /* }}} */
! 1394:
! 1395: /* {{{ proto bool ldap_mod_add(resource link, string dn, array entry)
! 1396: Add attribute values to current */
! 1397: PHP_FUNCTION(ldap_mod_add)
! 1398: {
! 1399: php_ldap_do_modify(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_MOD_ADD);
! 1400: }
! 1401: /* }}} */
! 1402:
! 1403: /* {{{ proto bool ldap_mod_del(resource link, string dn, array entry)
! 1404: Delete attribute values */
! 1405: PHP_FUNCTION(ldap_mod_del)
! 1406: {
! 1407: php_ldap_do_modify(INTERNAL_FUNCTION_PARAM_PASSTHRU, LDAP_MOD_DELETE);
! 1408: }
! 1409: /* }}} */
! 1410:
! 1411: /* {{{ proto bool ldap_delete(resource link, string dn)
! 1412: Delete an entry from a directory */
! 1413: PHP_FUNCTION(ldap_delete)
! 1414: {
! 1415: zval *link;
! 1416: ldap_linkdata *ld;
! 1417: char *dn;
! 1418: int rc, dn_len;
! 1419:
! 1420: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rs", &link, &dn, &dn_len) != SUCCESS) {
! 1421: return;
! 1422: }
! 1423:
! 1424: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1425:
! 1426: if ((rc = ldap_delete_s(ld->link, dn)) != LDAP_SUCCESS) {
! 1427: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Delete: %s", ldap_err2string(rc));
! 1428: RETURN_FALSE;
! 1429: }
! 1430:
! 1431: RETURN_TRUE;
! 1432: }
! 1433: /* }}} */
! 1434:
! 1435: /* {{{ proto int ldap_errno(resource link)
! 1436: Get the current ldap error number */
! 1437: PHP_FUNCTION(ldap_errno)
! 1438: {
! 1439: zval *link;
! 1440: ldap_linkdata *ld;
! 1441:
! 1442: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &link) != SUCCESS) {
! 1443: return;
! 1444: }
! 1445:
! 1446: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1447:
! 1448: RETURN_LONG(_get_lderrno(ld->link));
! 1449: }
! 1450: /* }}} */
! 1451:
! 1452: /* {{{ proto string ldap_err2str(int errno)
! 1453: Convert error number to error string */
! 1454: PHP_FUNCTION(ldap_err2str)
! 1455: {
! 1456: long perrno;
! 1457:
! 1458: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &perrno) != SUCCESS) {
! 1459: return;
! 1460: }
! 1461:
! 1462: RETURN_STRING(ldap_err2string(perrno), 1);
! 1463: }
! 1464: /* }}} */
! 1465:
! 1466: /* {{{ proto string ldap_error(resource link)
! 1467: Get the current ldap error string */
! 1468: PHP_FUNCTION(ldap_error)
! 1469: {
! 1470: zval *link;
! 1471: ldap_linkdata *ld;
! 1472: int ld_errno;
! 1473:
! 1474: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &link) != SUCCESS) {
! 1475: return;
! 1476: }
! 1477:
! 1478: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1479:
! 1480: ld_errno = _get_lderrno(ld->link);
! 1481:
! 1482: RETURN_STRING(ldap_err2string(ld_errno), 1);
! 1483: }
! 1484: /* }}} */
! 1485:
! 1486: /* {{{ proto bool ldap_compare(resource link, string dn, string attr, string value)
! 1487: Determine if an entry has a specific value for one of its attributes */
! 1488: PHP_FUNCTION(ldap_compare)
! 1489: {
! 1490: zval *link;
! 1491: char *dn, *attr, *value;
! 1492: int dn_len, attr_len, value_len;
! 1493: ldap_linkdata *ld;
! 1494: int errno;
! 1495:
! 1496: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsss", &link, &dn, &dn_len, &attr, &attr_len, &value, &value_len) != SUCCESS) {
! 1497: return;
! 1498: }
! 1499:
! 1500: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1501:
! 1502: errno = ldap_compare_s(ld->link, dn, attr, value);
! 1503:
! 1504: switch (errno) {
! 1505: case LDAP_COMPARE_TRUE:
! 1506: RETURN_TRUE;
! 1507: break;
! 1508:
! 1509: case LDAP_COMPARE_FALSE:
! 1510: RETURN_FALSE;
! 1511: break;
! 1512: }
! 1513:
! 1514: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Compare: %s", ldap_err2string(errno));
! 1515: RETURN_LONG(-1);
! 1516: }
! 1517: /* }}} */
! 1518:
! 1519: /* {{{ proto bool ldap_sort(resource link, resource result, string sortfilter)
! 1520: Sort LDAP result entries */
! 1521: PHP_FUNCTION(ldap_sort)
! 1522: {
! 1523: zval *link, *result;
! 1524: ldap_linkdata *ld;
! 1525: char *sortfilter;
! 1526: int sflen;
! 1527: zend_rsrc_list_entry *le;
! 1528:
! 1529: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrs", &link, &result, &sortfilter, &sflen) != SUCCESS) {
! 1530: RETURN_FALSE;
! 1531: }
! 1532:
! 1533: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1534:
! 1535: if (zend_hash_index_find(&EG(regular_list), Z_LVAL_P(result), (void **) &le) != SUCCESS || le->type != le_result) {
! 1536: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Supplied resource is not a valid ldap result resource");
! 1537: RETURN_FALSE;
! 1538: }
! 1539:
! 1540: if (ldap_sort_entries(ld->link, (LDAPMessage **) &le->ptr, sflen ? sortfilter : NULL, strcmp) != LDAP_SUCCESS) {
! 1541: php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", ldap_err2string(errno));
! 1542: RETURN_FALSE;
! 1543: }
! 1544:
! 1545: RETURN_TRUE;
! 1546: }
! 1547: /* }}} */
! 1548:
! 1549: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 1550: /* {{{ proto bool ldap_get_option(resource link, int option, mixed retval)
! 1551: Get the current value of various session-wide parameters */
! 1552: PHP_FUNCTION(ldap_get_option)
! 1553: {
! 1554: zval *link, *retval;
! 1555: ldap_linkdata *ld;
! 1556: long option;
! 1557:
! 1558: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rlz", &link, &option, &retval) != SUCCESS) {
! 1559: return;
! 1560: }
! 1561:
! 1562: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1563:
! 1564: switch (option) {
! 1565: /* options with int value */
! 1566: case LDAP_OPT_DEREF:
! 1567: case LDAP_OPT_SIZELIMIT:
! 1568: case LDAP_OPT_TIMELIMIT:
! 1569: case LDAP_OPT_PROTOCOL_VERSION:
! 1570: case LDAP_OPT_ERROR_NUMBER:
! 1571: case LDAP_OPT_REFERRALS:
! 1572: #ifdef LDAP_OPT_RESTART
! 1573: case LDAP_OPT_RESTART:
! 1574: #endif
! 1575: {
! 1576: int val;
! 1577:
! 1578: if (ldap_get_option(ld->link, option, &val)) {
! 1579: RETURN_FALSE;
! 1580: }
! 1581: zval_dtor(retval);
! 1582: ZVAL_LONG(retval, val);
! 1583: } break;
! 1584: #ifdef LDAP_OPT_NETWORK_TIMEOUT
! 1585: case LDAP_OPT_NETWORK_TIMEOUT:
! 1586: {
! 1587: struct timeval *timeout = NULL;
! 1588:
! 1589: if (ldap_get_option(ld->link, LDAP_OPT_NETWORK_TIMEOUT, (void *) &timeout)) {
! 1590: if (timeout) {
! 1591: ldap_memfree(timeout);
! 1592: }
! 1593: RETURN_FALSE;
! 1594: }
! 1595: if (!timeout) {
! 1596: RETURN_FALSE;
! 1597: }
! 1598: zval_dtor(retval);
! 1599: ZVAL_LONG(retval, timeout->tv_sec);
! 1600: ldap_memfree(timeout);
! 1601: } break;
! 1602: #elif defined(LDAP_X_OPT_CONNECT_TIMEOUT)
! 1603: case LDAP_X_OPT_CONNECT_TIMEOUT:
! 1604: {
! 1605: int timeout;
! 1606:
! 1607: if (ldap_get_option(ld->link, LDAP_X_OPT_CONNECT_TIMEOUT, &timeout)) {
! 1608: RETURN_FALSE;
! 1609: }
! 1610: zval_dtor(retval);
! 1611: ZVAL_LONG(retval, (timeout / 1000));
! 1612: } break;
! 1613: #endif
! 1614: /* options with string value */
! 1615: case LDAP_OPT_ERROR_STRING:
! 1616: #ifdef LDAP_OPT_HOST_NAME
! 1617: case LDAP_OPT_HOST_NAME:
! 1618: #endif
! 1619: #ifdef HAVE_LDAP_SASL
! 1620: case LDAP_OPT_X_SASL_MECH:
! 1621: case LDAP_OPT_X_SASL_REALM:
! 1622: case LDAP_OPT_X_SASL_AUTHCID:
! 1623: case LDAP_OPT_X_SASL_AUTHZID:
! 1624: #endif
! 1625: #ifdef LDAP_OPT_MATCHED_DN
! 1626: case LDAP_OPT_MATCHED_DN:
! 1627: #endif
! 1628: {
! 1629: char *val = NULL;
! 1630:
! 1631: if (ldap_get_option(ld->link, option, &val) || val == NULL || *val == '\0') {
! 1632: if (val) {
! 1633: ldap_memfree(val);
! 1634: }
! 1635: RETURN_FALSE;
! 1636: }
! 1637: zval_dtor(retval);
! 1638: ZVAL_STRING(retval, val, 1);
! 1639: ldap_memfree(val);
! 1640: } break;
! 1641: /* options not implemented
! 1642: case LDAP_OPT_SERVER_CONTROLS:
! 1643: case LDAP_OPT_CLIENT_CONTROLS:
! 1644: case LDAP_OPT_API_INFO:
! 1645: case LDAP_OPT_API_FEATURE_INFO:
! 1646: */
! 1647: default:
! 1648: RETURN_FALSE;
! 1649: }
! 1650: RETURN_TRUE;
! 1651: }
! 1652: /* }}} */
! 1653:
! 1654: /* {{{ proto bool ldap_set_option(resource link, int option, mixed newval)
! 1655: Set the value of various session-wide parameters */
! 1656: PHP_FUNCTION(ldap_set_option)
! 1657: {
! 1658: zval *link, **newval;
! 1659: ldap_linkdata *ld;
! 1660: LDAP *ldap;
! 1661: long option;
! 1662:
! 1663: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zlZ", &link, &option, &newval) != SUCCESS) {
! 1664: return;
! 1665: }
! 1666:
! 1667: if (Z_TYPE_P(link) == IS_NULL) {
! 1668: ldap = NULL;
! 1669: } else {
! 1670: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1671: ldap = ld->link;
! 1672: }
! 1673:
! 1674: switch (option) {
! 1675: /* options with int value */
! 1676: case LDAP_OPT_DEREF:
! 1677: case LDAP_OPT_SIZELIMIT:
! 1678: case LDAP_OPT_TIMELIMIT:
! 1679: case LDAP_OPT_PROTOCOL_VERSION:
! 1680: case LDAP_OPT_ERROR_NUMBER:
! 1681: #ifdef LDAP_OPT_DEBUG_LEVEL
! 1682: case LDAP_OPT_DEBUG_LEVEL:
! 1683: #endif
! 1684: {
! 1685: int val;
! 1686:
! 1687: convert_to_long_ex(newval);
! 1688: val = Z_LVAL_PP(newval);
! 1689: if (ldap_set_option(ldap, option, &val)) {
! 1690: RETURN_FALSE;
! 1691: }
! 1692: } break;
! 1693: #ifdef LDAP_OPT_NETWORK_TIMEOUT
! 1694: case LDAP_OPT_NETWORK_TIMEOUT:
! 1695: {
! 1696: struct timeval timeout;
! 1697:
! 1698: convert_to_long_ex(newval);
! 1699: timeout.tv_sec = Z_LVAL_PP(newval);
! 1700: timeout.tv_usec = 0;
! 1701: if (ldap_set_option(ldap, LDAP_OPT_NETWORK_TIMEOUT, (void *) &timeout)) {
! 1702: RETURN_FALSE;
! 1703: }
! 1704: } break;
! 1705: #elif defined(LDAP_X_OPT_CONNECT_TIMEOUT)
! 1706: case LDAP_X_OPT_CONNECT_TIMEOUT:
! 1707: {
! 1708: int timeout;
! 1709:
! 1710: convert_to_long_ex(newval);
! 1711: timeout = 1000 * Z_LVAL_PP(newval); /* Convert to milliseconds */
! 1712: if (ldap_set_option(ldap, LDAP_X_OPT_CONNECT_TIMEOUT, &timeout)) {
! 1713: RETURN_FALSE;
! 1714: }
! 1715: } break;
! 1716: #endif
! 1717: /* options with string value */
! 1718: case LDAP_OPT_ERROR_STRING:
! 1719: #ifdef LDAP_OPT_HOST_NAME
! 1720: case LDAP_OPT_HOST_NAME:
! 1721: #endif
! 1722: #ifdef HAVE_LDAP_SASL
! 1723: case LDAP_OPT_X_SASL_MECH:
! 1724: case LDAP_OPT_X_SASL_REALM:
! 1725: case LDAP_OPT_X_SASL_AUTHCID:
! 1726: case LDAP_OPT_X_SASL_AUTHZID:
! 1727: #endif
! 1728: #ifdef LDAP_OPT_MATCHED_DN
! 1729: case LDAP_OPT_MATCHED_DN:
! 1730: #endif
! 1731: {
! 1732: char *val;
! 1733: convert_to_string_ex(newval);
! 1734: val = Z_STRVAL_PP(newval);
! 1735: if (ldap_set_option(ldap, option, val)) {
! 1736: RETURN_FALSE;
! 1737: }
! 1738: } break;
! 1739: /* options with boolean value */
! 1740: case LDAP_OPT_REFERRALS:
! 1741: #ifdef LDAP_OPT_RESTART
! 1742: case LDAP_OPT_RESTART:
! 1743: #endif
! 1744: {
! 1745: void *val;
! 1746: convert_to_boolean_ex(newval);
! 1747: val = Z_LVAL_PP(newval)
! 1748: ? LDAP_OPT_ON : LDAP_OPT_OFF;
! 1749: if (ldap_set_option(ldap, option, val)) {
! 1750: RETURN_FALSE;
! 1751: }
! 1752: } break;
! 1753: /* options with control list value */
! 1754: case LDAP_OPT_SERVER_CONTROLS:
! 1755: case LDAP_OPT_CLIENT_CONTROLS:
! 1756: {
! 1757: LDAPControl *ctrl, **ctrls, **ctrlp;
! 1758: zval **ctrlval, **val;
! 1759: int ncontrols;
! 1760: char error=0;
! 1761:
! 1762: if ((Z_TYPE_PP(newval) != IS_ARRAY) || !(ncontrols = zend_hash_num_elements(Z_ARRVAL_PP(newval)))) {
! 1763: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Expected non-empty array value for this option");
! 1764: RETURN_FALSE;
! 1765: }
! 1766: ctrls = safe_emalloc((1 + ncontrols), sizeof(*ctrls), 0);
! 1767: *ctrls = NULL;
! 1768: ctrlp = ctrls;
! 1769: zend_hash_internal_pointer_reset(Z_ARRVAL_PP(newval));
! 1770: while (zend_hash_get_current_data(Z_ARRVAL_PP(newval), (void**)&ctrlval) == SUCCESS) {
! 1771: if (Z_TYPE_PP(ctrlval) != IS_ARRAY) {
! 1772: php_error_docref(NULL TSRMLS_CC, E_WARNING, "The array value must contain only arrays, where each array is a control");
! 1773: error = 1;
! 1774: break;
! 1775: }
! 1776: if (zend_hash_find(Z_ARRVAL_PP(ctrlval), "oid", sizeof("oid"), (void **) &val) != SUCCESS) {
! 1777: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Control must have an oid key");
! 1778: error = 1;
! 1779: break;
! 1780: }
! 1781: ctrl = *ctrlp = emalloc(sizeof(**ctrlp));
! 1782: convert_to_string_ex(val);
! 1783: ctrl->ldctl_oid = Z_STRVAL_PP(val);
! 1784: if (zend_hash_find(Z_ARRVAL_PP(ctrlval), "value", sizeof("value"), (void **) &val) == SUCCESS) {
! 1785: convert_to_string_ex(val);
! 1786: ctrl->ldctl_value.bv_val = Z_STRVAL_PP(val);
! 1787: ctrl->ldctl_value.bv_len = Z_STRLEN_PP(val);
! 1788: } else {
! 1789: ctrl->ldctl_value.bv_val = NULL;
! 1790: ctrl->ldctl_value.bv_len = 0;
! 1791: }
! 1792: if (zend_hash_find(Z_ARRVAL_PP(ctrlval), "iscritical", sizeof("iscritical"), (void **) &val) == SUCCESS) {
! 1793: convert_to_boolean_ex(val);
! 1794: ctrl->ldctl_iscritical = Z_BVAL_PP(val);
! 1795: } else {
! 1796: ctrl->ldctl_iscritical = 0;
! 1797: }
! 1798:
! 1799: ++ctrlp;
! 1800: *ctrlp = NULL;
! 1801: zend_hash_move_forward(Z_ARRVAL_PP(newval));
! 1802: }
! 1803: if (!error) {
! 1804: error = ldap_set_option(ldap, option, ctrls);
! 1805: }
! 1806: ctrlp = ctrls;
! 1807: while (*ctrlp) {
! 1808: efree(*ctrlp);
! 1809: ctrlp++;
! 1810: }
! 1811: efree(ctrls);
! 1812: if (error) {
! 1813: RETURN_FALSE;
! 1814: }
! 1815: } break;
! 1816: default:
! 1817: RETURN_FALSE;
! 1818: }
! 1819: RETURN_TRUE;
! 1820: }
! 1821: /* }}} */
! 1822:
! 1823: #ifdef HAVE_LDAP_PARSE_RESULT
! 1824: /* {{{ proto bool ldap_parse_result(resource link, resource result, int errcode, string matcheddn, string errmsg, array referrals)
! 1825: Extract information from result */
! 1826: PHP_FUNCTION(ldap_parse_result)
! 1827: {
! 1828: zval *link, *result, *errcode, *matcheddn, *errmsg, *referrals;
! 1829: ldap_linkdata *ld;
! 1830: LDAPMessage *ldap_result;
! 1831: char **lreferrals, **refp;
! 1832: char *lmatcheddn, *lerrmsg;
! 1833: int rc, lerrcode, myargcount = ZEND_NUM_ARGS();
! 1834:
! 1835: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrz|zzz", &link, &result, &errcode, &matcheddn, &errmsg, &referrals) != SUCCESS) {
! 1836: return;
! 1837: }
! 1838:
! 1839: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1840: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 1841:
! 1842: rc = ldap_parse_result(ld->link, ldap_result, &lerrcode,
! 1843: myargcount > 3 ? &lmatcheddn : NULL,
! 1844: myargcount > 4 ? &lerrmsg : NULL,
! 1845: myargcount > 5 ? &lreferrals : NULL,
! 1846: NULL /* &serverctrls */,
! 1847: 0);
! 1848: if (rc != LDAP_SUCCESS) {
! 1849: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to parse result: %s", ldap_err2string(rc));
! 1850: RETURN_FALSE;
! 1851: }
! 1852:
! 1853: zval_dtor(errcode);
! 1854: ZVAL_LONG(errcode, lerrcode);
! 1855:
! 1856: /* Reverse -> fall through */
! 1857: switch (myargcount) {
! 1858: case 6:
! 1859: zval_dtor(referrals);
! 1860: array_init(referrals);
! 1861: if (lreferrals != NULL) {
! 1862: refp = lreferrals;
! 1863: while (*refp) {
! 1864: add_next_index_string(referrals, *refp, 1);
! 1865: refp++;
! 1866: }
! 1867: ldap_value_free(lreferrals);
! 1868: }
! 1869: case 5:
! 1870: zval_dtor(errmsg);
! 1871: if (lerrmsg == NULL) {
! 1872: ZVAL_EMPTY_STRING(errmsg);
! 1873: } else {
! 1874: ZVAL_STRING(errmsg, lerrmsg, 1);
! 1875: ldap_memfree(lerrmsg);
! 1876: }
! 1877: case 4:
! 1878: zval_dtor(matcheddn);
! 1879: if (lmatcheddn == NULL) {
! 1880: ZVAL_EMPTY_STRING(matcheddn);
! 1881: } else {
! 1882: ZVAL_STRING(matcheddn, lmatcheddn, 1);
! 1883: ldap_memfree(lmatcheddn);
! 1884: }
! 1885: }
! 1886: RETURN_TRUE;
! 1887: }
! 1888: /* }}} */
! 1889: #endif
! 1890:
! 1891: /* {{{ proto resource ldap_first_reference(resource link, resource result)
! 1892: Return first reference */
! 1893: PHP_FUNCTION(ldap_first_reference)
! 1894: {
! 1895: zval *link, *result;
! 1896: ldap_linkdata *ld;
! 1897: ldap_resultentry *resultentry;
! 1898: LDAPMessage *ldap_result, *entry;
! 1899:
! 1900: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result) != SUCCESS) {
! 1901: return;
! 1902: }
! 1903:
! 1904: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1905: ZEND_FETCH_RESOURCE(ldap_result, LDAPMessage *, &result, -1, "ldap result", le_result);
! 1906:
! 1907: if ((entry = ldap_first_reference(ld->link, ldap_result)) == NULL) {
! 1908: RETVAL_FALSE;
! 1909: } else {
! 1910: resultentry = emalloc(sizeof(ldap_resultentry));
! 1911: ZEND_REGISTER_RESOURCE(return_value, resultentry, le_result_entry);
! 1912: resultentry->id = Z_LVAL_P(result);
! 1913: zend_list_addref(resultentry->id);
! 1914: resultentry->data = entry;
! 1915: resultentry->ber = NULL;
! 1916: }
! 1917: }
! 1918: /* }}} */
! 1919:
! 1920: /* {{{ proto resource ldap_next_reference(resource link, resource reference_entry)
! 1921: Get next reference */
! 1922: PHP_FUNCTION(ldap_next_reference)
! 1923: {
! 1924: zval *link, *result_entry;
! 1925: ldap_linkdata *ld;
! 1926: ldap_resultentry *resultentry, *resultentry_next;
! 1927: LDAPMessage *entry_next;
! 1928:
! 1929: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rr", &link, &result_entry) != SUCCESS) {
! 1930: return;
! 1931: }
! 1932:
! 1933: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1934: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1935:
! 1936: if ((entry_next = ldap_next_reference(ld->link, resultentry->data)) == NULL) {
! 1937: RETVAL_FALSE;
! 1938: } else {
! 1939: resultentry_next = emalloc(sizeof(ldap_resultentry));
! 1940: ZEND_REGISTER_RESOURCE(return_value, resultentry_next, le_result_entry);
! 1941: resultentry_next->id = resultentry->id;
! 1942: zend_list_addref(resultentry->id);
! 1943: resultentry_next->data = entry_next;
! 1944: resultentry_next->ber = NULL;
! 1945: }
! 1946: }
! 1947: /* }}} */
! 1948:
! 1949: #ifdef HAVE_LDAP_PARSE_REFERENCE
! 1950: /* {{{ proto bool ldap_parse_reference(resource link, resource reference_entry, array referrals)
! 1951: Extract information from reference entry */
! 1952: PHP_FUNCTION(ldap_parse_reference)
! 1953: {
! 1954: zval *link, *result_entry, *referrals;
! 1955: ldap_linkdata *ld;
! 1956: ldap_resultentry *resultentry;
! 1957: char **lreferrals, **refp;
! 1958:
! 1959: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rrz", &link, &result_entry, &referrals) != SUCCESS) {
! 1960: return;
! 1961: }
! 1962:
! 1963: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 1964: ZEND_FETCH_RESOURCE(resultentry, ldap_resultentry *, &result_entry, -1, "ldap result entry", le_result_entry);
! 1965:
! 1966: if (ldap_parse_reference(ld->link, resultentry->data, &lreferrals, NULL /* &serverctrls */, 0) != LDAP_SUCCESS) {
! 1967: RETURN_FALSE;
! 1968: }
! 1969:
! 1970: zval_dtor(referrals);
! 1971: array_init(referrals);
! 1972: if (lreferrals != NULL) {
! 1973: refp = lreferrals;
! 1974: while (*refp) {
! 1975: add_next_index_string(referrals, *refp, 1);
! 1976: refp++;
! 1977: }
! 1978: ldap_value_free(lreferrals);
! 1979: }
! 1980: RETURN_TRUE;
! 1981: }
! 1982: /* }}} */
! 1983: #endif
! 1984:
! 1985: /* {{{ proto bool ldap_rename(resource link, string dn, string newrdn, string newparent, bool deleteoldrdn);
! 1986: Modify the name of an entry */
! 1987: PHP_FUNCTION(ldap_rename)
! 1988: {
! 1989: zval *link;
! 1990: ldap_linkdata *ld;
! 1991: int rc;
! 1992: char *dn, *newrdn, *newparent;
! 1993: int dn_len, newrdn_len, newparent_len;
! 1994: zend_bool deleteoldrdn;
! 1995:
! 1996: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rsssb", &link, &dn, &dn_len, &newrdn, &newrdn_len, &newparent, &newparent_len, &deleteoldrdn) != SUCCESS) {
! 1997: return;
! 1998: }
! 1999:
! 2000: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 2001:
! 2002: if (newparent_len == 0) {
! 2003: newparent = NULL;
! 2004: }
! 2005:
! 2006: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 2007: rc = ldap_rename_s(ld->link, dn, newrdn, newparent, deleteoldrdn, NULL, NULL);
! 2008: #else
! 2009: if (newparent_len != 0) {
! 2010: php_error_docref(NULL TSRMLS_CC, E_WARNING, "You are using old LDAP API, newparent must be the empty string, can only modify RDN");
! 2011: RETURN_FALSE;
! 2012: }
! 2013: /* could support old APIs but need check for ldap_modrdn2()/ldap_modrdn() */
! 2014: rc = ldap_modrdn2_s(ld->link, dn, newrdn, deleteoldrdn);
! 2015: #endif
! 2016:
! 2017: if (rc == LDAP_SUCCESS) {
! 2018: RETURN_TRUE;
! 2019: }
! 2020: RETURN_FALSE;
! 2021: }
! 2022: /* }}} */
! 2023:
! 2024: #ifdef HAVE_LDAP_START_TLS_S
! 2025: /* {{{ proto bool ldap_start_tls(resource link)
! 2026: Start TLS */
! 2027: PHP_FUNCTION(ldap_start_tls)
! 2028: {
! 2029: zval *link;
! 2030: ldap_linkdata *ld;
! 2031: int rc, protocol = LDAP_VERSION3;
! 2032:
! 2033: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &link) != SUCCESS) {
! 2034: return;
! 2035: }
! 2036:
! 2037: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 2038:
! 2039: if (((rc = ldap_set_option(ld->link, LDAP_OPT_PROTOCOL_VERSION, &protocol)) != LDAP_SUCCESS) ||
! 2040: ((rc = ldap_start_tls_s(ld->link, NULL, NULL)) != LDAP_SUCCESS)
! 2041: ) {
! 2042: php_error_docref(NULL TSRMLS_CC, E_WARNING,"Unable to start TLS: %s", ldap_err2string(rc));
! 2043: RETURN_FALSE;
! 2044: } else {
! 2045: RETURN_TRUE;
! 2046: }
! 2047: }
! 2048: /* }}} */
! 2049: #endif
! 2050: #endif /* (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10 */
! 2051:
! 2052: #if defined(LDAP_API_FEATURE_X_OPENLDAP) && defined(HAVE_3ARG_SETREBINDPROC)
! 2053: /* {{{ _ldap_rebind_proc()
! 2054: */
! 2055: int _ldap_rebind_proc(LDAP *ldap, const char *url, ber_tag_t req, ber_int_t msgid, void *params)
! 2056: {
! 2057: ldap_linkdata *ld;
! 2058: int retval;
! 2059: zval *cb_url;
! 2060: zval **cb_args[2];
! 2061: zval *cb_retval;
! 2062: zval *cb_link = (zval *) params;
! 2063: TSRMLS_FETCH();
! 2064:
! 2065: ld = (ldap_linkdata *) zend_fetch_resource(&cb_link TSRMLS_CC, -1, "ldap link", NULL, 1, le_link);
! 2066:
! 2067: /* link exists and callback set? */
! 2068: if (ld == NULL || ld->rebindproc == NULL) {
! 2069: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Link not found or no callback set");
! 2070: return LDAP_OTHER;
! 2071: }
! 2072:
! 2073: /* callback */
! 2074: MAKE_STD_ZVAL(cb_url);
! 2075: ZVAL_STRING(cb_url, estrdup(url), 0);
! 2076: cb_args[0] = &cb_link;
! 2077: cb_args[1] = &cb_url;
! 2078: if (call_user_function_ex(EG(function_table), NULL, ld->rebindproc, &cb_retval, 2, cb_args, 0, NULL TSRMLS_CC) == SUCCESS && cb_retval) {
! 2079: convert_to_long_ex(&cb_retval);
! 2080: retval = Z_LVAL_P(cb_retval);
! 2081: zval_ptr_dtor(&cb_retval);
! 2082: } else {
! 2083: php_error_docref(NULL TSRMLS_CC, E_WARNING, "rebind_proc PHP callback failed");
! 2084: retval = LDAP_OTHER;
! 2085: }
! 2086: zval_dtor(cb_url);
! 2087: FREE_ZVAL(cb_url);
! 2088: return retval;
! 2089: }
! 2090: /* }}} */
! 2091:
! 2092: /* {{{ proto bool ldap_set_rebind_proc(resource link, string callback)
! 2093: Set a callback function to do re-binds on referral chasing. */
! 2094: PHP_FUNCTION(ldap_set_rebind_proc)
! 2095: {
! 2096: zval *link, *callback;
! 2097: ldap_linkdata *ld;
! 2098: char *callback_name;
! 2099:
! 2100: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "rz", &link, &callback) != SUCCESS) {
! 2101: RETURN_FALSE;
! 2102: }
! 2103:
! 2104: ZEND_FETCH_RESOURCE(ld, ldap_linkdata *, &link, -1, "ldap link", le_link);
! 2105:
! 2106: if (Z_TYPE_P(callback) == IS_STRING && Z_STRLEN_P(callback) == 0) {
! 2107: /* unregister rebind procedure */
! 2108: if (ld->rebindproc != NULL) {
! 2109: zval_dtor(ld->rebindproc);
! 2110: ld->rebindproc = NULL;
! 2111: ldap_set_rebind_proc(ld->link, NULL, NULL);
! 2112: }
! 2113: RETURN_TRUE;
! 2114: }
! 2115:
! 2116: /* callable? */
! 2117: if (!zend_is_callable(callback, 0, &callback_name TSRMLS_CC)) {
! 2118: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Two arguments expected for '%s' to be a valid callback", callback_name);
! 2119: efree(callback_name);
! 2120: RETURN_FALSE;
! 2121: }
! 2122: efree(callback_name);
! 2123:
! 2124: /* register rebind procedure */
! 2125: if (ld->rebindproc == NULL) {
! 2126: ldap_set_rebind_proc(ld->link, _ldap_rebind_proc, (void *) link);
! 2127: } else {
! 2128: zval_dtor(ld->rebindproc);
! 2129: }
! 2130:
! 2131: ALLOC_ZVAL(ld->rebindproc);
! 2132: *ld->rebindproc = *callback;
! 2133: zval_copy_ctor(ld->rebindproc);
! 2134: RETURN_TRUE;
! 2135: }
! 2136: /* }}} */
! 2137: #endif
! 2138:
! 2139: #ifdef STR_TRANSLATION
! 2140: /* {{{ php_ldap_do_translate
! 2141: */
! 2142: static void php_ldap_do_translate(INTERNAL_FUNCTION_PARAMETERS, int way)
! 2143: {
! 2144: char *value;
! 2145: int result, ldap_len;
! 2146:
! 2147: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &value, &value_len) != SUCCESS) {
! 2148: return;
! 2149: }
! 2150:
! 2151: if (value_len == 0) {
! 2152: RETURN_FALSE;
! 2153: }
! 2154:
! 2155: if (way == 1) {
! 2156: result = ldap_8859_to_t61(&value, &value_len, 0);
! 2157: } else {
! 2158: result = ldap_t61_to_8859(&value, &value_len, 0);
! 2159: }
! 2160:
! 2161: if (result == LDAP_SUCCESS) {
! 2162: RETVAL_STRINGL(value, value_len, 1);
! 2163: free(value);
! 2164: } else {
! 2165: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Conversion from iso-8859-1 to t61 failed: %s", ldap_err2string(result));
! 2166: RETVAL_FALSE;
! 2167: }
! 2168: }
! 2169: /* }}} */
! 2170:
! 2171: /* {{{ proto string ldap_t61_to_8859(string value)
! 2172: Translate t61 characters to 8859 characters */
! 2173: PHP_FUNCTION(ldap_t61_to_8859)
! 2174: {
! 2175: php_ldap_do_translate(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
! 2176: }
! 2177: /* }}} */
! 2178:
! 2179: /* {{{ proto string ldap_8859_to_t61(string value)
! 2180: Translate 8859 characters to t61 characters */
! 2181: PHP_FUNCTION(ldap_8859_to_t61)
! 2182: {
! 2183: php_ldap_do_translate(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
! 2184: }
! 2185: /* }}} */
! 2186: #endif
! 2187:
! 2188: /* {{{ arginfo */
! 2189: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_connect, 0, 0, 0)
! 2190: ZEND_ARG_INFO(0, hostname)
! 2191: ZEND_ARG_INFO(0, port)
! 2192: #ifdef HAVE_ORALDAP
! 2193: ZEND_ARG_INFO(0, wallet)
! 2194: ZEND_ARG_INFO(0, wallet_passwd)
! 2195: ZEND_ARG_INFO(0, authmode)
! 2196: #endif
! 2197: ZEND_END_ARG_INFO()
! 2198:
! 2199: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_resource, 0, 0, 1)
! 2200: ZEND_ARG_INFO(0, link_identifier)
! 2201: ZEND_END_ARG_INFO()
! 2202:
! 2203: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_bind, 0, 0, 1)
! 2204: ZEND_ARG_INFO(0, link_identifier)
! 2205: ZEND_ARG_INFO(0, bind_rdn)
! 2206: ZEND_ARG_INFO(0, bind_password)
! 2207: ZEND_END_ARG_INFO()
! 2208:
! 2209: #ifdef HAVE_LDAP_SASL
! 2210: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_sasl_bind, 0, 0, 1)
! 2211: ZEND_ARG_INFO(0, link)
! 2212: ZEND_ARG_INFO(0, binddn)
! 2213: ZEND_ARG_INFO(0, password)
! 2214: ZEND_ARG_INFO(0, sasl_mech)
! 2215: ZEND_ARG_INFO(0, sasl_realm)
! 2216: ZEND_ARG_INFO(0, sasl_authz_id)
! 2217: ZEND_ARG_INFO(0, props)
! 2218: ZEND_END_ARG_INFO()
! 2219: #endif
! 2220:
! 2221: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_read, 0, 0, 3)
! 2222: ZEND_ARG_INFO(0, link_identifier)
! 2223: ZEND_ARG_INFO(0, base_dn)
! 2224: ZEND_ARG_INFO(0, filter)
! 2225: ZEND_ARG_INFO(0, attributes)
! 2226: ZEND_ARG_INFO(0, attrsonly)
! 2227: ZEND_ARG_INFO(0, sizelimit)
! 2228: ZEND_ARG_INFO(0, timelimit)
! 2229: ZEND_ARG_INFO(0, deref)
! 2230: ZEND_END_ARG_INFO()
! 2231:
! 2232: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_list, 0, 0, 3)
! 2233: ZEND_ARG_INFO(0, link_identifier)
! 2234: ZEND_ARG_INFO(0, base_dn)
! 2235: ZEND_ARG_INFO(0, filter)
! 2236: ZEND_ARG_INFO(0, attributes)
! 2237: ZEND_ARG_INFO(0, attrsonly)
! 2238: ZEND_ARG_INFO(0, sizelimit)
! 2239: ZEND_ARG_INFO(0, timelimit)
! 2240: ZEND_ARG_INFO(0, deref)
! 2241: ZEND_END_ARG_INFO()
! 2242:
! 2243: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_search, 0, 0, 3)
! 2244: ZEND_ARG_INFO(0, link_identifier)
! 2245: ZEND_ARG_INFO(0, base_dn)
! 2246: ZEND_ARG_INFO(0, filter)
! 2247: ZEND_ARG_INFO(0, attributes)
! 2248: ZEND_ARG_INFO(0, attrsonly)
! 2249: ZEND_ARG_INFO(0, sizelimit)
! 2250: ZEND_ARG_INFO(0, timelimit)
! 2251: ZEND_ARG_INFO(0, deref)
! 2252: ZEND_END_ARG_INFO()
! 2253:
! 2254: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_count_entries, 0, 0, 2)
! 2255: ZEND_ARG_INFO(0, link_identifier)
! 2256: ZEND_ARG_INFO(0, result_identifier)
! 2257: ZEND_END_ARG_INFO()
! 2258:
! 2259: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_first_entry, 0, 0, 2)
! 2260: ZEND_ARG_INFO(0, link_identifier)
! 2261: ZEND_ARG_INFO(0, result_identifier)
! 2262: ZEND_END_ARG_INFO()
! 2263:
! 2264: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_next_entry, 0, 0, 2)
! 2265: ZEND_ARG_INFO(0, link_identifier)
! 2266: ZEND_ARG_INFO(0, result_identifier)
! 2267: ZEND_END_ARG_INFO()
! 2268:
! 2269: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_entries, 0, 0, 2)
! 2270: ZEND_ARG_INFO(0, link_identifier)
! 2271: ZEND_ARG_INFO(0, result_identifier)
! 2272: ZEND_END_ARG_INFO()
! 2273:
! 2274: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_first_attribute, 0, 0, 2)
! 2275: ZEND_ARG_INFO(0, link_identifier)
! 2276: ZEND_ARG_INFO(0, result_entry_identifier)
! 2277: ZEND_END_ARG_INFO()
! 2278:
! 2279: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_next_attribute, 0, 0, 2)
! 2280: ZEND_ARG_INFO(0, link_identifier)
! 2281: ZEND_ARG_INFO(0, result_entry_identifier)
! 2282: ZEND_END_ARG_INFO()
! 2283:
! 2284: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_attributes, 0, 0, 2)
! 2285: ZEND_ARG_INFO(0, link_identifier)
! 2286: ZEND_ARG_INFO(0, result_entry_identifier)
! 2287: ZEND_END_ARG_INFO()
! 2288:
! 2289: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_values, 0, 0, 3)
! 2290: ZEND_ARG_INFO(0, link_identifier)
! 2291: ZEND_ARG_INFO(0, result_entry_identifier)
! 2292: ZEND_ARG_INFO(0, attribute)
! 2293: ZEND_END_ARG_INFO()
! 2294:
! 2295: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_values_len, 0, 0, 3)
! 2296: ZEND_ARG_INFO(0, link_identifier)
! 2297: ZEND_ARG_INFO(0, result_entry_identifier)
! 2298: ZEND_ARG_INFO(0, attribute)
! 2299: ZEND_END_ARG_INFO()
! 2300:
! 2301: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_dn, 0, 0, 2)
! 2302: ZEND_ARG_INFO(0, link_identifier)
! 2303: ZEND_ARG_INFO(0, result_entry_identifier)
! 2304: ZEND_END_ARG_INFO()
! 2305:
! 2306: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_explode_dn, 0, 0, 2)
! 2307: ZEND_ARG_INFO(0, dn)
! 2308: ZEND_ARG_INFO(0, with_attrib)
! 2309: ZEND_END_ARG_INFO()
! 2310:
! 2311: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_dn2ufn, 0, 0, 1)
! 2312: ZEND_ARG_INFO(0, dn)
! 2313: ZEND_END_ARG_INFO()
! 2314:
! 2315: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_add, 0, 0, 3)
! 2316: ZEND_ARG_INFO(0, link_identifier)
! 2317: ZEND_ARG_INFO(0, dn)
! 2318: ZEND_ARG_INFO(0, entry)
! 2319: ZEND_END_ARG_INFO()
! 2320:
! 2321: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_delete, 0, 0, 2)
! 2322: ZEND_ARG_INFO(0, link_identifier)
! 2323: ZEND_ARG_INFO(0, dn)
! 2324: ZEND_END_ARG_INFO()
! 2325:
! 2326: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_modify, 0, 0, 3)
! 2327: ZEND_ARG_INFO(0, link_identifier)
! 2328: ZEND_ARG_INFO(0, dn)
! 2329: ZEND_ARG_INFO(0, entry)
! 2330: ZEND_END_ARG_INFO()
! 2331:
! 2332: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_mod_add, 0, 0, 3)
! 2333: ZEND_ARG_INFO(0, link_identifier)
! 2334: ZEND_ARG_INFO(0, dn)
! 2335: ZEND_ARG_INFO(0, entry)
! 2336: ZEND_END_ARG_INFO()
! 2337:
! 2338: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_mod_replace, 0, 0, 3)
! 2339: ZEND_ARG_INFO(0, link_identifier)
! 2340: ZEND_ARG_INFO(0, dn)
! 2341: ZEND_ARG_INFO(0, entry)
! 2342: ZEND_END_ARG_INFO()
! 2343:
! 2344: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_mod_del, 0, 0, 3)
! 2345: ZEND_ARG_INFO(0, link_identifier)
! 2346: ZEND_ARG_INFO(0, dn)
! 2347: ZEND_ARG_INFO(0, entry)
! 2348: ZEND_END_ARG_INFO()
! 2349:
! 2350: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_err2str, 0, 0, 1)
! 2351: ZEND_ARG_INFO(0, errno)
! 2352: ZEND_END_ARG_INFO()
! 2353:
! 2354: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_compare, 0, 0, 4)
! 2355: ZEND_ARG_INFO(0, link_identifier)
! 2356: ZEND_ARG_INFO(0, dn)
! 2357: ZEND_ARG_INFO(0, attribute)
! 2358: ZEND_ARG_INFO(0, value)
! 2359: ZEND_END_ARG_INFO()
! 2360:
! 2361: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_sort, 0, 0, 3)
! 2362: ZEND_ARG_INFO(0, link)
! 2363: ZEND_ARG_INFO(0, result)
! 2364: ZEND_ARG_INFO(0, sortfilter)
! 2365: ZEND_END_ARG_INFO()
! 2366:
! 2367: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 2368: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_rename, 0, 0, 5)
! 2369: ZEND_ARG_INFO(0, link_identifier)
! 2370: ZEND_ARG_INFO(0, dn)
! 2371: ZEND_ARG_INFO(0, newrdn)
! 2372: ZEND_ARG_INFO(0, newparent)
! 2373: ZEND_ARG_INFO(0, deleteoldrdn)
! 2374: ZEND_END_ARG_INFO()
! 2375:
! 2376: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_get_option, 0, 0, 3)
! 2377: ZEND_ARG_INFO(0, link_identifier)
! 2378: ZEND_ARG_INFO(0, option)
! 2379: ZEND_ARG_INFO(1, retval)
! 2380: ZEND_END_ARG_INFO()
! 2381:
! 2382: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_set_option, 0, 0, 3)
! 2383: ZEND_ARG_INFO(0, link_identifier)
! 2384: ZEND_ARG_INFO(0, option)
! 2385: ZEND_ARG_INFO(0, newval)
! 2386: ZEND_END_ARG_INFO()
! 2387:
! 2388: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_first_reference, 0, 0, 2)
! 2389: ZEND_ARG_INFO(0, link)
! 2390: ZEND_ARG_INFO(0, result)
! 2391: ZEND_END_ARG_INFO()
! 2392:
! 2393: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_next_reference, 0, 0, 2)
! 2394: ZEND_ARG_INFO(0, link)
! 2395: ZEND_ARG_INFO(0, entry)
! 2396: ZEND_END_ARG_INFO()
! 2397:
! 2398: #ifdef HAVE_LDAP_PARSE_REFERENCE
! 2399: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_parse_reference, 0, 0, 3)
! 2400: ZEND_ARG_INFO(0, link)
! 2401: ZEND_ARG_INFO(0, entry)
! 2402: ZEND_ARG_INFO(1, referrals)
! 2403: ZEND_END_ARG_INFO()
! 2404: #endif
! 2405:
! 2406:
! 2407: #ifdef HAVE_LDAP_PARSE_RESULT
! 2408: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_parse_result, 0, 0, 3)
! 2409: ZEND_ARG_INFO(0, link)
! 2410: ZEND_ARG_INFO(0, result)
! 2411: ZEND_ARG_INFO(1, errcode)
! 2412: ZEND_ARG_INFO(1, matcheddn)
! 2413: ZEND_ARG_INFO(1, errmsg)
! 2414: ZEND_ARG_INFO(1, referrals)
! 2415: ZEND_END_ARG_INFO()
! 2416: #endif
! 2417: #endif
! 2418:
! 2419: #if defined(LDAP_API_FEATURE_X_OPENLDAP) && defined(HAVE_3ARG_SETREBINDPROC)
! 2420: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_set_rebind_proc, 0, 0, 2)
! 2421: ZEND_ARG_INFO(0, link)
! 2422: ZEND_ARG_INFO(0, callback)
! 2423: ZEND_END_ARG_INFO()
! 2424: #endif
! 2425:
! 2426: #ifdef STR_TRANSLATION
! 2427: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_t61_to_8859, 0, 0, 1)
! 2428: ZEND_ARG_INFO(0, value)
! 2429: ZEND_END_ARG_INFO()
! 2430:
! 2431: ZEND_BEGIN_ARG_INFO_EX(arginfo_ldap_8859_to_t61, 0, 0, 1)
! 2432: ZEND_ARG_INFO(0, value)
! 2433: ZEND_END_ARG_INFO()
! 2434: #endif
! 2435: /* }}} */
! 2436:
! 2437: /*
! 2438: This is just a small subset of the functionality provided by the LDAP library. All the
! 2439: operations are synchronous. Referrals are not handled automatically.
! 2440: */
! 2441: /* {{{ ldap_functions[]
! 2442: */
! 2443: const zend_function_entry ldap_functions[] = {
! 2444: PHP_FE(ldap_connect, arginfo_ldap_connect)
! 2445: PHP_FALIAS(ldap_close, ldap_unbind, arginfo_ldap_resource)
! 2446: PHP_FE(ldap_bind, arginfo_ldap_bind)
! 2447: #ifdef HAVE_LDAP_SASL
! 2448: PHP_FE(ldap_sasl_bind, arginfo_ldap_sasl_bind)
! 2449: #endif
! 2450: PHP_FE(ldap_unbind, arginfo_ldap_resource)
! 2451: PHP_FE(ldap_read, arginfo_ldap_read)
! 2452: PHP_FE(ldap_list, arginfo_ldap_list)
! 2453: PHP_FE(ldap_search, arginfo_ldap_search)
! 2454: PHP_FE(ldap_free_result, arginfo_ldap_resource)
! 2455: PHP_FE(ldap_count_entries, arginfo_ldap_count_entries)
! 2456: PHP_FE(ldap_first_entry, arginfo_ldap_first_entry)
! 2457: PHP_FE(ldap_next_entry, arginfo_ldap_next_entry)
! 2458: PHP_FE(ldap_get_entries, arginfo_ldap_get_entries)
! 2459: PHP_FE(ldap_first_attribute, arginfo_ldap_first_attribute)
! 2460: PHP_FE(ldap_next_attribute, arginfo_ldap_next_attribute)
! 2461: PHP_FE(ldap_get_attributes, arginfo_ldap_get_attributes)
! 2462: PHP_FALIAS(ldap_get_values, ldap_get_values_len, arginfo_ldap_get_values)
! 2463: PHP_FE(ldap_get_values_len, arginfo_ldap_get_values_len)
! 2464: PHP_FE(ldap_get_dn, arginfo_ldap_get_dn)
! 2465: PHP_FE(ldap_explode_dn, arginfo_ldap_explode_dn)
! 2466: PHP_FE(ldap_dn2ufn, arginfo_ldap_dn2ufn)
! 2467: PHP_FE(ldap_add, arginfo_ldap_add)
! 2468: PHP_FE(ldap_delete, arginfo_ldap_delete)
! 2469: PHP_FALIAS(ldap_modify, ldap_mod_replace, arginfo_ldap_modify)
! 2470:
! 2471: /* additional functions for attribute based modifications, Gerrit Thomson */
! 2472: PHP_FE(ldap_mod_add, arginfo_ldap_mod_add)
! 2473: PHP_FE(ldap_mod_replace, arginfo_ldap_mod_replace)
! 2474: PHP_FE(ldap_mod_del, arginfo_ldap_mod_del)
! 2475: /* end gjt mod */
! 2476:
! 2477: PHP_FE(ldap_errno, arginfo_ldap_resource)
! 2478: PHP_FE(ldap_err2str, arginfo_ldap_err2str)
! 2479: PHP_FE(ldap_error, arginfo_ldap_resource)
! 2480: PHP_FE(ldap_compare, arginfo_ldap_compare)
! 2481: PHP_FE(ldap_sort, arginfo_ldap_sort)
! 2482:
! 2483: #if (LDAP_API_VERSION > 2000) || HAVE_NSLDAP || HAVE_ORALDAP_10
! 2484: PHP_FE(ldap_rename, arginfo_ldap_rename)
! 2485: PHP_FE(ldap_get_option, arginfo_ldap_get_option)
! 2486: PHP_FE(ldap_set_option, arginfo_ldap_set_option)
! 2487: PHP_FE(ldap_first_reference, arginfo_ldap_first_reference)
! 2488: PHP_FE(ldap_next_reference, arginfo_ldap_next_reference)
! 2489: #ifdef HAVE_LDAP_PARSE_REFERENCE
! 2490: PHP_FE(ldap_parse_reference, arginfo_ldap_parse_reference)
! 2491: #endif
! 2492: #ifdef HAVE_LDAP_PARSE_RESULT
! 2493: PHP_FE(ldap_parse_result, arginfo_ldap_parse_result)
! 2494: #endif
! 2495: #ifdef HAVE_LDAP_START_TLS_S
! 2496: PHP_FE(ldap_start_tls, arginfo_ldap_resource)
! 2497: #endif
! 2498: #endif
! 2499:
! 2500: #if defined(LDAP_API_FEATURE_X_OPENLDAP) && defined(HAVE_3ARG_SETREBINDPROC)
! 2501: PHP_FE(ldap_set_rebind_proc, arginfo_ldap_set_rebind_proc)
! 2502: #endif
! 2503:
! 2504: #ifdef STR_TRANSLATION
! 2505: PHP_FE(ldap_t61_to_8859, arginfo_ldap_t61_to_8859)
! 2506: PHP_FE(ldap_8859_to_t61, arginfo_ldap_8859_to_t61)
! 2507: #endif
! 2508:
! 2509: PHP_FE_END
! 2510: };
! 2511: /* }}} */
! 2512:
! 2513: zend_module_entry ldap_module_entry = { /* {{{ */
! 2514: STANDARD_MODULE_HEADER,
! 2515: "ldap",
! 2516: ldap_functions,
! 2517: PHP_MINIT(ldap),
! 2518: PHP_MSHUTDOWN(ldap),
! 2519: NULL,
! 2520: NULL,
! 2521: PHP_MINFO(ldap),
! 2522: NO_VERSION_YET,
! 2523: PHP_MODULE_GLOBALS(ldap),
! 2524: PHP_GINIT(ldap),
! 2525: NULL,
! 2526: NULL,
! 2527: STANDARD_MODULE_PROPERTIES_EX
! 2528: };
! 2529: /* }}} */
! 2530:
! 2531: /*
! 2532: * Local variables:
! 2533: * tab-width: 4
! 2534: * c-basic-offset: 4
! 2535: * End:
! 2536: * vim600: sw=4 ts=4 fdm=marker
! 2537: * vim<600: sw=4 ts=4
! 2538: */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>