Язык ассемблера IBM Basic и его преемники

Базовый язык ассемблера

Парадигма	язык ассемблера
Разработчик	ИБМ
Впервые появился	1964
ТЫ	Поддержка базового программирования IBM , базовая операционная система/360
Лицензия	бесплатно

Ассемблер D/E/F/G/H/XF

Парадигма	язык макросов на ассемблере
Разработчик	ИБМ
Впервые появился	1966
ТЫ	IBM OS/VS , DOS/VS , VM/370 и связанные с ними
Лицензия	разнообразный

Ассемблер высокого уровня

Парадигма	язык макросов на ассемблере
Разработчик	ИБМ
Впервые появился	1992
Стабильная версия	Версия 1 Выпуск 6
ТЫ	IBM MVS/ESA и преемники, VM/ESA и преемники, VSE/ESA и преемники
Лицензия	собственный
Веб-сайт	https://www.ibm.com/products/high-level-assembler-and-toolkit-feature
Основные реализации
Ассемблер высокого уровня

Язык ассемблера IBM Basic и его преемники — это серия языков ассемблера и ассемблеров, для IBM System/360 мэйнфреймов и их преемников посредством IBM Z. созданных

Первый из них, базовый язык ассемблера ( BAL ), представляет собой чрезвычайно ограниченный язык ассемблера , представленный в 1964 году и используемый в системах 360 со всего 8 КБ основной памяти, а также только устройством для чтения карт , перфоратором и принтером для ввод/вывод как часть поддержки базового программирования IBM (BPS/360). Базовый ассемблер для BAL также был доступен как часть Basic Operating System/360 (BOS/360).

Впоследствии для System/360 появился язык ассемблера, который имел более мощные функции и удобство использования, например, поддержку макросов . Этот язык и линейка ассемблеров, реализовавших его, продолжали развиваться для System/370 и последующих архитектур, наследуя и расширяя его синтаксис. Некоторые представители компьютерной индустрии называли их общим термином «Базовый язык ассемблера» или «BAL». Однако многие этого не сделали, и сама IBM обычно называла их просто «языком ассемблера System/360». как «Ассемблер» для данной операционной системы или платформы, или подобные имена. Конкретные ассемблеры были известны под такими именами. как Ассемблер E, Ассемблер F, Ассемблер H и так далее. Программисты, использующие этот язык и это семейство ассемблеров, также называют их ALC (кодирование на языке ассемблера) или просто «ассемблер».

Последний производный язык известен как IBM High-Level Assembler ( HLASM ).

Общие характеристики

Поскольку это язык ассемблера , BAL использует собственный набор инструкций архитектуры мэйнфрейма IBM, на которой он работает, System/360 .

Преемники BAL используют собственные наборы инструкций архитектур мэйнфреймов IBM, на которых они работают, включая System/360 , System/370 , System/370-XA , ESA/370 , ESA/390 и z/Architecture .

Простота машинных инструкций означает, что исходный код программы, написанной на ассемблере, обычно намного длиннее, чем эквивалентная программа, скажем, на COBOL или Fortran . В прошлом считалось, что скорость программ на ассемблере, написанных вручную, компенсирует этот недостаток, но с появлением оптимизирующих компиляторов, языка C для мэйнфреймов и других достижений ассемблер потерял большую часть своей привлекательности. Однако IBM продолжает модернизировать ассемблер, и он по-прежнему используется, когда первостепенная необходимость в скорости или очень точном управлении. Однако все преемники BAL от IBM включали в себя сложную функцию макросов, которая позволяет писать гораздо более компактный исходный код.

Другая причина использования ассемблера заключается в том, что не ко всем функциям операционной системы можно получить доступ на языках высокого уровня. Интерфейсы прикладных программ операционных систем мэйнфреймов IBM определяются как набор «макро» инструкций языка ассемблера, которые обычно вызывают вызов супервизора ( SVC) [например, в z/OS] или Диагностика ( DIAG) [например, в z/VM] инструкции для вызова подпрограмм операционной системы. Можно использовать службы операционной системы из программ, написанных на языках высокого уровня, с помощью подпрограмм ассемблера.

Формат оператора ассемблера

Некоторые программисты использовали ассемблерную форму кодирования для языков ассемблера IBM 360 и их преемников.

