Контроллер псевдодиска на MicroSD на шину МПИ, ДВК-1; ДВК-2; ДВК-3; ДВК-4; Электроника-60; Электроника 60М; Славутич ПК-1; УКНЦ Опции

[SuperMax]

Совместными усилиями разработан контроллер псевдодиска на MicroSD

Данный контроллер предназначен для современной и надежной замены КЖД (DW) в компьютерах серии ДВК-1; ДВК-2; ДВК-3; ДВК-4; Электроника-60; Электроника 60М; Славутич ПК-1 и им аналогичные PDP-11 совместимые.

Фото контроллера на МПИ:
v1.00

v1.01


v2.00


Фото контроллера на QBUS:
v1.00



Также разработана версия контроллера для УКНЦ
v1.00


v1.01



v2


Контроллер псевдодиска на MicroSD на шину МПИ: особенности версии для УКНЦ




Технические характеристики:

• Эмуляция 8ми дисков объемом 65534 блока для корректной работы RT-11; таким образом общая используемая емкость накопителя 262136К;
• Контроллер поддерживает MicroSD- и MicroSDHC; Карточки SDXC нашим устройством не поддерживаются;
• Поддерживается возможность установки 2х контроллеров с разными адресами;

Инструкция по эксплуатации
Предлагаемый контроллер эмулирует до восьми дисковых устройств AZ на одной микроSD-карточке. Каждый эмулируемый диск (псевдодиск) представлен на карточке файлом с точки зрения PC, поэтому не возникает никаких вопросов в размещении псевдодисков на носителе большого объема - просто помещаем карточку в кардридер, подключаем к PC, копируем на карточку файлы нужного объема (и с нужным содержимым), переставляем ее в контроллер, и всё! Более того, поработав с карточкой на ДВК, можно извлечь ее из контроллера, снова поместить в кардридер и скопировать наработанные файл-образы дисков на PC, где с ними можно работать любыми средствами - например, подключить к эмулятору, заархивировать и сложить куда-нибудь на хранение, отправить в конференцию, и т.п. Также не представляет особого труда скопировать какой-то материал, найденный в сети, на карточку, переставить ее в контроллер и использовать этот материал на ДВК/УКНЦ.

Контроллер занимает на МПИ адреса 177220-177226 (словные, байтовый доступ запрещен). 177220 - регистр команд и состояния (РКС, CSR), 177222 - регистр данных, 177224 и 177226 - регистры (однословные ПЗУ) начальных загрузчиков.

Контроллер поддерживает MicroSD- и MicroSDHC-карточки. Мы испытывали SDHC-карты разных производителей и объемов, разница наблюдалась только в скорости записи на псевдодиск. С трудом удалось найти древнюю микро-SD (не HC) на 512М, да, пишет медленно, но работает и скорость чтения почти такая же, как и у SDHC. Карточки SDXC нашим устройством не поддерживаются.

Перепишите на MicroSD-карточку файл-образы дисков AZ0-AZ7. Это файлы AZ000.DSK - AZ007.DSK. Вставьте карточку в гнездо на контроллере, до щелчка.

Вставьте контроллер в корзину ДВК/Э-60 (или в слот CA на УКНЦ).При установке в корзину ДВК/Э-60/PDP-11 необходимо соблюдать путь прерываний - те "змейку", так как контроллер использует прерывания.


