Tutoriel pour apprendre à partager vos indicateurs de qualité avec TFS et PowerShell

# Renseigne votre chemin assemblies 
$assembliesPath = "F:\GitHub\Powershell\tfsKit\Assemblies"
 
# Renseigne votre liste TFS assemblies
$tfsAssemblies = ("Microsoft.TeamFoundation.Client.dll","Microsoft.TeamFoundation.Build.Client.dll","Microsoft.TeamFoundation.TestManagement.Client.dll","Microsoft.TeamFoundation.WorkItemTracking.Client.dll","Microsoft.VisualStudio.Services.Client.dll","Microsoft.TeamFoundation.WorkItemTracking.Client.DataStoreLoader.dll","Microsoft.TeamFoundation.Build.Common.dll")
 
# importe assemblies
$tfsAssemblies | % { Add-Type -Path ([IO.Path]::Combine($assembliesPath, $_)) }

try
{
    $assembliesShortName = @("TeamFoundation.Client","TeamFoundation.Build.Client","TeamFoundation.TestManagement.Client","TeamFoundation.WorkItemTracking.Client","VisualStudio.Services.Client","TeamFoundation.WorkItemTracking.Client.DataStoreLoader","TeamFoundation.Build.Common")
    $assembliesShortName | % { Add-Type -Path ([IO.Path]::Combine($global:AssembliesFolder, "Microsoft.$_.dll")) }
}
catch [System.Reflection.ReflectionTypeLoadException]
{
    Write-Error $($_.Exception | Select-Object LoaderExceptions | Out-String)
}

$tfsCollectionUri = [System.Uri]"https://tfs.myprojectname.com/DefaultCollection"
 
$projectsCollection = [Microsoft.TeamFoundation.Client.TfsTeamProjectCollectionFactory]::GetTeamProjectCollection($tfsCollectionUri) # Cette méthode ne lance jamais d'exceptions
 
$projectsCollection.EnsureAuthenticated() # Cette méthode lève une exception sur un mauvais URI ou une mauvaise identification
 
if($projectsCollection.HasAuthenticated)
{
    # Liste des actions
}
else
{
    Write-Warning "you are not authenticated to $tfsCollectionUri" # Ce cas ne devrait jamais arriver vu qu'EnsureAuthenticated() lance une exception sur un mauvais URI ou une mauvaise identification
 
}

$buildServer = $projectsCollection.GetService([Microsoft.TeamFoundation.Build.Client.IBuildServer])
 
$workItemStore = $projectsCollection.GetService([Microsoft.TeamFoundation.WorkItemTracking.Client.WorkItemStore])
 
$testManagementService = $projectsCollection.GetService([Microsoft.TeamFoundation.TestManagement.Client.ITestManagementService])

$buildSpecification = $buildServer.CreateBuildDetailSpec("yourProjectName", "yourBuildName")
 
$buildSpecification.QueryOptions = "None"
$buildSpecification.InformationTypes = $null
 
$tfsBuilds = $buildServer.QueryBuilds($buildSpecification)

$buildSpecification = $buildServer.CreateBuildDetailSpec("yourProjectName", "yourBuildName")
 
$buildSpecification.BuildNumber = "yourBuildNumber"
 
$tfsBuild = $buildServer.QueryBuilds($buildSpecification)

$buildSpecification = $buildServer.CreateBuildDetailSpec("yourProjectName", "yourBuildName")
 
$buildSpecification.QueryOptions = "None"
$buildSpecification.InformationTypes = $null
 
$tfsBuilds = $buildServer.QueryBuilds($buildSpecification)
 
# by default, QueryOrder property on build specification is StartTimeAscending
$tfsLastBuildNumber = ($tfsBuilds.Builds | ? { $_.Status -ne "InProgress" } | Select-Object -Last 1).BuildNumber
 
$buildSpecification.InformationTypes = "*"
$buildSpecification.BuildNumber = $tfsLastBuildNumber
 
$tfsBuild = $buildServer.QueryBuilds($buildSpecification)

$buildErrors = [Microsoft.TeamFoundation.Build.Client.InformationNodeConverters]::GetBuildErrors($tfsBuild)               
$buildWarnings = [Microsoft.TeamFoundation.Build.Client.InformationNodeConverters]::GetBuildWarnings($tfsBuild)
 
