УКНЦ загрузка через стык С2

**Patron** · 29.12.2012, 17:25

Сообщение от hantarex

команда-отклик

Там ведь по одному каналу идут и пакеты дискового обмена, и обычный байтовый обмен с терминалом.

Фильтр протокола HX на стороне сервера, получая эту кашу - опознаёт в ней пакеты и извлекает их, а всё остальное пропускает на сокет подключения терминала.

Если на любой стадии разборки пакета тот отклоняется от стандарта HX - все принятые в процессе разборки байты возвращаются в терминальный обмен и отправляются терминалу.

**hantarex** · 29.12.2012, 17:29

Сообщение от Patron

и пакеты дискового обмена

вот об этом можно поподробней?

**Patron** · 29.12.2012, 17:29

Сообщение от hantarex

режим терминала реализовываться не будет. только файл-сервер и только для УКНЦ.

Лучше, чем уже сделано - сделать вряд ли получится.
А какой смысл делать хуже, если можно просто запустить "Эмулятор VT52" в режиме HX-сервера и пользоваться.

**hantarex** · 29.12.2012, 17:32

да блин. в том-то и дело, что хочу реализовать файл-сервер без ББ, автономно. и я не собираюсь делать лучше, собираюсь по другому.

в мегах немного рублю, в RT-11 - не очень, потому и прошу помощи.

**Patron** · 29.12.2012, 17:36

Сообщение от hantarex

вот об этом можно поподробней?

Вот, например, как драйвер HX.SYS для RT-11 реализует вызов чтения массива слов с диска ( с поддержкой режима сжатия на стороне сервера ):

Код:

HX.Read:

.IF	NE	MMG$T
	Mov	HXCQE, R4
.EndC
	BiC	#100, @#TPS

	Mov	#1, R0		; Send SOH
	Call	ChOu

;;	MovB	#375, R0		; Short packet
;;	Call	ChOu
;;	Mov	#7, R0		; Packet size.
;;	Call	ChOu

	Mov	#176407, R0	; Short packet ; Packet size = 7
	Call	WOu

;;	Mov	#'C, R0		; Packet type = COMMAND
;;	Call	ChOs
;;	Mov	#'R, R0		; Command = Cmd_READ_RAW
;;	Call	ChOs

;;	Mov	#"RC, R0		; Packet type = COMMAND  ;  Command = Cmd_READ_RAW
	Mov	#"rC, R0		; Packet type = COMMAND  ;  Command = Cmd_READ_PACKED_STREAM
	Call	WOs

	Mov	R3,  R0		; Unit
	Call	ChOs

	Mov	R2,  R0		; Block
	Call	WOs

	Mov	R1,  R0		; WordCount
	Call	WOs

	Call	TTKPrep

	Mov	ChSum, R0
	Call	WOu		; CheckSumm

	................

	Clr	ChSum
1$:
	Call	ChIn
	CmpB	R0, #374		; PACKED_STREAM ?
	BEq	GetPackedStream
	CmpB	R0, #376		; Long packet == Data
	BEq	GetData
	CmpB	R0, #3		; Ctrl_C ?
	BEq	ERR
	CmpB	R0, #375
	BNE	1$
				; Short packet == Error
	Call	ChIn
	Mov	R0, R3		; R3 == Packet Size;
	BEq	ERR		; Packet Size == 0 ?
Skip:
	CmpB	(R3)+, (R3)+	; R3 += 2;

	Call	ChIn
	SOB	R3, .-4.		; Get packet bytes.	

	Br	ERR					

GetData:
	Call	WInR3		; R3 == Packet Size;
	BEq	ERR		; Packet Size == 0 ?

	Call	ChIn
	CmpB	R0, #'R		; Pcket type == REPLY ?
	BNE	Skip
	Dec	R3
	BLE	ERR

	Add	R0, ChSum

	Call	ChIn
	CmpB	R0, #'D		; Reply type == RAW DATA ?
	BNE	Skip
	Dec	R3
	BLE	ERR

	Add	R0, ChSum

	ASL	R1		; R1 == Byte Count
2$:	
	Call	ChIn
	Add	R0, ChSum

.IF	EQ	MMG$T
	MovB	R0, (R5)+
.IFF
	Mov	R0, -(SP)
	Call	@$PTBYT
.EndC
	Dec	R3
	BEq	3$
	SOB	R1, 2$
3$:
	Tst	R3
	BGt	Skip

	Call	WInR3		; R3 == CheckSumm

	Dec	R1
	BNE	ERR
CmpR3:
	Cmp	R3, ChSum
	BNE	ERR

OK: 	Tst	(PC)+
ERR: 	SeC
	Return

	................

GetPackedStream:
NextPackedBlock:

	Call	ChIn		; R0 == PackedBlock Header
	Add	R0, ChSum
	Dec	R0		;
	BMi	EndOfStream	; = 0 - End Of Stream
	BEq	GetRptBlock	; = 1 - RPT_Block
	Inc	R0		; > 1 - RAW_Block

; Get RAW_Block

	Mov	R0, R2		; R2 == RAW Bytes Count
1$:
	Call	ChIn
	Add	R0, ChSum

.IF	EQ	MMG$T
	MovB	R0, (R5)+
