джоба есть

backend/Tnsu.ApprovalRoute.Infrastructure/SharePoint/ISharePointListProvisioner.cs

@@ -0,0 +1,27 @@
+namespace Tnsu.ApprovalRoute.Infrastructure.SharePoint;
+
+/// <summary>Созданный список: серверный относительный url (он же ListId) и Title.</summary>
+public sealed record ProvisionedList(string ListId, string Title);
+
+/// <summary>
+/// Создание следующей пары списков серии в SharePoint («&lt;Форма&gt; &lt;N&gt; — данные»
+/// + «&lt;Форма&gt; &lt;N&gt; — согласование») дублированием текущей пары.
+///
+/// Интерфейс живёт в Infrastructure, а не в Application, потому что Application уже
+/// ссылается на Infrastructure (так же устроен <see cref="ISharePointClient"/>) —
+/// обратная ссылка замкнула бы проекты в кольцо.
+/// </summary>
+public interface ISharePointListProvisioner
+{
+    /// <summary>
+    /// Создать пару списков с номером <paramref name="number"/>, скопировав структуру
+    /// со списка <paramref name="sourceDataListId"/>. Возвращает созданный список ДАННЫХ
+    /// (список согласования создаётся тем же вызовом, но наружу не отдаётся — его
+    /// находят по конвенции имени).
+    /// </summary>
+    Task<ProvisionedList> CreateNextListPairAsync(
+        string siteUrl,
+        string sourceDataListId,
+        int number,
+        CancellationToken cancellationToken);
+}

backend/Tnsu.ApprovalRoute.Infrastructure/SharePoint/ListTitleConvention.cs

@@ -0,0 +1,54 @@
+using System.Text.RegularExpressions;
+
+namespace Tnsu.ApprovalRoute.Infrastructure.SharePoint;
+
+/// <summary>
+/// Конвенция имён списков заявок: «&lt;Форма&gt; &lt;N&gt; — данные» и парный ему
+/// «&lt;Форма&gt; &lt;N&gt; — согласование».
+///
+/// Третья копия одного и того же соглашения — оно же в провижинере request-portal
+/// (provisioning/Provision-Lists.ps1, Get-NumberedListTitle) и в самом портале
+/// (shared/listTitles.ts). Держать в одном месте не получается: три разных runtime.
+/// Меняя здесь, менять и там.
+///
+/// Номер стоит ПЕРЕД суффиксом, потому что имя списка согласования и портал, и
+/// админка выводят из имени списка данных регексом, привязанным к концу строки.
+/// </summary>
+internal static class ListTitleConvention
+{
+    private const string DataSuffix = "данные";
+    private const string ApprovalSuffix = "согласование";
+
+    private static readonly Regex TitlePattern = new(
+        @"^(?<base>.+?)\s*—\s*(?<suffix>данные|согласование)\s*$",
+        RegexOptions.Compiled);
+
+    private static readonly Regex TrailingNumber = new(@"\s+\d+$", RegexOptions.Compiled);
+
+    /// <summary>
+    /// Имя того же списка с номером <paramref name="number"/>. Уже имеющийся номер
+    /// заменяется, а не дописывается вторым.
+    /// </summary>
+    public static string WithNumber(string title, int number)
+    {
+        var match = TitlePattern.Match(title);
+        if (!match.Success)
+            throw new InvalidOperationException(
+                $"Имя списка «{title}» не по конвенции «<Форма> — данные|согласование» — номер поставить некуда.");
+
+        var baseName = TrailingNumber.Replace(match.Groups["base"].Value, string.Empty);
+        return $"{baseName} {number} — {match.Groups["suffix"].Value}";
+    }
+
+    /// <summary>
+    /// Имя парного списка согласования по имени списка данных (номер сохраняется).
+    /// null — имя не по конвенции либо это не список данных.
+    /// </summary>
+    public static string? ToApprovalTitle(string dataListTitle)
+    {
+        var match = TitlePattern.Match(dataListTitle);
+        if (!match.Success || match.Groups["suffix"].Value != DataSuffix) return null;
+
+        return $"{match.Groups["base"].Value} — {ApprovalSuffix}";
+    }
+}

backend/Tnsu.ApprovalRoute.Infrastructure/SharePoint/SharePointClient.cs