Включите компьютер. Если он автозапускается по какой-либо причине (это возможно при наличии альтернативных прошивок для ВМ2/3 или загрузочного ПЗУ на какой-то из дополнительных плат), остановите его, т.е переведите его в связь с пультовой программой (нажать дважды кнопку "ОСТ" на ДВК-3/Квант-4, опустить и поднять снова флажок "Программа/Пульт" на ДВК-2/3М2/Э-60.

Скорее всего, на экран будет выдано 6 восьмеричных цифр и, в следующей строке, значок "@", курсор будет мигать рядом с ним. Это сигнал о том, что процессор находится в состоянии "Останов" (Halt-Mode) и ждет от вас пультовой команды.

Подадим ее. Команда такая:

Код

177226G

Это указание процессору начать исполнение программы с адреса 177226. По этому адресу располагается однословное ПЗУ программы запуска ОС с диска AZ0. Должна запуститься RT-11. После этого можно перезагрузиться с любого другого диска командой BO AZx:
также можно использовать команду полного адреса:

Код

177777226G

Запуск на УКНЦ: в меню выбираем "отладка"

Код

177226<ИСП>

Есть альтернативная команда - запуск с адреса 177224, т.е 177224G. Пока ее действие точно такое же, как и основной команды запуска, но далее планируется кое-какие изменения, в частности, одна из них будет просто запускать ОС с AZ0, а вторая будет спрашивать, с какого диска загрузиться.

Размер каждого из дисков (файлов с точки зрения PC) должен быть строго 32767К (65534 блока), таким образом общая емкость накопителя будет 262136К. В ближайшей новой версии прошивки будет добавлена смена дисков (файл-образов) прямо из RT-11, специальной программой, тогда на микро-SD можно будет иметь столько файл-образов, сколько туда влезет, однако, одновременно будут доступны только 8 из них, т.е. 262136К, это ограничение RT-11.

Возможна установка двух контроллеров, для этого предусмотрен альтернативный набор адресов контроллера, переключение производится DIP-переключателем №1 на плате контроллера. Основной набор адресов (177220-177226) действует при выключенном состоянииэтого переключателя, альтернативный (177200-177206) - при включенном (ON). Остальные переключатели зарезервированы для дальнейшего расширения функционала.


Перспективы развития продукта
Данный контроллер снабжен достаточно мощным микроконтроллером STM32F407VET6, что позволяет реализовывать расширение возможностей контроллера без изменения аппаратной платформы.

Соответственно обозначу примерный набор функционала для развития:

1. реализовать сетевое подключение при помощи внешней сетевой карты на базе ENC28J60 [реализовано]
1.1 подключение позволит получить удаленный доступ к данным на SD-карте - те это будет FTP-сервер WEBDAV-сервер [реализовано]
посредством которого можно будет изменять информацию на диске удаленно [реализовано]
1.2 FTP-сервер WEBDAV-сервер будет предоставлять доступ на уровне самой FS RT11 [реализовано]
1.3 Обновление прошивок через Интернет
1.4 Управление настройками сети через ini-файл

2. Развитие функционала монтирования образов через ini-файл
2.1 Монтирование образов через команду SET AZ
2.2 Монтирование образов на SMB/NFS-шаре
2.3 Увеличение объема поддерживаемых дисков для работы RSX-11
2.4 Обновление через образ на SD карте
2.5 Внешний загрузчик, те пользовательский код который закачивается в машину и запускается (удобно для разработки своих расширений на базе AZ - к примеру меню загрузки)

3. Часы

4. Разработка драйвера AZX.SYS для монитора XM [реализовано]

5. Разработка драйвера для RSX

Актуальная firmware(прошивка) для контроллера

ТУТ



Устаревшее
2019.05.14
 AZ707_2.RAR ( 18.11 килобайт ) Кол-во скачиваний: 1878

2019.05.19
 AZ707_2_2019_05_19.RAR ( 18.35 килобайт ) Кол-во скачиваний: 1916

Комплект дисков
RT11 + ADOS + коллекция софта
 HD2019_05_19.RAR ( 14.93 мегабайт ) Кол-во скачиваний: 1961

Версия для УКНЦ - добавлены драйвера AZ
и ADOSSJ для УКНЦ на AZ6:
 HD_2019_08_09.RAR ( 16.63 мегабайт ) Кол-во скачиваний: 2063



Ссылки:

Приобрести контроллер для ДВК можно тут
Приобрести контроллер для УКНЦ можно тут

Процедура обновления firmware (прошивки) контроллера

Контроллер псевдодиска на MicroSD ДВК: подключение сетевой карты

сборка и наладка конструктора контроллера для ДВК печатная плата версии v1.01
Контроллер псевдодиска на MicroSD для УКНЦ: сборка и наладка конструктора контроллера

Контроллер псевдодиска на MicroSD на шину МПИ: особенности версии для УКНЦ

Страницы разработки на ZX-PK
УКНЦ + AZ - вариант контроллера псевдодисков на микро-SD для УКНЦ.
Контроллер псевдодиска на SD-карте для ДВК

[SuperMax]

Новые команды контроллеров AZ*
Старые команды тут

Работа с энергонезависимой памятью

интерфейс предоставляет любому AZ-контроллеру доступ к 255 словам энергонезависимой памяти:
для работы есть команды
021: //считать блок 1 энергонезависимой памяти в буфер
022: // отдать на шину считанный блок энергонезависимой памяти из буфера
023: // принять с шины в буфер данные для последующей записи в буфер
024: // записать из буфера в блок 1 энергонезависимой памяти
все команды по выполнению, просто устанавливает бит готовности по завершению

примеры работы

Код

AZ$CSR      = 177220; регистр команд и состояния (CSR)
AZ$DR       = 177222; регистр данных (DR)


; trap 50 - cброс AZ
; результат в R1  =0 ok
AZreset:        MOV     #AZ$CSR,R1
1$:             CLR     (R1); Пошлем команду "Сброс"
                TSTB    (R1); Проверим готовность контроллера
                BPL     1$; Если не готов, сбрасываем еще
            ; раз и проверяем снова
                TST     (R1); Проверим на ошибку,
                BMI     0ERR$
                CLR     R1
                return
0ERR$:          CLR     R1
                COM     R1
                return


; trap 54 - чтение энергонезависимой памяти блока 1 EEPROM в буфер с адреса ADREEPROMMEM
; результат R3 - адрес, если R3=0 ошибка
; статус чтения в R1 0 - ok
; 1 - размер не соответствует сохраненному
; 2 - oшибка версии
; 3 - oшибка контрольной суммы
ReadEEPROM:     push    R2
                call    AZreset; сбросим
                tst     R1
                bne     0ERR$
; теперь читаем
                MOV     #AZ$CSR,R1
                mov     #21,(R1); считать блок 1 энергонезависимой памяти в буфер
0$:             TSTB    (R1); проверяем результат выполнения
                BPL     0$; ждем
                mov     #22,(R1); отдать на шину считанный блок  энергонезависимой памяти из буфера
1$:             TSTB    (R1); проверяем результат выполнения
                BPL     1$; ждем
                TST     (R1)+; инкрементируем
                mov     #ADREEPROMMEM,R3
                mov     #256.,R2; читаем 256. слов; первое слово - результат чтения
2$:             mov     (R1),(R3)+; читаем блок слов в память
                sob     R2,2$
                mov     #ADREEPROMMEM,R3; успешно
                mov     (R3),R1
                br      0END$
0ERR$:          CLR     R3
0END$:          pop     R2
                return


; trap 55 - запись энергонезависимой памяти из буфера с адреса ADREEPROMMEM в блок 1 EEPROM
WriteEEPROM:    push    R1
                push    R2
                push    R3
                call    AZreset; сбросим
                tst     R1
                bne     0ERR$

                MOV     #AZ$CSR,R1
                mov     #23,(R1); командуем что будем писать данные в буфер
0$:             TSTB    (R1); проверяем результат выполнения
                BPL     0$; ждем
                TST     (R1)+; инкрементируем
                mov     #ADREEPROMMEM+2,R3
                mov     #255.,R2; пишем 255. слов; первое слово пропускаем - результат чтения
1$:             mov     (R3)+,(R1); отдаем в контроллер
                sob     R2,1$
                tst     -(R1); декрементируем
                mov     #24,(R1); записать из буфера в блок 1 энергонезависимой памяти
2$:             TSTB    (R1); проверяем результат выполнения
                BPL     2$; ждем
                br      0END$
0ERR$:          CLR     R3
0END$:          pop     R3
                pop     R2
                pop     R1
                return

очевидно, после считывания памяти необходимо проверить код результата в первом слове - см расшифровку кодов ошибок

Примеры возвращаемых данных по командам

последовательная подача команды 021 и затем 022 позволит считать 256. слов
из энергонезависимой памяти
первое слово это будет статус успешности чтения
коды ошибок
; 0 - ok
; 1 - размер не соответствует сохраненному
; 2 - oшибка версии
; 3 - oшибка контрольной суммы

технически для эмуляции данного фунционала, нужен файл 255. слов.
Обращаю внимание, при записи, буфер идет сразу с данными, те нет первого слова со статусом.



Считывание версии
027: // отдаем версию firmware AZ STM32
типовое возвращаемое значение на шину
первое слово - 06404 = старший байт 13. это версия прошивки, младший байт 4. это версия железа - те AZБК в данном случае
второе слово - 037 = это максимальный монтируемый диск - 31.



RTC Часы

031: // получить время из часов МК в буфер timestamp
032: // получить время из буфера timestamp в МПИ
033: // запись времени-даты в буфер (ручная установка часов) формат SimpleIN ( 7 слов)
034: // установка автономных часов на основании данных из буфера
035: // стимуляция запроса времени с NTP сервера, установка на основании ответа
036: // установка автономных часов STM32 на основании часов в TCP/IP стеке
042: // получить время из часов TCP/IP стека в буфер timestamp
все команды по выполнению, просто устанавливает бит готовности по завершению

формат timestamp на чтение

Код

; формат буфера даты-времени
; offset в восьмеричной системе - те слова
; формат буфера даты-времени
; offset
;    [0]=rtc_rt11date();
;    [2]=rt11 time 50Hz big word;
;    [4]=rt11 time 50Hz little word;
;    [6]=rt11 time 60Hz big word;
;    [10]=rt11 time 60Hz little word;
;    [12]=rtc_fat_date();
;    [14]=rtc_fat_time();
;    [16]=year+2000;
;    [20]=month;
;    [22]=day;
;    [24]=wday;
;    [26]=hour;
;    [30]=min;
;    [32]=sec;

формат буфера SimpleIN - 7 слов

Код

;    [0]=year       год, младшие две цифры - те 22 а не 2022(!)
;    [2]=month;     месяц
;    [4]=day;       день
;    [6]=wday;      день недели =0 не установлен, 1- понедельник 2 - вторник итд
;    [10]=hour;     час
;    [12]=min;      минута
;    [14]=sec;      секунда

Примеры работы с часами

Получение времени

Код

; работа с часами
; trap 60 - чтение данных часов из TCP/IP стека
; R3 - адрес буфера куда надо считать
; результат в R3 адрес, если успешно. R3=0  если ошибка
GetDateFromLAN: push    R0
                push    R1
                push    R2
                call    AZreset; сбросим
                tst     R1
                bne     G60ERR
                MOV     #AZ$CSR,R1
                mov     #42,(R1)
G60:            TSTB    (R1); проверяем результат выполнения
                BPL     G60; ждем
                mov     #32,(R1)
1$:             TSTB    (R1); проверяем результат выполнения
                BPL     1$; ждем
                TST     (R1)+; инкрементируем
                mov     R3,R0; запомним R3 - адрес
                mov     #10.,R2; читаем 10 слов
2$:             mov     (R1),(R3)+; читаем блок слов в память
                sob     R2,2$
                mov     R0,R3; успешно, вернем адрес в R3
                br      0END$
G60ERR:         CLR     R3
0END$:          pop     R2
                pop     R1
                pop     R0
                return


; trap 61 - чтение данных часов из автономных часов RTC
; R3 - адрес буфера куда надо считать
; результат в R3 адрес, если успешно. R3=0  если ошибка
GetDateFromRTC: push    R0
                push    R1
                push    R2
                call    AZreset; сбросим
                tst     R1
                bne     G60ERR
                MOV     #AZ$CSR,R1
                mov     #31,(R1)
                br      G60; идем туда тк дальше код одинаковый

отсылка запроса на установку времени с NTP сервера

Код

; trap 62 - отсылка запроса на установку времени с NTP сервера
GetDateNTPtoNET:push    R1
                call    AZreset; сбросим
                tst     R1
                bne     0ERR$
                MOV     #AZ$CSR,R1
                mov     #35,(R1)
0$:             TSTB    (R1); проверяем результат выполнения
                BPL     0$; ждем
0ERR$:          pop     R1
                return

технически на это надо 1-2 секунды

проверка

Код

; trap 63 - проверка корректности времени
; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка
CheckDateTime:  Cmp     6(r3),#2021.
                Blos    1err
                Cmp     6(r3),#2100.
                Bhi     1err
0ok$:           return
1err$:          clr     R3
                return

пример цикла опроса с целью получить время с сети

Код

; дата-время
                mov     #S_DateTime_0,R3; "Lan Date:"
                trap    10
                mov     #20,R4; количество циклов ожидания
$datry:         trap    62; отослали запрос к NTP серверу
                mov     #110,@#AZ$CSR; включим сеть
                trap    47; ожидание
                trap    47; ожидание
                mov     #ADRTMPSTR,R3
                trap    60; считали в буфер дату-время
                trap    63; проверили дату-время
                tst     R3
                bne     $ok
$sob:           sob     R4,$datry
                mov     #S_DateTime_2,R3; печать ошибки
                trap    7
                br      $go

$ok:            mov     #ADRTMPSTR,R3
                trap    24; печать даты
                trap    25; времени
$go:            mov     #110,@#AZ$CSR; включим сеть

установка времени RTC на основании времени стека

Код

; trap 64 - установка времени RTC на основании времени стека
; R1 - результат  R1=0 - OK
SetDateNETtoRTC:call    AZreset; сбросим
                tst     R1
                bne     0ERR$
                MOV     #AZ$CSR,R1
                mov     #36,(R1)
0$:             TSTB    (R1); проверяем результат выполнения
                BPL     0$; ждем                
                clr     R1
0ERR$:          return

те изначально надо получить в стеке нормальное время, затем установить время в RTC на основании времени стека

Примеры возвращаемых данных, восьмеричные значения

067362 ; [0]=rtc_rt11date();
000062 ; [2]=rt11 time 50Hz big word;
024240; [4]=rt11 time 50Hz little word;
000074; [6]=rt11 time 60Hz big word;
030300; [10]=rt11 time 60Hz little word;
055567; [12]=rtc_fat_date();
044766; [14]=rtc_fat_time();
003746; [16]=year+2000;
000013; [20]=month;
000027; [22]=day;
000003; [24]=wday;
000022; [26]=hour;
000017; [30]=min;
000054; [32]=sec;


Пример исходного кода который формирует данные форматы даты-времени

Код

// функция форматирования даты в формат FAT
// Двухбайтовая отметка даты имеет следующий формат:
//    биты 0–4 — день месяца, допускаются значения 1–31;
//    биты 5–8 — месяц года, допускаются значения 1–12;
//    биты 9–15 — год, считая от 1980 года («эпоха MS-DOS»), возможны значения от 0 до 127 включительно, то есть 1980–2107 годы.
unsigned short int rtc_fat_date(void)
{
  unsigned char day    , month , year;  
  rtc_get_date(&day,&month,&year);    
  return(day+month*32+(year-1980)*256);
}
//

// функция форматирования времени в формат FAT
//Двухбайтовая отметка времени имеет следующий формат:
//    биты 0–4 — счётчик секунд (по две), допустимы значения 0–29, то есть 0–58 секунд;
//    биты 5–10 — минуты, допустимы значения 0–59;
//    биты 11–15 — часы, допустимы значения 0–23.
unsigned short int rtc_fat_time(void)
{    
    unsigned char hour,min,sec;
    rtc_get_time(&hour,&min,&sec);
    return(sec/2+min*32+hour*1024);
}
//

// функция форматирования даты в формат RT11
unsigned short int rtc_rt11date(void)
{
    unsigned char mday    , mmonth , myear;    
    rtc_get_date(&mday,&mmonth,&myear);    
    unsigned short int rt11date;
        
    myear = myear + 2000 - 1972;
    rt11date= (myear / 32) <<14 | mmonth<<10 | mday <<5 | (myear % 32);
    
    //printf("rtc_rt11date: a.m.d.y=%d.%d.%d.%d > 0%06o  ", (myear / 32), mmonth, mday, (myear % 32), rt11date);
    return rt11date;
}
//



// функция форматирования времени в формат RT11 для таймера 50Гц
unsigned int rtc_rt11time50(void)
{
    unsigned char hour,min,sec;  
    rtc_get_time(&hour,&min,&sec);    
    
    unsigned int rt11time;
    
    rt11time = hour * 3600 * 50 + min * 60 * 50 + sec * 50;

    //printf("rtc_rt11time50: %d  -> %06o . %06o    ",rt11time , (unsigned short int) (rt11time>>16) , (unsigned short int) (rt11time & 0xFFFF) );
    return (rt11time);
}
//

// функция форматирования времени в формат RT11 для таймера 60Гц
unsigned int rtc_rt11time60(void)
{
    unsigned char hour,min,sec;
    rtc_get_time(&hour,&min,&sec);    
    
    unsigned int rt11time;
    
    rt11time = hour * 3600 * 60 + min * 60 * 60 + sec * 60;
    
    //printf("rtc_rt11time60: %d  -> %06o . %06o    ",rt11time , (unsigned short int) (rt11time>>16) , (unsigned short int) (rt11time & 0xFFFF) );
    return (rt11time);
}
//

Перезапуск БК аппаратный, команда актуальна только для AZБК
остальные AZ ее игнорируют

037: // перезапуск AZБК и всей БК

пример применения

Код

AZ$CSR      = 177220; регистр команд и состояния (CSR)
AZ$DR       = 177222; регистр данных (DR)


; trap 57 - перезапуск БК полный
AZcouldReboot:  call    AZreset; сбросим AZ дабы он был готов принимать команды
                mov     #37,@#AZ$CSR
                return

Работа со стеком TCP/IP

040: // получить ip адреса в буфер
041: // чтение буфера ip адреса - 8 слов 16bit

эта пара команд позволяет получить текущую информацию со стека
- IP адрес
- MASK маску
- GW гейтвей
- NTP адрес NTP-сервера
- DNS1 адрес основного DNS
- DNS2 адрес резервного DNS
соответственно это 12 слов (16bit)

примеры работы

Код

; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
GetIPaddrs:     push    R1
                push    R2
                call    AZreset; сбросим
                tst     R1
                bne     0ERR$
                MOV     #AZ$CSR,R1
                mov     #40,(R1)
0$:             TSTB    (R1); прочитать адреса в свою память
                BPL     0$; ждем
                mov     #41,(R1)
1$:             TSTB    (R1); подготовить буфер
                BPL     1$; ждем
                TST     (R1)+; инкрементируем
                mov     #IPADDDBLOCK,R3
                mov     #12.,R2
2$:             mov     (R1),(R3)+; читаем блок слов в память
                sob     R2,2$
                mov     #IPADDDBLOCK,R3; успешно
                br      0END$
0ERR$:          CLR     R3
0END$:          pop     R2
                pop     R1
                return

Примеры данных - возвращаемые слова в восьмеричном формате
124300 116400 - IP адрес 192.168.0.157
177777 000377 - MASK маску 255.255.255.0
124300 000400 - GW гейтвей 192.168.0.1
124300 000400 - NTP адрес NTP-сервера 192.168.0.1
124300 050000 - DNS1 адрес основного DNS 192.168.0.90
124300 055000 - DNS2 адрес резервного DNS 192.168.0.80



Работа с SD картой, дополнительные функции

данный комплект команд позволяет читать/писать файлы на карточку
те можно сделать процедуры копирования файлов с карточки и на карточку

050: установить имя файла который будем читать
051: получить размер файла на чтение (или его статус) на МПИ
052: читать блок установленного файла в буфер

эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)

