Вт, 26.11.2024, 08:33
Приветствую Вас Гость | RSS
Главная | Кирилизация zOS - Форум | Регистрация | Вход
Форма входа
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Кирилизация zOS
Greg_PurtovДата: Чт, 24.12.2009, 08:49 | Сообщение # 1
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 1
Статус: Offline
Прошу подсказать куда в zOS версии 1.6 перенесли таблицу перекодировки при записи командой WTL
в SYSLOG. В OS390 она находилась в SYS1.LINKLIB(IEAVMQWR) секция IEAVM601
 
akostДата: Сб, 26.12.2009, 18:23 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
Я уже лет 10 этого не делал...
 
Greg_PurtovДата: Сб, 02.01.2010, 10:34 | Сообщение # 3
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 1
Статус: Offline
Подскажите где искать команду WTL. В SYS1.MACLIB такого макроса не нашел.
Попытался вставить в исходник на ассемблере не понимает.
 
GregoryДата: Пн, 04.01.2010, 14:41 | Сообщение # 4
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
Quote (Greg_Purtov)
Подскажите где искать команду WTL.

в SYS1.MODGEN. кстати это SVC 36


Сообщение отредактировал Gregory - Пн, 04.01.2010, 14:47
 
akostДата: Пн, 04.01.2010, 16:45 | Сообщение # 5
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
Упс... быстрее меня Григорий написал)) я только сейчас увидел - уже отвечено. таки да, в MODGEN.

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

Коллеги, если получиться, может, кто-то отпишет нормально и на сайт положим?

 
GregoryДата: Вт, 05.01.2010, 12:05 | Сообщение # 6
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
взглянул я с утра на это...
Совершенно верно, раньше таблица перекодировки для консоли размещалась в секции IEAVM601 модуля IEAVMQWR, а смещение таблицы изменялось от версии к версии. Модификация для поддержки кириллицы при выводе на консоль выглядела примерно так:
// EXEC PGM=IMASPZAP
//SYSLIB DD DISP=SHR,DSN=SYS1.LINKLIB
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
NAME IEAVMQWR IEAVM601
VER 10B0 40404040,40404040,40404A4B,4C4D4E4F
REP 10B0 40404040,44404040,40404A4B,4C4D4E4F
VER 10C0 50404040,40404040,40405A5B,5C5D5E5F
REP 10C0 50404040,40404057,40405A5B,5C5D5E5F
VER 10D0 60614040,40404040,4040406B,6C6D6E6F
REP 10D0 60614063,40404040,40406A6B,6C6D6E6F
VER 10E0 40404040,40404040,40407A7B,7C7D7E7F
REP 10E0 40404040,40407677,78797A7B,7C7D7E7F
VER 10F0 40818283,84858687,88894040,40404040
REP 10F0 80818283,84858687,88898A8B,8C8D8E8F
VER 1100 40919293,94959697,98994040,40404040
REP 1100 90919293,94959697,98999A9B,9C9D9E9F
VER 1110 4040A2A3,A4A5A6A7,A8A94040,40404040
REP 1110 A0A1A2A3,A4A5A6A7,A8A9AAAB,ACADAEAF
VER 1120 40404040,40404040,40404040,40404040
REP 1120 B0B1B2B3,B4B5B6B7,B8B9BABB,BCBDBEBF
VER 1130 40C1C2C3,C4C5C6C7,C8C94040,40404040
REP 1130 C0C1C2C3,C4C5C6C7,C8C9CACB,CCCDCECF
VER 1140 40D1D2D3,D4D5D6D7,D8D94040,40404040
REP 1140 D0D1D2D3,D4D5D6D7,D8D9DADB,DCDDDEDF
VER 1150 4040E2E3,E4E5E6E7,E8E94040,40404040
REP 1150 E0E1E2E3,E4E5E6E7,E8E9EAEB,ECEDEEEF
VER 1160 F0F1F2F3,F4F5F6F7,F8F94040,40404040
REP 1160 F0F1F2F3,F4F5F6F7,F8F9FAFB,FCFDFEFF
//

Сейчас модуль IEAWMQWR вообще не содержит секцию IEAVM601:
- CONTROL SECTION ENTRY
LMOD LOC NAME LENGTH TYPE LMOD LOC CSECT LOC NAME
0 00 IEAVMWSV B30 SD
4E6 4E6 MMBQUEUE
648 648 IEECMQCN
B30 IEAVMDSV B80 SD
16B0 IEAVMQWR 1458 SD
193C 28C WRABXLE
2B08 IEAVMDOM B18 SD
3620 IEAVSTAA E24 SD
4448 IEAVSTA2 5C0 SD
4A08 IEAVM603 6C8 SD
50D0 IEAVM614 960 SD

