Need help in pulling ADLDS user details

Question

Hi,
I am trying to pull all the user details with a certain search criterea from a ADLDS with more than 20 user attributes. I tried both directory searcher and Powershell for gathering the information (out of this powershell works fast). Due to formating the
attributes it takes more than 30 minutes to run the script. Could some suggest me a better solution for this.
Thanks
Pradeep

Answer 1

Richard,
I  started using Directory searcher and the result  was less than 50 percent less than the time taken for Get-aduser. But in below script total time taken is more than three hours where as in VB and Perl it takes less than 20 minutes for the
total execution including the 5 minutes of wait time. Could you help me increase the time taken. Total of around 50 plus attributes . When i go into for loop only it takes time
========================== 
$config="E:\Powershell\CONFIG"
$logdir="E:\Powershell\LOGS"
$scriptdir="E:\Powershell\FEEDS"
$outdir="E:\Powershell\OUTBOX"
$configfile="$config\config.txt"
$configfile="$config\config.txt"
$date = Get-Date
$date2=$date.ToString("MMddyy")
$F_FeedFileName="Transfer_full.txt"
$F_FeedBackupFileName="Transfer_full_bak.txt"
$file3="Transfer_temp.txt"
$global:scriptname="GeneralFeedD.ps1"
$script = $scriptname.Split(".")
$name=$script[0]
$global:date = Get-Date
$log= "$logdir\$name"
$global:flag=0
$searchbase="ou=people,o=xxxx"
$adldsServer=get-content $configfile
$F_FeedAttrCfg=get-content "Feed_Attributes.cfg"
$strFileName="$log\$name.txt"
$Backuplogfile="$log\$name"+"_bak.txt"
#File Details
$EmployeeFeedNormal = "EmployeeFeedNormal"
$ContractorFeedNormal = "ContractorFeedNormal"
$VendorContractorFeedNormal = "VendorContractorFeedNormal"
$EmployeeFeedNormalwithUID = "EmployeeFeedNormalwithUID"
$ContractorFeedNormalwithUID = "ContractorFeedNormalwithUID"
$VendorContractorFeedNormalwithUID = "VendorContractorFeedNormalwithUID"
$EmployeeFeedNormalwithUIDandGUID = "EmployeeFeedNormalwithUIDandGUID"
$ContractorFeedNormalwithUIDandGUID = "ContractorFeedNormalwithUIDandGUID"
$VendorContractorFeedNormalwithUIDandGUID = "VendorContractorFeedNormalwithUIDandGUID"
$EmployeeFeedNormal_bkp = "EmployeeFeedNormal.bak"
$ContractorFeedNormal_bkp = "ContractorFeedNormal.bak"
$VendorContractorFeedNormal_bkp = "VendorContractorFeedNormal.bak"
$EmployeeFeedNormalwithUID_bkp = "EmployeeFeedNormalwithUID.bak"
$ContractorFeedNormalwithUID_bkp = "ContractorFeedNormalwithUID.bak"
$VendorContractorFeedNormalwithUID_bkp = "VendorContractorFeedNormalwithUID.bak"
$EmployeeFeedNormalwithUIDandGUID_bkp = "EmployeeFeedNormalwithUIDandGUID.bak"
$ContractorFeedNormalwithUIDandGUID_bkp = "ContractorFeedNormalwithUIDandGUID.bak"
$VendorContractorFeedNormalwithUIDandGUID_bkp = "VendorContractorFeedNormalwithUIDandGUID.bak"
# FUNCTIONS
# Message
Function message ([string] $line)
    $date = Get-Date
    $line = "$scriptname | INFO | $date | $line"
    $line| Out-File $strFileName -Append  
Function error ([string] $line)
    $date = Get-Date
    $line = "$scriptname | ERROR | $date | $line"
    $line| Out-File $strFileName -Append  
# Reading Configuration Files
if((Test-Path $configfile) -ne 0)
    $adldsServer=get-content $configfile
        foreach($en in $adldsServer)
     if($en -match "server")
         $server=$en.split("=")
         $HOST1=$server[1]
     if($en -match "password")
         $pass=$en.split("=")
         $PASSWD=$pass[1]
     if($en -match "user")
         $user=$en.split("=")
         $ADMIN=$user[1]
    $PWord = ConvertTo-SecureString –String $PASSWD –AsPlainText -Force
    $Credential = New-Object –TypeName System.Management.Automation.PSCredential –ArgumentList $ADMIN,$PWord
