//----------------------------------------------------------------------------
//
//  Microsoft Windows
//  Copyright (C) Microsoft Corporation, 2000.
//
//  File:       ldaputils.c
//
//  Contents:   Utilities for LDAP.
//
//
//  History:    KrishnaG
//              AbhisheV
//
//----------------------------------------------------------------------------


#include "precomp.h"


void
FreeLDAPModWs(
              struct ldapmodW ** AttributeList
              )
{
    DWORD i = 0;
    PLDAPModW attr = NULL;
    DWORD dwValCount = 0;
    PLDAP_BERVAL berValue = NULL;
    PWCHAR strValue = NULL;
    
    
    if (AttributeList == NULL) {
        return;
    }
    
    while (AttributeList[i] != NULL) {
        
        attr = AttributeList[i++];
        
        if (attr->mod_type != NULL) {
            FreePolStr(attr->mod_type);
        }
        
        if (attr->mod_op & LDAP_MOD_BVALUES) {
            
            if (attr->mod_vals.modv_bvals != NULL) {
                
                dwValCount = 0;
                
                while (attr->mod_vals.modv_bvals[dwValCount]) {
                    
                    berValue = attr->mod_vals.modv_bvals[dwValCount++];
                    FreePolMem(berValue);
                    
                }
                
                FreePolMem(attr->mod_vals.modv_bvals);
                
            }
            
        } else {
            
            if (attr->mod_vals.modv_strvals != NULL) {
                
                dwValCount = 0;
                
                while (attr->mod_vals.modv_strvals[dwValCount]) {
                    
                    strValue = attr->mod_vals.modv_strvals[dwValCount];
                    FreePolMem(strValue);
                    dwValCount++;
                    
                }
                
                FreePolMem(attr->mod_vals.modv_strvals);
                
            }
            
        }
        
    }
    
    FreePolMem(AttributeList[0]);
    
    FreePolMem(AttributeList);
    
    return;
}


DWORD
AllocateLDAPStringValue(
                        LPWSTR pszString,
                        PLDAPOBJECT * ppLdapObject
                        )
{
    PLDAPOBJECT pLdapObject = NULL;
    DWORD dwError = 0;
    LPWSTR pszNewString = NULL;
    
    pLdapObject = (PLDAPOBJECT)AllocPolMem(
        (1 + 1)*sizeof(LDAPOBJECT)
        );
    if (!pLdapObject) {
        dwError = ERROR_OUTOFMEMORY;
        BAIL_ON_WIN32_ERROR(dwError);
    }
    
    dwError = AllocatePolString(
        pszString,
        &pszNewString
        );
    BAIL_ON_WIN32_ERROR(dwError);
    
    LDAPOBJECT_STRING(pLdapObject) = pszNewString;
    
    *ppLdapObject = pLdapObject;
    
    return(dwError);
    
error:
    
    *ppLdapObject = NULL;
    if (pLdapObject) {
        FreePolMem(
            pLdapObject
            );
    }
    
    return(dwError);
}


DWORD
AllocateLDAPBinaryValue(
                        LPBYTE pByte,
                        DWORD dwNumBytes,
                        PLDAPOBJECT * ppLdapObject
                        )
{
    PLDAPOBJECT pLdapObject = NULL;
    DWORD dwError = 0;
    LPBYTE pNewMem = NULL;
    
    pLdapObject = (PLDAPOBJECT)AllocPolMem(
        (1 + 1)*sizeof(LDAPOBJECT)
        );
    if (!pLdapObject) {
        dwError = ERROR_OUTOFMEMORY;
        BAIL_ON_WIN32_ERROR(dwError);
    }
    
    
    LDAPOBJECT_BERVAL(pLdapObject) =
        (struct berval *) AllocPolMem( sizeof(struct berval) + dwNumBytes );
    
    if (!LDAPOBJECT_BERVAL(pLdapObject)) {
        dwError = ERROR_OUTOFMEMORY;
        BAIL_ON_WIN32_ERROR(dwError);
    }
    
    
    LDAPOBJECT_BERVAL_LEN(pLdapObject) = dwNumBytes;
    LDAPOBJECT_BERVAL_VAL(pLdapObject) = (CHAR *) ((LPBYTE) LDAPOBJECT_BERVAL(pLdapObject) + sizeof(struct berval));
    
    memcpy( LDAPOBJECT_BERVAL_VAL(pLdapObject),
        pByte,
        dwNumBytes );
    
    *ppLdapObject = pLdapObject;
    
    return(dwError);
    
error:
    
    *ppLdapObject = NULL;
    if (pLdapObject) {
        FreePolMem(
            pLdapObject
            );
    }
    
    return(dwError);
}