буфер длины имени файла 128. слов = 256 байт

Соответственно схема чтения файла выглядит вот так
023 - заливаем имя файла в буфер
050 - устанавливаем файл на чтение
051 - читаем длину файла или ошибку открытия файла
если ошибка - повторяем сначала 023 050 051
если все ok - приступаем к чтению файла
052 - читает блок файла в буфер
022 - забираем данные из буфера
пары 052 022 повторяем нужное количество раз дабы считать весь файл
как файл будет считан - последняя 052 команда закроет его автоматически

формирование ошибки выглядит так:
sizeanyfile=1<<31 + FFres; // если установлен старший бит 32х битного слова - то в младшей части код ошибки

FFres = ошибка FatFS
см
http://elm-chan.org/fsw/ff/doc/open.html

Код

typedef enum {
    FR_OK = 0,                /* (0) Succeeded */
    FR_DISK_ERR,            /* (1) A hard error occurred in the low level disk I/O layer */
    FR_INT_ERR,                /* (2) Assertion failed */
    FR_NOT_READY,            /* (3) The physical drive cannot work */
    FR_NO_FILE,                /* (4) Could not find the file */
    FR_NO_PATH,                /* (5) Could not find the path */
    FR_INVALID_NAME,        /* (6) The path name format is invalid */
    FR_DENIED,                /* (7) Access denied due to prohibited access or directory full */
    FR_EXIST,                /* (8) Access denied due to prohibited access */
    FR_INVALID_OBJECT,        /* (9) The file/directory object is invalid */
    FR_WRITE_PROTECTED,        /* (10) The physical drive is write protected */
    FR_INVALID_DRIVE,        /* (11) The logical drive number is invalid */
    FR_NOT_ENABLED,            /* (12) The volume has no work area */
    FR_NO_FILESYSTEM,        /* (13) There is no valid FAT volume */
    FR_MKFS_ABORTED,        /* (14) The f_mkfs() aborted due to any problem */
    FR_TIMEOUT,                /* (15) Could not get a grant to access the volume within defined period */
    FR_LOCKED,                /* (16) The operation is rejected according to the file sharing policy */
    FR_NOT_ENOUGH_CORE,        /* (17) LFN working buffer could not be allocated */
    FR_TOO_MANY_OPEN_FILES,    /* (18) Number of open files > _FS_LOCK */
    FR_INVALID_PARAMETER    /* (19) Given parameter is invalid */
} FRESULT;