.IFF
	Mov	R0, -(SP)
	Call	@$PTBYT
.EndC
	SOB	R2, 1$
	Br	NextPackedBlock

EndOfStream:

	Call	WInR3		; R3 == CheckSumm
	Br	CmpR3
	
GetRptBlock:

	Call	ChIn		; 
	Add	R0, ChSum
	Mov	R0, R2		; R2 == RPT Count
	Call	ChIn		; R0 == Byte to repeat.
	Add	R0, ChSum
1$:
.IF	EQ	MMG$T
	MovB	R0, (R5)+
.IFF
	Mov	R0, -(SP)
	Call	@$PTBYT
.EndC
	DecB	R2
	BNE	1$
	Br	NextPackedBlock

---------- Post added at 16:36 ---------- Previous post was at 16:35 ----------

Сообщение от hantarex

файл-сервер без ББ, автономно.

Это как?

**hantarex** · 29.12.2012, 17:55

я же писал - Мега с SD-картой и портом RS232. Мега обрабатывает пакеты, читает-пишет SD-карту. если тяму хватит - будет поддержка FAT16 на SD-карте. если нет - просто массив блоков. Мега - всмысле ATmega8,16,32 и т.д. конструктив очень простой - мега, МАХ232, стабилизаторы 5В и 3.3В,цепь сброса, согласователь на резисторах для карты. разъем карты, разъем подключения. все вроде.

по идее протокол не может быть очень сложным?

диск с последовательным доступом вобщем.

сорри, не доступом, а интерфейсом

---------- Post added at 17:55 ---------- Previous post was at 17:46 ----------

у мну есть и КНГД и КНЖД, но они вместе с дисками довольно громоздки и не всегда удобны. а тут коробка с пол-пачки сигарет, грубо говоря. а если реализую поддержку FAT, так инфу с-на-карту будет ваще просто переносить

(это я пока мечтаю)

**Patron** · 29.12.2012, 17:58

Сообщение от hantarex

по идее протокол не может быть очень сложным?

Там ( см. приложение ) всё элементарно. Из обработчика можно смело выкинуть запоминание входного потока для отправки терминалу в случае ошибочного опознавания, а всё остальное должно уложиться в несколько килобайт.

...

Описание и исходники протокола HX v2.2

...

**palsw** · 05.01.2013, 17:08

Мои попытки подключить С2 к rs232:

1.Косичку спаял по схеме "минимальный"
2.На писюке проверил ком порт обычной ком-мышкой -все работает.
3.запустил гипертерминал на winXP SP3 ,настроил COM1.На УКНЦ запустил загрузку стык2 .На в окне терминала появился символ @
4.Запустить программу UkncComSender.exe - ошибка

Ага,запускается из этого поста http://zx.pk.ru/showpost.php?p=391152&postcount=23 Значит в 1 посте не актуальные версии программ?

http://piccy_.info/code2/3939397/9ac...cd10f9cfd95e0/

можно по пунктам что включить где скачать и что нажать?А пока пойду тему еще раз перечитывать - с первого раза что то не дочитал

**nzeemin** · 05.01.2013, 17:20

Сообщение от palsw

4.Запустить программу UkncComSender.exe - ошибка

Ага,запускается из этого поста http://zx.pk.ru/showpost.php?p=391152&postcount=23 Значит в 1 посте не актуальные версии программ?

На контупере не нашлось подходящего runtime для той версии MSVC под которой собиралось.
Соберите из исходников: http://code.google.com/p/ukncbtl/sou...FUkncComSender

---------- Post added at 17:20 ---------- Previous post was at 17:16 ----------

Сообщение от palsw

http://piccy_.info/code2/3939397/9ac...cd10f9cfd95e0/

можно по пунктам что включить где скачать и что нажать?А пока пойду тему еще раз перечитывать - с первого раза что то не дочитал

UkncComSender.exe ожидает два параметра. Первый -- имя ком-порта, второй -- имя .SAV-файла. Судя по скриншоту, у вас что-то со вторым параметром -- например указан несуществующий файл.
UkncComSender писался как утилита для проверки Стык С2, контроль ошибок не на высоте.

**palsw** · 05.01.2013, 17:21

получилось,дело в том что нужно распаковать папку с программкой из первого поста и заменить в этой папке EXE скаченный из поста №23 .

Было бы не плохо в 1 посте обновить файлы до актуальных версий и если нужно дополнить описание .А то сразу не въехал.

[IMG]http://i.piccy_.info/a3/2013-01-05-13-21/i7-3939411/240x180-
r/i.gif[/IMG]

По варианту из этого поста http://zx.pk.ru/showpost.php?p=469503&postcount=101 дохожу до нажатия пробела на УКНЦ - нажимаю и дальше нечего не происходит.Ждал мин 15 -может дольше нужно ждать?

User Tag List

Тема: УКНЦ загрузка через стык С2

Опции темы

Отображение

Информация о теме

Пользователи, просматривающие эту тему

Похожие темы

Загрузка П.О. через звуковую PC.

Загрузка УКНЦ

КУПЛЮ УКНЦ Электроника МС 0511 с распаянным Стык С2.

Загрузка на рел Commodore 64

УКНЦ: загрузка через стык С2

Ваши права