Office 365. Отчет по назначенным лицензиям

Отчет

Отчет формируется консольным приложением в формате Excel (.xlsx). Отчет содержит следующую информацию о пользователях:

• Имя
• Электронная почта
• Департамент
• Разрешен ли вход
• Тип учетной записи

Вы можете запустить приложение и найти все заблокированные учетные записи, на которые назначены лицензии и уменьшить стоимость владения Office 365 удалив ненужные лицензии.

Nuget Пакеты

Приложение использует Microsoft Graph для получения данных. Значит надо добавить пакет Microsoft.Graph в проект. Исполните эту команду в Package Manager Console:

PM> Install-Package Microsoft.Graph

Также понадобится пакет Microsoft.IdentityModel.Clients.ActiveDirectory для авторизации в Microsoft Graph:

PM> Install-Package Microsoft.IdentityModel.Clients.ActiveDirectory

Последний пакет, который будет задействован - это ClosedXML для генерации Excel файла.

PM> Install-Package ClosedXML

Регистрация приложения

Для того чтобы приложение могло работать с Microsoft Graph необходимо его зарегистрировать на портале Azure. Это можно сделать, следуя инструкции Регистрация приложения с помощью конечной точки Azure AD версии 2.0.

Всего три параметра, которые необходимо знать о зарегистрированном приложении:

1. ClientId. Идентификатор приложения (APPLICATION ID) можно найти в списке всех приложений:

2. ClientSecret. Секретный ключ можно сгенерировать на странице параметров приложения:

3. Tenant Name - имя тенанта, в котором будет авторизовываться приложение {yourtenant}.microsoftonline.com.

Конфигурация приложения (app.config)

Откройте файл app.config и добавьте параметры из списка выше в секцию appSettings:

Приложение создано, его параметры сохранены в конфигурационном файле. Теперь можно приступить с генерации отчета.

Провайдер для Microsoft Graph

Создайте файл GraphProvider.cs со следующим содержимым:

using System.Configuration;
using System.Net.Http;
using System.Threading.Tasks;
using Microsoft.Graph;
using Microsoft.IdentityModel.Clients.ActiveDirectory;

namespace Zhukov.Demo.GraphLicensesReport
{
    public class GraphProvider : IAuthenticationProvider
    {
        public async Task AuthenticateRequestAsync(HttpRequestMessage request)
        {

            var token = await GetToken();
            request.Headers.Add("Authorization", "Bearer " + token);
        }

        public static async Task GetToken(string resource = @"https://graph.microsoft.com/")
        {
            var clientId = ConfigurationManager.AppSettings["ida:ClientId"];
            var clientKey = ConfigurationManager.AppSettings["ida:ClientSecret"];
            var azureDomain = ConfigurationManager.AppSettings["ida:Domain"];
            var authory = $@"https://login.microsoftonline.com/{azureDomain}";
            var creds = new ClientCredential(clientId, clientKey);
            var authContext = new AuthenticationContext(authory);
            var authResult = await authContext.AcquireTokenAsync(resource, creds);
            return authResult.AccessToken;
        }
    }
}

Этот провайдер будет использован для выполнения запросов к Microsoft Graph.

Код приложения

Приложение будет делать следующее:

1. 1. Получать информацию обо всех пользователях;
2. 2. Формировать таблицу, где строки - пользователь, а колонки - лицензии;

Код для получения списка пользователей:

// Провайдер Microsoft Graph
var provider = new GraphProvider();

// Клиент Microsoft Graph
var client = new GraphServiceClient(provider);

// Список пользователей
var users = new List();

// Постраничный запрос
IGraphServiceUsersCollectionPage items = null;

// Наполнение списка сотрудников
while (items == null || items.NextPageRequest != null)
{
    // Запрос к Microsoft Graph
    var itemsRequest = items?.NextPageRequest ?? client
                            .Users
                            .Request()
                            .OrderBy("displayName")
                            .Select("displayName, mail, department, assignedLicenses, accountEnabled, userType")
                            .Top(100);

    // Получаем пользователей
    items = itemsRequest
        .GetAsync()
        .GetAwaiter()
        .GetResult();
                
    // Добавляем пользователей в список
    users.AddRange(items);
}

Свойство AssignedLicenses содержит информацию о назначенных лицензиях. Но так нет никакой информации, воспринимаемой человеком - только идентификаторы SKU (Stock Keeping Unit).

SKU

Таблица содержит информацию о кодах SKU в Office 365:

Отчет

Последняя часть приложения - генерация отчета:

// Новая книга Excel
using (var workbook = new XLWorkbook())
{
    // Добавляем вкладку
    using (var worksheet = workbook.Worksheets.Add("Назначенные лицензии"))
    {
        // номер строки
        var r = 1;
        // Заголовок таблицы -->
        worksheet.Cell(r, 1).Value = "Имя";
        worksheet.Cell(r, 2).Value = "Тип учетной записи";
        worksheet.Cell(r, 3).Value = "Электронная почта";
        worksheet.Cell(r, 4).Value = "Департамент";
        worksheet.Cell(r, 5).Value = "Разрешен ли вход";

        // номер колонки
        var c = 6;
        foreach (var sku in SKUs)
        {
            worksheet.Cell(r, c).Value = sku.Value;
            c = c + 1;
        }
        // <-- Заголовок таблицы


        // переходим к следующей строке
        r = r + 1;

        foreach (var user in users)
        {
            // Информация о пользователе
            worksheet.Cell(r, 1).Value = user.DisplayName;
            worksheet.Cell(r, 2).Value = user.UserType;
            worksheet.Cell(r, 3).Value = user.Mail;
            worksheet.Cell(r, 4).Value = user.Department;
            worksheet.Cell(r, 5).Value = user.AccountEnabled == false ? "Заблокирован" : string.Empty;

            // go to 6th column (колонки с 1 по 5 для информации о пользователе)
            c = 6;

            foreach (var sku in SKUs)
            {
                // назначена ли лицензия текущему пользователю
                var assignedFlag = user
                    .AssignedLicenses
                    .Any(x => x.SkuId == sku.Key);

                worksheet.Cell(r, c).Value = assignedFlag ? 1 : 0;

                // переходим к следующей колонке
                c = c + 1;
            }

            // переходим к следующей строке
            r = r + 1;
        }

        // создаем таблицу -->
        var table = worksheet.Range(1, 1, r - 1, 5 + SKUs.Count).CreateTable();
        table.Theme = XLTableTheme.TableStyleMedium2;
        // <-- создаем таблицу

        // увеличиваем ширину колонок
        worksheet.Columns().AdjustToContents(5, 40);

        // фиксируем первые две колонки
        worksheet.SheetView.FreezeColumns(2);
    }

    // сохраняем отчет
    workbook.SaveAs("AssignedLicesesReport.xlsx");
}

Вот и всё!

Исходные коды

Исходные коды доступны тут: https://code.msdn.microsoft.com/Office-365-Assigned-8c2eb22e.