API контроллеров AZ®

= **Концепция контроллера** =

Контроллер эмулирует до 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. Для команд обмена с буфером контроллера, наоборот, следует выдать команду и только после нее принимать или передавать блок данных определённой длины.

== **Прерывания** ==

Большинство команд исполняется, практически, мгновенно - за время исполнения одной-двух команд ЦП. Но команды обмена с карточкой микро-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:/ - облако которое позволяет делится своими файлами с другими участниками

== Буфера ==

В контроллере несколько буферов различного назначения, все буфера имеют словные размеры ибо отдаются через 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. Команда останавливает, если возможно, все операции контроллера. Её окончания следует дождаться посредством поллинга.

Пример программы:

;.............................

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

73

74

Замечание о команде сброса. Вообще-то, она мгновенного действия - если контроллер не занят исполнением операции, которую прерывать нельзя, конкретно - обмен с SD. Пока идет обмен с SD, контроллер не воспринимает никаких команд и команда сброса может быть пропущена. Поэтому, если контроллер занят (бит D7 равен нулю), выдача команды сброса повторяется. Такое встречается достаточно редко (допустим, двойное нажатие Ctrl/C при перезаписи), обычно, при нормальном ходе операций, ожидание записи или чтения производится в специальном месте и, по окончании этой операции, выполняется не сброс, а совсем другие действия.

75

76

77

== **001: Выбор устройства** ==

78

79

Контроллер поддерживает до 32х псевдодисков. Команда "выбор устройства" выбирает для работы один из них. Код команды 001. Для выбора устройства следует переслать в регистр данных (177222) номер накопителя, с которым собираемся работать и затем послать в CSR код 001. Команда выполняется мгновенно, т.е. за время, пока ЦП пересылает код "выбор устройства". ПРи попытке выбрать диск AZ, которому не назначен файл-образ, в бите D15 регистра CSR возвращается ошибка.

Пример программы:

;.......................

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

;........................

== **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

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; Проверяем на ошибку

BMI ERR3

; В 32-разрядном варианте те же действия следует

142

; повторить для старших 16 разрядов (на самом деле,

143

; старших 7, остальные должны быть нулями, ибо максимум

144

; размера псевдодиска - 4Г) дискового адреса.

145

146

; Обратите внимание, что в R3 остался адрес CSR, а не

147

; DR, как в двух предыдущих фрагментах. Это сделано

148

; специально.

149

150

;.......................................

== **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]]

Пример программы:

;.............................

AZ$CSR = 177220

WrBuf = 016

OpnDir = 003

MOV #AZ$CSR,R3

; Ячейка 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

202

203

== **004: Монтировать диск** ==

204

205

Порядок действий:

206

• [[Сбросить контроллер>>doc:||anchor="H000:A042143144043E44143A43E43D44244043E43B43B435440430"]]

207

• Переслать в контроллер строку с записью, подобной строкам описания дисков в файле AZ.INI

208

• Выдать команду "Монтировать диск"

209

• Дождаться ее окончания (команда длительная)

210

• Проверить на ошибки

211

На выбранный накопитель AZnn НЕ ДОЛЖЕН быть смонтирован диск. Если он таки смонтирован, перед монтированием туда нового диска следует размонтировать старый - команда 014

Пример программы:

;..................

AZMNT = 004

MDLEN = MDEND-MDTXT+2

MOV #AZ$CSR,R3

20$: CLR @R3;

TSTB @R3; Сбросим контроллер

225

BPL 20$;

226

227

MOV #WrBuf,(R3)+; Перешлем в него строку

228

MOV #MDTXT,R2; с командой назначения

MOV #MDLEN/2,R1;

21$: MOV (R2)+,@R3;

SOB R1,21$;

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"

MDEND: .BYTE 0,0

;..................

В этом фрагменте на диск 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

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

;...................................

== **006: Записать блок из буфера на диск** ==

279

280

Код команды 006. Содержимое буфера пишется на выбранный псевдодиск по заданному дисковомк адресу (номеру блока). Перед записью выполняются проверки (1) "была ли запись в буфер?", если нет, выдается ошибка и (2) "заполнен ли буфер полностью?", если нет (для последнего укороченного блока файла), остаток буфера очищается нулями. Далее производится запись блока на носитель. Операция длительная, после ее запуска контроллер, как и при чтении переходит в состояние "Думаю, прошу не мешать". И так же, как и при чтении окончания этой операции надо дождаться, теми же средствами, как и при чтении.

281

\\Пример программы без прерываний:

282

283

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

;....................................................................

== **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

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

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]]

Пример программы:

;...................................

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

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 (восьмеричные):

\\001 - Read Only

002 - Hidden

004 - System

020 - Directory

040 - Archive

\\Пример программы.

;......................................

406

RdDir = 013; код команды "Читать запись оглавления"

RdBuf = 015

MOV #AZ$CSR,R3

15$: CLR @R3;

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

;......................................

== **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 слов (последний укороченный блок файла), то остаток можно просто бросить, не считывая, сброс контроллера в начале следующей операции сбросит и этот остаток.

