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

Данные команды используют основной буфер для своей работы (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

\\• сбросить контроллер

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

• Сбросить контроллер

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 байт). Фактически, это часть оперативной памяти микроконтроллера STM32, выделенная в его программе под этот буфер. Весь обмен с Micro-SD идет через этот буфер.

252

\\Память дисков AZ представлена, как набор блоков объемом 512 байт каждый. Такой блок - единственная доступная единица для обмена данными с дисками AZ. Блоки пронумерованы от нуля до 65533 для 16-разрядного варианта или до 8388607 для 32-разрядного - это при использовании накопителей AZ максимально допустимой емкости. Никто не мешает использовать накопители меньшей емкости - фактический размер накопителя равен размеру файл-образа, смонтированного на этот накопитель. При попытке обратиться за пределы файл-образа будет зарегистрирована ошибка.

253

\\Команда 005 - чтение блока с микро-SD в буфер. С псевдодиска AZn, выбранного ранее командой "Выбор устройства" запускается на чтение блок, номер которого передан командой (командами) "Установка номера блока". Команда длительного действия.

254

\\Фактически, блок с карточки микро-SD читается, примерно, 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. Последовательность действий: сбросить контроллер (команда 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 и считываем из 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 запретит их. Пример не приводится вследствие тривиальности его.

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

= **Блок команд работы с энергонезависимой памятью** =

564

565

Интерфейс предоставляет любому AZ-контроллеру доступ к 255 словам энергонезависимой памяти, все команды устанавливают бит готовности по завершению. Это позволяет сохранять пользовательские настройки в энергонезависимой памяти, к примеру это используется в AZБК - там сохраняются настройки для более комфортной работы контроллера.

566

567

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

568

569

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

570

571

(% class="wikigeneratedid" %)

572

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

573

574

575

== **022: Отдать на шину считанный блок энергонезависимой памяти из буфера** ==

576

577

(% class="wikigeneratedid" %)

578

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

579

580

(% class="wikigeneratedid" %)

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

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

585

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

; trap 50 - cброс AZ

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

590

AZreset: MOV #AZ$CSR,R1

591

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

592

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

593

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

594

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

595

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

BMI 0ERR$

CLR R1

return

0ERR$: CLR R1

COM R1

return

; trap 54 - чтение энергонезависимой памяти блока 1 EEPROM в буфер с адреса ADREEPROMMEM

605

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

606

; статус чтения в R1 0 - ok

607

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

608

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

609

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

610

ReadEEPROM: push R2

611

call AZreset; сбросим

tst R1

bne 0ERR$

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

MOV #AZ$CSR,R1

mov #21,(R1); считать блок 1 энергонезависимой памяти в буфер

617

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

618

BPL 0$; ждем

619

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

620

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

621

BPL 1$; ждем

622

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

623

mov #ADREEPROMMEM,R3

624

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

625

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

626

sob R2,2$

627

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

mov (R3),R1

br 0END$

0ERR$: CLR R3

0END$: pop R2

return

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

636

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

637

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

638

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

639

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

* 0 - ok

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

644

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

645

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

646

647

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

648

649

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

650

651

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

652

653

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

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

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

659

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

; trap 50 - cброс AZ

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

664

AZreset: MOV #AZ$CSR,R1

665

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

666

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

667

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

668

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

669

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

687

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

688

BPL 0$; ждем

689

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

690

mov #ADREEPROMMEM+2,R3

691

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

692

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

693

sob R2,1$

694

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

695

mov #24,(R1); записать из буфера в блок 1 энергонезависимой памяти

696

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

BPL 2$; ждем

br 0END$

0ERR$: CLR R3

0END$: pop R3

pop R2

pop R1

return

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

= Блок команд для работы с RTC и NTP =

711

712

В контроллере AZ® есть 2 источника получения даты-времени, первый это RTC встроенный в STM32, второй это часы в стеке TCP/IP. Часы RTC работают автономно при наличии установленной батарейки 2032. Часы в стеке TCP/IP устанавливаются на основании данных с NTP-сервера.

713

714

715

== Формат буфера timestamp (доступен по чтению) ==

716

717

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

718

719

720

формат буфера даты-времени

721

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

722

формат буфера даты-времени

723

\\[0]=rtc_rt11date();

724

[2]=rt11 time 50Hz big word;

725

[4]=rt11 time 50Hz little word;

726

[6]=rt11 time 60Hz big word;

727

[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 (при записи) ==

741

742

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

743

744

745

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

746

747

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

748

[2]=month; месяц

749

[4]=day; день

750

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

[10]=hour; час

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

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

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

758

759

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

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

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

765

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

766

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

767

GetDateFromRTC: push R0

768

push R1

769

push R2

770

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #31,(R1)

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

776

777

778

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

779

780

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

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

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

785

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

786

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

787

GetDateFromLAN: push R0

788

push R1

789

push R2

790

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #42,(R1)

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

796

BPL G60; ждем

797

mov #32,(R1)

798

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

799

BPL 1$; ждем

800

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

801

mov R3,R0; запомним R3 - адрес

802

mov #10.,R2; читаем 10 слов

803

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

804

sob R2,2$

805

mov R0,R3; успешно, вернем адрес в R3

br 0END$

G60ERR: CLR R3

0END$: pop R2

pop R1

pop R0

return

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

815

816

817

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

818

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

819

CheckDateTime: Cmp 6(r3),#2021.

Blos 1err

Cmp 6(r3),#2100.

Bhi 1err

0ok$: return

1err$: clr R3

return

== **033: Запись времени-даты в буфер SimpleIN** ==

829

830

Код команды 033, данная команда принимает с шины данные в буфер SimpleIN

831

832

Работа данной команды аналогична работе команд 022 и 016.

833

834

== **034: Установка RTC на основании данных из буфера** ==

835

836

Код команды 034, данная команда устанавливает RTC на основании данных в буфере SimpleIN

837

838

Данная команда выполняется быстро, но для исключения проблем цикл ожидания выполнения рекомендуется.

839

840

== **035: Стимуляция запроса времени с NTP сервера, установка на основании ответа** ==

841

842

Код команды 035, данная команда отправляет запрос на NTP cервер (установленный в AZ.INI файле или полученный от DHCP) и устанавливает часы в стеке TCP/IP.

843

844

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

845

846

847

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

848

GetDateNTPtoNET:push R1

849

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, соответственно нужны циклы ожидания при включенном стеке.

861

862

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

; дата-время

mov #S_DateTime_0,R3; "Lan Date:"

867

trap 10

868

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

869

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

870

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

trap 47; ожидание

trap 47; ожидание

mov #ADRTMPSTR,R3

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

875

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

tst R3

bne $ok

$sob: sob R4,$datry

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

trap 7

br $go

$ok: mov #ADRTMPSTR,R3

884

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

885

trap 25; времени

886

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

887

888

889

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

890

891

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

892

893

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

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

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

899

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

900

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

912

913

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

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

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

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

920

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

921

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

922

GetDateFromLAN: push R0

923

push R1

924

push R2

925

call AZreset; сбросим

tst R1

bne G60ERR

MOV #AZ$CSR,R1

mov #42,(R1)

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

931

BPL G60; ждем

932

mov #32,(R1)

933

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

934

BPL 1$; ждем

935

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

936

mov R3,R0; запомним R3 - адрес

937

mov #10.,R2; читаем 10 слов

938

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

939

sob R2,2$

940

mov R0,R3; успешно, вернем адрес в R3

br 0END$

G60ERR: CLR R3

0END$: pop R2

pop R1

pop R0

return

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

950

951

952

= **Команды специфические для AZБК®** =

953

954

Данные команды предназначены для работы контроллера AZБК®, разработанного для серии компьютеров БК - БК-0010/БК-0010.01/БК-0011М.

955

956

Другие контроллеры AZ® игнорируют эти команды

957

958

== **037: перезапуск контроллера AZБК® и всей БК** ==

959

960

Код команды 037, данная команда осуществляет перезапуск микроконтроллера AZ®, что вызывает и перезапуск самой БК-0010/БК-0010.01/БК-0011М

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

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

966

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

967

968

969

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

970

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

mov #037,@#AZ$CSR

return

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

976

977

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

978

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

979

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

980

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

981

982

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

983

984

985

// структура хидера скриншота

986

typedef __packed struct screen_header

987

{

988

unsigned short int tag; // должен быть равен 0240

989

990

unsigned int begin_adress; // начальный адрес в словах - прямая задача в физических адресах

991

unsigned int length; // длина в словах - прямая задача в физических адресах

992

993

unsigned short int begin_page; // начальная страница - номер - прямая задача в номерах страниц

994

unsigned short int len_pages; // количество страниц - прямая задача в номерах страниц

995

996

unsigned short int R177300; //

997

unsigned short int R177302; //

998

unsigned short int R177304; //

999

unsigned short int R177306; //

1000

unsigned short int R177310; //

1001

unsigned short int R177312; //

1002

unsigned short int R177314; //

1003

unsigned short int R177316; //

1004

unsigned short int R177320; //

1005

unsigned short int R177322; //

1006

unsigned short int R177324; //

1007

unsigned short int R177326; //

1008

unsigned short int R177330; //

1009

unsigned short int R177332; //

1010

unsigned short int R177334; //

1011

unsigned short int R177336; //

1012

unsigned short int R177340; // - Регистр управления активацией окно - маски окон

1013

unsigned short int R177342; // - Регистр управления r/o на окно

1014

unsigned short int R177344; // - Регистр управления shadow окон - маски окон

1015

unsigned short int R177346; // - Регистр управления маппером

1016

unsigned short int R177350; // - регистр копия по записи 177130 в режиме записи управления памятью в SMK

1017

unsigned short int R177352; // - регистр копия по записи 177716 в режиме записи управления памятью в БК11М

1018

1019

unsigned short int R177230; // - регистр управления

1020

unsigned short int R177232; // - регистр номера страницы начала отображения - верхняя страница (слой 0)

1021

unsigned short int R177240; // - регистр номера страницы начала отображения - средняя страница (слой 1)

1022

unsigned short int R177242; // - регистр номера страницы начала отображения - нижняя страница (слой 2)

1023

unsigned short int R177244; // - регистр вертикального скролинга слой 2

1024

unsigned short int R177246; // - регистр вертикального скролинга слой 1

1025

unsigned short int R177250; // - регистр вертикального скролинга слой 0

1026

unsigned short int R177252; // - регистр гозизонтального скролинга слой 0

1027

unsigned short int R177254; // - регистр гозизонтального скролинга слой 1

1028

unsigned short int R177256; // - регистр гозизонтального скролинга слой 2

1029

1030

unsigned short int paldata[338]; //

} screen_header_t;

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

1035

1036

1037

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

1038

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

1039

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

1040

SCR_TAG = SCR_PAGE+0 ; тут вход - 240 - 1 слово

1041

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

1042

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

1043

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

1044

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

1045

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

1046

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

1047

1048

1049

; trap 41 - подготовка дефолтной информации для работы функционала скриншотов

1050

PrepSRC: jsr R5, PUSHA ; пакетное сохранение регистров

1051

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

1052

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

1053

1054

mov #100377,R3 ; константа-заполнитель

mov #SCR_PAGE,R4

mov #2047.,R2

4$: mov R3,(R4)+

sob R2,4$

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

1061

1062

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

1063

clr R3

1064

mov #SCR_ADDR_CONF,R4

mov #10,R2

2$: mov R3,(R4)+

sob R2,2$

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

1070

mov #SCR_MEM_CONF,R4

1071

mov #30,(R4)+ ;177300

1072

mov #31,(R4)+ ;177302

1073

mov #32,(R4)+ ;177304

1074

mov #33,(R4)+ ;177306

1075

mov #04,(R4)+ ;177310

1076

mov #05,(R4)+ ;177312

1077

mov #06,(R4)+ ;177314

1078

mov #07,(R4)+ ;177316

1079

mov #20,(R4)+ ;177320

1080

mov #21,(R4)+ ;177322

1081

mov #22,(R4)+ ;177324

1082

mov #23,(R4)+ ;177326

1083

mov #120,(R4)+ ;177330

1084

mov #121,(R4)+ ;177332

1085

mov #110,(R4)+ ;177334

1086

mov #100,(R4)+ ;177336

1087

1088

mov #170000,(R4)+ ;177340 - Регистр управления активацией окно - маски окон

1089

mov R3,(R4)+ ;177342 - Регистр управления r/o на окно

1090

mov #7777,(R4)+ ;177344 - Регистр управления shadow окон - маски окон

1091

mov #40404,(R4)+ ;177346 - Регистр управления маппером

1092

mov R3,(R4)+ ;177350 - регистр копия по записи 177130 в режиме записи управления памятью в SMK

1093

mov #16000,(R4)+ ;177352 - регистр копия по записи 177716 в режиме записи управления памятью в БК11М

1094

1095

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

; 177230-177256

mov #SCR_VGA_CONF,R4

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

1100

mov #4,(R4)+ ;177232 - регистр номера страницы начала отображения - верхняя страница (слой 0)

1101

mov R3,(R4)+ ;177240 - регистр номера страницы начала отображения - средняя страница (слой 1) "под спрайты"

1102

mov R3,(R4)+ ;177242 - регистр номера страницы начала отображения - нижняя страница (слой 2) "под фон"

1103

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

1104

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

1105

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

1106

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

1107

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

1108

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

1109

1110

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

mov #SCR_PAL,R4

mov #PalData,R2

mov #338.,R3

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

sob R3,1$

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

return

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

1122

1123

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

1124

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

1125

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

1126

1127

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

1128

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

1129

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

1130

1131

1132

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

1133

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

1134

0:/SCREENS/

1135

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

1136

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

1137

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

к примеру

"ERROR f_open 6"

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

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

1146

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

1147

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

1148

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

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

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

; 177230-177256

mov #SVGAC,R4

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) ; Сбросим контроллер

TSTB (R3)

BPL 20$

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

1186

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

1187

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$ ;

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

1201

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

1202

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

bpl 121$ ; ждем

mov #BUF,R1

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

1207

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

sob R2,122$

.PRINT #RESOK

.Print #BUF

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

.Exit

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

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

1222

1223

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

1224

1225

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

1226

1227

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

1228

1229

== **041: Чтение буфера ip адреса - 8 слов 16bit** ==

1230

1231

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

1232

1233

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

* IP адрес

* MASK маску

* GW гейтвей

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

1239

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

1240

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

1241

1242

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

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

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

1248

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

1249

GetIPaddrs: push R1

1250

push R2

1251

call AZreset; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #40,(R1)

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

br 0END$

0ERR$: CLR R3

0END$: pop R2

pop R1

return

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

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

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

1285

1286

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

1287

1288

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

1289

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

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

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

1295

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

1296

GetMACaddrs: push R1

1297

push R2

1298

call AZreset ; сбросим

tst R1

bne 0ERR$

MOV #AZ$CSR,R1

mov #43,(R1)

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

br 0END$

0ERR$: CLR R3

0END$: pop R2

pop R1

retur

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

Приложения

Навигация

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