пример кода для чтения файла и вывода его на экран

Код

                call    AZRST; сбросим

; заливаем в буфер имя файла
7$:             mov     #23,(R1); командуем что будем писать данные в буфер
5$:             TSTB    (R1); проверяем результат выполнения
                BPL     5$  ; ждем
                TST     (R1)+; инкрементируем
                mov     #FILNM,R3
1$:             mov     (R3),(R1); отдаем в контроллер
                tst     (R3)+
                bne     1$
                tst     -(R1); декрементируем


    ; устанавливаем файл на чтение
                mov     #50,(R1); устанавливаем файл на чтение
2$:             TSTB    (R1); проверяем результат выполнения
                BPL     2$  ; ждем


    ; читаем длину файда
                mov     #51,(R1); устанавливаем файл на чтение
3$:             TSTB    (R1); проверяем результат выполнения
                BPL     3$  ; ждем
                TST     (R1)+; инкрементируем
                mov     #FILSZ,R3
                mov     (R1),(R3)+; читаем с контроллера
                mov     (R1),(R3); читаем с контроллера

    ; выведем длину файла на экран
                clr     R0
                mov     #FILSZ+2,R3
                mov     (R3),R1
                call    DNOZ
                mov     -(R3),R1
                call    DNOZ
                .print   #STMS2

    ; читаем файл
                mov     R1,R4; в R1 осталась длина файла
                MOV     #AZ$CSR,R1
                mov     #BUFFL,R5

                bit     #1,R4; если нечетное число байт
                beq     47$
                inc      R4; добавим еще 1 байт тк читаем словами