else
 Error ("Configuration File $configfile is not present");
 Message ("Calling script SendMail.pl for sending mail");
    $global:errormsg="Configuration File $configfile is not present"
    Invoke-Expression "$scriptdir\SendMail.ps1"
    Error "Script failed"
    Exit
# Checking Log Directory
if((Test-Path $log) -eq 0)
    #cd "$logdir"
    mkdir "$logdir\$name"
If ((Test-Path $strFileName) -eq 0)
   New-Item $strFileName -type file
   message "New log file created"
else
    Copy-Item $strFileName $Backuplogfile
    Remove-Item $strFileName
    message "Backup of log file created"
# Checking Script Directory
if((Test-Path $scriptdir) -eq 0)
 Error ("Script Directory $scriptdir is not present");
 Message ("Calling script SendMail.pl for sending mail");
    $global:errormsg="Script Directory $scriptdir is not present"
    Invoke-Expression "$scriptdir\SendMail.ps1"
    Error "Script failed"
    Exit
# Checking Outbox Directory
if((Test-Path $outdir) -eq 0)
 Error ("Outbox Directory $outdir is not present");
 Message ("Calling script SendMail.pl for sending mail");
    $global:errormsg="Outbox Directory $outdir is not present"
    Invoke-Expression "$scriptdir\SendMail.ps1"
    Error "Script failed"
    Exit
message "*****Beginning of module*****"
$FeedHeaderAttribs = @(0..64)
$FeedHeaderAttribs = $F_FeedAttrCfg.split("|")
$FeedAttrLength = $FeedHeaderAttribs.length
# Taking Back up of the files
# Check for previous day output.csv file and take back up of it if present
if((Test-Path $EmployeeFeedNormal) -ne 0 )
    copy-Item $EmployeeFeedNormal $EmployeeFeedNormal_bkp
    Remove-Item $EmployeeFeedNormal
if((Test-Path $ContractorFeedNormal) -ne 0 )
    copy-Item $ContractorFeedNormal $ContractorFeedNormal_bkp
    Remove-Item $ContractorFeedNormal
if((Test-Path $VendorContractorFeedNormal) -ne 0 )
    copy-Item $VendorContractorFeedNormal $VendorContractorFeedNormal_bkp
    Remove-Item $VendorContractorFeedNormal
if((Test-Path $EmployeeFeedNormalwithUID) -ne 0 )
    copy-Item $EmployeeFeedNormalwithUID $EmployeeFeedNormalwithUID_bkp
    Remove-Item $EmployeeFeedNormalwithUID
if((Test-Path $ContractorFeedNormalwithUID) -ne 0 )
    copy-Item $ContractorFeedNormalwithUID $ContractorFeedNormalwithUID_bkp
    Remove-Item $ContractorFeedNormalwithUID
if((Test-Path $VendorContractorFeedNormalwithUID) -ne 0 )
    copy-Item $VendorContractorFeedNormalwithUID $VendorContractorFeedNormalwithUID_bkp
    Remove-Item $VendorContractorFeedNormalwithUID
if((Test-Path $EmployeeFeedNormalwithUIDandGUID) -ne 0 )
    copy-Item $EmployeeFeedNormalwithUIDandGUID $EmployeeFeedNormalwithUIDandGUID_bkp
    Remove-Item $EmployeeFeedNormalwithUIDandGUID
if((Test-Path $ContractorFeedNormalwithUIDandGUID) -ne 0 )
    copy-Item $ContractorFeedNormalwithUIDandGUID $ContractorFeedNormalwithUIDandGUID_bkp
    Remove-Item $ContractorFeedNormalwithUIDandGUID
if((Test-Path $VendorContractorFeedNormalwithUIDandGUID) -ne 0 )
    copy-Item $VendorContractorFeedNormalwithUIDandGUID $VendorContractorFeedNormalwithUIDandGUID_bkp
    Remove-Item $VendorContractorFeedNormalwithUIDandGUID
message "Backup of files is taken"
$hash1=@{}
for ($i=0;$i -lt $FeedAttrLength;$i++)
     $hash1.Set_Item($FeedHeaderAttribs[$i],$i)