Перфокарты и печатный список сборок были обычным явлением во время использования языка ассемблера IBM 370 в 1970-х годах.

Формат операторов ассемблера отражает структуру перфокарты с 80 столбцами, хотя последующие версии ослабили большинство ограничений.

• Необязательная метка или имя оператора представляет собой строку буквенно-цифровых символов, начинающуюся в столбце 1. Первый символ должен быть буквенным. В более поздних версиях к допустимым символам, используемым в метках, были добавлены @, #, $ и _, а размер увеличен с первоначальных шести до восьми символов, а затем до почти неограниченной длины.
• Код операции или «мнемоника» может начинаться в любом столбце справа от столбца 1 и отделяться от метки оператора пробелом. Код операции представлял собой всего лишь машинную инструкцию (макросы не были доступны), поэтому обычно он состоял из 1, 2, 3 или, реже, из 4 букв. Код операции был расширен и теперь может содержать до восьми символов, а затем и до практически неограниченной длины.
• Поле операнда может начинаться в любом столбце справа от кода операции и отделяться от кода операции хотя бы одним пробелом. Пробелы недопустимы в операндах, за исключением символьных констант. Поле операнда, состоящее из одного или нескольких операндов, является необязательным в зависимости от кода операции.
• Необязательные комментарии могут отображаться справа от поля операнда, разделенные хотя бы одним пробелом.
• Базовый язык ассемблера не позволяет продолжать операторы. Более поздние версии ассемблера указывают на продолжение появлением любого непустого символа в столбце 72 продолжаемого оператора. Базовый язык ассемблера требует, чтобы столбец 72 был пустым.
• «Комментарий с полной карточкой» обозначается звездочкой (*) в столбце 1.
• Столбцы карт 73–80, называемые полем идентификационной последовательности , могут использоваться программистом для любых целей, но обычно содержат порядковые номера для использования перемешанной колоды карт.

Базовый язык ассемблера также допускает альтернативный формат операторов, когда оператор начинается в столбце 25, что позволяет вставлять собранную инструкцию в ту же карту, начиная с столбца 1. Эта опция не была продолжена в более поздних версиях ассемблера.

Виды инструкций

В исходном коде программы, написанной на ассемблере, встречаются три основных типа инструкций.

Инструкции ассемблера

Инструкции ассемблера, иногда называемые директивами , псевдооперациями или псевдооперациями в других системах, представляют собой запросы ассемблеру на выполнение различных операций в процессе генерации кода. Например, CSECT означает «начать здесь раздел кода»; DSECT предоставляет определения данных для структуры, но не генерирует код; DC определяет константу, которая будет помещена в объектный код.

Одной из наиболее важных инструкций ассемблера является USING, который поддерживает адресацию со смещением базы архитектуры S/360. Он помогает ассемблеру определить, какой базовый регистр и смещение следует использовать для относительного адреса. В BAL оно ограничивалось формой

         USING base,reg-1,...,reg-n

Адреса машинных инструкций в S/360 определяют смещение (0–4095 байт) от значения в базовом регистре ; хотя в более поздних версиях архитектуры были добавлены форматы относительных адресов, более старые форматы по-прежнему используются многими инструкциями. USING позволяет программисту сообщить ассемблеру, что указанные базовые регистры предположительно содержат адрес «base», base+4096 (если указано несколько регистров) и т. д. Это лишь дает программисту ярлык, которому в противном случае пришлось бы укажите базовый регистр в каждой инструкции. Программисты по-прежнему несут ответственность за фактическую загрузку адреса «базы» в регистр перед написанием кода, который зависит от этого значения.

Соответствующие DROP инструкция ассемблера аннулирует предыдущую USING.

Машинные инструкции (мнемонические)

Существует связь «один к одному» с машинными инструкциями . Полный набор мнемонических команд описан в Принципах работы. руководство для каждого набора инструкций. Примеры:

 * This is a comment line
 * Load the fullword integer stored at the
 * location labeled 'ZIGGY' into general register 3:
       L     3,ZIGGY
       SLA   4,5             shift the value in general register 4 left by 5 bits
       MVC   TARGET,SOURCE   move characters from location 'SOURCE' to 'TARGET'
       AP    COUNT,=P'1'     add 1 to value in memory location 'COUNT' (packed decimal format)
       B     NEXT            unconditional branch to label 'NEXT'
 HERE  EQU   *               This is a label
       CLC   TARGET,=C'ADDRESS'  Compare memory location 'TARGET' to string 'ADDRESS'
       BE    THERE               branch if equal to program label 'THERE'

