From ff8c2cca86253552b315077be5ef0294f0739281 Mon Sep 17 00:00:00 2001
From: 5HT <maxim@synrc.com>
Date: Mon, 24 Jul 2023 07:04:42 +0300
Subject: [PATCH] 13.7.24

---
 include/LDAP.hrl | 132 +++++++++++++++++++++++++++++++++++++++++++++++
 lib/ldap.ex      |   1 +
 mix.exs          |   4 +-
 3 files changed, 135 insertions(+), 2 deletions(-)
 create mode 100644 include/LDAP.hrl

diff --git a/include/LDAP.hrl b/include/LDAP.hrl
new file mode 100644
index 0000000..7c6213a
--- /dev/null
+++ b/include/LDAP.hrl
@@ -0,0 +1,132 @@
+%% Generated by the Erlang ASN.1 compiler. Version: 5.0.21
+%% Purpose: Erlang record definitions for each named and unnamed
+%% SEQUENCE and SET, and macro definitions for each value
+%% definition in module LDAP.
+
+-ifndef(_LDAP_HRL_).
+-define(_LDAP_HRL_, true).
+
+-record('LDAPMessage', {
+  messageID,
+  protocolOp,
+  controls = asn1_NOVALUE
+}).
+
+-record('AttributeValueAssertion', {
+  attributeDesc,
+  assertionValue
+}).
+
+-record('PartialAttribute', {
+  type,
+  vals
+}).
+
+-record('LDAPResult', {
+  resultCode,
+  matchedDN,
+  diagnosticMessage,
+  referral = asn1_NOVALUE
+}).
+
+-record('Control', {
+  controlType,
+  criticality = asn1_DEFAULT,
+  controlValue = asn1_NOVALUE
+}).
+
+-record('BindRequest', {
+  version,
+  name,
+  authentication
+}).
+
+-record('SaslCredentials', {
+  mechanism,
+  credentials = asn1_NOVALUE
+}).
+
+-record('BindResponse', {
+  resultCode,
+  matchedDN,
+  diagnosticMessage,
+  referral = asn1_NOVALUE,
+  serverSaslCreds = asn1_NOVALUE
+}).
+
+-record('SearchRequest', {
+  baseObject,
+  scope,
+  derefAliases,
+  sizeLimit,
+  timeLimit,
+  typesOnly,
+  filter,
+  attributes
+}).
+
+-record('SubstringFilter', {
+  type,
+  substrings
+}).
+
+-record('MatchingRuleAssertion', {
+  matchingRule = asn1_NOVALUE,
+  type = asn1_NOVALUE,
+  matchValue,
+  dnAttributes = asn1_DEFAULT
+}).
+
+-record('SearchResultEntry', {
+  objectName,
+  attributes
+}).
+
+-record('ModifyRequest', {
+  object,
+  changes
+}).
+
+-record('ModifyRequest_changes_SEQOF', {
+  operation,
+  modification
+}).
+
+-record('AddRequest', {
+  entry,
+  attributes
+}).
+
+-record('ModifyDNRequest', {
+  entry,
+  newrdn,
+  deleteoldrdn,
+  newSuperior = asn1_NOVALUE
+}).
+
+-record('CompareRequest', {
+  entry,
+  ava
+}).
+
+-record('ExtendedRequest', {
+  requestName,
+  requestValue = asn1_NOVALUE
+}).
+
+-record('ExtendedResponse', {
+  resultCode,
+  matchedDN,
+  diagnosticMessage,
+  referral = asn1_NOVALUE,
+  responseName = asn1_NOVALUE,
+  responseValue = asn1_NOVALUE
+}).
+
+-record('IntermediateResponse', {
+  responseName = asn1_NOVALUE,
+  responseValue = asn1_NOVALUE
+}).
+
+-define('maxInt', 2147483647).
+-endif. %% _LDAP_HRL_
diff --git a/lib/ldap.ex b/lib/ldap.ex
index 58195a8..971f926 100644
--- a/lib/ldap.ex
+++ b/lib/ldap.ex
@@ -7,6 +7,7 @@ defmodule LDAP do
     def init([]), do: {:ok, { {:one_for_one, 5, 10}, []} }
     def start(_type, _args) do
         :logger.add_handlers(:ldap)
+        LDAP.start
         :supervisor.start_link({:local, __MODULE__}, __MODULE__, [])
     end
 
diff --git a/mix.exs b/mix.exs
index 728d059..dccb459 100644
--- a/mix.exs
+++ b/mix.exs
@@ -4,7 +4,7 @@ defmodule LDAP.Mixfile do
   def project() do
     [
       app: :ldap,
-      version: "8.7.20",
+      version: "13.7.24",
       description: "LDAP  CXC 138 22 Directory Server",
       package: package(),
       elixir: "~> 1.7",
@@ -15,7 +15,7 @@ defmodule LDAP.Mixfile do
 
   def package do
     [
-      files: ~w(doc lib src man priv mix.exs LICENSE index.html README.md),
+      files: ~w(doc lib include src man priv mix.exs LICENSE index.html README.md),
       licenses: ["ISC"],
       maintainers: ["Namdak Tonpa"],
       name: :ldap,