132 lines
4.5 KiB
Scheme
132 lines
4.5 KiB
Scheme
(define-interface ldap-low-interface
|
|
(export
|
|
ldap-open
|
|
ldap-init
|
|
ldap-bind-sync
|
|
ldap-unbind-sync
|
|
ldap-error-string
|
|
ldap-result-error))
|
|
|
|
(define-interface ldap-conditions-interface
|
|
(export
|
|
&ldap-error ldap-error? ldap-error-code ldap-error-session
|
|
&ldap-security-error ldap-security-error?
|
|
&ldap-service-error ldap-service-error?
|
|
&ldap-data-error ldap-data-error?
|
|
|
|
&ldap-bindings-internal-error ldap-bindings-internal-error?
|
|
&ldap-bindings-not-implemented ldap-bindings-not-implemented?
|
|
&ldap-session-option-error ldap-session-option-error?
|
|
&ldap-implicit-unbind ldap-implicit-unbind?
|
|
&ldap-operations-error ldap-operations-error?
|
|
&ldap-protocol-error ldap-protocol-error?
|
|
&ldap-timelimit-exceeded ldap-timelimit-exceeded?
|
|
&ldap-sizelimit-exceeded ldap-sizelimit-exceeded?
|
|
&ldap-strong-auth-not-supported ldap-strong-auth-not-supported?
|
|
&ldap-strong-auth-required ldap-strong-auth-required?
|
|
&ldap-adminlimit-exceeded ldap-adminlimit-exceeded?
|
|
&ldap-critical-extension-unavailable ldap-critical-extension-unavailable?
|
|
&ldap-confidentiality-required ldap-confidentiality-required?
|
|
&ldap-sasl-bind-in-progress ldap-sasl-bind-in-progress?
|
|
&ldap-no-such-attribute ldap-no-such-attribute?
|
|
&ldap-undefined-type ldap-undefined-type?
|
|
&ldap-inappropriate-type ldap-inappropriate-type?
|
|
&ldap-insufficient-access ldap-insufficient-access?
|
|
&ldap-busy ldap-busy?
|
|
&ldap-unavailable ldap-unavailable?
|
|
&ldap-unwilling-to-perform ldap-unwilling-to-perform?
|
|
&ldap-loop-detect ldap-loop-detect?
|
|
&ldap-invalid-syntax ldap-invalid-syntax?
|
|
&ldap-invalid-dn-syntax ldap-invalid-dn-syntax?
|
|
&ldap-naming-violation ldap-naming-violation?
|
|
&ldap-constraint-violation ldap-constraint-violation?
|
|
&ldap-type-or-value-exists ldap-type-or-value-exists?
|
|
&ldap-objectclass-violation ldap-objectclass-violation?
|
|
&ldap-not-allowed-on-leaf ldap-not-allowed-on-leaf?
|
|
&ldap-not-allowed-on-rdn ldap-not-allowed-on-rdn?
|
|
&ldap-already-exists ldap-already-exists?
|
|
&ldap-no-such-object ldap-no-such-object?
|
|
&ldap-alias-problem ldap-alias-problem?
|
|
&ldap-alias-deref-problem ldap-alias-deref-problem?
|
|
&ldap-referral-limit-exceeded ldap-referral-limit-exceeded?
|
|
&ldap-no-objectclass-mods ldap-no-objectclass-mods?
|
|
&ldap-results-too-large ldap-results-too-large?
|
|
&ldap-affects-multiple-dsas ldap-affects-multiple-dsas?
|
|
&ldap-server-down ldap-server-down?
|
|
&ldap-local-error ldap-local-error?
|
|
&ldap-encoding-error ldap-encoding-error?
|
|
&ldap-decoding-error ldap-decoding-error?
|
|
&ldap-timeout-error ldap-timeout-error?
|
|
&ldap-auth-unknown ldap-auth-unknown?
|
|
&ldap-filter-error ldap-filter-error?
|
|
&ldap-param-error ldap-param-error?
|
|
&ldap-no-memory ldap-no-memory?
|
|
&ldap-connect-error ldap-connect-error?
|
|
&ldap-not-supported ldap-not-supported?
|
|
&ldap-control-not-found ldap-control-not-found?
|
|
&ldap-referral-limit-exceeded ldap-referral-limit-exceeded?))
|
|
|
|
(define-interface ldap-handle-types-interface
|
|
(export
|
|
ldap-session?
|
|
ldap-message?
|
|
ldap-modification?
|
|
|
|
ldap-api-info?
|
|
ldap-api-info-info-version
|
|
ldap-api-info-api-version
|
|
ldap-api-info-protocol-version
|
|
ldap-api-info-vendor-name
|
|
ldap-api-info-vendor-version))
|
|
|
|
(define-interface ldap-return-interface
|
|
(export
|
|
ldap-return-object?
|
|
ldap-return-elements
|
|
ldap-return-name
|
|
(ldap-return :syntax)))
|
|
|
|
(define-interface ldap-option-version-interface
|
|
(export
|
|
ldap-option-version-object?
|
|
ldap-option-version-elements
|
|
ldap-option-version-name
|
|
(ldap-option-version :syntax)))
|
|
|
|
(define-interface ldap-scope-arguments-interface
|
|
(export
|
|
ldap-scope-arguments-object?
|
|
ldap-scope-arguments-elements
|
|
ldap-scope-arguments-name
|
|
(ldap-scope-arguments :syntax)))
|
|
|
|
(define-interface ldap-session-option-values-interface
|
|
(export
|
|
ldap-session-option-value-object?
|
|
ldap-session-option-value-elements
|
|
ldap-session-option-value-name
|
|
(ldap-session-option-value :syntax)))
|
|
|
|
(define-interface ldap-message-types-interface
|
|
(export
|
|
ldap-message-types-object?
|
|
ldap-message-types-elements
|
|
ldap-message-types-name
|
|
(ldap-message-types :syntax)))
|
|
|
|
(define-interface ldap-attributes-special-values-interfaces
|
|
(export
|
|
ldap-attributes-no-attribute
|
|
ldap-attributes-all-user-attributes))
|
|
|
|
(define-interface ldap-types-interface
|
|
(compound-interface
|
|
ldap-return-interface
|
|
ldap-option-version-interface
|
|
ldap-scope-arguments-interface
|
|
ldap-session-option-values-interface
|
|
ldap-message-types-interface
|
|
ldap-attributes-special-values-interfaces
|
|
;;
|
|
ldap-handle-types-interface))
|