\\Пример программы:

;..................................

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

463

464

Всё, чтение закончено.

465

\\Для записи наоборот, требуется сначала перенести весь блок данных из памяти ЦП в контроллер и потом выдать команду "Записать содержимое буфера на диск"

466

467

468

== **016: Принять блок данных в буфер** ==

469

470

Код команды 016. Команда настраивает контроллер на прием блока данных и помещении его в буфер. Следующие 256 циклов записи в DR поместят данные, переданные через МПИ, в буфер.

\\Пример программы.

;..................................

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

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

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

;......................................

== **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.

;-------------------------------------------------------------

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)+ ; Проверяем на ошибку

BMI 2$

mov (R1),R1

return

2$: CLR R1

return

;-------------------------------------------------------------

== **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" %)

Пример программы

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

583

AZ$DR = 177222; регистр данных (DR)

; trap 50 - cброс AZ

; результат в R1 =0 ok

588

AZreset: MOV #AZ$CSR,R1

589

1$: CLR (R1); Пошлем команду "Сброс"

590

TSTB (R1); Проверим готовность контроллера

591

BPL 1$; Если не готов, сбрасываем еще

592

; раз и проверяем снова

593

TST (R1); Проверим на ошибку,

BMI 0ERR$

CLR R1

return

0ERR$: CLR R1

COM R1

return

; 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; сбросим

tst R1

bne 0ERR$

; теперь читаем

MOV #AZ$CSR,R1

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; успешно

mov (R3),R1

br 0END$

0ERR$: CLR R3

0END$: pop R2

return

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

634

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

635

\\последовательная подача команды 021 и затем 022 позволит считать 256. слов

636

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

637

**Внимание! **первое слово это будет статус успешности чтения

* 0 - ok

* 1 - размер не соответствует сохраненному

642

* 2 - oшибка версии

643

* 3 - oшибка контрольной суммы

644

645

== **023: Принять с шины в буфер данные для последующей записи в буфер** ==

646

647

Код команды 023, данная команда позволяет наполнить буфер энергонезависимой памяти

648

649

== **024: Записать из буфера в блок энергонезависимой памяти** ==

650

651

Код команды 024, данная команда вызывает запись блока энергонезависимой памяти из буфера энергонезависимой памяти.

Пример программы

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

657

AZ$DR = 177222; регистр данных (DR)

; trap 50 - cброс AZ

; результат в R1 =0 ok

662

AZreset: MOV #AZ$CSR,R1

663

1$: CLR (R1); Пошлем команду "Сброс"

664

TSTB (R1); Проверим готовность контроллера

665

BPL 1$; Если не готов, сбрасываем еще

666

; раз и проверяем снова

667

TST (R1); Проверим на ошибку,

BMI 0ERR$

CLR R1

return

0ERR$: CLR R1

COM R1

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); командуем что будем писать данные в буфер

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); проверяем результат выполнения

BPL 2$; ждем

br 0END$

0ERR$: CLR R3

0END$: pop R3

pop R2

pop R1

return

**Обращаю внимание**, при записи, буфер идет сразу с данными, те нет первого слова со статусом.

= Блок команд для работы с 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

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;

[12]=rtc_fat_date();

[14]=rtc_fat_time();

[16]=year+2000;

[20]=month;

[22]=day;

[24]=wday;

[26]=hour;

[30]=min;

[32]=sec;

== Формат буфера SimpleIN (при записи) ==

739

740

формат максимально упрощен, для работы со стороны PDP-11

741

742

743

offset в восьмеричной системе - те слова

744

745

[0]=year год, младшие две цифры - те 22 а не 2022(!)

746

[2]=month; месяц

747

[4]=day; день

748

[6]=wday; день недели =0 не установлен, 1- понедельник 2 - вторник итд

[10]=hour; час

[12]=min; минута

[14]=sec; секунда

== **031: Получить время из RTC в буфер timestamp** ==

756

757

Код команды 031, данная команда использует RTC часы как источник заполнения буфера timestamp

Пример программы:

; trap 61 - чтение данных часов из автономных часов RTC

763

; R3 - адрес буфера куда надо считать

764

; результат в R3 адрес, если успешно. R3=0 если ошибка

765

GetDateFromRTC: push R0

766

push R1

767

push R2

768

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #31,(R1)

br G60; идем туда тк дальше код одинаковый

774

775

776

== **032: Получить время из буфера timestamp** ==

777

778

Код команды 032, данная команда отдает на шину содержимое буфера timestamp

; работа с часами

; trap 60 - чтение данных часов из TCP/IP стека

783

; R3 - адрес буфера куда надо считать

784

; результат в R3 адрес, если успешно. R3=0 если ошибка

785

GetDateFromLAN: push R0

786

push R1

787

push R2

788

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #42,(R1)

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

br 0END$

G60ERR: CLR R3

0END$: pop R2

pop R1

pop R0

return

Стоит проверить корректность полученного времени:

813

814

815

; trap 63 - проверка корректности времени

816

; R3 - адрес буфера, результат в R3, если адрес буфера то OK, =0 ошибка

817

CheckDateTime: Cmp 6(r3),#2021.

Blos 1err

Cmp 6(r3),#2100.

Bhi 1err

0ok$: return

1err$: clr R3

return

== **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

845

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

846

GetDateNTPtoNET:push R1

847

call AZreset; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #35,(R1)

0$: TSTB (R1); проверяем результат выполнения

BPL 0$; ждем

0ERR$: pop R1

return

Выполнение команды занимает 1-2 секунды в среднем. Данная команда требует работы стека TCP/IP, соответственно нужны циклы ожидания при включенном стеке.

859

860

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

; дата-время

mov #S_DateTime_0,R3; "Lan Date:"

865

trap 10

866

mov #20,R4; количество циклов ожидания

867

$datry: trap 62; отослали запрос к NTP серверу

868

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

trap 47; ожидание

trap 47; ожидание

mov #ADRTMPSTR,R3

trap 60; считали в буфер дату-время

873

trap 63; проверили дату-время

tst R3

bne $ok

$sob: sob R4,$datry

mov #S_DateTime_2,R3; печать ошибки

trap 7

br $go

$ok: mov #ADRTMPSTR,R3

882

trap 24; печать даты

883

trap 25; времени

884

$go: mov #110,@#AZ$CSR; включим сеть

885

886

887

Тут мы явно отсылаем запрос к NTP серверу, затем включаем работу сети и ждем результата, периодически опрашивая и проверяя корректность результата.

888

889

== **036: Установка RTC на основании часов TCP/IP стека** ==

890

891

Код команды 036, данная команда устанавливает RTC на основании часов в TCP/IP стека. Предварительно надо установить часы в TCP/IP - команда 036.

Пример программы:

; trap 64 - установка времени RTC на основании времени стека

897

; R1 - результат R1=0 - OK

898

SetDateNETtoRTC:call AZreset; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #36,(R1)

0$: TSTB (R1); проверяем результат выполнения

BPL 0$; ждем

clr R1

0ERR$: return

== **042: Получить время из часов TCP/IP стека в буфер timestamp** ==

910

911

Код команды 042, данная команда использует часы TCP/IP стека как источник заполнения буфера timestamp.

Пример программы:

; работа с часами

; trap 60 - чтение данных часов из TCP/IP стека

918

; R3 - адрес буфера куда надо считать

919

; результат в R3 адрес, если успешно. R3=0 если ошибка

920

GetDateFromLAN: push R0

921

push R1

922

push R2

923

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #42,(R1)

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

br 0END$

G60ERR: CLR R3

0END$: pop R2

pop R1

pop R0

return

все команды устанавливают бит готовности по завершению.

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М

Пример программы

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

964

AZ$DR = 177222; регистр данных (DR)

965

966

967

; trap 57 - перезапуск БК полный

968

AZcouldReboot: call AZreset; сбросим AZ дабы он был готов принимать команды

mov #037,@#AZ$CSR

return

== **044: Cохранение скриншота в файл** ==

974

975

Код команды 044, данная команда предназначена для снятия образа памяти указанного размера (или определенного автоматически на основании сохраненных параметров)

976

технически команда может служить как средство отладки ибо способная снимать образ памяти

977

общее ограничение на снятие образа памяти - 2МБ на один образ

978

\\в качестве параметров используется служебная страница памяти 76(8)

979

980

Структура заполнения информации о скриншоте

981

982

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]; //

} screen_header_t;

Пример кода для заполнения страницы памяти

1033

1034

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 ; константа-заполнитель

mov #SCR_PAGE,R4

mov #2047.,R2

4$: mov R3,(R4)+

sob R2,4$

mov #240,@#SCR_TAG ; проставляем тег

1059

1060

; чистим участок адресов - дефолтно автоматическое определение адресов

1061

clr R3

1062

mov #SCR_ADDR_CONF,R4

mov #10,R2

2$: mov R3,(R4)+

sob R2,2$

;конфигурация памяти - дефолтная

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

;конфигурация видеоконтроллера - дефолтная

; 177230-177256

mov #SCR_VGA_CONF,R4

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

; закачиваем палитру - берем дефолтную из этой ПЗУшки

mov #SCR_PAL,R4

mov #PalData,R2

mov #338.,R3

1$: mov (R2)+,(R4)+

sob R3,1$

mov (SP)+,@#177326; вернем страницу с которой был вызов

return

Вариантов указания участков памяти три

1120

1121

1. указать адрес и длину 24х битные - cм формат, если их нет - система смотрит дальше

1122

1. указать номер страницы и количество страницы, если их нет

1123

1. система смотрит дальше - те делает скриншот на основании данных о регистрах 177230 и т.д..

1124

1125

Cкриншот сохраняется в формате

1126

- страница 76 - ее первый килобайт

1127

- сам образ памяти (если режим слоеный - то все три слоя)