47$:            tst     R4
                beq     45$ ; уже нечего читать - выходим


                mov     #52,(R1); читаем блок в буфер
4$:             TSTB    (R1); проверяем результат выполнения
                BPL     4$  ; ждем
                mov     #22,(R1); будем читать буфер
51$:            TSTB    (R1); проверяем результат выполнения
                BPL     51$ ; ждем

                cmp     R4,#512.; сравниваем c размером буфера в байтах
                Blos    44$ ; осталось меньше чем буфер


                .print  #STMS1
                mov     #256.,R2
                TST     (R1)+; переходим на регистр данных
46$:            mov     (R1),(R5)+; читаем в буфер
                sob     R2,46$
                sub     #512.,R4; вычитаем
                TST     -(R1); переходим на регистр команд
                br      47$

44$:            .print  #STMS3
                mov     R4,R2
                asr     R2  ; /2 тк читаем словами
                TST     (R1)+; переходим на регистр данных
43$:            mov     (R1),(R5)+; читаем в буфер
                sob     R2,43$


45$:            clr     (R5); проставим конец файла
    ; файл считан - выводим на экран
                .print   #STMS4
                .print  #BUFFL
                .print   #STMS5


                mov     #110,@#AZ$CSR; включаем сеть
                .Exit

пример полностью в виде утилиты RT11 выложен вот тут


