Процедури управління процесами

Використовуючи спеціальні засоби мови Pascal, можна організувати виклик з програми будь-якої іншої програми, яку називають програмою-нащадком. Важливо пам’ятати, що для того, щоб програма-нащадок успішно завантажилася в пам'ять і почала виконуватися, необхідно забезпечити виділення їй потрібного об’єму пам'яті. Так як програма, яка виконується в даний момент, по замовчуванню захоплює всю вільну динамічну пам'ять (кучу) системи, то для завантаження програми-нащадка просто немає місця. Для того щоб виділити для програми-нащадка достатньої кількості вільної пам'яті, необхідно на початку програми вказати за допомогою директиви компілятора $M мінімальний розмір виділеної програмі пам'яті, а якщо в програмі не використовується динамічна пам'ять, то зовсім не виділяти її.

Виклик програми-нащадка відбувається за допомогою процедури

Exec (Path, CmLine: STRING);

Параметр Path – це повний чи скорочений шлях до командного файлу і його ім'я, а CmLine – параметр, в якому можна передати викликаній програмі командний рядок. Якщо виклик програми не відбувся, то це ніяк не відіб’ється на роботі викликаної програми, тобто вона буде вести себе однаково як при успішному, так і при неуспішному виклику. Для того щоб визначити, як пройшов виклик, використовується системна змінна DosError, яка описана в модулі Dos. Зразу після виклику процедури Exec необхідно перевірити значення змінної DosError. Якщо вона рівна 0, то це означає, що виклик пройшов успішно. Не нулеві значення свідчать про помилку. Значення цієї змінної відповідає кодам, виробленими операційною системою, і можуть бути наступними

код помилки	Значення
0	нормальне завершення
2	файл не знайдений
3	шлях не знайдений
4	надто багато відкритих файлів
5	доступ закритий
6	порушена інформація в полях файлу чи в системних областях
8	недостатньо пам'яті
10	несумісні параметри оточення
11	нерозпізнаний формат диску
18	немає більше файлів

Коли викликається програма нащадок, бажано, щоб ця програма виконувалася в оточенні DOS, що відповідає тому оточенні, яке забезпечує операційна система. Однак програма, написана на Турбо Паскалі, звичайно не виконує ці умови. При запуску вона завжди перевизначає деякі переривання для особистих цілей. Тому перед викликом програми нащадка потрібно відновити початкову адресу обробника переривань, а після завершення роботи викликаної програми встановити адресу об робітника Турбо Паскаля. Ці дії виконує процедура Swap Vectors, яка не має параметрів.

Використовуючи механізм виклику незалежних програм, можна створити складні програмні комплекси, в яких програма-диспечер, займає чи не великий об’єм пам'яті, проводить виклик необхідних (в тому числі і системних) програм. В такому випадку може виникнути необхідність передачі інформації з програми-нащадка у викликаючи програму чи навпаки. Нажаль, можливості MS-DOS по здійсненню таких обмінів невеликі. Якщо програма що викликається, написана на мові Турбо Паскаль, то доступ до командного рядка здійснюється за допомогою функцій ParamStr і ParamCount.

Стандартним способом передачі інформації в програму, що викликається, являється процедура HALT, яка має один параметр і через нього передає код завершення, який, в свою чергу, може бути використаним в програмі, що викликається, за допомогою функції

DosExitCode: WORD;

Ця функція повертає значення типу WORD, в молодшому байті якого міститься код повернення, переданий через процедуру завершення, а в старшому – ознака того, як завершилася програма.