джоба есть

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;
+    }
+}