1128

1129

1130

Перед вызовом команды можно загрузить имя файла для сохранения скриншота [в cmosmem буфер], однако при его отсутствии (в буфере не будет имени - строки заканчивающейся 0) система сформирует свое имя, на основании следующего правила:

1131

дефолтный путь для сохранения скриншотов

1132

0:/SCREENS/

1133

формат имени - DDHHMISS.SCR

1134

где DD - две цифры дня месяца, HH - час, MI - минута, SS-секунда

1135

\\Если в процессе выполнения команды возникнет ошибка - вместо имени будет "ERROR *"

к примеру

"ERROR f_open 6"

Пример программы

; обновим информацию в хидере скриншота

1144

;--------------------------------------------------

1145

; карта 76й страницы - туда мы готовим данные для команды скринщотов

1146

SPAGE = 170000 ; 76ую страницу цепляем на место 77й временно - те в окно 130000

1147

STAG = SPAGE+0 ; тут вход - 240 - 1 слово

1148

SADDRC = STAG+2 ; сюда команду с адресами - адрес+длина 24 бита - 4 слова

1149

SPAGEC = SADDRC+8. ; сюда команду со страницами - начальная страница и количество страниц - 2 слова

1150

SMEMC = SPAGEC+4. ; cюда конфигурацию памяти из регистров - 22 слова

1151

SVGAC = SMEMC+44. ; сюда конфигурацию видеоконтроллера - 10 cлов

1152

SPAL = SVGAC+20. ; сюда 338. значений(слов) палитры 338 слов

1153

;--------------------------------------------------

1154

1155

mov @#177326,R5 ; сохраним страницу 130k которая была до вызова

1156

mov #76,@#177336 ; цепляем 76ую страницу в окно

1157

1158

;конфигурация видеоконтроллера

; 177230-177256

mov #SVGAC,R4

mov @#177230,(R4)+;177230 - регистр управления

1163

mov @#177232,(R4)+;177232 - регистр - верхняя страница (слой 0)

1164

mov @#177240,(R4)+;177240 - регистр - средняя страница (слой 1)

1165

mov @#177242,(R4)+;177242 - регистр - нижняя страница (слой 2)

1166

mov @#177244,(R4)+;177244 - регистр вертикального скролинга слой 2

1167

mov @#177246,(R4)+;177246 - регистр вертикального скролинга слой 1

1168

mov @#177250,(R4)+;177250 - регистр вертикального скролинга слой 0

1169

mov @#177252,(R4)+;177252 - регистр гозизонтального скролинга слой 0

1170

mov @#177254,(R4)+;177254 - регистр гозизонтального скролинга слой 1

1171

mov @#177256,(R4)+;177256 - регистр гозизонтального скролинга слой 2

1172

1173

mov R5,@#177336; вернем страницу с которой был вызов

1174

1175

1176

;-------------------------

1177

MOV #AZ$CSR,R3 ; Готовим CSR контроллера

1178

MOV #AZ$DR,R4 ; Готовим DR контроллера

1179

20$: CLR (R3) ; Сбросим контроллер

TSTB (R3)

BPL 20$

; очистим блок памяти для имени - дабы система сделала дефолтное имя файла

1184

mov #23,(R3) ; командуем что будем писать данные в буфер

1185

128$: TSTB (R3) ; проверяем результат выполнения

BPL 128$ ; ждем

clr R1

mov #256.,R2 ;

129$: mov R1,(R4) ; отдаем в контроллер

sob R2,129$

MOV #044,(R3) ; команда скриншот

22$: TSTB (R3) ;

BPL 22$ ;

; получим имя скриншота

1199

mov #22,(R3) ; отдать на шину считанный блок памяти из буфера

1200

121$: tstb (R3) ; проверяем результат выполнения

bpl 121$ ; ждем

mov #BUF,R1

mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения

1205

122$: mov (R4),(R1)+ ; читаем блок слов в память

sob R2,122$

.PRINT #RESOK

.Print #BUF

mov #110,@#AZ$CSR; включаем сеть по-умолчанию сеть должна быть постоянно включена

.Exit

Для распаковки скриншота можно использовать вот эту утилиту

= **Команды для работы со стеком TCP/IP** =

1220

1221

следующие команды работают с буфером информации TCP/IP cтека.

1222

1223

== **040: Получить ip адрес и прочие настройки стека TCP/IP в буфер** ==

1224

1225

Код команды 040, данная команда заполняет буфер информацией с TCP/IP cтека текущей (фактической) информацией.

1226

1227

== **041: Чтение буфера ip адреса** ==

1228

1229

Код команды 041, данная команда передает буфер на шину

1230

1231

эта пара команд позволяет получить текущую информацию со стека

* IP адрес

* MASK маску

* GW гейтвей

* NTP адрес NTP-сервера

1237

* DNS1 адрес основного DNS

1238

* DNS2 адрес резервного DNS

1239

1240

соответственно это 12 слов

Пример программы:

