Мендель Купер - Искусство программирования на языке сценариев командной оболочки

• Название: Искусство программирования на языке сценариев командной оболочки
• Автор: Мендель Купер
• Жанр: Программирование

Данное руководство не предполагает наличие у читателя познаний в области программирования на языке сценариев, однако, быстро восполняет этот недостаток, постепенно, шаг за шагом раскрывая мудрость и красоту UNIX. Это руководство может рассматриваться как учебник, предназначенный для самостоятельного изучения или как справочник по программированию на shell. Руководство снабжено серией хорошо прокомментированных примеров, поскольку лучший путь к изучению языка сценариев -- это написание сценариев.

---

# т.е., "subst Smith Jones letter.txt".

ARGS=3

E_BADARGS=65 # Неверное число аргументов.

if [ $# -ne "$ARGS" ]

# Проверка числа аргументов.

then

echo "Проядок использования: `basename $0` old-pattern new-pattern filename"

exit $E_BADARGS

fi

old_pattern=$1

new_pattern=$2

if [ -f "$3" ]

then

file_name=$3

else

echo "Файл \"$3\" не найден."

exit $E_BADARGS

fi

# Здесь, собственно, выполняется сама работа по поиску и замене.

sed -e "s/$old_pattern/$new_pattern/g" $file_name

# 's' -- команда "substitute" (замены),

# а /pattern/ -- задает шаблон искомого текста.

# "g" -- флаг "global" (всеобщий), означает "выполнить подстановку для *каждого*

# обнаруженного $old_pattern во всех строках, а не только в первой строке.

exit 0 # При успешном завершении сценария -- вернуть 0.

Пример 33-3. Сценарий-обертка вокруг сценария awk

#!/bin/bash

# Суммирует числа в заданном столбце из заданного файла.

ARGS=2

E_WRONGARGS=65

if [ $# -ne "$ARGS" ] # Проверка числа аргументов.

then

echo "Порядок использования: `basename $0` имя_файла номер_столбца"

exit $E_WRONGARGS

fi

filename=$1

column_number=$2

# Здесь используется прием передачи переменных

# из командной оболочки в сценарий awk .

# Многострочный сценарий awk должен записываться в виде: awk ' ..... '

# Начало awk-сценария.

# -----------------------------

awk '

{ total += $'"${column_number}"'

}

END {

print total

}

' "$filename"

# -----------------------------

# Конец awk-сценария.

# С точки зрения безопасности, передача shell-переменных

# во встроенный awk-скрипт, потенциально опасна,

# поэтому, Stephane Chazelas предлагает следующую альтернативу:

# ---------------------------------------

# awk -v column_number="$column_number" '

# { total += $column_number

# }

# END {

# print total

# }' "$filename"

# ---------------------------------------

exit 0

Для сценариев, которые должны строиться по принципу швейцарского армейского ножа -- "все в одном", можно порекомендовать Perl. Perl совмещает в себе мощь и гибкость sed, awk и языка программирования C. Он поддерживает модульность и объектно-ориентированный стиль программирования. Короткие сценарии Perl могут легко встраиваться в сценарии командной оболочки, и даже полностью заменить из (хотя автор весьма скептически относится к последнему утверждению).

Пример 33-4. Сценарий на языке Perl, встроенный в Bash-скрипт

#!/bin/bash

# Это команды shell, предшествующий сценарию на Perl.

echo "Эта строка выводится средствами Bash, перед выполнением встроенного Perl-скрипта, в \"$0\"."

echo "=============================================================================================="

perl -e 'print "Эта строка выводится средствами Perl.\n";'

# Подобно sed, Perl тоже использует ключ "-e".

echo "====================================="

exit 0

Допускается даже комбинирование сценариев на Bash и на Perl, в пределах одного файла. В зависимости от того, какая часть сценария должна исполняться, сценарий вызывается с указанием требуемого интерпретатора.

Пример 33-5. Комбинирование сценария Bash и Perl в одном файле

#!/bin/bash

# bashandperl.sh

echo "Вас приветствует часть сценария, написанная на Bash."

# Далее могут следовать другие команды Bash.

exit 0

# Конец сценария на Bash.

# =======================================================

#!/usr/bin/perl

# Эта часть сценария должна вызываться с ключом -x.

print "Вас приветствует часть сценария, написанная на Perl.\n";

# Далее могут следовать другие команды Perl.

# Конец сценария на Perl.

bash$ bash bashandperl.sh

Вас приветствует часть сценария, написанная на Bash.

bash$ perl -x bashandperl.sh

Вас приветствует часть сценария, написанная на Perl.

33.3. Операции сравнения: Альтернативные решения

Операции сравнения, выполняемые с помощью конструкции [[ ]], могут оказаться предпочтительнее, чем [ ]. Аналогично, при сравнении чисел, в более выгодном свете представляется конструкция (( )).

a=8

# Все, приведенные ниже, операции сравнения -- эквивалентны.

test "$a" -lt 16 && echo "да, $a < 16" # "И-список"

/bin/test "$a" -lt 16 && echo "да, $a < 16"

[ "$a" -lt 16 ] && echo "да, $a < 16"

[[ $a -lt 16 ]] && echo "да, $a < 16" # Внутри [[ ]] и (( )) переменные

(( a < 16 )) && echo "да, $a < 16" # не обязательно брать в кавычки.

city="New York"

# Опять же, все, приведенные ниже, операции -- эквивалентны.

test "$city" \< Paris && echo "Да, Paris больше, чем $city" # В смысле ASCII-строк.

/bin/test "$city" \< Paris && echo "Да, Paris больше, чем $city"

[ "$city" \< Paris ] && echo "Да, Paris больше, чем $city"

[[ $city < Paris ]] && echo "Да, Paris больше, чем $city" # Кавычки вокруг $city не обязательны.

# Спасибо S.C.

33.4. Рекурсия

Может ли сценарий рекурсивно вызывать себя самого? Да, может!

Пример 33-6. Сценарий (бесполезный), который вызывает себя сам

#!/bin/bash

# recurse.sh

# Может ли сценарий вызвать себя сам?

# Да, но есть ли в этом смысл?

RANGE=10

MAXVAL=9

i=$RANDOM

let "i %= $RANGE" # Генерация псевдослучайного числа в диапазоне 0 .. $MAXVAL.

if [ "$i" -lt "$MAXVAL" ]

then

echo "i = $i"

./$0 # Сценарий запускает новый экземпляр себя самого.

fi # если число $i больше или равно $MAXVAL.

# Если конструкцию "if/then" заменить на цикл "while", то это вызовет определенные проблемы.

# Объясните -- почему?.

exit 0

Пример 33-7. Сценарий имеющий практическую ценность), который вызывает себя сам

#!/bin/bash

# pb.sh: телефонная книга

# Автор: Rick Boivie

# используется с его разрешения.

# Дополнен автором документа.

MINARGS=1 # Сценарию должен быть передан, по меньшей мере, один аргумент.

DATAFILE=./phonebook

PROGNAME=$0

E_NOARGS=70 # Ошибка, нет аргументов.

if [ $# -lt $MINARGS ]; then

echo "Порядок использования: "$PROGNAME" data"

exit $E_NOARGS

fi

if [ $# -eq $MINARGS ]; then

grep $1 "$DATAFILE"

else

( shift; "$PROGNAME" $* ) | grep $1

# Рекурсивный вызов.

fi

exit 0 # Сценарий завершает свою работу здесь.

# Далее следует пример файла телефонной книги

#+ в котором не используются символы комментария.

# ------------------------------------------------------------------------

# Пример файла телефонной книги

John Doe 1555 Main St., Baltimore, MD 21228 [phone]

Mary Moe 9899 Jones Blvd., Warren, NH 03787 [phone]

Richard Roe 856 E. 7th St., New York, NY 10009 [phone]

Sam Roe 956 E. 8th St., New York, NY 10009 [phone]

Zoe Zenobia 4481 N. Baker St., San Franciso, SF 94338 [phone]

# ------------------------------------------------------------------------

$bash pb.sh Roe

Richard Roe 856 E. 7th St., New York, NY 10009 [phone]

Sam Roe 956 E. 8th St., New York, NY 10009 [phone]

$bash pb.sh Roe Sam

Sam Roe 956 E. 8th St., New York, NY 10009 [phone]

# Если сценарию передаются несколько аргументов,

#+ то выводятся только те строки, которые содержат их все.

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

33.5. "Цветные" сценарии

Для установки атрибутов отображения информации на экране, таких как: жирный текст, цвет символов, цвет фона и т.п., с давних пор используются ANSI[ 62 ] escape-последовательности. Эти последовательности широко используются в пакетных файлах DOS, эти же последовательности используются и в сценариях Bash.

Пример 33-8. "Цветная" адресная книга

#!/bin/bash

# ex30a.sh: Версия сценария ex30.sh, с добавлением цвета .

# Грубый пример базы данных

clear # Очистка экрана

echo -n " "

echo -e '\E[37;44m'"\033[1mСписок\033[0m"

# Белый текст на синем фоне

echo; echo

echo -e "\033[1mВыберите интересующую Вас персону:\033[0m"

# Жирный шрифт

tput sgr0

echo "(Введите только первую букву имени.)"

echo

echo -en '\E[47;34m'"\033[1mE\033[0m" # Синий

tput sgr0 # сброс цвета

echo "vans, Roland" # "[E]vans, Roland"

echo -en '\E[47;35m'"\033[1mJ\033[0m" # Пурпурный

tput sgr0

echo "ones, Mildred"

echo -en '\E[47;32m'"\033[1mS\033[0m" # Зеленый

tput sgr0

echo "mith, Julie"

echo -en '\E[47;31m'"\033[1mZ\033[0m" # Красный

tput sgr0

echo "ane, Morris"

echo

read person

case "$person" in

# Обратите внимание: переменная взята в кавычки.

"E" | "e" )

# Пользователь может ввести как заглавную, так и строчную букву.

echo

echo "Roland Evans"

echo "4321 Floppy Dr."

echo "Hardscrabble, CO 80753"

echo "[phone]"

echo "[phone] fax"

echo "[email protected]"

echo "Старый друг и партнер по бизнесу"

;;

"J" | "j" )

echo

echo "Mildred Jones"

echo "249 E. 7th St., Apt. 19"

echo "New York, NY 10009"

echo "[phone]"

echo "[phone] fax"

echo "[email protected]"

echo "Подружка"

echo "День рождения: 11 февраля"

;;

# Информация о Smith и Zane будет добавлена позднее.

* )