Общепринятые стандарты, хотя и не обязательные, включают идентификацию регистров общего назначения с помощью мнемоники. В отличие от ассемблеров некоторых других систем, таких как язык ассемблера X86 , мнемоника регистров не является зарезервированными символами, а определяется через EQU утверждения в других частях программы. Это улучшает читаемость программ на языке ассемблера и обеспечивает перекрестную ссылку на использование регистров. Таким образом, обычно в программе на ассемблере вы можете увидеть следующее:

 R3    EQU  3
       ...
       L    R3,ZIGGY

Некоторые примечательные инструкций : мнемоники BALR для вызова, сохраняющего обратный адрес и код состояния в регистре, SVC, DIAG, и ZAP.

одно, два или три полуслова Машинные инструкции System/360 имеют длину (от двух до 6 байтов). Первоначально существовало четыре формата инструкций, обозначаемых первыми двумя битами поля кода операции; В z/Architecture добавлены дополнительные форматы.

Макросы и условная сборка

Ассемблер базовой поддержки программирования не поддерживал макросы . Более поздние версии ассемблера, начиная с Assembler D. позволяют программисту группировать инструкции в макросы и добавлять их в библиотеку, которую затем можно вызывать в других программах, обычно с параметрами, такими как средства препроцессора в C и родственных языках. Макросы могут включать инструкции условного ассемблера, такие как AIF (конструкция «if»), используемая для генерации различного кода в соответствии с выбранными параметрами. Это делает макросы этого ассемблера очень мощными. Хотя многострочные макросы в C являются исключением, определения макросов в ассемблере могут легко состоять из сотен строк.

Макросы операционной системы

Большинству программ потребуются услуги операционной системы , а ОС предоставляет стандартные макросы для запроса этих услуг. Они аналогичны Unix системным вызовам . Например, в MVS (позже z/OS) STORAGE (с OBTAIN параметр) динамически выделяет блок памяти и GET извлекает следующую логическую запись из файла.

Эти макросы зависят от операционной системы; В отличие от некоторых языков более высокого уровня, языки ассемблера мэйнфреймов IBM не предоставляют независимые от операционной системы операторы или библиотеки для распределения памяти, выполнения операций ввода-вывода и т. д., а различные операционные системы мэйнфреймов IBM несовместимы в системной службе. уровень. Например, запись последовательного файла будет по-разному кодироваться в z/OS и z/VSE.

Примеры

Следующий фрагмент показывает, как на ассемблере будет выполняться логика «Если SEX = 'M', добавить 1 к MALES, иначе добавить 1 к FEMALES».

          CLI   SEX,C'M'       Male?
          BNE   IS_FEM         If not, branch around
          L     7,MALES        Load current value of MALES into register 7
          LA    7,1(7)        add 1 
          ST    7,MALES        store back the result
          B     GO_ON          Finished with this portion
 IS_FEM   EQU   *              A label
          L     7,FEMALES      Load current value in FEMALES into register 7 
          LA    7,1(7)         add 1 
          ST    7,FEMALES      store back the result
 GO_ON    EQU   *              - rest of program -
 *
 MALES    DC    F'0'           Counter for MALES (initially=0)
 FEMALES  DC    F'0'           Counter for FEMALES (initially=0)

Далее следует вездесущее «Hello, World!» программа и при запуске в операционной системе IBM, такой как OS/VS1 или MVS , будет отображать слова «Hello, World!» на консоли оператора:

 HELLO    CSECT               The name of this program is 'HELLO'
 *                            Register 15 points here on entry from OPSYS or caller.
          STM   14,12,12(13)  Save registers 14,15, and 0 thru 12 in caller's Save area
          LR    12,15         Set up base register with program's entry point address
          USING HELLO,12      Tell assembler which register we are using for pgm. base
          LA    15,SAVE       Now Point at our own save area
          ST    15,8(13)      Set forward chain
          ST    13,4(15)      Set back chain
          LR    13,15         Set R13 to address of new save area
 *                            -end of housekeeping (similar for most programs) -
          WTO   'Hello, World!' Write To Operator (Operating System macro)
 *
          L     13,4(13)      restore address to caller-provided save area
          XC    8(4,13),8(13) Clear forward chain
          LM    14,12,12(13)  Restore registers as on entry
          DROP  12            The opposite of 'USING'
          SR    15,15         Set register 15 to 0 so that the return code (R15) is Zero
          BR    14            Return to caller
 *           
 SAVE     DS    18F           Define 18 fullwords to save calling program registers 
          END  HELLO          This is the end of the program