$compilationErrors = $buildErrors | ? { $_.ErrorType -eq "Compilation" }
$compilationWarnings = $buildWarnings | ? { $_.WarningType -eq "Compilation" } 
$codeAnalysisErrors = $buildErrors | ? { $_.ErrorType -eq "StaticAnalysis" }
$codeAnalysisWarnings = $buildWarnings | ? { $_.WarningType -eq "StaticAnalysis" }

$managementService =  $tfsBuilds.Tfs.TestManagementService.GetTeamProject("yourProjectName")
 
$unitTests = $managementService.TestRuns.ByBuild($tfsBuild.Uri)
 
$codeCoverage = $managementService.CoverageAnalysisManager.QueryBuildCoverage($tfsBuild.Uri,[Microsoft.TeamFoundation.TestManagement.Client.CoverageQueryFlags]::BlockData -bor [Microsoft.TeamFoundation.TestManagement.Client.CoverageQueryFlags]::Functions -bor [Microsoft.TeamFoundation.TestManagement.Client.CoverageQueryFlags]::Modules)

if ($testLine -is [Collections.Hashtable] -or $testLine -is [Collections.Specialized.OrderedDictionary])
{
    $propertiesName = $testLine.Keys
}
elseif ($testLine -is [PSCustomObject])
{
    $propertiesName = $testLine | Get-Member -MemberType NoteProperty
}
else
{
    Throw "this method only allow PsCustomObject or Hashtable content"
}

# Écrire le début du tableau
$htmlTable += "<table>$([Environment]::NewLine)"
 
# Écrire l'en-tête du tableau
$htmlTable += "`t<tr$($TrClass)>"
 
foreach ($propertyName in $propertiesName)
{
    $htmlTable += "<th$($ThClass)>$propertyName</th>"
}
 
$htmlTable += "</tr>$([Environment]::NewLine)"
 
# Écrire les lignes du tableau
foreach ($entity in $Object)
{
    $htmlTable += "`t<tr>"
 
    foreach ($propertyName in $propertiesName)
    {
        $propertyValue = [Web.HttpUtility]::HtmlEncode($entity.$propertyName)
         
        $htmlTable += "<td>$propertyValue</td>"
    }
 
    $htmlTable += "</tr>$([Environment]::NewLine)"
}
 
# Écrire la fin du tableau
$htmlTable += "</table>"

# get email title and recipients
$subject = "Build report CI-SOAT_20170227.1"
$recipients = @{scrumMaster@soat.fr, ProductOwner@soat.fr, Architect@soat.fr, ProjectDirector@soat.fr}
$attachments= @{"C:\Example\Compilation.html", "C:\Example\UnitTests.html", "C:\Example\CodeCoverage.html"}
 
Write-Verbose "Sending email $subject to $recipients"
 
# i use System.Net.Mail.SmtpClient Object instead of Send-MailMessage function to get more controls and dispose functionnality
try
{
    # Créer des objets de messagerie et de serveur
    $message = New-Object -TypeName System.Net.Mail.MailMessage
    $smtp = New-Object -TypeName System.Net.Mail.SmtpClient($buildInfoData.BuildReports.Mail.Server)
 
    # Créer un message
    $recipients | % { $message.To.Add($_) }
    $message.Subject = $subject
    $message.From = New-Object System.Net.Mail.MailAddress($emailCredentials.UserName)
    $message.Body = $mailHtml
    $message.IsBodyHtml = $true
    $attachments | % { $message.Attachments.Add($(New-Object System.Net.Mail.Attachment $_)) }
     
    # Créer un serveur SMTP 
    $smtp = New-Object -TypeName System.Net.Mail.SmtpClient([string]$buildInfoData.BuildReports.Mail.Server)
    $smtp.Port = [int]$buildInfoData.BuildReports.Mail.Port
    $smtp.Credentials = [System.Net.ICredentialsByHost]$emailCredentials
    $smtp.EnableSsl = [bool]$buildInfoData.BuildReports.Mail.UseSsl
 
    # Envoyer le message
    $smtp.Send($message)
 
    Write-Host "Email message sent"
}
catch
{
    Write-Warning "$($_.Exception | Select Message, Source, ErrorCode, InnerException, StackTrace | Format-List | Out-String)"
}
finally
{
    Write-Verbose "Disposing Smtp Object"
    $message.Dispose()
    $smtp.Dispose()
}