mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 18:43:51 +00:00
fix(serial): COM10 и выше не открывались под Windows
CreateFile резолвит короткое имя порта только для COM1..COM9 — начиная с COM10 нужна форма \\.\COM10. У USB-переходников номер за десяток заезжает легко (воткнули пару кабелей — система выдала COM11), и оператор получал «не удалось открыть» без всякого объяснения: имя уходило в CreateFile как есть. SerOpen под Windows пропускает имя через новую чистую SerWinDeviceName: COM1..COM9 остаются короткими (там и так работало, менять поведение незачем), COM10 и выше получают префикс, уже полная форма не удваивается, всё, что не похоже на COM<число> (пути Unix, COM3: с двоеточием), не трогается вовсе. Функция считает одинаково на всех платформах и потому проверяется стендом на Linux — 11 проверок в test/serial (итого 47). Подсказка под полем ввода на Windows уже называет обе формы: «COM3, \\.\COM12». Co-Authored-By: Claude Opus 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_01Bkwwyj7xVRrqnSVEseTRfV
This commit is contained in:
@@ -12,6 +12,12 @@ test/serial/run.sh
|
||||
|
||||
* **Открытие**: несуществующий порт даёт `SER_INVALID_HANDLE` (а не ноль и не
|
||||
случайное число), живой — годный хендл.
|
||||
* ★**Имя устройства для Windows**: `COM10` и выше `CreateFile` открывает только
|
||||
в форме `\\.\COM10` — короткое имя система резолвит лишь для `COM1..COM9`, а у
|
||||
USB-переходников номер за десяток заезжает легко. Правило чистое
|
||||
(`SerWinDeviceName`), поэтому проверяется и на Linux: короткие имена не
|
||||
трогаются, длинные получают префикс, уже полная форма не удваивается, пути
|
||||
Unix не задеваются.
|
||||
* **termios обратным чтением**: скорость, стоп-биты, `CREAD`/`CLOCAL`, сырой
|
||||
режим (нет `ICANON`, `ECHO`, `OPOST`).
|
||||
* ★**Аппаратный поток `CRTSCTS` не включается сам** — только по явной просьбе.
|
||||
|
||||
@@ -120,6 +120,33 @@ begin
|
||||
fpClose(Master);
|
||||
end;
|
||||
|
||||
// ── A2. Имя устройства для Windows ─────────────────────────────────────────
|
||||
procedure TestWinName;
|
||||
// ★COM10 и выше CreateFile открывает ТОЛЬКО в форме \\.\COM10 — короткое имя
|
||||
// система резолвит лишь для COM1..COM9, а у USB-переходников номер за десяток
|
||||
// заезжает легко. Функция чистая, поэтому проверяется и на Linux.
|
||||
begin
|
||||
WriteLn('A2. Имя устройства для Windows (COM10 и выше)');
|
||||
Check('COM1 остаётся коротким', SerWinDeviceName('COM1') = 'COM1');
|
||||
Check('COM9 остаётся коротким', SerWinDeviceName('COM9') = 'COM9');
|
||||
Check('★COM10 получает префикс',
|
||||
SerWinDeviceName('COM10') = '\\.\COM10', SerWinDeviceName('COM10'));
|
||||
Check('COM123 получает префикс',
|
||||
SerWinDeviceName('COM123') = '\\.\COM123', SerWinDeviceName('COM123'));
|
||||
Check('строчные буквы тоже узнаются',
|
||||
SerWinDeviceName('com12') = '\\.\com12', SerWinDeviceName('com12'));
|
||||
Check('пробелы вокруг имени не мешают',
|
||||
SerWinDeviceName(' COM12 ') = '\\.\COM12', SerWinDeviceName(' COM12 '));
|
||||
Check('уже полная форма не удваивается',
|
||||
SerWinDeviceName('\\.\COM12') = '\\.\COM12');
|
||||
Check('путь Unix не трогаем',
|
||||
SerWinDeviceName('/dev/ttyUSB0') = '/dev/ttyUSB0');
|
||||
Check('/dev/cu.* не трогаем',
|
||||
SerWinDeviceName('/dev/cu.usbserial-A1') = '/dev/cu.usbserial-A1');
|
||||
Check('нечисловой хвост не трогаем', SerWinDeviceName('COM3:') = 'COM3:');
|
||||
Check('пустое имя не ломает', SerWinDeviceName('') = '');
|
||||
end;
|
||||
|
||||
// ── B. Настройка порта ──────────────────────────────────────────────────────
|
||||
procedure TestParams;
|
||||
var
|
||||
@@ -320,6 +347,7 @@ begin
|
||||
Failed := 0;
|
||||
WriteLn('=== Стенд последовательного порта (SerialPort.pas на pty) ===');
|
||||
TestOpen;
|
||||
TestWinName;
|
||||
TestParams;
|
||||
TestIO;
|
||||
TestCatThrough;
|
||||
|
||||
Reference in New Issue
Block a user