$FeedFileHeader="employeenumber|cn|pregisteredname|givenname|pmiddlename|sn|title|telephonenumber|mobile|pager|facsimiletelephonenumber|pmaildrop|pnotesfullname|mail|pmanagerid|manager_name|manager_mail|manager|ppersontype|employeeType|pemploymentstatus|pemploymentstatus_cd|pemploymentstatusdate|pcompany|plocalorganization|pbusiness_cd|pbusiness_descr|punit_cd|punit_descr|pdepartmentid|pdepartment|pcc-cd|pcc_descr|pbuildingcode|pbuildingname|postaladdress|postalcode|l|st|c|vcid|pvendorcompanyid|pvendorcompany|pcompanydesignation|pjobcode|pdeactivationdate|pband|pleaderindicator|uid|pguid|hiredate|pstartdate|createtimestamp"
$FeedFileHeader = $FeedFileHeader -replace "employeetype","employeeType"
$FeedFileHeader = $FeedFileHeader -replace "pcc-cd","pcc_cd"
message "Filehandle for output file opened"
$FeedFileHeader | out-file $EmployeeFeedNormal -Append
$FeedFileHeader | out-file $ContractorFeedNormal -Append
$FeedFileHeader | out-file $VendorContractorFeedNormal -Append
$FeedFileHeader | out-file $EmployeeFeedNormalwithUID -Append
$FeedFileHeader | out-file $ContractorFeedNormalwithUID -Append
$FeedFileHeader | out-file $VendorContractorFeedNormalwithUID -Append
$FeedFileHeader | out-file $EmployeeFeedNormalwithUIDandGUID -Append
$FeedFileHeader | out-file $ContractorFeedNormalwithUIDandGUID -Append
$FeedFileHeader | out-file $VendorContractorFeedNormalwithUIDandGUID -Append
# Function to fetch the attributes
Function DLookUp(){
$Result=$o=$objitem=$null
$Strfilter="(&(obuseraccountcontrol=ACTIVATED)(pcompanydesignation=xxxx)(|(ppersontype=C)(ppersontype=vc)))"
$use=$ADMIN.Split("\")
$u=$use[1]
$Domain="LDAP://$Host1/ou=people,o=aexp"
$objDomain = New-Object System.DirectoryServices.DirectoryEntry $Domain,$u,$PASSWD
$objSearcher = New-Object System.DirectoryServices.DirectorySearcher
$objSearcher.SearchRoot = $objDomain
$objSearcher.PageSize = 1000
$objSearcher.Filter = $strFilter
$objSearcher.SearchScope = "Subtree"
$colPropList=@("employeenumber","cn","pregisteredname","givenname","pmiddlename","sn","title","telephonenumber","mobile","pager","facsimiletelephonenumber","pmaildrop","pnotesfullname","mail","pmanagerid","manager","ppersontype","employeeType","pemploymentstatus","pemploymentstatuscd","pemploymentstatusdate","pcompany","plocalorganization","pbusinesscd","pbusinessdescr","punitcd","punitdescr","pdepartmentid","pdepartment","pcc-cd","pccdescr","pbuildingcode","pbuildingname","postaladdress","postalcode","l","st","c","vcid","pvendorcompanyid","pvendorcompany","pcompanydesignation","pjobcode","pdeactivationdate","pband","pleaderindicator","uid","pguid","hiredate","pstartdate","createtimestamp"");
foreach ($i in $colPropList){$a=$objSearcher.PropertiesToLoad.Add($i)}
$colResults = $objSearcher.FindAll()
$objItem = $Colresults.Properties
if ($objItem -eq $null) {
       $result = "NoMatch"
    else {
        $result = $objItem
    return $result
    $objSearcher.Dispose()
message "Querying LDAP started"
$dObj = DLookup "obuseraccountcontrol" "DEACTIVATED"
$GlobalCount=0
$ProcessedProfiles=0
$LogCounter=0
    $LineArray=@(0..64)
    $OutputArr=@(0..64)
    $entryn=@(0..2)
foreach($entry in $dObj)
 $GlobalCount=$GlobalCount+1
 $ProcessedProfiles=10000*$LogCounter
 if ( $GlobalCount -eq ($ProcessedProfiles+1) ){
          message "Processed $ProcessedProfiles profiles so far"
          $LogCounter = $LogCounter+1
    $pmanagerid=$entry.Item("pmanagerid")
 $manager=$entry.Item("manager")
 $manager_name=""
 $manager_mail=""
if($manager)
 $TempEhash=$manager.split(",")
 $ehashval1=$TempEhash[0]
 if(($ehashval1.IndexOf("pehash=") -eq 0) -or ($ehashval1.IndexOf("cn=") -eq 0))
  $ehashval2=$ehashval1.split("=")
  $attr=$ehashval2[0]
  $val=$ehashval2[1]
        $man = Get-ADuser -Server $HOST1 -Credential $Credential -Filter {$attr -eq $val} -searchbase $searchbase -Properties cn,mail
        if($man -ne $null)
            $manager_name=$man.cn
            $manager_mail=$man.mail
    for ($i=0;$i -lt $FeedAttrLength;$i++)
  if($FeedHeaderAttribs[$i] -eq "manager_name")
   $LineArray[$i]=$manager_name
  elseif($FeedHeaderAttribs[$i] -eq "manager_mail")
   $LineArray[$i]=$manager_mail  
  elseif ($FeedHeaderAttribs[$i] -eq "pbusinesscd" )
            $LineArray[$i]=""
        elseif ($FeedHeaderAttribs[$i] -eq "punitcd" )
            $LineArray[$i]=""
        elseif ($FeedHeaderAttribs[$i] -eq "punitdescr" )
            $LineArray[$i]=""
        elseif ($FeedHeaderAttribs[$i] -eq "pbusinessdescr" )
            $LineArray[$i]=""
        else
      $Record=$entry.Item($FeedHeaderAttribs[$i])
      $Record=$Record -replace "`n$",""
      $Record=$Record -replace "`n",""
      $Record=$Record -replace "`r",""
      $Record=$Record -replace "%{1,}","%%"
         $LineArray[$i]=$Record
    for ($j=0;$j -lt $FeedAttrLength;$j++)
     $NameAttr=$FeedHeaderAttribs[$j]
     $NumberAttr=$hash1.Get_Item($NameAttr)
     if ( (($NumberAttr -ne "") -and ($NumberAttr -ne "null")) -or $NumberAttr -eq 0 )
            if ($NameAttr -eq "uid")
                $l=$j
                $uid=$LineArray[$NumberAttr]
                $OutputArr[$j]=""
            elseif ($NameAttr -eq "pguid")
                $m=$j
                $guid=$LineArray[$NumberAttr]
                $OutputArr[$j]=""
            elseif ($NameAttr -eq "ppersontype")
                $p=$j;
                $OutputArr[$j]=$LineArray[$NumberAttr]
            else
                $OutputArr[$j]=$LineArray[$NumberAttr]
     else
            $OutputArr[$j] = ""
    for ($i=0;$i -lt $FeedAttrLength;$i++)
        if($OutputArr[$i] -eq "" -or $OutputArr[$i] -eq "null")
             $OutputArr[$i]=""
        else
             $OutputArr[$i] = $OutputArr[$i] -replace "`n"," "
    for ($x=0;$x -lt 3;$x++)
        $ent=""
        if ($x -eq 1)
            $OutputArr[$l]=$uid
        if ($x -eq 2)
            $OutputArr[$m]=$guid
        for ($y=0;$y -lt $FeedAttrLength;$y++)
            if($y -eq $FeedAttrLength -1)
               $ent=$ent+"`""+$OutputArr[$y]+"`""
            else
               $ent=$ent+"`""+$OutputArr[$y]+"`""+"|"
        $entryn[$x]=$ent
    #$entryn[0] = $entryn[0] -replace "`r",""
    #$entryn[1] = $entryn[1] -replace "`r",""
    #$entryn[2] = $entryn[2] -replace "`r",""
    if ($OutputArr[$p] -eq "E")
        $entryn[0] | out-file $EmployeeFeedNormal -Append
        $entryn[1] | out-file $EmployeeFeedNormalwithUID -Append
        $entryn[2] | out-file $EmployeeFeedNormalwithUIDandGUID -Append
    elseif ($OutputArr[$p] -eq "C")
        $entryn[0] | out-file $ContractorFeedNormal -Append
        $entryn[1] | out-file $ContractorFeedNormalwithUID -Append
        $entryn[2] | out-file $ContractorFeedNormalwithUIDandGUID -Append
    elseif ($OutputArr[$p] -eq "VC")
        $entryn[0] | out-file $VendorContractorFeedNormal -Append
        $entryn[1] | out-file $VendorContractorFeedNormalwithUID -Append
        $entryn[2] | out-file $VendorContractorFeedNormalwithUIDandGUID -Append
Message "Total $GlobalCount records were processed"
Message "Script ActivatedGeneralFeed.ps1 executed successfully"
Pradeep