Перейти к содержимому

Исходный код вики API контроллеров AZ®

Редактировал(а) Max 2025/05/28 10:43
Последние авторы
1 {{box cssClass="floatinginfobox" title="**Contents**"}}
2 {{toc/}}
3 {{/box}}
4
5 = **Концепция контроллера** =
6
7 Контроллер эмулирует до 32х дисковых устройств AZ® на одной микроSD-карточке. Каждый эмулируемый диск (псевдодиск) представлен на карточке файлом с точки зрения файловой системы FAT32, поэтому не возникает никаких вопросов в размещении псевдодисков на носителе большого объема - просто помещаем карточку в кардридер, подключаем к PC, копируем на карточку файлы нужного объема (и с нужным содержимым), переставляем ее в контроллер, и всё! Более того, поработав с карточкой на ДВК/БК/УКНЦ, можно извлечь ее из контроллера, снова поместить в кардридер и скопировать наработанные файл-образы дисков на PC, где с ними можно работать любыми средствами - например, подключить к эмулятору, заархивировать и сложить куда-нибудь на хранение, отправить в конференцию, и т.п. Также не представляет особого труда скопировать какой-то материал, найденный в сети, на карточку, переставить ее в контроллер и использовать этот материал на ДВК/УКНЦ.
8
9 == **Регистры контроллера.** ==
10
11 Контроллер имеет 4 регистра на МПИ
12 \\• 177220 - регистр команд и состояния (CSR)
13 • 177222 - регистр данных (DR)
14 • 177224 - регистр начальной загрузки основной (BOOT1)
15 • 177226 - регистр начальной загрузки альтернативный (BOOT2)
16 \\Регистр CSR принимает команды в разрядах D0-D5 и бит разрешения прерываний в разряде D6, все только запись, читается всегда ноль. В разряде D7 читается бит готовности. Единица в нем означает, что предыдущая команда выполнена и контроллер готов к обмену. Ноль означает, что контроллер занят исполнением предыдущей операции, остальные регистры при этом отключены, обращение к любому из них вызовет Trap to 4. Если исполнение предыдущей команды вызвало ошибку, одновременно с битом D7 взводится бит D15.
17 \\Запись в регистры производится только словом, байтовая запись недопустима.
18 \\Весь обмен данными ведется через DR. Для команд, аргумент у которых одно слово, этот аргумент следует переслать в DR, а затем выслать команду в CSR. Для команд обмена с буфером контроллера, наоборот, следует выдать команду и только после нее принимать или передавать блок данных определённой длины.
19
20 == **Прерывания** ==
21
22 Большинство команд исполняется, практически, мгновенно - за время исполнения одной-двух команд ЦП. Но команды обмена с карточкой микро-SD все-таки, требуют времени. Ожидать окончания этих операций можно либо поллингом бита D7 CSR, либо (например, при наличии многозадачной ОС, которой есть, куда утилизировать это время) - взвести бит D6 CSR (разрешение прерываний) и заняться чем-то другим. Когда операция будет завершена, произойдет прерывание и по нему можно продолжить операции.
23
24
25 == **Пространства имен** ==
26
27 Как уже было сказано - дисковое устройство презентуемое в систему PDP-11 это физический файл на какой-то файловой системе. Начиная с V17 прошивки, появился сетевой функционал, он позволяет использовать сетевые диски предоставляемые посредством технологии [[MAXIOL Landisk>>https://forum.maxiol.com/index.php?s=&showtopic=5632&view=findpost&p=59531]]®. Соответственно, для полной унификации и обеспечения полной "прозрачности" все отличия сводятся к точке монтирования, на данный момент это следующие пространства:
28
29 * 0:/  - локальные файлы на MicroSD карточке
30 * R:/ - сетевые файлы в файловом репозитории
31 * N:/ - сетевые файлы в архиве [[https:~~/~~/mirrors.pdp-11.ru/>>https://mirrors.pdp-11.ru/]]
32
33 Планируемые сетевые пространства (фунционал будет реализован в следующих прошивках):
34
35 * P:/  - персональное облако, доступно только под одной УЗ
36 * S:/ - облако которое позволяет делится своими файлами с другими участниками
37
38 == Буфера ==
39
40 В контроллере несколько буферов различного назначения, все буфера имеют словные размеры ибо отдаются через 16ти битный регистр
41
42 * Основной буфер - IOBUF  [258] 
43 * Буфер энергонезависимой памяти - cmosmem_buffer[256]
44 * Буфер часов - выходной timestamp_out_buffer[14]
45 * Буфер часов - входной timestamp_in_buffer [7]
46 * Буфер ip информации - ipdata
47 * Буфер размера карты - sizecard
48
49 = **Основной блок команд** =
50
51 Команда посылается в CSR, в разряды 5-0. Пересылать следует только словом, байтовая запись недопустима. Разряды команды только для записи, читается всегда ноль. Коды команд приведены **восьмеричные**.
52
53 Данные команды используют [[основной буфер>>doc:||anchor="H411443444435440430"]] для своей работы (IOBUF  [258]).
54
55 == **000: Сброс контроллера** ==
56
57 Код команды - 000. Команда останавливает, если возможно, все операции контроллера. Её окончания следует дождаться посредством поллинга.
58 Пример программы:
59
60 {{code language="assembler"}}
61 ;.............................
62 MOV #AZ$CSR,R3
63 1$: CLR @R3; Пошлем команду "Сброс"
64 TSTB @R3; Проверим готовность контроллера
65 BPL 1$; Если не готов, сбрасываем еще
66 ; раз и проверяем снова
67 TST (R3)+; Проверим на ошибку,
68 ; одновременно сменим адрес
69 ; (пригодится дальше)
70 BMI ERR1
71 ;...............................
72 {{/code}}
73
74 Замечание о команде сброса. Вообще-то, она мгновенного действия - если контроллер не занят исполнением операции, которую прерывать нельзя, конкретно - обмен с SD. Пока идет обмен с SD, контроллер не воспринимает никаких команд и команда сброса может быть пропущена. Поэтому, если контроллер занят (бит D7 равен нулю), выдача команды сброса повторяется. Такое встречается достаточно редко (допустим, двойное нажатие Ctrl/C при перезаписи), обычно, при нормальном ходе операций, ожидание записи или чтения производится в специальном месте и, по окончании этой операции, выполняется не сброс, а совсем другие действия.
75
76
77 == **001: Выбор устройства** ==
78
79 Контроллер поддерживает до 32х псевдодисков. Команда "выбор устройства" выбирает для работы один из них. Код команды 001. Для выбора устройства следует переслать в регистр данных (177222) номер накопителя, с которым собираемся работать и затем послать в CSR код 001. Команда выполняется мгновенно, т.е. за время, пока ЦП пересылает код "выбор устройства". ПРи попытке выбрать диск AZ, которому не назначен файл-образ, в бите D15 регистра CSR возвращается ошибка.
80
81 Пример программы:
82
83 {{code language="assembler"}}
84 ;.......................
85
86 SetUni = 001; Символическое наименование команды
87 ; "Выбор устройства"
88
89 ; От предыдущего фрагмента в R3 остался адрес CSR+2=DR
90
91 ; Считаем, что в R0 в битах 0-3 находится номер
92 ; устройства, остальные биты - нули, процедура
93 ; вычисления этого номера не показана.
94
95 MOV R0,@R3; Перешлем в DR номер диска AZ, с
96 ; с которым собираемся работать
97
98 MOV #SetUni,-(R3); и пошлем команду "Выбор
99 ; накопителя", с исправлением адреса в R3, который
100 ; теперь снова указывает на CSR.
101
102 TST (R3)+; Проверим на ошибку и опять
103 ; передвинем адрес в R3 на DR
104 BMI ERR2
105
106 ;........................
107 {{/code}}
108
109
110 == **002: Установка номера блока, младшие биты номера блока** ==
111
112 Контроллер предоставляет машинке с МПИ в качестве дисков AZ0 - AZ7 файл-образы типа DSK на карточке микро-SD. Размер этих файл-образов и, соответственно, псевдодисков, может быть любым, вплоть до 4Г каждый. Адресация на этих псевдодисках прямая - полученный по МПИ номер блока, после сдвига, используется в качестве смещения от начала соответствующего файл-образа. Фактически, это нечто, вроде LBA на PC.
113 \\Существуют операционные системы PDP-11, поддерживающие такие диски - RSX-11, ДИАМС, еще что-то. Однако, самая распространенная ОС - RT-11 - использует для номера блока СЛОВО (16 бит), причем код 0177777 кое-где используется в специальных целях и как размер диска не годится, поэтому для RT-11 могут быть использованы диски с максимальным числом блоков 0177776, т.е. 65534 блока (33553408 байт или 32767 К байт). Поэтому команды установки номера блока две: установить младшие биты номера блока - код 002 и установить старшие биты номера блока - код 012. Если номер блока помещается в 16 разрядов (для RT-11 - всегда), достаточно использовать команду установки младших битов номера блока, старшие биты при этом очищаются. Если номер не помещается в 16 разрядов, то сначала надо выдавать младшие биты, а потом старшие. Если попытаться сразу передать старшие биты без предварительной передачи младших, выдается ошибка. Если переданный адрес выходит за границу файл-образа, также выдается ошибка, не важно, на каком этапе - хоть при передаче младших 16 битов номера блока, хоть при передаче старших.
114 \\Для выполнения этих действий следует переслать требуемую часть битов номера блока в DR и затем переслать в CSR код команды, после чего следует проверить на ошибку. Команды мгновенные, т.е. выполняются за один цикл обращения по МПИ.
115 \\Пример программы в 16-разрядном варианте:
116
117 {{code language="assembler"}}
118 ;.......................................
119
120 SetBlk=002; Символическое наименование команды
121 ; "Установить младшие 16 разрядов номера блока"
122
123 ; От предыдущего фрагмента в R3 остался адрес DR
124 ; (177222)
125 ; Считаем, что в ячейке с меткой BLCUR находится 16-
126 ; разрядный дисковый адрес (номер блока, подлежащего
127 ; вводу или выводу). Процедура получения этого номера не
128 ; показана
129
130 MOV BLCUR,@R3; Помещаем в DR номер блока,
131 ; подлежащего обмену.
132
133 MOV #SetBlk,-(R3); Посылаем команду в CSR
134 ; не забываем, адрес в R3 перед пересылкой уменьшится на
135 ; 2 и таким останется
136
137 TST @R3; Проверяем на ошибку
138
139 BMI ERR3
140
141 ; В 32-разрядном варианте те же действия следует
142 ; повторить для старших 16 разрядов (на самом деле,
143 ; старших 7, остальные должны быть нулями, ибо максимум
144 ; размера псевдодиска - 4Г) дискового адреса.
145
146 ; Обратите внимание, что в R3 остался адрес CSR, а не
147 ; DR, как в двух предыдущих фрагментах. Это сделано
148 ; специально.
149
150 ;.......................................
151 {{/code}}
152
153
154 == **003: Открыть оглавление HFS** ==
155
156 Последовательность действий
157 \\• [[сбросить контроллер>>doc:||anchor="H000:A042143144043E44143A43E43D44244043E43B43B435440430"]]
158 • подать в CSR команду "Принять блок данных в буфер" и передать пословно всю строку с полным текстом пути (Full Path) к требуемому оглавлению. Строка должна завершаться нулевым байтом (0х00) и быть не длиннее 384 байт (192 слов).
159 • переслать в CSR код команды "Открыть оглавление"
160 • дождаться ее окончания (команда длительная)
161 • проверить на ошибку
162
163 [[**//Пример утилиты - AZDIR//**>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=59418]]
164
165
166 Пример программы:
167
168 {{code language="assembler"}}
169 ;.............................
170 AZ$CSR = 177220
171 WrBuf = 016
172 OpnDir = 003
173
174 MOV #AZ$CSR,R3
175
176 ; Ячейка DirPtr содержит указатель на начало поля с Full
177 ; Path. Считаем, что строка завершается тремя нулевыми
178 ; байтами, чтобы распознать по нулю окончание пересылки
179 ; строки пословно. Действительно, если количество
180 ; символов в строке четное, то следующие два байта нулей
181 ; образуют нулевое слово; если же нечетное, то один ноль
182 ; уйдет вместе с последним символом строки, а нулевое
183 ; слово образуют второй и третий нулевые байты,
184 ; оканчивающие строку. То есть, такое окончание строки,
185 ; передаваемой пословно, вполне надежно.
186 MOV DirPtr,R2
187
188 MOV #WrBuf,(R3)+; Подаем команду "Запись в
189 ; буфер" и передаем строку
190 11$: MOV (R2)+,@R3; пословно, до тех пор,
191 BNE 11$ ; пока не перешлется ноль
192
193 MOV #OpnDir,-(R3); Подаем команду "Открыть
194 ; оглавление"
195
196 12$: TSTB @R3; и ждем, когда контроллер ее
197 BPL 12$; выполнит,
198 TST @R3; после чего проверяем на ошибку.
199 BMI Err10; Ошибка -->
200 ;.............................
201 {{/code}}
202
203 == **004: Монтировать диск** ==
204
205 Порядок действий:
206 • [[Сбросить контроллер>>doc:||anchor="H000:A042143144043E44143A43E43D44244043E43B43B435440430"]]
207 • Переслать в контроллер строку с записью, подобной строкам описания дисков в файле AZ.INI
208 • Выдать команду "Монтировать диск"
209 • Дождаться ее окончания (команда длительная)
210 • Проверить на ошибки
211 На выбранный накопитель AZnn НЕ ДОЛЖЕН быть смонтирован диск. Если он таки смонтирован, перед монтированием туда нового диска следует размонтировать старый - команда 014
212
213
214 Пример программы:
215
216 {{code language="assembler"}}
217 ;..................
218 AZMNT = 004
219 MDLEN = MDEND-MDTXT+2
220
221 MOV #AZ$CSR,R3
222
223 20$: CLR @R3;
224 TSTB @R3; Сбросим контроллер
225 BPL 20$;
226
227 MOV #WrBuf,(R3)+; Перешлем в него строку
228 MOV #MDTXT,R2; с командой назначения
229 MOV #MDLEN/2,R1;
230 21$: MOV (R2)+,@R3;
231 SOB R1,21$;
232
233 MOV #AZMNT,-(R3); и отдадим ее на
234 22$: TSTB @R3 ; исполнение
235 BPL 22$ ;
236
237 TST @R3; после чего проверим на ошибку
238 BMI Err11;
239 ;.........................
240
241 MDTXT: .ASCII "D04=0:/DISKS/SYSTEM/51SYS_DS.DSK"
242 MDEND: .BYTE 0,0
243 ;..................
244 {{/code}}
245
246 В этом фрагменте на диск AZ4 монтируется файл-образ 51SYS_DS.DSK, лежащий в папке SYSTEM, которая лежит в папке DISKS, лежащей в корневом оглавлении карточки микро-SD.
247
248
249 == **005: Чтение блока в буфер** ==
250
251 У контроллера имеется [[встроенный буфер на 256 слов (512 байт).>>doc:||anchor="H411443444435440430"]] Фактически, это часть оперативной памяти микроконтроллера STM32, выделенная в его программе под этот буфер. Весь обмен в основном блоке команд идет через этот буфер.
252 \\Память дисков AZ представлена, как набор блоков объемом 512 байт каждый. Такой блок - единственная доступная единица для обмена данными с дисками AZ. Блоки пронумерованы от нуля до 65533 для 16-разрядного варианта или до 8388607 для 32-разрядного - это при использовании накопителей AZ максимально допустимой емкости. Никто не мешает использовать накопители меньшей емкости - фактический размер накопителя равен размеру файл-образа, смонтированного на этот накопитель. При попытке обратиться за пределы файл-образа будет зарегистрирована ошибка.
253 \\Команда 005 - чтение блока с MicroSD в [[буфер>>doc:||anchor="Micro"]]. С псевдодиска AZn, выбранного ранее командой "Выбор устройства" запускается на чтение блок, номер которого передан командой (командами) "Установка номера блока". Команда длительного действия.
254 \\Фактически, блок с карточки MicroSD читается, примерно, 500-800 мкс. На это время контроллер переходит в состояние, которое во время обсуждения проекта получило название "Думаю, прошу не мешать." А именно, на все время ее исполнения отключаются все регистры устройства, кроме CSR, в котором считывается ноль до тех пор, пока контроллер занят исполнением этой команды. По окончании считывания блока к МПИ подключаются остальные регистры контроллера, взводится бит D7 (готовность) в CSR и, если был установлен бит D6 (разрешение прерываний) в CSR, вырабатывается прерывание с вектором 0174.
255 \\Пример без прерываний тривиален:
256
257 {{code language="assembler"}}
258 ;...................................
259
260 CmdRea=005; символическое наименование команды "Читать
261 ; блок"
262
263 ; В R3 у нас от предыдущего фрагмента остался адрес CSR.
264 ; Пересылаем туда код команды чтения
265 MOV #CmdRea,@R3
266 2$: TSTB @R3 ; Проверим бит готовности
267 BPL 2$; Не готово -> уходим проверять еще
268 ; раз
269 TST @R3; Проверим на ошибку
270 BMI ERR4
271 ; Здесь у нас опять, в отличие от фрагментов пп. 3.1 и
272 ; 3.2, в R3 остался адрес CSR, а не DR.
273
274 ;...................................
275 {{/code}}
276
277
278 == **006: Записать блок из буфера на диск** ==
279
280 Код команды 006. Содержимое буфера пишется на выбранный псевдодиск по заданному дисковомк адресу (номеру блока). Перед записью выполняются проверки (1) "была ли запись в буфер?", если нет, выдается ошибка и (2) "заполнен ли буфер полностью?", если нет (для последнего укороченного блока файла), остаток буфера очищается нулями. Далее производится запись блока на носитель. Операция длительная, после ее запуска контроллер, как и при чтении переходит в состояние "Думаю, прошу не мешать". И так же, как и при чтении окончания этой операции надо дождаться, теми же средствами, как и при чтении.
281 \\Пример программы без прерываний:
282
283 {{code language="assembler"}}
284 ;...............................................................
285
286 CmdWri=006; символическое наименование команды "Писать
287 ; блок"
288
289 ; В R3 у нас от предыдущего фрагмента остался адрес DR.
290 ; Исправляем его на CSR и пересылаем туда код команды
291 ; записи
292 MOV #CmdWri,-(R3)
293 5$: TSTB @R3 ; Проверим бит готовности
294 BPL 5$; Не готово -> уходим проверять еще
295 ; раз
296 TST @R3; Проверим на ошибку
297 BMI ERR5
298
299 ;....................................................................
300 {{/code}}
301
302
303 == **007: Получить размер псевдодиска** ==
304
305 Есть две команды получения размера псевдодиска, т.е. смонтированного на выбранный псевдопривод AZn файл-образа.
306 \\Если используемая ОС (или программа, работающая с дисками без ОС) умеет работать с большими (больше 32М) дисками, следует пользоваться [[командой с кодом 017>>doc:||anchor="H017:A041F43E43B44344743844244C44043043743C43544043F44143543243443E43443844143A4302C43143E43B44C44843E439"]]. Последовательность действий: сбросить контроллер (команда 000), выбрать накопитель (п. 3.2) и переслать в CSR код 017, а затем, без каких-либо ожиданий, считать из DR сначала младшее, и следом за ним старшее слово размера выбранного накопителя (файл-образа).
307 \\Если используемая ОС не умеет работать с дисками бОльшими, чем 32М (RT-11), следует пользоваться командой 007 - получить размер псевдодиска с ограничением до 32М. Действия похожие: сбрасываем контроллер, выбираем диск, посылаем в CSR код 007 и считываем из DR одно слово размера псевдодиска. Если размер файл-образа, смонтированного на выбранный псевдопривод, больше 65534 блоков, вместо этого "большого" размера, контроллер возвращает число 65534. Напоминаем, что число 65535 кое-где используется в специальных целях и не может быть размером диска.
308 \\Также напоминаем, что если на этот накопитель не смонтирован файл-образ, последовательность действий не пройдет (команда 001 выбор устройства) и исполнение программы до этого места просто не дойдет. Поэтому ошибок у этих команд не предусмотрено.
309
310 Пример программы с "малыми" дисками
311
312 {{code language="assembler"}}
313 ;......................................
314
315 GetSiz=007; Получить "малый" размер диска
316
317 ; От фрагмента 3.2 (выбор диска) у нас в R3 остался
318 ; адрес DR (177222)
319
320 MOV #GetSiz,-(R3); пошлем команду
321 TST (R3)+; вернем адрес в R3 назад, на DR
322 MOV @R3,DskSiz
323 ;......................................
324 {{/code}}
325
326 == **010: Разрешить работу сети** ==
327
328 Код команды 010. Закончив последовательность действий по передаче очередной порции данных, и ожидая, что следующий запрос последует не сразу же, можно "утилизировать" процессорное время микроконтроллера STM32, составляющего основу AZ - занять его обслуживанием сети. В той же RT-11 это можно сделать перед выходом из драйвера AZ, перед макрокомандой .DRFIN, завершающей исполнение запроса ввода-вывода.
329 \\Действительно, операция ввода-вывода завершена, программа ЦП в системе будет готовить новую порцию данных для вывода, или соображать (на основании предыдущих прочитанных данных), где ей еще что-то прочитать, или вообще размышлять о чем-то своём. [[image:https://forum.maxiol.com/style_emoticons/default/smile.gif||alt="smile.gif"]] Другими словами, после окончания запроса ввода-вывода, довольно высока вероятность того, что последует пауза в работе с дисками AZ. Вот, время этой паузы и можно отдать на обслуживание сети. Для этого, перед исполнением макрокоманды .DRFIN в RT-11 или ее аналога в других ОС следует отправить в CSR код 110 (разрешить сеть плюс разрешить прерывания).
330 \\Прерывание в этом случае не произойдет, оно активируется только по завершении "длительных" операций, которые переводят контроллер в состояние "Думаю, прошу не мешать", а установленный в "1" триггер разрешения прерываний, кроме этого, разрешает еще и работу сети, если она активирована. При запуске следующей операции ввода-вывода действия в п. 3.1 (сброс контроллера) сбросят и этот триггер, после чего программа обслуживания сети, обнаружив сброс этого триггера, прекратит (приостановит) свою работу и вернет управление основной программе обслуживания дисков AZ. Максимум, что можно заметить со стороны ЦП - это небольшая (10-20 мкс) задержка исполнения команды сброса, но это вполне умеренная плата за сетевые возможности.
331
332
333 == **011: Получить таблицу назначений приводов AZn** ==
334
335 Код команды 011. Получив эту команду, контроллер переключается с буфера для блока на свою внутреннюю таблицу назначений (32 строки по 140 байт каждая)* . Перед выдачей этой команды следует сбросить контроллер. После выдачи этой команды следует выдать команду 015 (чтение буфера), но в этом случае будет читаться не буфер, а та самая таблица, последовательно, слово за словом.
336 \\* начиная с версии v17, длина имени файла уже не 130 байт, а 386 байт (последнее слово - нулевое, для окончания строки)
337
338 [[**//пример утилиты AZSMNT//**>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=59420]]
339
340
341 Пример программы:
342
343 {{code language="assembler"}}
344 ;...................................
345 AZ$CSR = 177220; CSR контроллера
346 RdBuf = 012; Команда "Читать из памяти контроллера"
347 RdTbl = 011; Команда "Читать таблицу назначений"
348 TblSiz = 1120.; Длина таблицы в байтах (десятичная)
349
350 ; Считаем, что в R2 находится адрес первого слова
351 ; области памяти для таблицы назначений. Процедуру
352 ; получения этого адреса не показываем.
353
354 MOV #AZ$CSR,R3; Готовим CSR контроллера
355 10$: CLR @R3;
356 TSTB @R3; Сбросим контроллер
357 BPL 10$;
358
359 MOV #RdTbl,@R3; Команда "Передать
360 ; таблицу"
361
362 MOV #RdBuf,(R3+); Команда "Читать из
363 ; памяти контроллера. Одновременно передвинем адрес в R3
364 ; на DR контроллера (177222).
365
366 MOV #TblSiz/2,R1; Готовим счетчик слов
367
368 11$: MOV @R3,(R2)+; Перешлем текущее слово
369 SOB R1,11$; и повторим 560 раз
370 ;...................................
371 {{/code}}
372
373 == **012: Установка номера блока, старшие биты номера блока** ==
374
375 Контроллер предоставляет машинке с МПИ в качестве дисков AZ0 - AZ7 файл-образы типа DSK на карточке микро-SD. Размер этих файл-образов и, соответственно, псевдодисков, может быть любым, вплоть до 4Г каждый. Адресация на этих псевдодисках прямая - полученный по МПИ номер блока, после сдвига, используется в качестве смещения от начала соответствующего файл-образа. Фактически, это нечто, вроде LBA на PC.
376 \\Существуют операционные системы PDP-11, поддерживающие такие диски - RSX-11, ДИАМС, еще что-то. Однако, самая распространенная ОС - RT-11 - использует для номера блока СЛОВО (16 бит), причем код 0177777 кое-где используется в специальных целях и как размер диска не годится, поэтому для RT-11 могут быть использованы диски с максимальным числом блоков 0177776, т.е. 65534 блока (33553408 байт или 32767 К байт). Поэтому команды установки номера блока две: установить младшие биты номера блока - код 002 и установить старшие биты номера блока - код 012. Если номер блока помещается в 16 разрядов (для RT-11 - всегда), достаточно использовать команду установки младших битов номера блока, старшие биты при этом очищаются. Если номер не помещается в 16 разрядов, то сначала надо выдавать младшие биты, а потом старшие. Если попытаться сразу передать старшие биты без предварительной передачи младших, выдается ошибка. Если переданный адрес выходит за границу файл-образа, также выдается ошибка, не важно, на каком этапе - хоть при передаче младших 16 битов номера блока, хоть при передаче старших.
377 \\Для выполнения этих действий следует переслать требуемую часть битов номера блока в DR и затем переслать в CSR код команды, после чего следует проверить на ошибку. Команды мгновенные, т.е. выполняются за один цикл обращения по МПИ.
378
379
380 == **013: Прочитать запись оглавления HFS** ==
381
382 Код команды 013, команда читает запись оглавления во внутреннюю область памяти и переключает на нее указатель для передачи данных через DR. Оглавление перед этим должно быть открыто. Порядок действий следующий:
383 • Сбросить контроллер.
384 • Выдать в CSR команду "Прочитать запись оглавления" и дождаться ее окончания.
385 • Выдать в CSR команду "Прочитать из памяти контроллера"
386 • Прочитать из DR 11 слов записи оглавления
387 \\Запись оглавления имеет формат:
388 \\См. Имя Значение
389 0 fSize Размер файла в байтах, младшее слово
390 2 старшее слово
391 4 fDate Дата в формате MS-DOS
392 6 fTime Время в формате MS-DOS
393 10 fAttr Атрибуты 1 байт
394 11 fName ИМЯ.ТИП файла, 8+1+3+1 = 13 байт
395 \\Смещения указаны восьмеричные. Формула в строке fName означает, что там сначала должно быть имя, максимально из восьми символов, далее должна быть точка, далее тип, до трёх символов, и завершающий нулевой байт 0х00. Если тип не указан, точка тоже не нужна.
396 \\Атрибуты файлов в байте fAttr (восьмеричные):
397 \\001 - Read Only
398 002 - Hidden
399 004 - System
400 020 - Directory
401 040 - Archive
402 \\Пример программы.
403
404 {{code language="assembler"}}
405 ;......................................
406 RdDir = 013; код команды "Читать запись оглавления"
407 RdBuf = 015
408
409 MOV #AZ$CSR,R3
410
411 15$: CLR @R3;
412 TSTB @R3; Сбросим контроллер
413 BPL 15$;
414
415 MOV #RdDir,@R3; Попросим контроллер
416 16$: TSTB @R3; прочитать в свою память
417 BPL 16$; запись оглавления
418
419 MOV @RdBuf,(R3)+;
420 MOV DIRREC,R2; И перенесем ее к себе в
421 MOV #11.,R1; область памяти, указатель
422 17$: MOV @R3,(R2)+; на которую лежит в ячейке
423 SOB R1,17$; DIRREC.
424
425 ;......................................
426 {{/code}}
427
428
429 == **014: Размонтировать диск** ==
430
431 Код команды 014, чтобы размонтировать диск, следует сбросить контроллер, переслать в DR контроллера номер привода AZ, который следует размонтировать, и послать в CSR контроллера код 014, после чего дождаться окончания операции (она длительная) и проверить на ошибку. Ошибка выдается, если привод не был смонтирован.
432 [[**//пример утилиты AZUMNT//**>>url:https://forum.maxiol.com/index.php?showtopic=5605&st=0&p=59418&#entry59418]]
433
434
435 == **015: Начать передачу считанного блока** ==
436
437 Код команды - 015. Получив эту команду, контроллер настраивается на пословную выдачу содержимого того самого встроенного буфера на 256 слов, которые будут выданы последовательно через регистр DR. Никаких ожиданий не требуется, просто пересылаем 256 раз слово из DR в последовательные ячейки памяти, и все. Если нужно меньше, чем 256 слов (последний укороченный блок файла), то остаток можно просто бросить, не считывая, сброс контроллера в начале следующей операции сбросит и этот остаток.
438 \\Пример программы:
439
440 {{code language="assembler"}}
441 ;..................................
442 RdBuf=015; символическое наименование команды
443
444 ; В R3 от предыдущего фрагмента остался адрес CSR
445 ; (177220)
446
447 ; Считаем, что у нас в R2 находится адрес первого слова
448 ; памяти, куда следует разместить прочитанный блок.
449 ; Программа получения этого адреса не приводится.
450
451 MOV #400,R1; Готовим счетчик слов
452 ; 0400 oct = 256 dec
453
454 MOV #RdBuf,(R3)+; и пересылаем команду
455 ; RdBuf в CSR. Адрес в R3 укажет на DR (177222).
456
457 3$: MOV @R3,(R2)+;перешлем очередное слово в
458 ; память
459 SOB R1,3$; и повторим это 256 (0400)
460 ; раз
461 ;..................................
462 {{/code}}
463
464 Всё, чтение закончено.
465 \\Для записи наоборот, требуется сначала перенести весь блок данных из памяти ЦП в контроллер и потом выдать команду "Записать содержимое буфера на диск"
466
467
468 == **016: Принять блок данных в буфер** ==
469
470 Код команды 016. Команда настраивает контроллер на прием блока данных и помещении его в буфер. Следующие 256 циклов записи в DR поместят данные, переданные через МПИ, в буфер.
471 \\Пример программы.
472
473 {{code language="assembler"}}
474 ;..................................
475
476 WrBuf=016; Символическое наименование команды
477
478 ; Перед записью нужно выполнить те же действия, что и в
479 ; пп. 3.1.-3.3. Обычно, это одна и та же программа,
480 ; просто после пункта 3.3. выполняется проверка "Что
481 ; требуется: чтение или запись?" и разветвление на
482 ; программу чтения или записи.
483
484 ; После фрагмента в п. 3.3. в R3 остался адрес CSR
485 ; (177220). Будем считать, что в R2 находится адрес в
486 ; памяти ЦП, где находится блок, подлежащий записи.
487 ; Программа получения этого адреса не показана.
488
489 MOV #400,R1; Готовим счетчик
490
491 MOV #WrBuf,(R3)+; Перешлем команду в CSR и
492 ; переключим адрес в R3 на
493 ; DR
494
495 4$: MOV (R2)+,@R3; Перешлем очередное слово
496 ; данных
497 SOB R1,4$; и повторим это 256 раз
498 ;..................................
499 {{/code}}
500
501 == **017: Получить размер псевдодиска, большой** ==
502
503 Есть две команды получения размера псевдодиска, т.е. смонтированного на выбранный псевдопривод AZn файл-образа.
504 \\Если используемая ОС (или программа, работающая с дисками без ОС) умеет работать с большими (больше 32М) дисками, следует пользоваться командой с кодом 017. Последовательность действий: сбросить контроллер (п. 3.1), выбрать накопитель (п. 3.2) и переслать в CSR код 017, а затем, без каких-либо ожиданий, считать из DR сначала младшее, и следом за ним старшее слово размера выбранного накопителя (файл-образа).
505 \\Если используемая ОС не умеет работать с дисками бОльшими, чем 32М (RT-11), следует пользоваться командой 007 - получить размер псевдодиска с ограничением до 32М. Действия похожие: сбрасываем контроллер, выбираем диск, посылаем в CSR код [[007>>doc:||anchor="H007:41F43E43B44344743844244C44043043743C43544043F44143543243443E43443844143A430"]] и считываем из DR одно слово размера псевдодиска. Если размер файл-образа, смонтированного на выбранный псевдопривод, больше 65534 блоков, вместо этого "большого" размера, контроллер возвращает число 65534. Напоминаем, что число 65535 кое-где используется в специальных целях и не может быть размером диска.
506 \\Также напоминаем, что если на этот накопитель не смонтирован файл-образ, последовательность действий не пройдет (команда 001 выбор устройства) и исполнение программы до этого места просто не дойдет. Поэтому ошибок у этих команд не предусмотрено.
507 \\Пример программы с большими дисками
508
509 {{code language="assembler"}}
510 ;......................................
511
512 GetBig=017; Получить "большой" размер диска
513
514 ; От фрагмента 3.2 (выбор диска) у нас в R3 остался
515 ; адрес DR (177222)
516
517 MOV #GetBig,-(R3); пошлем команду
518 TST (R3)+; вернем адрес в R3 назад, на DR
519 MOV @R3,BigSiz
520 MOV @R3,BigSiz+2
521 ;......................................
522 {{/code}}
523
524
525 == **020: Получить расширенный код диагностики** ==
526
527 Код команды 020, после сброса контроллера следует выдать эту команду в CSR и затем прочитать два слова расширенной диагностики из DR. Команда мгновенная, ожидание не требуется.
528
529
530 == **027: Получить версию firmware AZ STM32** ==
531
532 Код команды 027, возвращает 2 слова
533 \\первое слово - 06404 = старший байт 13. это версия прошивки, младший байт 4. это версия железа - те AZБК в данном случае
534 второе слово - 037 = это максимальный монтируемый диск - 31.
535
536
537 {{code language="assembler"}}
538 ;-------------------------------------------------------------
539 ; получение версии прошивки STM32 - результат в R1 R1=0 ошибка
540 GTSTMV: MOV #AZ$CSR,R1
541 1$: CLR (R1) ; Пошлем команду "Сброс"
542 TSTB (R1) ; Проверим готовность контроллера
543 BPL 1$ ; Если не готов, сбрасываем еще
544 mov #27,(R1)
545 TST (R1)+ ; Проверяем на ошибку
546 BMI 2$
547 mov (R1),R1
548 return
549 2$: CLR R1
550 return
551 ;-------------------------------------------------------------
552 {{/code}}
553
554
555 == **030:  Нет операции** ==
556
557 Основное назначение этой команды - устанавливать бит разрешения прерываний от контроллера. Команда передает бит разрешения прерывания, который находится с ней в одном слове, но не входит в ее состав (напоминаем, команда располагается в битах D0 - D5, а бит разрешения прерываний - D6), в соответствующий триггер контроллера и больше никак не влияет на процессы в контроллере. Управление этим триггером работает даже в состоянии "Думаю, прошу не мешать", и это главная особенность команды "нет операции".
558 \\Команда имеет код 0030. Посылка в CSR кода 0130 разрешит прерывания от контроллера, посылка кода 0030 запретит их. Пример не приводится вследствие тривиальности его.
559
560
561 = **Блок команд работы с энергонезависимой памятью** =
562
563 Интерфейс предоставляет любому AZ-контроллеру доступ к 255 словам энергонезависимой памяти, все команды устанавливают бит готовности по завершению. Это позволяет сохранять пользовательские настройки в энергонезависимой памяти, к примеру это используется в AZБК - там сохраняются настройки для более комфортной работы контроллера.
564
565 Все команды этого блока используют буфер энергонезависимой памяти для своей работы.
566
567 == **021: Cчитать блок энергонезависимой памяти в буфер** ==
568
569 (% class="wikigeneratedid" %)
570 Код команды 021, данная команда вызывает чтение блока энергонезависимой памяти в буфер энергонезависимой памяти.
571
572
573 == **022: Отдать на шину считанный блок энергонезависимой памяти из буфера** ==
574
575 (% class="wikigeneratedid" %)
576 Код команды 022, данная команда обеспечивает передачу буфера энергонезависимой памяти в регистр DR для считывания.
577
578 (% class="wikigeneratedid" %)
579 Пример программы
580
581 {{code language="assembler"}}
582 AZ$CSR = 177220; регистр команд и состояния (CSR)
583 AZ$DR = 177222; регистр данных (DR)
584
585
586 ; trap 50 - cброс AZ
587 ; результат в R1 =0 ok
588 AZreset: MOV #AZ$CSR,R1
589 1$: CLR (R1); Пошлем команду "Сброс"
590 TSTB (R1); Проверим готовность контроллера
591 BPL 1$; Если не готов, сбрасываем еще
592 ; раз и проверяем снова
593 TST (R1); Проверим на ошибку,
594 BMI 0ERR$
595 CLR R1
596 return
597 0ERR$: CLR R1
598 COM R1
599 return
600
601
602 ; trap 54 - чтение энергонезависимой памяти блока 1 EEPROM в буфер с адреса ADREEPROMMEM
603 ; результат R3 - адрес, если R3=0 ошибка
604 ; статус чтения в R1 0 - ok
605 ; 1 - размер не соответствует сохраненному
606 ; 2 - oшибка версии
607 ; 3 - oшибка контрольной суммы
608 ReadEEPROM: push R2
609 call AZreset; сбросим
610 tst R1
611 bne 0ERR$
612 ; теперь читаем
613 MOV #AZ$CSR,R1
614 mov #21,(R1); считать блок 1 энергонезависимой памяти в буфер
615 0$: TSTB (R1); проверяем результат выполнения
616 BPL 0$; ждем
617 mov #22,(R1); отдать на шину считанный блок энергонезависимой памяти из буфера
618 1$: TSTB (R1); проверяем результат выполнения
619 BPL 1$; ждем
620 TST (R1)+; инкрементируем
621 mov #ADREEPROMMEM,R3
622 mov #256.,R2; читаем 256. слов; первое слово - результат чтения
623 2$: mov (R1),(R3)+; читаем блок слов в память
624 sob R2,2$
625 mov #ADREEPROMMEM,R3; успешно
626 mov (R3),R1
627 br 0END$
628 0ERR$: CLR R3
629 0END$: pop R2
630 return
631 {{/code}}
632
633 очевидно, после считывания памяти необходимо проверить код результата в первом слове - см расшифровку кодов ошибок
634 \\Примеры возвращаемых данных по командам
635 \\последовательная подача команды 021 и затем 022 позволит считать 256. слов
636 из энергонезависимой памяти
637 **Внимание! **первое слово это будет статус успешности чтения
638
639
640 * 0 - ok
641 * 1 - размер не соответствует сохраненному
642 * 2 - oшибка версии
643 * 3 - oшибка контрольной суммы
644
645 == **023: Принять с шины в буфер данные для последующей записи в буфер** ==
646
647 Код команды 023, данная команда позволяет наполнить буфер энергонезависимой памяти
648
649 == **024: Записать из буфера в блок энергонезависимой памяти** ==
650
651 Код команды 024, данная команда вызывает запись блока энергонезависимой памяти из буфера энергонезависимой памяти.
652
653 Пример программы
654
655 {{code language="assembler"}}
656 AZ$CSR = 177220; регистр команд и состояния (CSR)
657 AZ$DR = 177222; регистр данных (DR)
658
659
660 ; trap 50 - cброс AZ
661 ; результат в R1 =0 ok
662 AZreset: MOV #AZ$CSR,R1
663 1$: CLR (R1); Пошлем команду "Сброс"
664 TSTB (R1); Проверим готовность контроллера
665 BPL 1$; Если не готов, сбрасываем еще
666 ; раз и проверяем снова
667 TST (R1); Проверим на ошибку,
668 BMI 0ERR$
669 CLR R1
670 return
671 0ERR$: CLR R1
672 COM R1
673 return
674
675 ; trap 55 - запись энергонезависимой памяти из буфера с адреса ADREEPROMMEM в блок 1 EEPROM
676 WriteEEPROM: push R1
677 push R2
678 push R3
679 call AZreset; сбросим
680 tst R1
681 bne 0ERR$
682
683 MOV #AZ$CSR,R1
684 mov #23,(R1); командуем что будем писать данные в буфер
685 0$: TSTB (R1); проверяем результат выполнения
686 BPL 0$; ждем
687 TST (R1)+; инкрементируем
688 mov #ADREEPROMMEM+2,R3
689 mov #255.,R2; пишем 255. слов; первое слово пропускаем - результат чтения
690 1$: mov (R3)+,(R1); отдаем в контроллер
691 sob R2,1$
692 tst -(R1); декрементируем
693 mov #24,(R1); записать из буфера в блок 1 энергонезависимой памяти
694 2$: TSTB (R1); проверяем результат выполнения
695 BPL 2$; ждем
696 br 0END$
697 0ERR$: CLR R3
698 0END$: pop R3
699 pop R2
700 pop R1
701 return
702 {{/code}}
703
704 **Обращаю внимание**, при записи, буфер идет сразу с данными, те нет первого слова со статусом.
705
706
707
708 = Блок команд для работы с RTC и NTP =
709
710 В контроллере AZ®  есть 2 источника получения даты-времени, первый это RTC встроенный в STM32, второй это часы в стеке TCP/IP.  Часы RTC работают автономно при наличии установленной батарейки 2032. Часы в стеке TCP/IP устанавливаются на основании данных с NTP-сервера.
711
712
713 == Формат буфера timestamp (доступен по чтению) ==
714
715 API контроллера сразу готовит время в нескольких форматах, дабы его было удобно применить на стороне PDP-11
716
717 {{info}}
718 формат буфера даты-времени
719 offset в восьмеричной системе - те слова
720 формат буфера даты-времени
721 \\[0]=rtc_rt11date();
722 [2]=rt11 time 50Hz big word;
723 [4]=rt11 time 50Hz little word;
724 [6]=rt11 time 60Hz big word;
725 [10]=rt11 time 60Hz little word;
726 [12]=rtc_fat_date();
727 [14]=rtc_fat_time();
728 [16]=year+2000;
729 [20]=month;
730 [22]=day;
731 [24]=wday;
732 [26]=hour;
733 [30]=min;
734 [32]=sec;
735 {{/info}}
736
737
738 == Формат буфера SimpleIN (при записи) ==
739
740 формат максимально упрощен, для работы со стороны PDP-11
741
742 {{info}}
743 offset в восьмеричной системе - те слова
744
745 [0]=year       год, младшие две цифры - те 22 а не 2022(!)
746 [2]=month;     месяц
747 [4]=day;       день
748 [6]=wday;      день недели =0 не установлен, 1- понедельник 2 - вторник итд
749 [10]=hour;     час
750 [12]=min;      минута
751 [14]=sec;      секунда
752 {{/info}}
753
754
755 == **031:  Получить время из RTC в буфер timestamp** ==
756
757 Код команды 031, данная команда использует RTC часы как источник заполнения буфера timestamp
758
759 Пример программы:
760
761 {{code language="assembler"}}
762 ; trap 61 - чтение данных часов из автономных часов RTC
763 ; R3 - адрес буфера куда надо считать
764 ; результат в R3 адрес, если успешно. R3=0 если ошибка
765 GetDateFromRTC: push R0
766 push R1
767 push R2
768 call AZreset; сбросим
769 tst R1
770 bne G60ERR
771 MOV #AZ$CSR,R1
772 mov #31,(R1)
773 br G60; идем туда тк дальше код одинаковый
774 {{/code}}
775
776 == **032:  Получить время из буфера timestamp** ==
777
778 Код команды 032, данная команда отдает на шину содержимое буфера timestamp
779
780 {{code language="assembler"}}
781 ; работа с часами
782 ; trap 60 - чтение данных часов из TCP/IP стека
783 ; R3 - адрес буфера куда надо считать
784 ; результат в R3 адрес, если успешно. R3=0 если ошибка
785 GetDateFromLAN: push R0
786 push R1
787 push R2
788 call AZreset; сбросим
789 tst R1
790 bne G60ERR
791 MOV #AZ$CSR,R1
792 mov #42,(R1)
793 G60: TSTB (R1); проверяем результат выполнения
794 BPL G60; ждем
795 mov #32,(R1)
796 1$: TSTB (R1); проверяем результат выполнения
797 BPL 1$; ждем
798 TST (R1)+; инкрементируем
799 mov R3,R0; запомним R3 - адрес
800 mov #10.,R2; читаем 10 слов
801 2$: mov (R1),(R3)+; читаем блок слов в память
802 sob R2,2$
803 mov R0,R3; успешно, вернем адрес в R3
804 br 0END$
805 G60ERR: CLR R3
806 0END$: pop R2
807 pop R1
808 pop R0
809 return
810 {{/code}}
811
812 Стоит проверить корректность полученного времени:
813
814 {{code language="assembler"}}
815 ; trap 63 - проверка корректности времени
816 ; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка
817 CheckDateTime: Cmp 6(r3),#2021.
818 Blos 1err
819 Cmp 6(r3),#2100.
820 Bhi 1err
821 0ok$: return
822 1err$: clr R3
823 return
824 {{/code}}
825
826 == **033:  Запись времени-даты в буфер SimpleIN** ==
827
828 Код команды 033, данная команда  принимает с шины данные в буфер SimpleIN
829
830 Работа данной команды аналогична работе команд [[023>>doc:||anchor="H023:41F44043843D44F44244C44144843843D44B43243144344443544043443043D43D44B43543443B44F43F43E44143B43543444344E44943543943743043F438441438432431443444435440"]] и [[016>>doc:||anchor="H016:A041F44043843D44F44244C43143B43E43A43443043D43D44B445432431443444435440"]].
831
832 == **034:  Установка RTC на основании данных из буфера** ==
833
834 Код команды 034, данная команда  устанавливает RTC на основании данных в буфере SimpleIN
835
836 Данная команда выполняется быстро, но для исключения проблем цикл ожидания выполнения рекомендуется.
837
838 == **035:  Стимуляция запроса времени с NTP сервера, установка на основании ответа** ==
839
840 Код команды 035, данная команда отправляет запрос на NTP cервер (установленный в AZ.INI файле или полученный от DHCP) и устанавливает часы в стеке TCP/IP.
841
842 Пример программы: отсылка запроса на установку времени с NTP сервера
843
844 {{code language="assembler"}}
845 ; trap 62 - отсылка запроса на установку времени с NTP сервера
846 GetDateNTPtoNET:push R1
847 call AZreset; сбросим
848 tst R1
849 bne 0ERR$
850 MOV #AZ$CSR,R1
851 mov #35,(R1)
852 0$: TSTB (R1); проверяем результат выполнения
853 BPL 0$; ждем
854 0ERR$: pop R1
855 return
856 {{/code}}
857
858 Выполнение команды занимает 1-2 секунды в среднем. Данная команда требует работы стека TCP/IP, соответственно нужны циклы ожидания при включенном стеке.
859
860 Пример цикла опроса с целью получить время с сети
861
862 {{code language="assembler"}}
863 ; дата-время
864 mov #S_DateTime_0,R3; "Lan Date:"
865 trap 10
866 mov #20,R4; количество циклов ожидания
867 $datry: trap 62; отослали запрос к NTP серверу
868 mov #110,@#AZ$CSR; включим сеть
869 trap 47; ожидание
870 trap 47; ожидание
871 mov #ADRTMPSTR,R3
872 trap 60; считали в буфер дату-время
873 trap 63; проверили дату-время
874 tst R3
875 bne $ok
876 $sob: sob R4,$datry
877 mov #S_DateTime_2,R3; печать ошибки
878 trap 7
879 br $go
880
881 $ok: mov #ADRTMPSTR,R3
882 trap 24; печать даты
883 trap 25; времени
884 $go: mov #110,@#AZ$CSR; включим сеть
885 {{/code}}
886
887 Тут мы явно отсылаем запрос к NTP серверу, затем включаем работу сети и ждем результата, периодически опрашивая и проверяя корректность результата.
888
889 == **036:  Установка RTC на основании часов TCP/IP стека** ==
890
891 Код команды 036,  данная команда устанавливает RTC на основании часов в TCP/IP стека. Предварительно надо установить часы в TCP/IP - команда 036.
892
893 Пример программы:
894
895 {{code language="assembler"}}
896 ; trap 64 - установка времени RTC на основании времени стека
897 ; R1 - результат R1=0 - OK
898 SetDateNETtoRTC:call AZreset; сбросим
899 tst R1
900 bne 0ERR$
901 MOV #AZ$CSR,R1
902 mov #36,(R1)
903 0$: TSTB (R1); проверяем результат выполнения
904 BPL 0$; ждем
905 clr R1
906 0ERR$: return
907 {{/code}}
908
909 == **042:  Получить время из часов TCP/IP стека в буфер timestamp** ==
910
911 Код команды 042,   данная команда использует часы TCP/IP стека как источник заполнения буфера timestamp.
912
913 Пример программы:
914
915 {{code language="assembler"}}
916 ; работа с часами
917 ; trap 60 - чтение данных часов из TCP/IP стека
918 ; R3 - адрес буфера куда надо считать
919 ; результат в R3 адрес, если успешно. R3=0 если ошибка
920 GetDateFromLAN: push R0
921 push R1
922 push R2
923 call AZreset; сбросим
924 tst R1
925 bne G60ERR
926 MOV #AZ$CSR,R1
927 mov #42,(R1)
928 G60: TSTB (R1); проверяем результат выполнения
929 BPL G60; ждем
930 mov #32,(R1)
931 1$: TSTB (R1); проверяем результат выполнения
932 BPL 1$; ждем
933 TST (R1)+; инкрементируем
934 mov R3,R0; запомним R3 - адрес
935 mov #10.,R2; читаем 10 слов
936 2$: mov (R1),(R3)+; читаем блок слов в память
937 sob R2,2$
938 mov R0,R3; успешно, вернем адрес в R3
939 br 0END$
940 G60ERR: CLR R3
941 0END$: pop R2
942 pop R1
943 pop R0
944 return
945 {{/code}}
946
947 все команды устанавливают бит готовности по завершению.
948
949
950 = **Команды специфические для [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]]** =
951
952 Данные команды предназначены для работы контроллера AZБК®, разработанного для серии компьютеров БК - БК-0010/БК-0010.01/БК-0011М.
953
954 Другие контроллеры AZ® игнорируют эти команды
955
956 == **037: перезапуск контроллера [[AZБК®>>doc:Контроллеры AZБК® для компьютеров БК-0010 БК-0010\.01 БК-0011М.WebHome]] и всей БК** ==
957
958 Код команды 037,  данная команда осуществляет перезапуск микроконтроллера AZ®, что вызывает и перезапуск самой БК-0010/БК-0010.01/БК-0011М
959
960 Пример программы
961
962 {{code language="assembler"}}
963 AZ$CSR = 177220; регистр команд и состояния (CSR)
964 AZ$DR = 177222; регистр данных (DR)
965
966
967 ; trap 57 - перезапуск БК полный
968 AZcouldReboot: call AZreset; сбросим AZ дабы он был готов принимать команды
969 mov #037,@#AZ$CSR
970 return
971 {{/code}}
972
973 == **044: Cохранение скриншота в файл** ==
974
975 Код команды 044,  данная команда предназначена для снятия образа памяти указанного размера (или определенного автоматически на основании сохраненных параметров)
976 технически команда может служить как средство отладки ибо способная снимать образ памяти
977 общее ограничение на снятие образа памяти - 2МБ на один образ
978 \\в качестве параметров используется служебная страница памяти 76(8)
979
980 Структура заполнения информации о скриншоте
981
982 {{code language="c"}}
983 // структура хидера скриншота
984 typedef __packed struct screen_header
985 {
986 unsigned short int tag; // должен быть равен 0240
987
988 unsigned int begin_adress; // начальный адрес в словах - прямая задача в физических адресах
989 unsigned int length; // длина в словах - прямая задача в физических адресах
990
991 unsigned short int begin_page; // начальная страница - номер - прямая задача в номерах страниц
992 unsigned short int len_pages; // количество страниц - прямая задача в номерах страниц
993
994 unsigned short int R177300; //
995 unsigned short int R177302; //
996 unsigned short int R177304; //
997 unsigned short int R177306; //
998 unsigned short int R177310; //
999 unsigned short int R177312; //
1000 unsigned short int R177314; //
1001 unsigned short int R177316; //
1002 unsigned short int R177320; //
1003 unsigned short int R177322; //
1004 unsigned short int R177324; //
1005 unsigned short int R177326; //
1006 unsigned short int R177330; //
1007 unsigned short int R177332; //
1008 unsigned short int R177334; //
1009 unsigned short int R177336; //
1010 unsigned short int R177340; // - Регистр управления активацией окно - маски окон
1011 unsigned short int R177342; // - Регистр управления r/o на окно
1012 unsigned short int R177344; // - Регистр управления shadow окон - маски окон
1013 unsigned short int R177346; // - Регистр управления маппером
1014 unsigned short int R177350; // - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1015 unsigned short int R177352; // - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1016
1017 unsigned short int R177230; // - регистр управления
1018 unsigned short int R177232; // - регистр номера страницы начала отображения - верхняя страница (слой 0)
1019 unsigned short int R177240; // - регистр номера страницы начала отображения - средняя страница (слой 1)
1020 unsigned short int R177242; // - регистр номера страницы начала отображения - нижняя страница (слой 2)
1021 unsigned short int R177244; // - регистр вертикального скролинга слой 2
1022 unsigned short int R177246; // - регистр вертикального скролинга слой 1
1023 unsigned short int R177250; // - регистр вертикального скролинга слой 0
1024 unsigned short int R177252; // - регистр гозизонтального скролинга слой 0
1025 unsigned short int R177254; // - регистр гозизонтального скролинга слой 1
1026 unsigned short int R177256; // - регистр гозизонтального скролинга слой 2
1027
1028 unsigned short int paldata[338]; //
1029 } screen_header_t;
1030 {{/code}}
1031
1032 Пример кода для заполнения страницы памяти
1033
1034 {{code language="assembler"}}
1035 ;--------------------------------------------------
1036 ; карта 76й страницы - туда мы готовим данные для команды скринщотов
1037 SCR_PAGE = 130000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000
1038 SCR_TAG = SCR_PAGE+0 ; тут вход - 240 - 1 слово
1039 SCR_ADDR_CONF = SCR_TAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1040 SCR_PAGE_CONF = SCR_ADDR_CONF+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1041 SCR_MEM_CONF = SCR_PAGE_CONF+4. ; cюда конфигурацию памяти из регистров - 22 слова
1042 SCR_VGA_CONF = SCR_MEM_CONF+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1043 SCR_PAL = SCR_VGA_CONF+20. ; сюда 338. значений(слов) палитры 338 слов
1044 ;--------------------------------------------------
1045
1046
1047 ; trap 41 - подготовка дефолтной информации для работы функционала скриншотов
1048 PrepSRC: jsr R5, PUSHA ; пакетное сохранение регистров
1049 mov @#177326,-(SP) ; сохраним страницу 130k которая была до вызова
1050 mov #76,@#177326 ; цепляем 76ую страницу в окно
1051
1052 mov #100377,R3 ; константа-заполнитель
1053 mov #SCR_PAGE,R4
1054 mov #2047.,R2
1055 4$: mov R3,(R4)+
1056 sob R2,4$
1057
1058 mov #240,@#SCR_TAG ; проставляем тег
1059
1060 ; чистим участок адресов - дефолтно автоматическое определение адресов
1061 clr R3
1062 mov #SCR_ADDR_CONF,R4
1063 mov #10,R2
1064 2$: mov R3,(R4)+
1065 sob R2,2$
1066
1067 ;конфигурация памяти - дефолтная
1068 mov #SCR_MEM_CONF,R4
1069 mov #30,(R4)+ ;177300
1070 mov #31,(R4)+ ;177302
1071 mov #32,(R4)+ ;177304
1072 mov #33,(R4)+ ;177306
1073 mov #04,(R4)+ ;177310
1074 mov #05,(R4)+ ;177312
1075 mov #06,(R4)+ ;177314
1076 mov #07,(R4)+ ;177316
1077 mov #20,(R4)+ ;177320
1078 mov #21,(R4)+ ;177322
1079 mov #22,(R4)+ ;177324
1080 mov #23,(R4)+ ;177326
1081 mov #120,(R4)+ ;177330
1082 mov #121,(R4)+ ;177332
1083 mov #110,(R4)+ ;177334
1084 mov #100,(R4)+ ;177336
1085
1086 mov #170000,(R4)+ ;177340 - Регистр управления активацией окно - маски окон
1087 mov R3,(R4)+ ;177342 - Регистр управления r/o на окно
1088 mov #7777,(R4)+ ;177344 - Регистр управления shadow окон - маски окон
1089 mov #40404,(R4)+ ;177346 - Регистр управления маппером
1090 mov R3,(R4)+ ;177350 - регистр копия по записи 177130 в режиме записи управления памятью в SMK
1091 mov #16000,(R4)+ ;177352 - регистр копия по записи 177716 в режиме записи управления памятью в БК11М
1092
1093 ;конфигурация видеоконтроллера - дефолтная
1094 ; 177230-177256
1095 mov #SCR_VGA_CONF,R4
1096
1097 mov #12201,(R4)+ ;177230 - регистр управления
1098 mov #4,(R4)+ ;177232 - регистр номера страницы начала отображения - верхняя страница (слой 0)
1099 mov R3,(R4)+ ;177240 - регистр номера страницы начала отображения - средняя страница (слой 1) "под спрайты"
1100 mov R3,(R4)+ ;177242 - регистр номера страницы начала отображения - нижняя страница (слой 2) "под фон"
1101 mov R3,(R4)+ ;177244 - регистр вертикального скролинга слой 2
1102 mov R3,(R4)+ ;177246 - регистр вертикального скролинга слой 1
1103 mov R3,(R4)+ ;177250 - регистр вертикального скролинга слой 0
1104 mov R3,(R4)+ ;177252 - регистр гозизонтального скролинга слой 0
1105 mov R3,(R4)+ ;177254 - регистр гозизонтального скролинга слой 1
1106 mov R3,(R4)+ ;177256 - регистр гозизонтального скролинга слой 2
1107
1108 ; закачиваем палитру - берем дефолтную из этой ПЗУшки
1109 mov #SCR_PAL,R4
1110 mov #PalData,R2
1111 mov #338.,R3
1112 1$: mov (R2)+,(R4)+
1113 sob R3,1$
1114
1115 mov (SP)+,@#177326; вернем страницу с которой был вызов
1116 return
1117 {{/code}}
1118
1119 Вариантов указания участков памяти три
1120
1121 1. указать адрес и длину 24х битные - cм формат, если их нет - система смотрит дальше
1122 1. указать номер страницы и количество страницы, если их нет
1123 1. система смотрит дальше - те делает скриншот на основании данных о регистрах 177230 и т.д..
1124
1125 Cкриншот сохраняется в формате
1126 - страница 76 - ее первый килобайт
1127 - сам образ памяти (если режим слоеный - то все три слоя)
1128
1129
1130 Перед вызовом команды можно загрузить имя файла для сохранения скриншота [в cmosmem буфер], однако при его отсутствии* (в буфере не будет имени - строки формата 8.3 и заканчивающейся на 0) система сформирует свое имя, на основании следующего правила:
1131 дефолтный путь для сохранения скриншотов
1132 0:/SCREENS/
1133 формат имени - DDHHMISS.SCR
1134 где DD - две цифры дня месяца, HH - час, MI - минута, SS-секунда
1135 \\Если в процессе выполнения команды возникнет ошибка - вместо имени будет "ERROR *"
1136 к примеру
1137 "ERROR f_open 6"
1138
1139 ~* если требуется явно получить автоматическое имя, надо явно очистить строку в cmosmem буфер, или записать явно имя.
1140
1141
1142 Пример программы
1143
1144 {{code language="assembler"}}
1145 ; обновим информацию в хидере скриншота
1146 ;--------------------------------------------------
1147 ; карта 76й страницы - туда мы готовим данные для команды скринщотов
1148 SPAGE = 170000 ; 76ую страницу цепляем в окно 170000
1149 STAG = SPAGE+0 ; тут вход - 240 - 1 слово
1150 SADDRC = STAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова
1151 SPAGEC = SADDRC+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова
1152 SMEMC = SPAGEC+4. ; cюда конфигурацию памяти из регистров - 22 слова
1153 SVGAC = SMEMC+44. ; сюда конфигурацию видеоконтроллера - 10 cлов
1154 SPAL = SVGAC+20. ; сюда 338. значений(слов) палитры 338 слов
1155 ;--------------------------------------------------
1156
1157 mov @#177326,R5 ; сохраним страницу 130k которая была до вызова
1158 mov #76,@#177336 ; цепляем 76ую страницу в окно
1159
1160 ;конфигурация видеоконтроллера
1161 ; 177230-177256
1162 mov #SVGAC,R4
1163
1164 mov @#177230,(R4)+;177230 - регистр управления
1165 mov @#177232,(R4)+;177232 - регистр - верхняя страница (слой 0)
1166 mov @#177240,(R4)+;177240 - регистр - средняя страница (слой 1)
1167 mov @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)
1168 mov @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2
1169 mov @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1
1170 mov @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0
1171 mov @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0
1172 mov @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1
1173 mov @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2
1174
1175 mov R5,@#177336; вернем страницу с которой был вызов
1176
1177
1178 ;-------------------------
1179 MOV #AZ$CSR,R3 ; Готовим CSR контроллера
1180 MOV #AZ$DR,R4 ; Готовим DR контроллера
1181 20$: CLR (R3) ; Сбросим контроллер
1182 TSTB (R3)
1183 BPL 20$
1184
1185 ; очистим блок памяти для имени - дабы система сделала дефолтное имя файла
1186 mov #23,(R3) ; командуем что будем писать данные в буфер
1187 128$: TSTB (R3) ; проверяем результат выполнения
1188 BPL 128$ ; ждем
1189 clr R1
1190
1191 mov #256.,R2 ;
1192 129$: mov R1,(R4) ; отдаем в контроллер
1193 sob R2,129$
1194
1195
1196 MOV #044,(R3) ; команда скриншот
1197 22$: TSTB (R3) ;
1198 BPL 22$ ;
1199
1200 ; получим имя скриншота
1201 mov #22,(R3) ; отдать на шину считанный блок памяти из буфера
1202 121$: tstb (R3) ; проверяем результат выполнения
1203 bpl 121$ ; ждем
1204
1205 mov #BUF,R1
1206 mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1207 122$: mov (R4),(R1)+ ; читаем блок слов в память
1208 sob R2,122$
1209
1210 .PRINT #RESOK
1211 .Print #BUF
1212
1213 mov #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена
1214 .Exit
1215 {{/code}}
1216
1217 Для распаковки скриншота можно использовать вот эту утилиту  [[https:~~/~~/master.pdp-11.ru/screen_unpack/>>https://master.pdp-11.ru/screen_unpack/]]
1218
1219
1220
1221 = **Команды для работы со стеком TCP/IP** =
1222
1223 следующие команды работают с буфером информации TCP/IP cтека.
1224
1225 == **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==
1226
1227 Код команды 040,  данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.
1228
1229 == **041: Чтение буфера ip адреса** ==
1230
1231 Код команды 041,  данная команда передает буфер на шину
1232
1233 эта пара команд позволяет получить текущую информацию со стека
1234
1235 * IP адрес
1236 * MASK маску
1237 * GW гейтвей
1238 * NTP адрес NTP-сервера
1239 * DNS1 адрес основного DNS
1240 * DNS2 адрес резервного DNS
1241
1242 соответственно это 12 слов
1243
1244 Пример программы:
1245
1246 {{code language="assembler"}}
1247 ; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)
1248 ; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1249 GetIPaddrs: push R1
1250 push R2
1251 call AZreset; сбросим
1252 tst R1
1253 bne 0ERR$
1254 MOV #AZ$CSR,R1
1255 mov #40,(R1)
1256 0$: TSTB (R1); прочитать адреса в свою память
1257 BPL 0$; ждем
1258 mov #41,(R1)
1259 1$: TSTB (R1); подготовить буфер
1260 BPL 1$; ждем
1261 TST (R1)+; инкрементируем
1262 mov #IPADDDBLOCK,R3
1263 mov #12.,R2
1264 2$: mov (R1),(R3)+; читаем блок слов в память
1265 sob R2,2$
1266 mov #IPADDDBLOCK,R3; успешно
1267 br 0END$
1268 0ERR$: CLR R3
1269 0END$: pop R2
1270 pop R1
1271 return
1272 {{/code}}
1273
1274 Пример данных
1275
1276 {{info}}
1277 Примеры данных - возвращаемые слова в восьмеричном формате
1278 124300 116400 - IP адрес 192.168.0.157
1279 177777 000377 - MASK маску 255.255.255.0
1280 124300 000400 - GW гейтвей 192.168.0.1
1281 124300 000400 - NTP адрес NTP-сервера 192.168.0.1
1282 124300 050000 - DNS1 адрес основного DNS 192.168.0.90
1283 124300 055000 - DNS2 адрес резервного DNS 192.168.0.80
1284 {{/info}}
1285
1286 == **043: чтение MAC-адреса в ip буфер** ==
1287
1288 Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов
1289 те сначала 043, а затем 041 команды
1290
1291 Пример программы:
1292
1293 {{code language="assembler"}}
1294 ; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)
1295 ; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)
1296 GetMACaddrs: push R1
1297 push R2
1298 call AZreset ; сбросим
1299 tst R1
1300 bne 0ERR$
1301 MOV #AZ$CSR,R1
1302 mov #43,(R1)
1303 0$: TSTB (R1) ; прочитать адреса в свою память
1304 BPL 0$ ; ждем
1305 mov #41,(R1)
1306 1$: TSTB (R1) ; подготовить буфер
1307 BPL 1$ ; ждем
1308 TST (R1)+ ; инкрементируем
1309 mov #IPADDDBLOCK,R3
1310 mov #12.,R2
1311 2$: mov (R1),(R3)+ ; читаем блок слов в память
1312 sob R2,2$
1313 mov #IPADDDBLOCK,R3; успешно
1314 br 0END$
1315 0ERR$: CLR R3
1316 0END$: pop R2
1317 pop R1
1318 retur
1319 {{/code}}
1320
1321
1322
1323 = **Команды для работы с MicroSD картой на файловом уровне** =
1324
1325
1326 Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.
1327
1328 Эти команды используют буфер 256. слов который задействован в интерфейсе работы с энергонезависимой памятью (см выше команды 022 023)
1329 \\Ограничения - длина полного пути к файлу  256 байт
1330
1331 == **050: Установить имя файла который будем читать** ==
1332
1333 Код команды 050,  данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.
1334
1335 == **051: Получить размер файла на чтение (или его статус) на МПИ** ==
1336
1337 Код команды 051,  данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).
1338
1339 формирование ошибки выглядит так:
1340 sizeanyfile=1<<31 + FFres; ~/~/ если установлен старший бит 32х битного слова - то в младшей части код ошибки
1341 \\FFres = ошибка FatFS
1342
1343
1344 {{code language="c"}}
1345 typedef enum {
1346 FR_OK = 0, /* (0) Succeeded */
1347 FR_DISK_ERR, /* (1) A hard error occurred in the low level disk I/O layer */
1348 FR_INT_ERR, /* (2) Assertion failed */
1349 FR_NOT_READY, /* (3) The physical drive cannot work */
1350 FR_NO_FILE, /* (4) Could not find the file */
1351 FR_NO_PATH, /* (5) Could not find the path */
1352 FR_INVALID_NAME, /* (6) The path name format is invalid */
1353 FR_DENIED, /* (7) Access denied due to prohibited access or directory full */
1354 FR_EXIST, /* (8) Access denied due to prohibited access */
1355 FR_INVALID_OBJECT, /* (9) The file/directory object is invalid */
1356 FR_WRITE_PROTECTED, /* (10) The physical drive is write protected */
1357 FR_INVALID_DRIVE, /* (11) The logical drive number is invalid */
1358 FR_NOT_ENABLED, /* (12) The volume has no work area */
1359 FR_NO_FILESYSTEM, /* (13) There is no valid FAT volume */
1360 FR_MKFS_ABORTED, /* (14) The f_mkfs() aborted due to any problem */
1361 FR_TIMEOUT, /* (15) Could not get a grant to access the volume within defined period */
1362 FR_LOCKED, /* (16) The operation is rejected according to the file sharing policy */
1363 FR_NOT_ENOUGH_CORE, /* (17) LFN working buffer could not be allocated */
1364 FR_TOO_MANY_OPEN_FILES, /* (18) Number of open files > _FS_LOCK */
1365 FR_INVALID_PARAMETER /* (19) Given parameter is invalid */
1366 } FRESULT;
1367 {{/code}}
1368
1369 [[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]
1370
1371 == **052: Читать блок установленного файла в буфер** ==
1372
1373 Код команды 052,  данная команда осуществляет чтение файла в буфер энергонезависимой памяти.
1374
1375 В итоге схема чтения файла выглядит вот так
1376 **023** - заливаем имя файла в буфер
1377 **050** - устанавливаем файл на чтение
1378 **051 **- читаем длину файла или ошибку открытия файла
1379 если ошибка - повторяем сначала 023 050 051
1380 если все ok - приступаем к чтению файла
1381 **052** - читает блок файла в буфер
1382 **022 **- забираем данные из буфера
1383 пары 052 022 повторяем нужное количество раз дабы считать весь файл
1384 как файл будет прочтен - последняя 052 команда закроет его автоматически.
1385
1386
1387 Пример программы
1388
1389 {{code language="assembler"}}
1390
1391 call AZRST; сбросим
1392
1393 ; заливаем в буфер имя файла
1394 7$: mov #23,(R1); командуем что будем писать данные в буфер
1395 5$: TSTB (R1); проверяем результат выполнения
1396 BPL 5$ ; ждем
1397 TST (R1)+; инкрементируем
1398 mov #FILNM,R3
1399 1$: mov (R3),(R1); отдаем в контроллер
1400 tst (R3)+
1401 bne 1$
1402 tst -(R1); декрементируем
1403
1404
1405 ; устанавливаем файл на чтение
1406 mov #50,(R1); устанавливаем файл на чтение
1407 2$: TSTB (R1); проверяем результат выполнения
1408 BPL 2$ ; ждем
1409
1410
1411 ; читаем длину файда
1412 mov #51,(R1); устанавливаем файл на чтение
1413 3$: TSTB (R1); проверяем результат выполнения
1414 BPL 3$ ; ждем
1415 TST (R1)+; инкрементируем
1416 mov #FILSZ,R3
1417 mov (R1),(R3)+; читаем с контроллера
1418 mov (R1),(R3); читаем с контроллера
1419
1420 ; выведем длину файла на экран
1421 clr R0
1422 mov #FILSZ+2,R3
1423 mov (R3),R1
1424 call DNOZ
1425 mov -(R3),R1
1426 call DNOZ
1427 .print #STMS2
1428
1429 ; читаем файл
1430 mov R1,R4; в R1 осталась длина файла
1431 MOV #AZ$CSR,R1
1432 mov #BUFFL,R5
1433
1434 bit #1,R4; если нечетное число байт
1435 beq 47$
1436 inc R4; добавим еще 1 байт тк читаем словами
1437
1438 47$: tst R4
1439 beq 45$ ; уже нечего читать - выходим
1440
1441
1442 mov #52,(R1); читаем блок в буфер
1443 4$: TSTB (R1); проверяем результат выполнения
1444 BPL 4$ ; ждем
1445 mov #22,(R1); будем читать буфер
1446 51$: TSTB (R1); проверяем результат выполнения
1447 BPL 51$ ; ждем
1448
1449 cmp R4,#512.; сравниваем c размером буфера в байтах
1450 Blos 44$ ; осталось меньше чем буфер
1451
1452
1453 .print #STMS1
1454 mov #256.,R2
1455 TST (R1)+; переходим на регистр данных
1456 46$: mov (R1),(R5)+; читаем в буфер
1457 sob R2,46$
1458 sub #512.,R4; вычитаем
1459 TST -(R1); переходим на регистр команд
1460 br 47$
1461
1462 44$: .print #STMS3
1463 mov R4,R2
1464 asr R2 ; /2 тк читаем словами
1465 TST (R1)+; переходим на регистр данных
1466 43$: mov (R1),(R5)+; читаем в буфер
1467 sob R2,43$
1468
1469
1470 45$: clr (R5); проставим конец файла
1471 ; файл считан - выводим на экран
1472 .print #STMS4
1473 .print #BUFFL
1474 .print #STMS5
1475
1476
1477 mov #110,@#AZ$CSR; включаем сеть
1478 .Exit
1479 {{/code}}
1480
1481
1482
1483 == **053:** установить имя файла который будем писать ==
1484
1485 Код команды 053,  данная команда открывает файл на запись, получает параметры открытия (или ошибки).
1486
1487 == **054:** установка длины файла ==
1488
1489 Код команды 054,  данная команда устанавливает ожидаемую длину файла, это нужно для корректного формирования файла на файловом уровне MicroSD карты, а также для организации передачи данных.
1490
1491 == **055:** записать в файл данные из буфера ==
1492
1493 Код команды 055,  данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.
1494
1495 Схема подачи команд при записи вот такая
1496 **023** - заливаем имя файла в буфер
1497 **053** - устанавливаем файл на чтение
1498 **051 **- статус открытия/создания файла
1499 если ошибка - повторяем сначала 023 053 051
1500 если все ok - идем дальше
1501 **054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла
1502 **023** - заливаем блок данных в буфер
1503 **055** - пишем из буфера в файл
1504 пары 023 055 повторяем нужное количество раз дабы записать весь файл
1505 как файл будет записан - последняя 055 команда закроет его автоматически
1506
1507
1508 Пример программы:
1509
1510 {{code language="assembler"}}
1511 ; заливаем в буфер имя файла
1512 MOV #AZ$CSR,R1
1513 17$: mov #23,(R1); командуем что будем писать данные в буфер
1514 15$: TSTB (R1) ; проверяем результат выполнения
1515 BPL 15$ ; ждем
1516 TST (R1)+ ; переходим на регистр данных
1517 mov #FILNM2,R3
1518 11$: mov (R3),(R1); отдаем в контроллер
1519 tst (R3)+
1520 bne 11$
1521 tst -(R1) ; переходим на регистр команд
1522
1523 ; устанавливаем файл на запись
1524 mov #53,(R1); устанавливаем файл на запись
1525 12$: TSTB (R1) ; проверяем результат выполнения
1526 BPL 12$ ; ждем
1527
1528
1529 ; читаем статус создания файла
1530 mov #51,(R1)
1531 13$: TSTB (R1) ; проверяем результат выполнения
1532 BPL 13$ ; ждем
1533 TST (R1)+ ; переходим на регистр данных
1534 mov #STATS,R3
1535 mov (R1),(R3)+; читаем с контроллера
1536 mov (R1),(R3); читаем с контроллера
1537
1538 ; тут надо проверить - если файл создан то оба слова нулевые
1539 mov #STATS,R3
1540 TST (R3)+
1541 BNE 66$
1542 TST (R3)
1543 BEQ 60$
1544 66$: .print #ERRMS1 ; печать ошибки
1545 .exit
1546
1547 60$: MOV #AZ$CSR,R1
1548 mov #54,(R1); установим длину файла который будем писать
1549 23$: TSTB (R1) ; проверяем результат выполнения
1550 BPL 23$ ; ждем
1551 TST (R1)+ ; переходим на регистр данных
1552 mov #FILSZ,R3
1553 mov (R3)+,(R1); пишем в контроллер
1554 mov (R3),(R1); пишем в контроллер
1555
1556 tst -(R1) ; переходим на регистр команд
1557
1558
1559
1560 ; пишем файл
1561 mov @#FILSZ,R4; длина файла
1562 MOV #AZ$CSR,R1
1563 mov #BUFFL,R5; буфер файла
1564
1565 bit #1,R4 ; если нечетное число байт
1566 beq 147$
1567 inc R4 ; добавим еще 1 байт тк читаем словами
1568
1569 147$: tst R4 ; проверим длину
1570 beq 145$ ; уже нечего писать - выходим
1571
1572 mov #23,(R1); будем писать в буфер
1573 151$: TSTB (R1) ; проверяем результат выполнения
1574 BPL 151$ ; ждем
1575
1576 cmp R4,#512.; сравниваем c размером буфера в байтах
1577 Blos 144$ ; осталось меньше чем буфер
1578
1579 .print #STMS6 ; заливка полного блока
1580 mov #256.,R2
1581 TST (R1)+ ; переходим на регистр данных
1582 146$: mov (R5)+,(R1); пишем в буфер контроллера
1583 sob R2,146$
1584 sub #512.,R4; вычитаем
1585 TST -(R1) ; переходим на регистр команд
1586
1587 mov #55,(R1); запись буфера в файл
1588 104$: TSTB (R1) ; проверяем результат выполнения
1589 BPL 104$ ; ждем
1590 br 147$ ; в начало
1591
1592 144$: .print #STMS7 ; заливка последнего блока
1593 TST (R1)+ ; переходим на регистр данных
1594 mov R4,R2
1595 asr R2 ; /2 тк пишем словами
1596 143$: mov (R5)+,(R1); пишем в буфер контроллера
1597 sob R2,143$
1598
1599 TST -(R1) ; переходим на регистр команд
1600 mov #55,(R1); запись пследнего буфера в файл
1601 105$: TSTB (R1) ; проверяем результат выполнения
1602 BPL 105$ ; ждем
1603
1604 145$: .print #STMSE ; конец
1605 mov #110,@#AZ$CSR; включаем сеть
1606 .Exit ; выходим
1607 {{/code}}
1608
1609 **[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**
1610
1611
1612 == **047: Cчитать установленный файл на чтение, по адресу в cmosmem_buffer** ==
1613
1614 Код команды 047,  данная команда читает установленный файл в память AZБК. Команда работает только на AZБК, обычные AZ ее игнорируют.
1615
1616 Схема подачи команд при записи вот такая
1617 **023** - заливаем имя файла в буфер
1618 **050** - устанавливаем файл на чтение
1619 **051 **- статус открытия/создания файла
1620 если ошибка - повторяем сначала 023 050 051
1621 если все ok - идем дальше
1622
1623 **023** - устанавливаем адрес куда будем читать файл
1624 **047** - командуем читать файл
1625
1626 **022 **- забираем данные из буфера - получаем статус чтения
1627
1628 Пример программы
1629
1630 {{code language="none"}}
1631 call AZRST ; сбросим
1632
1633 ; заливаем в буфер имя файла
1634 7$: mov #23,(R1) ; командуем что будем писать данные в буфер
1635 5$: TSTB (R1) ; проверяем результат выполнения
1636 BPL 5$ ; ждем
1637 TST (R1)+ ; инкрементируем
1638 mov #FILNM,R3
1639 1$: mov (R3),(R1) ; отдаем в контроллер
1640 tst (R3)+
1641 bne 1$
1642 tst -(R1) ; декрементируем
1643
1644 ; устанавливаем файл на чтение
1645 mov #50,(R1) ; устанавливаем файл на чтение
1646 2$: TSTB (R1) ; проверяем результат выполнения
1647 BPL 2$ ; ждем
1648
1649
1650 ; читаем длину файда
1651 mov #51,(R1) ; статус открытия/создания файла
1652 3$: TSTB (R1) ; проверяем результат выполнения
1653 BPL 3$ ; ждем
1654 TST (R1)+ ; инкрементируем
1655 mov #FILSZ,R3
1656 mov (R1),(R3)+ ; читаем с контроллера
1657 mov (R1),(R3) ; читаем с контроллера
1658
1659 ; заносим адрес куда надо считать картинку
1660
1661 mov #177220,R1
1662 7$: mov #23,(R1) ; командуем что будем писать данные в буфер
1663 5$: TSTB (R1) ; проверяем результат выполнения
1664 BPL 5$ ; ждем
1665 TST (R1)+ ; инкрементируем
1666 ; нам нужна страница 1000(8) = 512.
1667 ; нам нужен ее словный адрес = 2048. * 512. = 1048576.
1668 mov #0,(R1) ; младшая часть адреса
1669 mov #20,(R1) ; старшая часть адреса
1670 tst -(R1); декрементируем
1671 call AZRST ; сбросим тк мы не передали полный буфер
1672
1673 .print #STMS3
1674 ; теперь командуем считать файл-картинку
1675 mov #47,(R1) ; командуем залить картинку в память
1676 3$: TSTB (R1) ; проверяем результат выполнения
1677 BPL 3$ ; ждем
1678 TST (R1)+ ; инкрементируем
1679 mov #FILSZ,R3
1680 mov (R1),(R3)+ ; читаем с контроллера
1681 mov (R1),(R3) ; читаем с контроллера
1682 .print #STMS4
1683
1684
1685 {{/code}}
1686
1687 **[[Пример в виде программы показывающей картинку выложен тут>>https://forum.maxiol.com/index.php?s=&showtopic=5617&view=findpost&p=59904]]**
1688
1689
1690 == **056: Получить данные по размеру карты в буфер sizecard** ==
1691
1692 Код команды 056,  данная команда читает параметры MicroSD карты в буфер sizecard
1693
1694 == **057: Чтение буфера sizecard** ==
1695
1696 Код команды 057,  данная команда отдает буфер sizecard (2 слова)
1697
1698 буфер sizecard содержит 2 слова 16bit
1699 первое слово - общий объем карты доступный для FAT в МБ
1700 второе слово - свободный объем на карте в МБ
1701
1702 Пример программы:
1703
1704 {{code language="assembler"}}
1705 ; trap 51 - получение объема SD карты всего/свободно в мегабайтах
1706 ; результат в R1 - всего; R2 - свободно
1707 GetSizeSD: call AZreset; сбросим
1708 tst R1
1709 bne 0ERR$
1710 MOV #AZ$CSR,R1
1711 mov #56,(R1)
1712 1$: TSTB (R1); подготовить буфер
1713 BPL 1$; ждем
1714 mov #57,(R1)
1715 2$: TSTB (R1); подготовить буфер
1716 BPL 2$; ждем
1717 mov @#AZ$DR ,R1; всего мегабайт
1718 mov @#AZ$DR ,R2; свободно мегабайт
1719 return
1720 clr R1
1721 clr R2
1722 return
1723 {{/code}}
1724
1725 Пример данных
1726 035521 - всего на карточке мегабайт - 15185.
1727 035417 - свободно мегабайт - 15119.
1728
1729
1730 = **Блок команд API Hall of Fame** =
1731
1732 Данный блок команд предназначен для взаимодействия с сервером [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]
1733
1734 == **025: Инициализация Hall of Fame (HOF)** ==
1735
1736 Код команды 025,  данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.
1737
1738 Пример программы
1739
1740 {{code language="assembler"}}
1741 AZ$CSR = 177220 ; регистр команд и состояния (CSR)
1742 AZ$DR = 177222 ; регистр данных (DR)
1743
1744 ; буфера
1745 SNDBUF: .BLKW 256. ; буфер передачи
1746 RCVBUF: .BLKW 256. ; буфер приема ответа
1747 SIDMEM: .BLKB 34. ; SID
1748 SIDCST: .ASCII \{"SID":"\ ; заголовок SID-а
1749 .even
1750
1751 HOFINI: ; инициализация HOF
1752 ;результатом является такой JSON
1753 ;{"SID":"хеш сессии","RESULT":"OK"}
1754 ;или ошибка
1755 ;{"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1756 ;{"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}
1757 ; результат помещается в SNDBUF
1758 ; в R5 фиксация успешности - =1 есть SID, =0 нет SID-а
1759
1760 mov R5, -(SP)
1761 mov R4, -(SP)
1762 mov R3, -(SP)
1763 mov R2, -(SP)
1764 mov R1, -(SP)
1765 mov R0, -(SP)
1766
1767 mov #3,R5 ; количество попыток
1768
1769 220$: mov #AZ$CSR,R1
1770 clr (R1) ; Пошлем команду "Сброс"
1771 221$: tstb (R1) ; Проверим готовность контроллера
1772 bpl 221$ ; Если не готов ждем
1773
1774 mov #25,(R1) ; инициализация - команда 025
1775 20$: tstb (R1) ; проверяем результат выполнения
1776 bpl 20$ ; ждем
1777
1778 ; получим результат
1779 mov #22,(R1) ; отдать на шину считанный блок памяти из буфера
1780 21$: tstb (R1) ; проверяем результат выполнения
1781 bpl 21$ ; ждем
1782 tst (R1)+ ; инкрементируем
1783 mov #SNDBUF,R3
1784 mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1785 22$: mov (R1),(R3)+ ; читаем блок слов в память
1786 sob R2,22$
1787
1788
1789 ; надо понять - есть ли SID
1790 mov #4,R0
1791 mov #SNDBUF,R1
1792 mov #SIDCST,R2
1793 23$: cmp (R1)+,(R2)+
1794 bne 24$
1795 sob R0,23$
1796 clr R5
1797 inc R5
1798 br 26$ ; успешно
1799
1800 24$: ; SID не найден!
1801 sob R5,220$
1802 clr R5 ; ошибка - нет SID-а
1803
1804 26$: mov (SP)+, R0
1805 mov (SP)+, R1
1806 mov (SP)+, R2
1807 mov (SP)+, R3
1808 mov (SP)+, R4
1809 mov (SP)+, R5
1810 return
1811 {{/code}}
1812
1813 == **026: обмен с Hall of Fame (HOF)** ==
1814
1815 Код команды 026,  данная команда осуществляет непосредственный обмен с Hall of Fame
1816
1817 Пример программы
1818
1819 {{code language="assembler"}}
1820 ;4. авторизация пользователя
1821 ;технически это отправка JSON
1822 ;{"SID":"хеш сессии","CMD":"AUTH_USER","NIKNAME":"никнейм пользователя","PASSWORD":"пароль пользователя"}
1823 ;ответ тоже JSON
1824 ;{"SID":"хеш сессии","RESULT":"OK","UID":"хеш пользователя"}
1825 ;или
1826 ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}
1827 ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}
1828 ;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}
1829
1830 ; загоняем команду CMD04
1831 mov #CMD04,R1
1832 mov #ADRMEM,R2
1833 add #42.,R2 ; cдвигаем указатель на длину блока с SID
1834 33$: movb (R1)+,(R2)+
1835 bne 33$
1836
1837 .Print #ADRMEM
1838
1839 .Print #HOF05
1840 ; отсылаем команду и ждем ответа
1841 ; закачиваем в буфер
1842 MOV #AZ$CSR,R1
1843 331$: TSTB (R1) ; Проверим готовность контроллера
1844 BPL 331$ ; Если не готов ждем
1845 mov #23,(R1) ; командуем что будем писать данные в буфер
1846 34$: TSTB (R1) ; проверяем результат выполнения
1847 BPL 34$ ; ждем
1848 TST (R1)+ ; инкрементируем
1849 mov #ADRMEM,R3
1850 mov #256.,R2 ;
1851 35$: mov (R3)+,(R1) ; отдаем в контроллер
1852 sob R2,35$
1853 tst -(R1) ; декрементируем
1854
1855 ; обмен - команда 026
1856 MOV #AZ$CSR,R1
1857 361$: TSTB (R1) ; Проверим готовность контроллера
1858 BPL 361$ ; Если не готов ждем
1859 mov #26,(R1)
1860 36$: TSTB (R1) ; проверяем результат выполнения
1861 BPL 36$ ; ждем
1862
1863 ; получим результат
1864 371$: TSTB (R1) ; Проверим готовность контроллера
1865 BPL 371$ ; Если не готов ждем
1866 mov #22,(R1) ; отдать на шину буфер
1867 37$: TSTB (R1) ; проверяем результат выполнения
1868 BPL 37$ ; ждем
1869 TST (R1)+ ; инкрементируем
1870 mov #ADRMEM,R3
1871 mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения
1872 38$: mov (R1),(R3)+ ; читаем блок слов в память
1873 sob R2,38$
1874 {{/code}}
1875
1876