WTO — это ассемблерный макрос, генерирующий вызов операционной системы. Благодаря сохранению регистров, а затем их восстановлению и возврату, эту небольшую программу можно использовать как пакетную программу, вызываемую непосредственно языком управления заданиями операционной системы (JCL), например:

// EXEC PGM=HELLO

или, альтернативно, ее можно ВЫЗВАТЬ как подпрограмму из такой программы:

 CALL 'HELLO'

Версии

Распечатка пакетного задания с идентификационной страницей для Assembler G

За исключением ассемблеров для IBM System/360 Model 20 , ассемблеры IBM были в значительной степени совместимы с предыдущими версиями. Различия заключались в основном в сложности допустимых выражений и обработке макросов. Первоначально ассемблеры OS/360 обозначались в соответствии с их требованиями к памяти.

Ассемблер базовой поддержки программирования

Ассемблер для BPS — это настоящий «базовый ассемблер». Он предназначался для загрузки с карт и работал на системе System/360 с памятью 8 КБ (кроме модели 20). Он не поддерживает макрокоманды или расширенную мнемонику (например, BH вместо BC 2 для перехода, если код состояния 2 указывает на высокое значение сравнения). Он может собирать только один раздел управления и не допускает фиктивных разделов (определений структуры). Выражения в скобках не допускаются, а число выражений ограничено тремя терминами, причем единственными операторами являются «+», «-» и «*».

Ассемблер базовой операционной системы

Базовая операционная система имеет две версии ассемблера. Оба требуют 16 КБ памяти: один резидентный на ленте, другой на диске.

Соберите D

Ассемблер D представлял собой ассемблер DOS/360 для машин с объемом памяти 16 КБ. Он выпускался в двух версиях: вариант 10 КБ для машин с памятью минимум 16 КБ и вариант 14 КБ для машин с 24 КБ. Ассемблер F-уровня также был доступен для компьютеров DOS с объемом памяти 64 КБ и более. Сборщики D предлагали почти все функции более высоких версий.

Ассемблер E и F

Ассемблер E был разработан для работы в системе OS/360 с объемом оперативной памяти минимум 32 КБ, при этом самому ассемблеру требовалось 15 КБ. Ассемблер F может работать как под DOS/360, так и под OS/360 в системе с памятью 64 КБ, при этом ассемблеру требуется 44 КБ. Эти ассемблеры являются стандартной частью OS/360; сгенерированная версия была указана при создании системы (SYSGEN).

Ассемблер Х

Ассемблер H работает на OS/360 и последующих версиях ; он был быстрее и мощнее, чем Ассемблер F, но язык макросов не был полностью совместим.

Assembler H версии 2 был анонсирован в 1981 году и включает поддержку расширенной архитектуры (XA), включая AMODE и RMODE директивы. Он был снят с продажи в 1994 году, а поддержка закончилась в 1995 году. Его заменил High Level Assembler.

Ассемблер XF

Assembler XF — это в основном совместимое обновление Assembler F, которое включает новые инструкции по архитектуре System/370. Эта версия предоставляет общий ассемблер для систем OS/VS, DOS/VS и VM. Другие изменения включают ослабление ограничений на выражения и обработку макросов. Для Ассемблера XF требуется минимальный размер раздела/региона 64 КБ (виртуальный). Рекомендуемый размер — 128 КБ.

Ассемблер высокого уровня