; trap 52 - чтение блока IP адресов в блок памяти IPADDDBLOCK (8. ячеек)

1246

; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)

1247

GetIPaddrs: push R1

1248

push R2

1249

call AZreset; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #40,(R1)

0$: TSTB (R1); прочитать адреса в свою память

1255

BPL 0$; ждем

1256

mov #41,(R1)

1257

1$: TSTB (R1); подготовить буфер

1258

BPL 1$; ждем

1259

TST (R1)+; инкрементируем

1260

mov #IPADDDBLOCK,R3

1261

mov #12.,R2

1262

2$: mov (R1),(R3)+; читаем блок слов в память

1263

sob R2,2$

1264

mov #IPADDDBLOCK,R3; успешно

br 0END$

0ERR$: CLR R3

0END$: pop R2

pop R1

return

Пример данных

Примеры данных - возвращаемые слова в восьмеричном формате

1276

124300 116400 - IP адрес 192.168.0.157

1277

177777 000377 - MASK маску 255.255.255.0

1278

124300 000400 - GW гейтвей 192.168.0.1

1279

124300 000400 - NTP адрес NTP-сервера 192.168.0.1

1280

124300 050000 - DNS1 адрес основного DNS 192.168.0.90

1281

124300 055000 - DNS2 адрес резервного DNS 192.168.0.80

1282

1283

1284

== **043: чтение MAC-адреса в ip буфер** ==

1285

1286

Код команды 043, данная команда читает текущий фактический MAC адрес в буфер IP адресов

1287

те сначала 043, а затем 041 команды

Пример программы:

; trap 72 - чтение MAC адреса в блок памяти IPADDDBLOCK (12. ячеек)

1293

; результат в R3 =0 error, иначе адрес куда считано (IPADDDBLOCK)

1294

GetMACaddrs: push R1

1295

push R2

1296

call AZreset ; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #43,(R1)

0$: TSTB (R1) ; прочитать адреса в свою память

1302

BPL 0$ ; ждем

1303

mov #41,(R1)

1304

1$: TSTB (R1) ; подготовить буфер

1305

BPL 1$ ; ждем

1306

TST (R1)+ ; инкрементируем

1307

mov #IPADDDBLOCK,R3

1308

mov #12.,R2

1309

2$: mov (R1),(R3)+ ; читаем блок слов в память

1310

sob R2,2$

1311

mov #IPADDDBLOCK,R3; успешно

br 0END$

0ERR$: CLR R3

0END$: pop R2

pop R1

retur

= **Команды для работы с MicroSD картой на файловом уровне** =

1322

1323

1324

Данные команды предназначены для работы с MicroSD картой на уровне файловой системы и позволяет читать/писать файлы без монтирования файлов как образов дисков.

1325

1326

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

1327

\\Ограничения - длина полного пути к файлу 256 байт

1328

1329

== **050: Установить имя файла который будем читать** ==

1330

1331

Код команды 050, данная команда устанавливает имя файла который будем читать, при этом производится открытие файла на чтение, а также получение его свойств.

1332

1333

== **051: Получить размер файла на чтение (или его статус) на МПИ** ==

1334

1335

Код команды 051, данная команда передает на МПИ размер файла или ошибку его чтения. Размер файла 31бит, старший бит является признаком ошибки. Соответственно максимальный размер файлов с которыми можно работать через этот интерфейс ограничен 2^31 байт (2GB).

1336

1337

формирование ошибки выглядит так:

1338

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

1339

\\FFres = ошибка FatFS

typedef enum {

FR_OK = 0, /* (0) Succeeded */

1345

FR_DISK_ERR, /* (1) A hard error occurred in the low level disk I/O layer */

1346

FR_INT_ERR, /* (2) Assertion failed */

1347

FR_NOT_READY, /* (3) The physical drive cannot work */

1348

FR_NO_FILE, /* (4) Could not find the file */

1349

FR_NO_PATH, /* (5) Could not find the path */

1350

FR_INVALID_NAME, /* (6) The path name format is invalid */

1351

FR_DENIED, /* (7) Access denied due to prohibited access or directory full */

1352

FR_EXIST, /* (8) Access denied due to prohibited access */

1353

FR_INVALID_OBJECT, /* (9) The file/directory object is invalid */

1354

FR_WRITE_PROTECTED, /* (10) The physical drive is write protected */

1355

FR_INVALID_DRIVE, /* (11) The logical drive number is invalid */

1356

FR_NOT_ENABLED, /* (12) The volume has no work area */

1357

FR_NO_FILESYSTEM, /* (13) There is no valid FAT volume */

1358

FR_MKFS_ABORTED, /* (14) The f_mkfs() aborted due to any problem */

1359

FR_TIMEOUT, /* (15) Could not get a grant to access the volume within defined period */

1360

FR_LOCKED, /* (16) The operation is rejected according to the file sharing policy */

1361

FR_NOT_ENOUGH_CORE, /* (17) LFN working buffer could not be allocated */

1362

FR_TOO_MANY_OPEN_FILES, /* (18) Number of open files > _FS_LOCK */

1363

FR_INVALID_PARAMETER /* (19) Given parameter is invalid */

} FRESULT;