Для записи файла добавлены команды
053: установить имя файла который будем писать
054: установка длины файла
055: записать в файл данные из буфера

Схема подачи команд при записи вот такая
023 - заливаем имя файла в буфер
053 - устанавливаем файл на чтение
051 - статус открытия/создания файла
если ошибка - повторяем сначала 023 053 051
если все ok - идем дальше
054 - установка длины файла, те надо сразу объявить какая у нас будет длина файла
023 - заливаем блок данных в буфер
055 - пишем из буфера в файл
пары 023 055 повторяем нужное количество раз дабы записать весь файл
как файл будет записан - последняя 055 команда закроет его автоматически


пример кода записи файла

Код

; заливаем в буфер имя файла
                MOV     #AZ$CSR,R1
17$:            mov     #23,(R1); командуем что будем писать данные в буфер
15$:            TSTB    (R1)    ; проверяем результат выполнения
                BPL     15$     ; ждем
                TST     (R1)+   ; переходим на регистр данных
                mov     #FILNM2,R3
11$:             mov    (R3),(R1); отдаем в контроллер
                tst     (R3)+
                bne     11$
                tst     -(R1)   ; переходим на регистр команд

        ; устанавливаем файл на запись
                mov     #53,(R1); устанавливаем файл на запись
12$:            TSTB    (R1)    ; проверяем результат выполнения
                BPL     12$     ; ждем


        ; читаем статус создания файла
                mov     #51,(R1)