High Level Assembler или HLASM был выпущен в июне 1992 года, заменив IBM Assembler H версии 2. Он был транслятором по умолчанию для System/370 и System/390 и поддерживал операционные системы MVS, VSE и VM. По состоянию на 2023 год это язык программирования IBM текущий ассемблерный для z/OS , z/VSE , z/VM и z/TPF операционных систем на z/ мейнфреймах Architecture . Выпуск 6 и более поздние версии также работают в Linux и генерируют объектные файлы ELF или GOFF (эта среда иногда называется Linux в IBM Z ). Работая в IBM, Джон Роберт Эрман создал и был ведущим разработчиком HLASM. и считается «отцом ассемблера высокого уровня».

Несмотря на название, HLASM сам по себе не обладает многими функциями, обычно присущими ассемблеру высокого уровня . Название может происходить от дополнительных возможностей макроязыка, таких как возможность писать пользовательские функции. Ассемблер во многом похож на Ассемблер H и Ассемблер (XF), включающий модификации SLAC (Стэнфордский линейный ускоритель). Среди добавленных функций было указание на CSECT/ DSECT для счетчика местоположения, зависимый и помечены USING заявления, список USING операторы, активные в данный момент, индикация того, читается или записывается переменная в перекрестной ссылке, а также разрешение имен символов в смешанном регистре. RSECT Директива (раздел управления только для чтения) позволяет ассемблеру проверять повторный вход для каждой секции. RSECT ранее был «недокументирован и непоследовательно реализован в Ассемблере H».

Набор инструментов ассемблера высокого уровня

Набор инструментов High Level Assembler Toolkit — это дополнение к High Level Assembler, которое приобретается отдельно. В набор инструментов входят:

• Набор структурированного программирования макросов —
  • ЕСЛИ/ELSE/ENDIF
  • ДЕЛАТЬ/КОНЕЦДО
  • СТРТСРЧ/ОРЕЛЬСЕ/ENDLOOP/ENDSRCH
  • CASENTRY/CASE/ENDCASE
  • ВЫБРАТЬ/КОГДА/ИНАЛЬНО/ENDSEL.
• Дизассемблер ​ .
• «Инструмент понимания программы» ( помощь в реинжиниринге ).
• Утилита Source XREF (возможность перекрестных ссылок).
• Интерактивное средство отладки.
• Улучшенный SuperC (инструмент сравнения исходных кодов).

Специализированные версии

Сборщик пакетов поддержки 7090/7094

Пакет поддержки IBM 7090/7094, известный как SUPPAK, «состоит из трех программ, предназначенных для того, чтобы программы, написанные для System 360, можно было собирать, тестировать и выполнять на IBM 709, 7090, 7094 или 7094 II».

Этот кросс-ассемблер работает в системе 7090 или 7094 и использовался, когда System/360 находился в разработке. Этот ассемблер поддерживает шестибитный набор символов BCD , а также восьмибитный EBCDIC .

Сборщики IBM System / 360 Model 20

IBM предоставила два ассемблера для модели 20: базовый ассемблер модели 20 и ассемблер модели 20 DPS/TPS. Оба поддерживают только инструкции, доступные на модели 20, включая уникальные инструкции. CIO, TIO, XIOB, SPSW, BAS, BASR, и HPR. Базовый ассемблер — это несколько более ограниченная версия базового ассемблера System/360; в частности, длина символов ограничена четырьмя символами. Эта версия способна работать в системе с памятью 4 КБ, а поддержка макросов ограничена макросами IOCS . Версии карт представляют собой двухпроходные ассемблеры, которые поддерживают только ввод/вывод карт. Резидентные версии ленты являются однопроходными и используют магнитную ленту для промежуточного хранения. Программы, собранные с помощью ассемблера CPS, могут адресовать максимум 16 КБ.

Ассемблер DPS/TPS — это несколько ограниченная версия ассемблера System/360 BPS/BOS.

Ассемблер IBM System/360 Model 44 PS

Ассемблер IBM System/360 Model 44 обрабатывает язык, который является «выбранным подмножеством» языка ассемблера OS/360 и DOS/360.

Самое главное, что в ассемблере Model 44 отсутствует поддержка макросов и операторов продолжения. С другой стороны, он имеет ряд функций, отсутствующих в других ассемблерах System/360, в частности инструкции по обновлению исходного набора данных образа карты , называемого общим, и неявное определение SETA собрать переменные.