[[http:~~/~~/elm-chan.org/fsw/ff/doc/open.html>>url:http://elm-chan.org/fsw/ff/doc/open.html]]

1368

1369

== **052: Читать блок установленного файла в буфер** ==

1370

1371

Код команды 052, данная команда осуществляет чтение файла в буфер энергонезависимой памяти.

1372

1373

В итоге схема чтения файла выглядит вот так

1374

**023** - заливаем имя файла в буфер

1375

**050** - устанавливаем файл на чтение

1376

**051 **- читаем длину файла или ошибку открытия файла

1377

если ошибка - повторяем сначала 023 050 051

1378

если все ok - приступаем к чтению файла

1379

**052** - читает блок файла в буфер

1380

**022 **- забираем данные из буфера

1381

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

1382

как файл будет прочтен - последняя 052 команда закроет его автоматически.

Пример программы

call AZRST; сбросим

; заливаем в буфер имя файла

1392

7$: mov #23,(R1); командуем что будем писать данные в буфер

1393

5$: TSTB (R1); проверяем результат выполнения

1394

BPL 5$ ; ждем

1395

TST (R1)+; инкрементируем

1396

mov #FILNM,R3

1397

1$: mov (R3),(R1); отдаем в контроллер

1398

tst (R3)+

1399

bne 1$

1400

tst -(R1); декрементируем

1401

1402

1403

; устанавливаем файл на чтение

1404

mov #50,(R1); устанавливаем файл на чтение

1405

2$: TSTB (R1); проверяем результат выполнения

BPL 2$ ; ждем

; читаем длину файда

mov #51,(R1); устанавливаем файл на чтение

1411

3$: TSTB (R1); проверяем результат выполнения

1412

BPL 3$ ; ждем

1413

TST (R1)+; инкрементируем

1414

mov #FILSZ,R3

1415

mov (R1),(R3)+; читаем с контроллера

1416

mov (R1),(R3); читаем с контроллера

1417

1418

; выведем длину файла на экран

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; если нечетное число байт

1433

beq 47$

1434

inc R4; добавим еще 1 байт тк читаем словами

1435

1436

47$: tst R4

1437

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

1438

1439

1440

mov #52,(R1); читаем блок в буфер

1441

4$: TSTB (R1); проверяем результат выполнения

1442

BPL 4$ ; ждем

1443

mov #22,(R1); будем читать буфер

1444

51$: TSTB (R1); проверяем результат выполнения

1445

BPL 51$ ; ждем

1446

1447

cmp R4,#512.; сравниваем c размером буфера в байтах

1448

Blos 44$ ; осталось меньше чем буфер

.print #STMS1

mov #256.,R2

TST (R1)+; переходим на регистр данных

1454

46$: mov (R1),(R5)+; читаем в буфер

1455

sob R2,46$

1456

sub #512.,R4; вычитаем

1457

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

br 47$

44$: .print #STMS3

mov R4,R2

asr R2 ; /2 тк читаем словами

1463

TST (R1)+; переходим на регистр данных

1464

43$: mov (R1),(R5)+; читаем в буфер

sob R2,43$

45$: clr (R5); проставим конец файла

1469

; файл считан - выводим на экран

.print #STMS4

.print #BUFFL

.print #STMS5

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

.Exit

== **053:** установить имя файла который будем писать ==

1482

1483

Код команды 053, данная команда открывает файл на запись, получает параметры открытия (или ошибки).

1484

1485

== **054:** установка длины файла ==

1486

1487

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

1488

1489

== **055:** записать в файл данные из буфера ==

1490

1491

Код команды 055, данная команда записывает в открытый файл на запись данные из буфера энергонезависимой памяти. Последняя команда 055 автоматически закроет файл по достижению заявленной длины файла.

1492

1493

Схема подачи команд при записи вот такая

1494

**023** - заливаем имя файла в буфер

1495

**053** - устанавливаем файл на чтение

1496

**051 **- статус открытия/создания файла

1497

если ошибка - повторяем сначала 023 053 051

1498

если все ok - идем дальше

1499

**054** - установка длины файла, те надо сразу объявить какая у нас будет длина файла

1500

**023** - заливаем блок данных в буфер

1501

**055** - пишем из буфера в файл

1502

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

1503

как файл будет записан - последняя 055 команда закроет его автоматически

Пример программы:

; заливаем в буфер имя файла

1510

MOV #AZ$CSR,R1

1511

17$: mov #23,(R1); командуем что будем писать данные в буфер

1512

15$: TSTB (R1) ; проверяем результат выполнения

1513

BPL 15$ ; ждем

1514

TST (R1)+ ; переходим на регистр данных

1515

mov #FILNM2,R3

1516

11$: mov (R3),(R1); отдаем в контроллер

1517

tst (R3)+

1518

bne 11$

1519

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

1520

1521

; устанавливаем файл на запись

1522

mov #53,(R1); устанавливаем файл на запись

1523

12$: TSTB (R1) ; проверяем результат выполнения

BPL 12$ ; ждем

; читаем статус создания файла

1528

mov #51,(R1)

1529

13$: TSTB (R1) ; проверяем результат выполнения

1530

BPL 13$ ; ждем

1531

TST (R1)+ ; переходим на регистр данных

1532

mov #STATS,R3

1533

mov (R1),(R3)+; читаем с контроллера

1534

mov (R1),(R3); читаем с контроллера

1535

1536

; тут надо проверить - если файл создан то оба слова нулевые

mov #STATS,R3

TST (R3)+

BNE 66$

TST (R3)

BEQ 60$

66$: .print #ERRMS1 ; печать ошибки

.exit

60$: MOV #AZ$CSR,R1

mov #54,(R1); установим длину файла который будем писать

1547

23$: TSTB (R1) ; проверяем результат выполнения

1548

BPL 23$ ; ждем

1549

TST (R1)+ ; переходим на регистр данных

1550

mov #FILSZ,R3

1551

mov (R3)+,(R1); пишем в контроллер

1552

mov (R3),(R1); пишем в контроллер

1553

1554

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

; пишем файл

mov @#FILSZ,R4; длина файла

1560

MOV #AZ$CSR,R1

1561

mov #BUFFL,R5; буфер файла

1562

1563

bit #1,R4 ; если нечетное число байт

1564

beq 147$

1565

inc R4 ; добавим еще 1 байт тк читаем словами

1566

1567

147$: tst R4 ; проверим длину

1568

beq 145$ ; уже нечего писать - выходим

1569

1570

mov #23,(R1); будем писать в буфер

1571

151$: TSTB (R1) ; проверяем результат выполнения

1572

BPL 151$ ; ждем

1573

1574

cmp R4,#512.; сравниваем c размером буфера в байтах

1575

Blos 144$ ; осталось меньше чем буфер

1576

1577

.print #STMS6 ; заливка полного блока

1578

mov #256.,R2

1579

TST (R1)+ ; переходим на регистр данных

1580

146$: mov (R5)+,(R1); пишем в буфер контроллера

1581

sob R2,146$

1582

sub #512.,R4; вычитаем

1583

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

1584

1585

mov #55,(R1); запись буфера в файл

1586

104$: TSTB (R1) ; проверяем результат выполнения

BPL 104$ ; ждем

br 147$ ; в начало

144$: .print #STMS7 ; заливка последнего блока

1591

TST (R1)+ ; переходим на регистр данных

1592

mov R4,R2

1593

asr R2 ; /2 тк пишем словами

1594

143$: mov (R5)+,(R1); пишем в буфер контроллера

1595

sob R2,143$

1596

1597

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

1598

mov #55,(R1); запись пследнего буфера в файл

1599

105$: TSTB (R1) ; проверяем результат выполнения

1600

BPL 105$ ; ждем

1601

1602

145$: .print #STMSE ; конец

1603

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

.Exit ; выходим

**[[пример полностью в виде утилиты RT11 выложен вот тут>>url:https://forum.maxiol.com/index.php?s=&showtopic=5605&view=findpost&p=57055]]**

1608

1609

1610

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

1611

1612

Код команды 056, данная команда читает параметры MicroSD карты в буфер sizecard

1613

1614

== **057: Чтение буфера sizecard** ==

1615

1616

Код команды 057, данная команда отдает буфер sizecard (2 слова)

1617

1618

буфер sizecard содержит 2 слова 16bit

1619

первое слово - общий объем карты доступный для FAT в МБ

1620

второе слово - свободный объем на карте в МБ

Пример программы:

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

1626

; результат в R1 - всего; R2 - свободно

1627

GetSizeSD: call AZreset; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #56,(R1)

1$: TSTB (R1); подготовить буфер

1633

BPL 1$; ждем

1634

mov #57,(R1)

1635

2$: TSTB (R1); подготовить буфер

1636

BPL 2$; ждем

1637

mov @#AZ$DR ,R1; всего мегабайт

1638

mov @#AZ$DR ,R2; свободно мегабайт

return

clr R1

clr R2

return

Пример данных

035521 - всего на карточке мегабайт - 15185.

1647

035417 - свободно мегабайт - 15119.

1648

1649

1650

= **Блок команд API Hall of Fame** =

1651

1652

Данный блок команд предназначен для взаимодействия с сервером [[Hall of Fame>>https://forum.maxiol.com/index.php?showtopic=5642]]

1653

1654

== **025: Инициализация Hall of Fame (HOF)** ==

1655

1656

Код команды 025, данная команда устанавливает соединение с сервером Hall of Fame, инициализирует шифрованный тоннель и подготавливает API к работе.

Пример программы

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

1662

AZ$DR = 177222 ; регистр данных (DR)

1663

1664

; буфера

1665

SNDBUF: .BLKW 256. ; буфер передачи

1666

RCVBUF: .BLKW 256. ; буфер приема ответа

1667

SIDMEM: .BLKB 34. ; SID

1668

SIDCST: .ASCII \{"SID":"\ ; заголовок SID-а

1669

.even

1670

1671

HOFINI: ; инициализация HOF

1672

;результатом является такой JSON

1673

;{"SID":"хеш сессии","RESULT":"OK"}

1674

;или ошибка

1675

;{"RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}

1676

;{"RESULT":"ERROR","DESCRIPTION":"CONNECTION_ERROR"}

1677

; результат помещается в SNDBUF

1678

; в R5 фиксация успешности - =1 есть SID, =0 нет SID-а

mov R5, -(SP)

mov R4, -(SP)

mov R3, -(SP)

mov R2, -(SP)

mov R1, -(SP)

mov R0, -(SP)

mov #3,R5 ; количество попыток

1688

1689

220$: mov #AZ$CSR,R1

1690

clr (R1) ; Пошлем команду "Сброс"

1691

221$: tstb (R1) ; Проверим готовность контроллера

1692

bpl 221$ ; Если не готов ждем

1693

1694

mov #25,(R1) ; инициализация - команда 025

1695

20$: tstb (R1) ; проверяем результат выполнения

bpl 20$ ; ждем

; получим результат

mov #22,(R1) ; отдать на шину считанный блок памяти из буфера

1700

21$: tstb (R1) ; проверяем результат выполнения

1701

bpl 21$ ; ждем

1702

tst (R1)+ ; инкрементируем

1703

mov #SNDBUF,R3

1704

mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения

1705

22$: mov (R1),(R3)+ ; читаем блок слов в память

sob R2,22$

; надо понять - есть ли SID

mov #4,R0

mov #SNDBUF,R1

mov #SIDCST,R2

23$: cmp (R1)+,(R2)+

bne 24$

sob R0,23$

clr R5

inc R5

br 26$ ; успешно

24$: ; SID не найден!

1721

sob R5,220$

1722

clr R5 ; ошибка - нет SID-а

26$: mov (SP)+, R0

mov (SP)+, R1

mov (SP)+, R2

mov (SP)+, R3

mov (SP)+, R4

mov (SP)+, R5

return

== **026: обмен с Hall of Fame (HOF)** ==

1734

1735

Код команды 026, данная команда осуществляет непосредственный обмен с Hall of Fame

Пример программы

;4. авторизация пользователя

1741

;технически это отправка JSON

1742

;{"SID":"хеш сессии","CMD":"AUTH_USER","NIKNAME":"никнейм пользователя","PASSWORD":"пароль пользователя"}

1743

;ответ тоже JSON

1744

;{"SID":"хеш сессии","RESULT":"OK","UID":"хеш пользователя"}

1745

;или

1746

;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"USER_NOT_FOUND_OR_WRONG_PASSWORD"}

1747

;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SERVER_ERROR"}

1748

;{"SID":"хеш сессии","RESULT":"ERROR","DESCRIPTION":"SESSION_NOT_EXISTS_OR_EXPIRED"}

1749

1750

; загоняем команду CMD04

1751

mov #CMD04,R1

1752

mov #ADRMEM,R2

1753

add #42.,R2 ; cдвигаем указатель на длину блока с SID

1754

33$: movb (R1)+,(R2)+

bne 33$

.Print #ADRMEM

.Print #HOF05

; отсылаем команду и ждем ответа

1761

; закачиваем в буфер

1762

MOV #AZ$CSR,R1

1763

331$: TSTB (R1) ; Проверим готовность контроллера

1764

BPL 331$ ; Если не готов ждем

1765

mov #23,(R1) ; командуем что будем писать данные в буфер

1766

34$: TSTB (R1) ; проверяем результат выполнения

1767

BPL 34$ ; ждем

1768

TST (R1)+ ; инкрементируем

1769

mov #ADRMEM,R3

1770

mov #256.,R2 ;

1771

35$: mov (R3)+,(R1) ; отдаем в контроллер

1772

sob R2,35$

1773

tst -(R1) ; декрементируем

1774

1775

; обмен - команда 026

1776

MOV #AZ$CSR,R1

1777

361$: TSTB (R1) ; Проверим готовность контроллера

1778

BPL 361$ ; Если не готов ждем

1779

mov #26,(R1)

1780

36$: TSTB (R1) ; проверяем результат выполнения

BPL 36$ ; ждем

; получим результат

371$: TSTB (R1) ; Проверим готовность контроллера

1785

BPL 371$ ; Если не готов ждем

1786

mov #22,(R1) ; отдать на шину буфер

1787

37$: TSTB (R1) ; проверяем результат выполнения

1788

BPL 37$ ; ждем

1789

TST (R1)+ ; инкрементируем

1790

mov #ADRMEM,R3

1791

mov #256.,R2 ; читаем 256. слов; первое слово - результат чтения

1792

38$: mov (R1),(R3)+ ; читаем блок слов в память

sob R2,38$

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

Приложения

Навигация

Нужна помощь?