13$:            TSTB    (R1)    ; проверяем результат выполнения
                BPL     13$     ; ждем
                TST     (R1)+   ; переходим на регистр данных
                mov     #STATS,R3
                mov     (R1),(R3)+; читаем с контроллера
                mov     (R1),(R3); читаем с контроллера

        ; тут надо проверить - если файл создан то оба слова нулевые
                mov     #STATS,R3
                TST     (R3)+
                BNE     66$
                TST     (R3)
                BEQ     60$
66$:            .print  #ERRMS1 ; печать ошибки
                .exit

60$:            MOV     #AZ$CSR,R1
                mov     #54,(R1); установим длину файла который будем писать
23$:            TSTB    (R1)    ; проверяем результат выполнения
                BPL     23$     ; ждем
                TST     (R1)+   ; переходим на регистр данных
                mov     #FILSZ,R3
                mov     (R3)+,(R1); пишем в контроллер
                mov     (R3),(R1); пишем в контроллер

                tst     -(R1)   ; переходим на регистр команд



        ; пишем файл
                mov     @#FILSZ,R4; длина файла
                MOV     #AZ$CSR,R1
                mov     #BUFFL,R5; буфер файла

                bit     #1,R4   ; если нечетное число байт
                beq     147$
                inc      R4   ; добавим еще 1 байт тк читаем словами