Он не поддерживает инструкции «хранилище-хранилище» (SS) или преобразование в двоичный формат ( CVB), преобразовать в десятичный формат ( CVD), читать прямо ( RDD) и пишите в директ ( WRD) инструкции. Он включает в себя четыре инструкции, уникальные для модели 44: Изменение маски приоритета ( CHPM), Загрузить специальный PSW ( LPSX), Читать прямое слово ( RDDW) и Написать прямое слово ( WRDW).

Он также включает в себя директивы для обновления исходной программы — функцию, выполняемую служебными программами в других системах ( SKPTO, REWND, NUM, OMIT и ENDUP).

Ассемблер IBM System/360 TSS

Ассемблер системы разделения времени System/360 Model 67 имеет ряд отличий в директивах для поддержки уникальных функций TSS. PSECT Директива генерирует раздел управления прототипом, содержащий перемещаемые адресные константы и изменяемые данные, используемые программой.

Ассемблер Г

«Ассемблер G» — это набор модификаций, внесенных в Ассемблер F в 1970-х годах Университетом Ватерлоо (исходный код Ассемблера F был/есть открытый). Улучшения в основном заключаются в улучшенной обработке ввода/вывода и улучшенной буферизации, что значительно ускоряет сборки. «Ассемблер G» никогда не был продуктом IBM.

Сборщики сторонних производителей

Для особых сред существовало несколько IBM-совместимых ассемблеров.

• Серии Univac 90/60, 90/70 и 90/80 от Unisys были разработаны для работы с ассемблером формата IBM, поскольку эта серия машин была похожа на S/360 и S/370.
• Серия Fujitsu BS2000 также была создана как аналог 370 из того же источника, что и Univac, и до сих пор используется в некоторых частях Европы.
• Dignus LLC Systems/ASM — это HLASM-совместимый ассемблер, который может работать как в системах IBM, так и в качестве кросс-ассемблера.
• Бесплатная программа PC/370 , написанная Доном Хиггинсом, позже была куплена Micro Focus .
• z390 — ассемблер и эмулятор System 390, также написанный Доном Хиггинсом и запрограммированный на Java . Он имеет открытый исходный код и доступен на http://www.z390.org/.
• Университет штата Пенсильвания разработал пакет под названием ASSIST , который включает в себя ассемблер и интерпретатор System 370.
• Tachyon Software LLC продает рабочую среду Tachyon Assembler Workbench , которая работает на Windows, Linux/x86, Linux для S/390 и zSeries, AIX и Solaris.
• GNU Assembler (gas) является частью коллекции компиляторов GNU (gcc) для Linux на OS/390 и IBM Z. Этот ассемблер имеет уникальный синтаксис, несовместимый с другими ассемблерами для архитектур IBM.

Важность

Первоначально все операционные системы System/360 были написаны на языке ассемблера, и все системные интерфейсы определялись макроопределениями. Доступ из языков высокого уровня (HLL) был ограничен тем, что предоставлял этот язык, а другие системные вызовы приходилось кодировать как подпрограммы ассемблера, вызываемые из программ HLL. Кроме того, IBM разрешила настройку функций ОС путем установки с помощью так называемых выходов — предоставляемых пользователем процедур, которые могли расширять или изменять обычные функции ОС. Эти выходы должны были быть закодированы на языке ассемблера. Позже IBM перекодировала OS/360 на язык системного программирования PL/S , но, за исключением короткого испытания, решила не выпускать компилятор PL/S для пользователей. В результате этих факторов язык ассемблера на протяжении многих лет широко использовался в системах IBM.

См. также

• IBM Система/360
• Ассистент ассемблера
• IBM-совместимые мэйнфреймы на базе ПК — список совместимых машин или виртуальных машин
• Дизассемблер - обратный процесс сборки, восстанавливающий ассемблерный исходный код из машинного кода.

Внешние ссылки

• Руководство по ассемблеру IBM высокого уровня
• Введение программиста в язык ассемблера IBM System/360 (текст для студентов)
• Справочник по ассемблеру высокого уровня для z/OS, z/VM и z/VSE
• Щепетильный программист: сборщик мейнфреймов IBM
• Базовое программирование на языке ассемблера для мэйнфреймов IBM
• Введение в программирование на ассемблере OS / 390 (в архиве)
• Компилятор IBM Assembler F с поддержкой Интернета для небольших экспериментов
• ASSIST — система ассемблера для обучения студентов и системного обучения