fix(serial): ноль — законный дескриптор, а имя порта нормализуем целиком

Два замечания по обёртке, оба верные.

1. SerValid считал ноль невалидным на всех платформах. На Unix дескриптор 0 —
   обычный номер: если стандартный ввод закрыт (демон, запуск из службы),
   fpOpen отдаст именно его. Порт при этом объявлялся неоткрытым И оставался
   незакрытым — SerClose смотрит на ту же проверку. Относительно прежней
   unix-проверки `h < 0` это была регрессия. Теперь признак неудачи ровно один
   и на всех платформах — SER_INVALID_HANDLE; ноль, которым RTL под Windows
   сообщает об отказе, переводится в него внутри SerOpen (как и было).

2. SerWinDeviceName обрезала пробелы только по пути COM10+. Для ' COM3 ' и
   ' \\.\COM12 ' возвращалось исходное имя с пробелами, а CreateFile их не
   прощает: оператор, скопировавший имя с хвостовым пробелом, получал «не
   удалось открыть» на ровном месте. Теперь опознанное имя возвращается
   нормализованным; неопознанное (путь на Unix, COM3: с двоеточием) — по-прежнему
   без единого изменения, трогать чужой путь мы не вправе.

Стенд: 52 проверки. Новая часть C2 закрывает стандартный ввод, открывает порт
как дескриптор 0 и гоняет через него байты — ★негативный контроль: с прежним
`and (Handle <> 0)` она падает двумя проверками. Плюс нормализация пробелов у
короткого имени и у полной формы.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01Bkwwyj7xVRrqnSVEseTRfV

test/serial/serialtest.pas

@@ -137,6 +137,13 @@ begin
         SerWinDeviceName('com12') = '\\.\com12', SerWinDeviceName('com12'));
   Check('пробелы вокруг имени не мешают',
         SerWinDeviceName('  COM12  ') = '\\.\COM12', SerWinDeviceName('  COM12  '));
+  // ★Пробелы CreateFile не прощает и коротким именам тоже: опознанное имя
+  // отдаём нормализованным, а не «как ввели».
+  Check('пробелы снимаются и у короткого имени',
+        SerWinDeviceName('  COM3  ') = 'COM3', '[' + SerWinDeviceName('  COM3  ') + ']');
+  Check('пробелы снимаются и у полной формы',
+        SerWinDeviceName('  \\.\COM12  ') = '\\.\COM12',
+        '[' + SerWinDeviceName('  \\.\COM12  ') + ']');
   Check('уже полная форма не удваивается',
         SerWinDeviceName('\\.\COM12') = '\\.\COM12');
   Check('путь Unix не трогаем',
@@ -295,6 +302,44 @@ begin
   fpClose(Master);
 end;
 
+// ── C2. Законный дескриптор 0 ──────────────────────────────────────────────
+procedure TestFdZero;
+// ★Регрессия, которую легко внести и невозможно заметить на рабочем столе: на
+// Unix дескриптор 0 — обычный номер, и если стандартный ввод закрыт (демон,
+// запуск из службы), порт откроется именно как 0. Проверка вида «хендл ноль =
+// ошибка» тогда не только теряет рабочий порт, но и оставляет дескриптор
+// незакрытым: SerClose смотрит на ту же проверку.
+var
+  Master, H: cint;
+  Slave: string;
+  B: Byte;
+  N: LongInt;
+begin
+  WriteLn('C2. Дескриптор 0 — законный порт (стандартный ввод закрыт)');
+  if not OpenPty(Master, Slave) then
+  begin
+    Check('псевдотерминал создан', False);
+    Exit;
+  end;
+  fpClose(0);                       // освобождаем нулевой дескриптор
+  H := SerOpen(Slave);
+  if H <> 0 then
+    WriteLn('  ..   дескриптор 0 занял не порт (', H, ') — проверка ослаблена')
+  else
+    Check('порт открылся как дескриптор 0', True);
+  Check('★нулевой дескриптор считается годным', SerValid(H), IntToStr(H));
+  SerSetParams(H, 9600, 8, NoneParity, 1, []);
+  MasterWrite(Master, 'X');
+  N := SerReadTimeout(H, B, 500);
+  Check('через него идут данные', (N = 1) and (B = Ord('X')),
+        Format('n=%d b=%d', [N, B]));
+  SerClose(H);
+  fpClose(Master);
+  // Возвращаем стандартный ввод на место: иначе следующий открытый файл снова
+  // сядет на нулевой дескриптор, и это уже будет случайностью, а не проверкой.
+  fpOpen('/dev/null', O_RDONLY);
+end;
+
 // ── D. Сквозной прогон: CAT поверх обёртки ─────────────────────────────────
 procedure TestCatThrough;
 // Байты на мастере → поток CATSerial → разбор в TCATEngine → ответ обратно.
@@ -350,6 +395,7 @@ begin
   TestWinName;
   TestParams;
   TestIO;
+  TestFdZero;
   TestCatThrough;
   WriteLn;
   WriteLn(Format('Итого: %d проверок, провалено %d', [Passed + Failed, Failed]));