@@ -7,11 +7,45 @@ using Microsoft.Extensions.Options;
 
 namespace Tnsu.ApprovalRoute.Infrastructure.SharePoint;
 
+/// <summary>Список SharePoint: Id нужен для операций над колонками, url — как ссылка на список.</summary>
+public sealed record SharePointListInfo(Guid Id, string Title, string ServerRelativeUrl, int ItemCount);
+
+/// <summary>Колонка списка в виде её SchemaXml — в таком виде её можно создать в другом списке.</summary>
+public sealed record SharePointFieldSchema(string InternalName, string SchemaXml);
+
 public interface ISharePointClient
 {
+    /// <summary>Список по серверному относительному url. null — списка нет.</summary>
+    Task<SharePointListInfo?> GetListByUrlAsync(
+        string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken);
+
+    /// <summary>Список по заголовку. null — списка нет.</summary>
+    Task<SharePointListInfo?> GetListByTitleAsync(
+        string siteUrl, string listTitle, CancellationToken cancellationToken);
+
+    /// <summary>
+    /// Пользовательские колонки списка — те, что нужно повторить в дубле. Системные
+    /// (унаследованные от базового типа, скрытые, только для чтения) отфильтрованы:
+    /// они появляются в новом списке сами.
+    /// </summary>
+    Task<IReadOnlyList<SharePointFieldSchema>> GetCustomFieldsAsync(
+        string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken);
+
+    /// <summary>Создать пустой список (GenericList с версионированием) и вернуть его.</summary>
+    Task<SharePointListInfo> CreateListAsync(string siteUrl, string title, CancellationToken cancellationToken);
+
+    /// <summary>Создать колонку в списке из её SchemaXml.</summary>
+    Task AddFieldFromXmlAsync(string siteUrl, Guid listId, string schemaXml, CancellationToken cancellationToken);
+
     /// <summary>Заголовок списка по его серверному относительному URL (см. RequestType.ListId).</summary>
     Task<string?> GetListTitleAsync(string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken);
 
+    /// <summary>
+    /// Число элементов в списке (ItemCount самого списка, без выгрузки элементов) —
+    /// по нему решается, не пора ли заводить следующий список серии.
+    /// </summary>
+    Task<int?> GetItemCountAsync(string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken);
+
     /// <summary>Элементы списка данных, найденного по серверному относительному URL.</summary>
     Task<IReadOnlyList<JsonElement>> GetItemsByListUrlAsync(
         string siteUrl, string listServerRelativeUrl, string odataQuery, CancellationToken cancellationToken);
@@ -50,6 +84,105 @@ public sealed class SharePointClient(
         return json.TryGetProperty("Title", out var title) ? title.GetString() : null;
     }
 
+    public Task<SharePointListInfo?> GetListByUrlAsync(
+        string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken) =>
+        GetListInfoAsync(
+            siteUrl,
+            $"{siteUrl.TrimEnd('/')}/_api/web/getList('{Escape(listServerRelativeUrl)}')",
+            cancellationToken);
+
+    public Task<SharePointListInfo?> GetListByTitleAsync(
+        string siteUrl, string listTitle, CancellationToken cancellationToken) =>
+        GetListInfoAsync(
+            siteUrl,
+            $"{siteUrl.TrimEnd('/')}/_api/web/lists/getByTitle('{Escape(listTitle)}')",
+            cancellationToken);
+
+    private async Task<SharePointListInfo?> GetListInfoAsync(
+        string siteUrl, string listUrl, CancellationToken cancellationToken)
+    {
+        var url = $"{listUrl}?$select=Id,Title,ItemCount,RootFolder/ServerRelativeUrl&$expand=RootFolder";
+        var json = await TryGetAsync(siteUrl, url, cancellationToken);
+        if (json is null) return null;
+
+        var value = json.Value;
+        var serverRelativeUrl = value.TryGetProperty("RootFolder", out var rootFolder)
+                                && rootFolder.TryGetProperty("ServerRelativeUrl", out var relative)
+            ? relative.GetString()
+            : null;
+
+        if (serverRelativeUrl is null) return null;
+
+        return new SharePointListInfo(
+            value.GetProperty("Id").GetGuid(),
+            value.GetProperty("Title").GetString() ?? string.Empty,
+            serverRelativeUrl,
+            value.TryGetProperty("ItemCount", out var count) && count.TryGetInt32(out var items) ? items : 0);
+    }
+
+    public async Task<IReadOnlyList<SharePointFieldSchema>> GetCustomFieldsAsync(
+        string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken)
+    {
+        // FromBaseType отсеивает колонки базового типа (Title, Author, Created …) —
+        // они есть в любом новом списке. Hidden/ReadOnlyField — служебные, их создать
+        // всё равно нельзя. Фильтр в OData, а не в C#, чтобы не тащить лишнее по сети.
+        var url = $"{siteUrl.TrimEnd('/')}/_api/web/getList('{Escape(listServerRelativeUrl)}')/fields" +
+                  "?$select=InternalName,SchemaXml,FromBaseType,Hidden,ReadOnlyField" +
+                  "&$filter=Hidden eq false and ReadOnlyField eq false and FromBaseType eq false";
+
+        var json = await GetAsync(siteUrl, url, cancellationToken);
+        var rows = json.TryGetProperty("value", out var value) && value.ValueKind == JsonValueKind.Array
+            ? value.EnumerateArray()
+            : json.EnumerateArray();
+
+        var fields = new List<SharePointFieldSchema>();
+        foreach (var row in rows)
+        {
+            var internalName = row.TryGetProperty("InternalName", out var name) ? name.GetString() : null;
+            var schemaXml = row.TryGetProperty("SchemaXml", out var schema) ? schema.GetString() : null;
+            if (internalName is null || schemaXml is null) continue;
+
+            fields.Add(new SharePointFieldSchema(internalName, schemaXml));
+        }
+
+        return fields;
+    }
+
+    public async Task<SharePointListInfo> CreateListAsync(
+        string siteUrl, string title, CancellationToken cancellationToken)
+    {
+        // BaseTemplate 100 — GenericList, как -Template GenericList у провижинера.
+        await PostAsync(
+            siteUrl,
+            $"{siteUrl.TrimEnd('/')}/_api/web/lists",
+            JsonSerializer.Serialize(new { Title = title, BaseTemplate = 100, EnableVersioning = true }),
+            cancellationToken);
+
+        // Ответ POST'а не отдаёт RootFolder, а нам нужен серверный относительный url —
+        // дочитываем список отдельным запросом.
+        return await GetListByTitleAsync(siteUrl, title, cancellationToken)
+               ?? throw new InvalidOperationException($"Список «{title}» создан, но не читается обратно.");
+    }
+
+    public Task AddFieldFromXmlAsync(
+        string siteUrl, Guid listId, string schemaXml, CancellationToken cancellationToken) =>
+        PostAsync(
+            siteUrl,
+            $"{siteUrl.TrimEnd('/')}/_api/web/lists(guid'{listId}')/fields/createfieldasxml",
+            // Options = 8 (AddFieldInternalNameHint): SharePoint обязан сохранить
+            // InternalName из SchemaXml, а не сгенерировать свой. К колонкам обращается
+            // код портала именно по внутреннему имени, так что это не косметика.
+            JsonSerializer.Serialize(new { parameters = new { SchemaXml = schemaXml, Options = 8 } }),
+            cancellationToken);
+
+    public async Task<int?> GetItemCountAsync(
+        string siteUrl, string listServerRelativeUrl, CancellationToken cancellationToken)
+    {
+        var url = $"{siteUrl.TrimEnd('/')}/_api/web/getList('{Escape(listServerRelativeUrl)}')?$select=ItemCount";
+        var json = await GetAsync(siteUrl, url, cancellationToken);
+        return json.TryGetProperty("ItemCount", out var count) && count.TryGetInt32(out var value) ? value : null;
+    }
+
     public Task<IReadOnlyList<JsonElement>> GetItemsByListUrlAsync(
         string siteUrl, string listServerRelativeUrl, string odataQuery, CancellationToken cancellationToken) =>
         GetItemsAsync(
@@ -79,9 +212,26 @@ public sealed class SharePointClient(
             : [];
     }
 
-    private async Task<JsonElement> GetAsync(string siteUrl, string url, CancellationToken cancellationToken)
+    private async Task<JsonElement> GetAsync(string siteUrl, string url, CancellationToken cancellationToken) =>
+        await SendAsync(HttpMethod.Get, siteUrl, url, body: null, allowNotFound: false, cancellationToken)
+        ?? throw new InvalidOperationException($"SharePoint не вернул тело на {url}.");
+
+    /// <summary>GET, для которого «нет такого списка» — не ошибка, а null.</summary>
+    private Task<JsonElement?> TryGetAsync(string siteUrl, string url, CancellationToken cancellationToken) =>
+        SendAsync(HttpMethod.Get, siteUrl, url, body: null, allowNotFound: true, cancellationToken);
+
+    private Task PostAsync(string siteUrl, string url, string json, CancellationToken cancellationToken) =>
+        SendAsync(HttpMethod.Post, siteUrl, url, json, allowNotFound: false, cancellationToken);
+
+    private async Task<JsonElement?> SendAsync(
+        HttpMethod method,
+        string siteUrl,
+        string url,
+        string? body,
+        bool allowNotFound,
+        CancellationToken cancellationToken)
     {
-        using var request = new HttpRequestMessage(HttpMethod.Get, url);
+        using var request = new HttpRequestMessage(method, url);
         request.Headers.Authorization = new AuthenticationHeaderValue(
             "Bearer", await GetTokenAsync(siteUrl, cancellationToken));
         request.Headers.Accept.Add(new MediaTypeWithQualityHeaderValue("application/json")
@@ -89,14 +239,30 @@ public sealed class SharePointClient(
             Parameters = { new NameValueHeaderValue("odata", "nometadata") }
         });
 
+        if (body is not null)
+        {
+            request.Content = new StringContent(body);
+            // odata=nometadata и на запись: тогда в теле не нужен блок __metadata с
+            // типом сущности — SharePoint выводит тип из самого эндпоинта.
+            request.Content.Headers.ContentType = new MediaTypeHeaderValue("application/json")
+            {
+                Parameters = { new NameValueHeaderValue("odata", "nometadata") }
+            };
+        }
+
         using var response = await httpClient.SendAsync(request, cancellationToken);
-        var body = await response.Content.ReadAsStringAsync(cancellationToken);
+        var responseBody = await response.Content.ReadAsStringAsync(cancellationToken);
+
+        if (allowNotFound && response.StatusCode == System.Net.HttpStatusCode.NotFound)
+            return null;
 
         if (!response.IsSuccessStatusCode)
             throw new InvalidOperationException(
-                $"SharePoint ответил {(int)response.StatusCode} на {url}: {body}");
+                $"SharePoint ответил {(int)response.StatusCode} на {method} {url}: {responseBody}");
 
-        using var document = JsonDocument.Parse(body);
+        if (string.IsNullOrWhiteSpace(responseBody)) return null;
+
+        using var document = JsonDocument.Parse(responseBody);
         return document.RootElement.Clone();
     }
 

backend/Tnsu.ApprovalRoute.Infrastructure/SharePoint/SharePointListProvisioner.cs

@@ -0,0 +1,131 @@
+using Microsoft.Extensions.Logging;
+
+namespace Tnsu.ApprovalRoute.Infrastructure.SharePoint;
+
+/// <summary>
+/// Создаёт следующую пару списков ДУБЛИРОВАНИЕМ текущей: берёт структуру живого
+/// списка (его пользовательские колонки) и повторяет её в новом списке с
+/// номером N+1. Манифесты provisioning.json request-portal при этом не читаются —
+/// источник структуры сам SharePoint, поэтому дубль не может разойтись с тем, что
+/// реально в списке.
+///
+/// Идемпотентен: список с целевым именем переиспользуется, уже существующие колонки
+/// пропускаются. Повторный запуск после частичного сбоя дозаполняет недостающее, а
+/// не создаёт второй список.
+/// </summary>
+public sealed class SharePointListProvisioner(
+    ISharePointClient sharePoint,
+    ILogger<SharePointListProvisioner> logger) : ISharePointListProvisioner
+{
+    public async Task<ProvisionedList> CreateNextListPairAsync(
+        string siteUrl,
+        string sourceDataListId,
+        int number,
+        CancellationToken cancellationToken)
+    {
+        var sourceData = await sharePoint.GetListByUrlAsync(siteUrl, sourceDataListId, cancellationToken)
+            ?? throw new InvalidOperationException(
+                $"Исходный список {sourceDataListId} не найден на {siteUrl} — дублировать нечего.");
+
+        var newData = await CloneAsync(
+            siteUrl,
+            sourceData,
+            ListTitleConvention.WithNumber(sourceData.Title, number),
+            retarget: null,
+            cancellationToken);
+
+        await CloneApprovalPairAsync(siteUrl, sourceData, newData, number, cancellationToken);
+
+        return new ProvisionedList(newData.ServerRelativeUrl, newData.Title);
+    }
+
+    /// <summary>
+    /// Дублирует парный список согласования. Его не на что сослаться, кроме имени:
+    /// в БД хранится ссылка только на список данных, а согласование ищется по
+    /// конвенции — так же, как это делают портал и админка.
+    /// </summary>
+    private async Task CloneApprovalPairAsync(
+        string siteUrl,
+        SharePointListInfo sourceData,
+        SharePointListInfo newData,
+        int number,
+        CancellationToken cancellationToken)
+    {
+        var sourceApprovalTitle = ListTitleConvention.ToApprovalTitle(sourceData.Title);
+        if (sourceApprovalTitle is null)
+        {
+            logger.LogWarning(
+                "Список «{Title}» не по конвенции «… — данные» — парный список согласования не дублируется.",
+                sourceData.Title);
+            return;
+        }
+
+        var sourceApproval = await sharePoint.GetListByTitleAsync(siteUrl, sourceApprovalTitle, cancellationToken);
+        if (sourceApproval is null)
+        {
+            logger.LogWarning(
+                "Список согласования «{Title}» не найден — дублируется только список данных.",
+                sourceApprovalTitle);
+            return;
+        }
+
+        await CloneAsync(
+            siteUrl,
+            sourceApproval,
+            ListTitleConvention.WithNumber(sourceApproval.Title, number),
+            // Ticket списка согласования смотрит на список данных — в дубле он должен
+            // смотреть на НОВЫЙ список данных, иначе строки маршрута новых заявок
+            // будут ссылаться в старый список.
+            retarget: (sourceData.Id, newData.Id),
+            cancellationToken);
+    }
+
+    private async Task<SharePointListInfo> CloneAsync(
+        string siteUrl,
+        SharePointListInfo source,
+        string newTitle,
+        (Guid From, Guid To)? retarget,
+        CancellationToken cancellationToken)
+    {
+        var existing = await sharePoint.GetListByTitleAsync(siteUrl, newTitle, cancellationToken);
+        var target = existing ?? await sharePoint.CreateListAsync(siteUrl, newTitle, cancellationToken);
+
+        logger.LogInformation(
+            existing is null ? "Создан список «{Title}»." : "Список «{Title}» уже существует — дозаполняю колонки.",
+            newTitle);
+
+        var sourceFields = await sharePoint.GetCustomFieldsAsync(siteUrl, source.ServerRelativeUrl, cancellationToken);
+        var targetFields = await sharePoint.GetCustomFieldsAsync(siteUrl, target.ServerRelativeUrl, cancellationToken);
+        var alreadyThere = targetFields.Select(x => x.InternalName).ToHashSet(StringComparer.OrdinalIgnoreCase);
+
+        foreach (var field in sourceFields)
+        {
+            if (alreadyThere.Contains(field.InternalName)) continue;
+
+            var schemaXml = retarget is null
+                ? field.SchemaXml
+                : RetargetLookup(field.SchemaXml, retarget.Value.From, retarget.Value.To);
+
+            await sharePoint.AddFieldFromXmlAsync(siteUrl, target.Id, schemaXml, cancellationToken);
+            logger.LogInformation("  колонка {InternalName} → «{Title}»", field.InternalName, newTitle);
+        }
+
+        return target;
+    }
+
+    /// <summary>
+    /// Перенацеливает Lookup на новый список данных.
+    ///
+    /// Целевой список Lookup хранит в SchemaXml GUID'ом (атрибут List), поэтому
+    /// подменяем именно GUID. Подменяем ТОЛЬКО ссылки на исходный список данных:
+    /// кросс-формные lookup'ы (например, «организация рабочего места» ссылается на
+    /// список «приема на работу») должны и дальше смотреть на список ЧУЖОЙ формы.
+    /// </summary>
+    private static string RetargetLookup(string schemaXml, Guid from, Guid to)
+    {
+        var fromText = from.ToString("D");
+        return schemaXml.Contains(fromText, StringComparison.OrdinalIgnoreCase)
+            ? schemaXml.Replace(fromText, to.ToString("D"), StringComparison.OrdinalIgnoreCase)
+            : schemaXml;
+    }
+}