где теперь искать таблицу перекодировки непонятно... surprised

Добавлено (05.01.2010, 12:05)
---------------------------------------------
Я предлагаю выложить все материалы по поддержке кириллицы в z/OS, а не только материалы поддержки WTO/WTOR/WTL. Вот список тех модификаций, что известны мне:
- JES2 HASCSIRQ - кириллица в SYSOUT;
- недостающие таблицы перекодировки для CP 866, 915 (ISO8859-5), 1251 для iconv/EDCICONV
но кажется еще что-то было... unsure

В z/OS 1.5 в модуле IEAVMQWR есть секция IEAVM601, но выглядит она довольно странно (диассеблировано)
IEAVM601 CSECT
USING A000002,R15
BALR R15,0 000000 05F0
A000002 B A00001E 000002 47F0F01C
DROP R15
DC XL1'16' 000006 16
DC CL22'IEAVM601 03063 JBB7727' 000007 C9C5C1E5...
USING A000020,R12
DC XL1'00' 00001D 00
A00001E BALR R12,0 00001E 05C0
A000020 L R1,A000034 000020 5810C014
LHI R15,X'0BAD' 000024 A7F80BAD
SVC 13 ABEND 000028 0A0D
DC XL10'00000000000000000000' 00002A 00000000...
A000034 DC XL4'04077000' 000034 04077000
здесь видна ссылка на FMID JBB7727 - move message delivery decisions onto each active system in the sysplex rather than the message issuer's system.

Сообщение отредактировал Gregory - Ср, 06.01.2010, 17:49
 
Greg_PurtovДата: Пт, 08.01.2010, 17:15 | Сообщение # 7
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 1
Статус: Offline
Колеги мне удалось почти все кирилизовать в ближайшее время выложу на форум.

Добавлено (08.01.2010, 17:15)
---------------------------------------------
Добавляю то что знаю по кирилизации

Для консоли

//G1 JOB MSGCLASS=A,MSGLEVEL=(1,1)
//S1 EXEC PGM=AMASPZAP
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=SYS1.LINKLIB,DISP=SHR
//SYSIN DD *
NAME IEECVET1 IEECVFTX
VER 1364 40404040404040404040
REP 1364 40404043444540474840
VER 1374 50404040404040404040
REP 1374 50404040404040575840
VER 1384 60614040404040404040406B
REP 1384 606162636440666740406A6B
VER 1394 40404040404040404040
REP 1394 40404040404076777879
VER 13A4 40818283848586878889404040404040
REP 13A4 808182838485868788898A8B8C8D8E8F
VER 13B4 40919293949596979899404040404040
REP 13B4 909192939495969798999A9B9C9D9E9F
VER 13C4 4040A2A3A4A5A6A7A8A9404040404040
REP 13C4 A0A1A2A3A4A5A6A7A8A9AAABACADAEAF
VER 13D4 40404040404040404040404040404040
REP 13D4 B0B1B2B3B4B5B6B7B8B9BABBBCBDBEBF
VER 13E4 40C1C2C3C4C5C6C7C8C9404040404040
REP 13E4 C0C1C2C3C4C5C6C7C8C9CACBCCCDCECF
VER 13F4 40D1D2D3D4D5D6D7D8D9404040404040
REP 13F4 D0D1D2D3D4D5D6D7D8D9DADBDCDDDEDF
VER 1404 4040E2E3E4E5E6E7E8E9404040404040
REP 1404 E0E1E2E3E4E5E6E7E8E9EAEBECEDEEEF
VER 1414 F0F1F2F3F4F5F6F7F8F9404040404040
REP 1414 F0F1F2F3F4F5F6F7F8F9FAFBFCFDFE40
DUMP IEECVET1 IEECVFTX
//*
//

Для просмотра выходных очередей

//G2 JOB MSGCLASS=A,MSGLEVEL=(1,1)
//S2 EXEC PGM=AMASPZAP
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=SYS1.SHASLINK,DISP=SHR
//SYSIN DD *
NAME HASCSIRQ HASCSIRQ
VER 01CC D67E8021CBC8
REP 01CC 470000000700
//

Для кирилизации SDSF в разделе SYS1.PARMLIB(ISFPRM00)

TRTAB CODPAG(CP01025) VALTAB(TRTAB) UPCTAB(TRTAB2)

Для WEB запускать с параметром

ICSPARM='-r /etc/httpd.conf -fscp IBM-1025 -netcp IBM-1251'

Для русификации ISPF

В SETTING установить опцию TERMINAL TYPE=3278CY

 
akostДата: Сб, 09.01.2010, 22:08 | Сообщение # 8
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
Спасибо, была сделана хорошая работа.
 