147$:           tst     R4      ; проверим длину
                beq     145$    ; уже нечего писать - выходим

                mov     #23,(R1); будем писать в буфер
151$:           TSTB    (R1)    ; проверяем результат выполнения
                BPL     151$    ; ждем

                cmp     R4,#512.; сравниваем c размером буфера в байтах
                Blos    144$    ; осталось меньше чем буфер

                .print  #STMS6  ; заливка полного блока
                mov     #256.,R2
                TST     (R1)+   ; переходим на регистр данных
146$:           mov     (R5)+,(R1); пишем в буфер контроллера
                sob     R2,146$
                sub     #512.,R4; вычитаем
                TST     -(R1)   ; переходим на регистр команд

                mov     #55,(R1); запись буфера в файл
104$:           TSTB    (R1)    ; проверяем результат выполнения
                BPL     104$    ; ждем
                br      147$    ; в начало

144$:            .print  #STMS7 ; заливка последнего блока
                TST     (R1)+   ; переходим на регистр данных
                mov     R4,R2
                asr     R2      ; /2 тк пишем словами
143$:           mov     (R5)+,(R1); пишем в буфер контроллера
                sob     R2,143$

                TST     -(R1)   ; переходим на регистр команд
                mov     #55,(R1); запись пследнего буфера в файл
105$:           TSTB    (R1)    ; проверяем результат выполнения
                BPL     105$    ; ждем

145$:           .print #STMSE   ; конец
                mov     #110,@#AZ$CSR; включаем сеть
                .Exit           ; выходим

пример полностью в виде утилиты RT11 выложен вот тут


получение объема SD карты всего/свободно в мегабайтах

056: // получить данные по размеру карты в буфер sizecard

057: // чтение буфера sizecard - 2 cлова 16bit
первое слово - общий объем карты доступный для FAT в МБ
второе слово - свободный объем на карте в МБ

Код

; trap 51 - получение объема SD карты всего/свободно в мегабайтах
; результат в R1 - всего; R2 - свободно
GetSizeSD:      call    AZreset; сбросим
                tst     R1
                bne     0ERR$
                MOV     #AZ$CSR,R1
                mov     #56,(R1)
1$:             TSTB    (R1); подготовить буфер
                BPL     1$; ждем
                mov     #57,(R1)
2$:             TSTB    (R1); подготовить буфер
                BPL     2$; ждем
                mov     @#AZ$DR ,R1; всего мегабайт
                mov     @#AZ$DR ,R2; свободно мегабайт
                return
                clr     R1
                clr     R2
                return

Примеры данных
035521 - всего на карточке мегабайт - 15185.
035417 - свободно мегабайт - 15119.



Старые команды тут