GregoryДата: Пн, 11.01.2010, 15:13 | Сообщение # 9
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
Personal communication:
связь--> конфигурировать... ---> Параметры сеанса --> Кодовая страница хоста 1025 Россия (Белоруссия)
правка ---> предпочтения ---> клавиатура --> Раскладка клавиатуры Россия (443 или 441)

c3270:
см. файл .c3270pro в архиве c3270.zip

Putty:
Setting ---> Window --> Translation ---> Received data assumed in ... Win1251

telnet/rlogin/ssh (cygwin):
настройка не требуется

Терминальная сессия z/OS UNIX:
chcp -e 1025 -a 1251
при желании можно добавить в .profile

ISPF C/S GUI:
ISPSTART CODEPAGE(1025) CHARSET(1150) ... при запуске

Добавлено (11.01.2010, 15:13)
---------------------------------------------
еще немного о поддержке кириллицы в z/OS UNIX...
К сожалению, использование кодовой страницы 1025 в z/OS UNIX, в частности, chcp -e 1025 -a 1251, предложенное выше, неприемлено для полноэкранных z/OS UNIX приложений (IBM неспроста использует кодовую страницу 1047 как основную для z/OS UNIX!). Проблемы вызывает в частности код: x'80' (ц), который не может быть отображен curses. Удовлетворительного решения этой проблемы (т.е. решения от IBM) нет до сих пор, поэтому возможным способом ее решения может быть использование нестандартной кодовой таблицы для кириллицы, в целом аналогичной 1025, но лучше согласованной с 1047, а именно изменение кодов для следующих 7 символов:
- ц (<cyr-tse>, <KC01>) представляется как x'E6' а не x'80'
- | (<vertical-line>, <SM13>) представляется как x'7C' а не x'21' (как в 1047);
- Е (<cyr-IE>, <KE02>) представляется как x'85' а не x'BD' (как в 1047);
- у (<cyr-u>, <KU01>) представляется как x'E3' а не x'AD' (как в 1047);;
- ! (<exclamation-mark>, <SP02>) представляется как x'21' а не x'7C' (как в 1047);
- [ (<left-square-bracket>, <SM06>) представляется как x'5B' а не x'E3' (как в 1047);
- ] (<right-square-bracket>, <SM08>) представляется как x'5D' а не x'85' (как в 1047).

Файлы поддержки нестандартной таблицы а также поддержки преобразований отсутствующих в z/OS - 1251 <--> 1025,
915 (ISO8859-5) <--> 1025 прилагаются (EDCU.zip)

Прикрепления: c3270.zip (863.4 Kb) · telnet-rlogin-s.zip (1.08 Mb) · edcu.zip (19.3 Kb)


Сообщение отредактировал Gregory - Пн, 11.01.2010, 15:59
 
Greg_PurtovДата: Вт, 12.01.2010, 09:48 | Сообщение # 10
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 1
Статус: Offline
Спасибо, хорошие дополнения
 
dimon_sarДата: Пт, 09.09.2011, 14:29 | Сообщение # 11
Рядовой
Группа: Проверенные
Сообщений: 7
Репутация: 0
Статус: Offline
Люди добрые помогите. Нужно сохранять весь текст что бежит на консоли через Personal Communication v.6 только как это реализовать не могу понять! Требуется что то типа лог файла меинфрейма. Если такое вообще возможно. В системе z\os временно отключено ведение логов. Спасти обстановку может только PComm
 
GregoryДата: Пт, 09.09.2011, 15:08 | Сообщение # 12
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
Quote (dimon_sar)
Нужно сохранять весь текст что бежит на консоли через Personal Communication v.6

первое, что приходит в голову - использовать штатную утилиту трассировки... посмотрите, может быть Вас устроит простейшее решение
 
akostДата: Пт, 09.09.2011, 15:20 | Сообщение # 13
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
Quote (Gregory)
первое, что приходит в голову - использовать штатную утилиту трассировки... посмотрите, может быть Вас устроит простейшее решение

Григорий, это не простейшее. Простейшее сделал один мой заказчик - на машине с PComm он открыл консоль, а все, что на экране, писал в виде кино на диск.... так потом и хранил файлы-avi и смотрел глазами! я был убит.
По существу - трассировка это выход, если быстро.
 
GregoryДата: Пт, 09.09.2011, 19:18 | Сообщение # 14
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
пацтулом) а ручкой на бумагу с экрана переписать? biggrin
 
dimon_sarДата: Чт, 15.09.2011, 08:15 | Сообщение # 15
Рядовой
Группа: Проверенные
Сообщений: 7
Репутация: 0
Статус: Offline
А что за утилита трассировки? Как ее использовать? А то я с ней никогда не сталкивался
 
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Поиск: