List of reports associated
Test name: Version: 5.4.1
Goto: PHPInfo Build environment
PHPInfo
phpinfo()
PHP Version => 5.4.1
System => Linux tw0001 3.2.6 #1 SMP Tue Apr 24 12:56:11 MDT 2012 i686
Build Date => Apr 28 2012 19:10:05
Configure Command => './configure' '--prefix=/usr' '--with-config-file-path=/usr' '--with-config-file-scan-dir=/etc' '--with-openssl' '--with-zlib' '--with-gdbm'
Server API => Command Line Interface
Virtual Directory Support => disabled
Configuration File (php.ini) Path => /usr
Loaded Configuration File => (none)
Scan this dir for additional .ini files => /etc
Additional .ini files parsed => (none)
PHP API => 20100412
PHP Extension => 20100525
Zend Extension => 220100525
Zend Extension Build => API220100525,NTS
PHP Extension Build => API20100525,NTS
Debug Build => no
Thread Safety => disabled
Zend Signal Handling => disabled
Zend Memory Manager => enabled
Zend Multibyte Support => disabled
IPv6 Support => enabled
DTrace Support => disabled
Registered PHP Streams => https, ftps, compress.zlib, php, file, glob, data, http, ftp, phar
Registered Stream Socket Transports => tcp, udp, unix, udg, ssl, sslv3, sslv2, tls
Registered Stream Filters => zlib.*, convert.iconv.*, string.rot13, string.toupper, string.tolower, string.strip_tags, convert.*, consumed, dechunk
This program makes use of the Zend Scripting Language Engine:
Zend Engine v2.4.0, Copyright (c) 1998-2012 Zend Technologies
_______________________________________________________________________
Configuration
Core
PHP Version => 5.4.1
Directive => Local Value => Master Value
allow_url_fopen => On => On
allow_url_include => Off => Off
always_populate_raw_post_data => Off => Off
arg_separator.input => & => &
arg_separator.output => & => &
asp_tags => Off => Off
auto_append_file => no value => no value
auto_globals_jit => On => On
auto_prepend_file => no value => no value
browscap => no value => no value
default_charset => no value => no value
default_mimetype => text/html => text/html
disable_classes => no value => no value
disable_functions => no value => no value
display_errors => STDERR => STDERR
display_startup_errors => Off => Off
doc_root => no value => no value
docref_ext => no value => no value
docref_root => no value => no value
enable_dl => On => On
enable_post_data_reading => On => On
error_append_string => no value => no value
error_log => no value => no value
error_prepend_string => no value => no value
error_reporting => no value => no value
exit_on_timeout => Off => Off
expose_php => On => On
extension_dir => /usr/lib/php/extensions/no-debug-non-zts-20100525 => /usr/lib/php/extensions/no-debug-non-zts-20100525
file_uploads => On => On
highlight.comment => <font style="color: #FF8000">#FF8000</font> => <font style="color: #FF8000">#FF8000</font>
highlight.default => <font style="color: #0000BB">#0000BB</font> => <font style="color: #0000BB">#0000BB</font>
highlight.html => <font style="color: #000000">#000000</font> => <font style="color: #000000">#000000</font>
highlight.keyword => <font style="color: #007700">#007700</font> => <font style="color: #007700">#007700</font>
highlight.string => <font style="color: #DD0000">#DD0000</font> => <font style="color: #DD0000">#DD0000</font>
html_errors => Off => Off
ignore_repeated_errors => Off => Off
ignore_repeated_source => Off => Off
ignore_user_abort => Off => Off
implicit_flush => On => On
include_path => .:/usr/lib/php => .:/usr/lib/php
log_errors => Off => Off
log_errors_max_len => 1024 => 1024
mail.add_x_header => Off => Off
mail.force_extra_parameters => no value => no value
mail.log => no value => no value
max_execution_time => 0 => 0
max_file_uploads => 20 => 20
max_input_nesting_level => 64 => 64
max_input_time => -1 => -1
max_input_vars => 1000 => 1000
memory_limit => 128M => 128M
open_basedir => no value => no value
output_buffering => 0 => 0
output_handler => no value => no value
post_max_size => 8M => 8M
precision => 14 => 14
realpath_cache_size => 16K => 16K
realpath_cache_ttl => 120 => 120
register_argc_argv => On => On
report_memleaks => On => On
report_zend_debug => Off => Off
request_order => no value => no value
sendmail_from => no value => no value
sendmail_path => /usr/sbin/sendmail -t -i => /usr/sbin/sendmail -t -i
serialize_precision => 17 => 17
short_open_tag => On => On
SMTP => localhost => localhost
smtp_port => 25 => 25
sql.safe_mode => Off => Off
track_errors => Off => Off
unserialize_callback_func => no value => no value
upload_max_filesize => 2M => 2M
upload_tmp_dir => no value => no value
user_dir => no value => no value
user_ini.cache_ttl => 300 => 300
user_ini.filename => .user.ini => .user.ini
variables_order => EGPCS => EGPCS
xmlrpc_error_number => 0 => 0
xmlrpc_errors => Off => Off
zend.detect_unicode => On => On
zend.enable_gc => On => On
zend.multibyte => Off => Off
zend.script_encoding => no value => no value
ctype
ctype functions => enabled
date
date/time support => enabled
"Olson" Timezone Database Version => 2012.2
Timezone Database => internal
Default timezone => UTC
Directive => Local Value => Master Value
date.default_latitude => 31.7667 => 31.7667
date.default_longitude => 35.2333 => 35.2333
date.sunrise_zenith => 90.583333 => 90.583333
date.sunset_zenith => 90.583333 => 90.583333
date.timezone => no value => no value
dba
DBA support => enabled
Supported handlers => gdbm cdb cdb_make inifile flatfile
Directive => Local Value => Master Value
dba.default_handler => flatfile => flatfile
dom
DOM/XML => enabled
DOM/XML API Version => 20031129
libxml Version => 2.7.8
HTML Support => enabled
XPath Support => enabled
XPointer Support => enabled
Schema Support => enabled
RelaxNG Support => enabled
ereg
Regex Library => Bundled library enabled
fileinfo
fileinfo support => enabled
version => 1.0.5
filter
Input Validation and Filtering => enabled
Revision => $Id: e523cdc8829892d1b4f9cb7c3c57b2ba1c36b9ea $
Directive => Local Value => Master Value
filter.default => unsafe_raw => unsafe_raw
filter.default_flags => no value => no value
hash
hash support => enabled
Hashing Engines => md2 md4 md5 sha1 sha224 sha256 sha384 sha512 ripemd128 ripemd160 ripemd256 ripemd320 whirlpool tiger128,3 tiger160,3 tiger192,3 tiger128,4 tiger160,4 tiger192,4 snefru snefru256 gost adler32 crc32 crc32b fnv132 fnv164 joaat haval128,3 haval160,3 haval192,3 haval224,3 haval256,3 haval128,4 haval160,4 haval192,4 haval224,4 haval256,4 haval128,5 haval160,5 haval192,5 haval224,5 haval256,5
iconv
iconv support => enabled
iconv implementation => glibc
iconv library version => 2.14.1
Directive => Local Value => Master Value
iconv.input_encoding => ISO-8859-1 => ISO-8859-1
iconv.internal_encoding => ISO-8859-1 => ISO-8859-1
iconv.output_encoding => ISO-8859-1 => ISO-8859-1
json
json support => enabled
json version => 1.2.1
libxml
libXML support => active
libXML Compiled Version => 2.7.8
libXML Loaded Version => 20708
libXML streams => enabled
openssl
OpenSSL support => enabled
OpenSSL Library Version => OpenSSL 1.0.1a 19 Apr 2012
OpenSSL Header Version => OpenSSL 1.0.1a 19 Apr 2012
pcre
PCRE (Perl Compatible Regular Expressions) Support => enabled
PCRE Library Version => 8.12 2011-01-15
Directive => Local Value => Master Value
pcre.backtrack_limit => 1000000 => 1000000
pcre.recursion_limit => 100000 => 100000
PDO
PDO support => enabled
PDO drivers => sqlite
pdo_sqlite
PDO Driver for SQLite 3.x => enabled
SQLite Library => 3.7.7.1
Phar
Phar: PHP Archive support => enabled
Phar EXT version => 2.0.1
Phar API version => 1.1.1
SVN revision => $Id: 2a47d3d0354109d8077e34d59f1228ccfd021d59 $
Phar-based phar archives => enabled
Tar-based phar archives => enabled
ZIP-based phar archives => enabled
gzip compression => enabled
bzip2 compression => disabled (install pecl/bz2)
Native OpenSSL support => enabled
Phar based on pear/PHP_Archive, original concept by Davey Shafik.
Phar fully realized by Gregory Beaver and Marcus Boerger.
Portions of tar implementation Copyright (c) 2003-2009 Tim Kientzle.
Directive => Local Value => Master Value
phar.cache_list => no value => no value
phar.readonly => On => On
phar.require_hash => On => On
posix
Revision => $Id: 967584c6fadb3467f31abe8e13caa8764df85867 $
Reflection
Reflection => enabled
Version => $Id: 1cf65cee164ed57874ce2d29e5c46b82f6139524 $
session
Session Support => enabled
Registered save handlers => files user
Registered serializer handlers => php php_binary
Directive => Local Value => Master Value
session.auto_start => Off => Off
session.cache_expire => 180 => 180
session.cache_limiter => nocache => nocache
session.cookie_domain => no value => no value
session.cookie_httponly => Off => Off
session.cookie_lifetime => 0 => 0
session.cookie_path => / => /
session.cookie_secure => Off => Off
session.entropy_file => /dev/urandom => /dev/urandom
session.entropy_length => 32 => 32
session.gc_divisor => 100 => 100
session.gc_maxlifetime => 1440 => 1440
session.gc_probability => 1 => 1
session.hash_bits_per_character => 4 => 4
session.hash_function => 0 => 0
session.name => PHPSESSID => PHPSESSID
session.referer_check => no value => no value
session.save_handler => files => files
session.save_path => no value => no value
session.serialize_handler => php => php
session.upload_progress.cleanup => On => On
session.upload_progress.enabled => On => On
session.upload_progress.freq => 1% => 1%
session.upload_progress.min_freq => 1 => 1
session.upload_progress.name => PHP_SESSION_UPLOAD_PROGRESS => PHP_SESSION_UPLOAD_PROGRESS
session.upload_progress.prefix => upload_progress_ => upload_progress_
session.use_cookies => On => On
session.use_only_cookies => On => On
session.use_trans_sid => 0 => 0
SimpleXML
Simplexml support => enabled
Revision => $Id: 455280fc74f9f002b7314def7a456f6c3080eb92 $
Schema support => enabled
SPL
SPL support => enabled
Interfaces => Countable, OuterIterator, RecursiveIterator, SeekableIterator, SplObserver, SplSubject
Classes => AppendIterator, ArrayIterator, ArrayObject, BadFunctionCallException, BadMethodCallException, CachingIterator, CallbackFilterIterator, DirectoryIterator, DomainException, EmptyIterator, FilesystemIterator, FilterIterator, GlobIterator, InfiniteIterator, InvalidArgumentException, IteratorIterator, LengthException, LimitIterator, LogicException, MultipleIterator, NoRewindIterator, OutOfBoundsException, OutOfRangeException, OverflowException, ParentIterator, RangeException, RecursiveArrayIterator, RecursiveCachingIterator, RecursiveCallbackFilterIterator, RecursiveDirectoryIterator, RecursiveFilterIterator, RecursiveIteratorIterator, RecursiveRegexIterator, RecursiveTreeIterator, RegexIterator, RuntimeException, SplDoublyLinkedList, SplFileInfo, SplFileObject, SplFixedArray, SplHeap, SplMinHeap, SplMaxHeap, SplObjectStorage, SplPriorityQueue, SplQueue, SplStack, SplTempFileObject, UnderflowException, UnexpectedValueException
sqlite3
SQLite3 support => enabled
SQLite3 module version => 0.7
SQLite Library => 3.7.7.1
Directive => Local Value => Master Value
sqlite3.extension_dir => no value => no value
standard
Dynamic Library Support => enabled
Path to sendmail => /usr/sbin/sendmail -t -i
Directive => Local Value => Master Value
assert.active => 1 => 1
assert.bail => 0 => 0
assert.callback => no value => no value
assert.quiet_eval => 0 => 0
assert.warning => 1 => 1
auto_detect_line_endings => 0 => 0
default_socket_timeout => 60 => 60
from => no value => no value
url_rewriter.tags => a=href,area=href,frame=src,form=,fieldset= => a=href,area=href,frame=src,form=,fieldset=
user_agent => no value => no value
tokenizer
Tokenizer Support => enabled
xml
XML Support => active
XML Namespace Support => active
libxml2 Version => 2.7.8
xmlreader
XMLReader => enabled
xmlwriter
XMLWriter => enabled
zlib
ZLib Support => enabled
Stream Wrapper => compress.zlib://
Stream Filter => zlib.inflate, zlib.deflate
Compiled Version => 1.2.6
Linked Version => 1.2.6
Directive => Local Value => Master Value
zlib.output_compression => Off => Off
zlib.output_compression_level => -1 => -1
zlib.output_handler => no value => no value
Additional Modules
Module Name
Environment
Variable => Value
grep => /bin/grep
kill => /bin/kill
printf => /usr/bin/printf
HZ => 100
out_chroot_install_dir => /usr/src
basename => /usr/bin/basename
sources_dir => /home/yp58t/Sources
XORG_CONFIG => --prefix=/usr --sysconfdir=/etc --mandir=/usr/share/man --localstatedir=/var
TEST_PHP_SRCDIR => /usr/src/php-5.4.1
no_patch_dialog => 1
SHELL => /bin/bash
chroot_flag => 1
batch_sec => 21
tail => /usr/bin/tail
TERM => screen.linux
MAKEFLAGS =>
chown => /bin/chown
HISTSIZE => 1000
SSH_CLIENT => deleted
please_wait_pid => 31351
install_dir => /usr/src
patch => /usr/bin/patch
HUSHLOGIN => FALSE
no_script_dialog => 1
fail_on_shasum => 1
SSH_TTY => deleted
etc_dir => /etc/takenset
return_val => 0
prog_src_dir => /home/yp58t/Sources/prog
release_dir => /usr/src
total_sec => 522
reqd_dir =>
prog_dir => /etc/takenset/blfs/data/php-5.4.1
got_level => 0
USER => yp58t
batch_file => /tmp/lfs_script.eKp3FNW7
xz => /usr/bin/xz
LS_COLORS => rs=0:di=01;34:ln=01;36:mh=00:pi=40;33:so=01;35:do=01;35:bd=40;33;01:cd=40;33;01:or=40;31;01:su=37;41:sg=30;43:ca=30;41:tw=30;42:ow=34;42:st=37;44:ex=01;32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.lzma=01;31:*.tlz=01;31:*.txz=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.dz=01;31:*.gz=01;31:*.lz=01;31:*.xz=01;31:*.bz2=01;31:*.bz=01;31:*.tbz=01;31:*.tbz2=01;31:*.tz=01;31:*.deb=01;31:*.rpm=01;31:*.jar=01;31:*.war=01;31:*.ear=01;31:*.sar=01;31:*.rar=01;31:*.ace=01;31:*.zoo=01;31:*.cpio=01;31:*.7z=01;31:*.rz=01;31:*.jpg=01;35:*.jpeg=01;35:*.gif=01;35:*.bmp=01;35:*.pbm=01;35:*.pgm=01;35:*.ppm=01;35:*.tga=01;35:*.xbm=01;35:*.xpm=01;35:*.tif=01;35:*.tiff=01;35:*.png=01;35:*.svg=01;35:*.svgz=01;35:*.mng=01;35:*.pcx=01;35:*.mov=01;35:*.mpg=01;35:*.mpeg=01;35:*.m2v=01;35:*.mkv=01;35:*.webm=01;35:*.ogm=01;35:*.mp4=01;35:*.m4v=01;35:*.mp4v=01;35:*.vob=01;35:*.qt=01;35:*.nuv=01;35:*.wmv=01;35:*.asf=01;35:*.rm=01;35:*.rmvb=01;35:*.flc=01;35:*.avi=01;35:*.fli=01;35:*.flv=01;35:*.gl=01;35:*.dl=01;35:*.xcf=01;35:*.xwd=01;35:*.yuv=01;35:*.cgm=01;35:*.emf=01;35:*.axv=01;35:*.anx=01;35:*.ogv=01;35:*.ogx=01;35:*.aac=00;36:*.au=00;36:*.flac=00;36:*.mid=00;36:*.midi=00;36:*.mka=00;36:*.mp3=00;36:*.mpc=00;36:*.ogg=00;36:*.ra=00;36:*.wav=00;36:*.axa=00;36:*.oga=00;36:*.spx=00;36:*.xspf=00;36:
shasum => /usr/bin/shasum
global_time_file => /tmp/lfs_script.gRls6AQe
batch_hour => 0
SSH_AUTH_SOCK => deleted
head => /bin/head
TERMCAP => SC|screen.linux|VT 100/ANSI X3.64 virtual terminal:\
:DO=\E[%dB:LE=\E[%dD:RI=\E[%dC:UP=\E[%dA:bs:bt=\E[Z:\
:cd=\E[J:ce=\E[K:cl=\E[H\E[J:cm=\E[%i%d;%dH:ct=\E[3g:\
:do=^J:nd=\E[C:pt:rc=\E8:rs=\Ec:sc=\E7:st=\EH:up=\EM:\
:le=^H:bl=^G:cr=^M:it#8:ho=\E[H:nw=\EE:ta=^I:is=\E)0:\
:li#64:co#160:am:xn:xv:LP:sr=\EM:al=\E[L:AL=\E[%dL:\
:cs=\E[%i%d;%dr:dl=\E[M:DL=\E[%dM:dc=\E[P:DC=\E[%dP:\
:im=\E[4h:ei=\E[4l:mi:IC=\E[%d@:ks=\E[?1h\E=:\
:ke=\E[?1l\E>:vi=\E[?25l:ve=\E[34h\E[?25h:vs=\E[34l:\
:ti=\E[?1049h:te=\E[?1049l:us=\E[4m:ue=\E[24m:so=\E[3m:\
:se=\E[23m:mb=\E[5m:md=\E[1m:mh=\E[2m:mr=\E[7m:\
:me=\E[m:ms:\
:Co#8:pa#64:AF=\E[3%dm:AB=\E[4%dm:op=\E[39;49m:AX:\
:vb=\Eg:as=\E(0:ae=\E(B:\
:ac=\140\140aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~..--++,,hhII00:\
:k0=\E[10~:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:k5=\E[15~:\
:k6=\E[17~:k7=\E[18~:k8=\E[19~:k9=\E[20~:k;=\E[21~:\
:F1=\E[23~:F2=\E[24~:F3=\E[25~:F4=\E[26~:F5=\E[28~:\
:F6=\E[29~:F7=\E[31~:F8=\E[32~:F9=\E[33~:FA=\E[34~:kb=:\
:K2=\E[G:kB=\E[Z:kh=\E[1~:@1=\E[1~:kH=\E[4~:@7=\E[4~:\
:kN=\E[6~:kP=\E[5~:kI=\E[2~:kD=\E[3~:ku=\EOA:kd=\EOB:\
:kr=\EOC:kl=\EOD:
run_dir => /etc/takenset/blfs/data/php-5.4.1/1
run => 1
prompt_value =>
MAKELEVEL => 1
height => 35
selection =>
MFLAGS =>
rm => /bin/rm
chmod => /bin/chmod
echo => /bin/echo
dirname => /usr/bin/dirname
batch_dir => /etc/takenset/blfs/batch
connect_pid => 16438
cat => /bin/cat
touch => /usr/bin/touch
PATH => /usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/X11R6/bin
lib_dir => /usr/lib/takenset
MAIL => /var/mail/yp58t
tarball_is_local => 0
wget => /usr/bin/wget
STY => 23215.tty1.lfs
_ => /usr/src/php-5.4.1/sapi/cli/php
mount => /bin/mount
check_signature => 1
sed => /bin/sed
main_title => Ta-Kenset - Profile: /etc/takenset/blfs+++++++++++++++++++++++++++++++++++++++++++++++++++++Releasing php-5.4.1.tar.bz2 (Started on April 28, 2012 @ 19:07:37)
sleep => /bin/sleep
PWD => /usr/src/php-5.4.1
lfs_user => yp58t
mv => /bin/mv
INPUTRC => /etc/inputrc
LIBXCB_ALLOW_SLOPPY_LOCK => 1
install_log => /etc/takenset/log/log_install
ps => /bin/ps
scripts_dir => /etc/takenset/blfs/scripts
width => 150
LANG => en_US
TEST_PHP_EXECUTABLE => /usr/src/php-5.4.1/sapi/cli/php
XORG_PREFIX => /usr
global_remove_ext_tb => 1
mktemp => /usr/bin/mktemp
sec => 21
profile => /etc/takenset/blfs
global_temp_file5 => /tmp/lfs_script.qH0DiJm4
ping => /bin/ping
in_chroot_install_dir => /usr/src
mkdir => /bin/mkdir
cp => /bin/cp
global_temp_file4 => /tmp/lfs_script.rXVIqxve
return_string =>
file_name_path => /home/yp58t/Sources/prog/php-5.4.1.tar.bz2
HISTIGNORE => &:[bf]g:exit
vi => /usr/bin/vi
global_temp_file6 => /tmp/lfs_script.GJ53mnIW
global_temp_file1 => /tmp/lfs_script.eseAAyNr
shasum_file => /etc/takenset/SHASUM
data_dir => /etc/takenset/blfs/data
HOME => /home/yp58t
SHLVL => 6
batch_flag => 1
chroot_dir => /mnt/lfs
batch_min => 4
tr => /usr/bin/tr
global_temp_file3 => /tmp/lfs_script.9YDLo2Mg
global_temp_file2 => /tmp/lfs_script.EPaFl0SK
cut => /usr/bin/cut
no_dialog => 0
dialog => /usr/bin/dialog
start_time => Started on April 28, 2012 @ 19:07:37
global_list =>
success => 1
sha_alg => 1
hour => 0
LOGNAME => yp58t
G_FILENAME_ENCODING => @locale
screen_fail => 0
min => 4
WINDOW => 2
tarball_base_name => php-5.4.1
SSH_CONNECTION => deleted
tar => /bin/tar
unzip => /usr/bin/unzip
PKG_CONFIG_PATH => :/usr/X11R6/lib/pkgconfig:/usr/X11R6/lib/pkgconfig
global_no_dialog => 0
find => /bin/find
run_all_as_root => 1
CC => cc
gunzip => /bin/gunzip
return_val_file => /tmp/lfs_script.1PFeK9xp
init_user => yp58t
su => /bin/su
patch_src_dir => /home/yp58t/Sources/patch
gen_title => Ta-Kenset - Profile: /etc/takenset/blfs
md5sum => /usr/bin/md5sum
prog_list => php-5.4.1
clear => /usr/bin/clear
times_file => /etc/takenset/blfs/prog_times
single_program_listing => () { program_selection "Select a program to install" "single" "Select" $@ || return 1
}
check_structure => () { if [ $# -ne 1 ]; then
message "Usage: check_structure <path to program directory>" "check_structure";
fi;
local parent_dir=`${dirname} ${1}`;
local bn=`${basename} ${1}`;
local directory;
local file;
for directory in ${1} ${1}/log;
do
if ! check_for_directory ${directory}; then
message "Missing directory: ${directory}" "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
if ! check_for_file ${1}/${file}; then
message "Missing file: ${file}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for j in mstr_conf df purl;
do
if [ ! -f "${parent_dir}/${j}" ]; then
message "Missing file: ${j}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
return 0
}
check_connection => () { if `${cat} /tmp/con_status* | ${grep} -q "u" -`; then
return 0;
else
message "Your internet connection is down. Aborting the installation" "Internet Connection Down";
return 1;
fi
}
save_log => () { if [ $# -ne 2 ]; then
message "Usage: save_log <prefix> <file to save>" "save_log";
return 1;
fi;
if [ -z "${run_dir}" ] || [ ! -d "${run_dir}" ]; then
message "Run directory for ${tarball_base_name} empty. Logs for ${1} will not be saved." "Log Save Error";
return;
fi;
if ! make_dir "${run_dir}/log"; then
message "There was an error creating the log directory for ${tarball_base_name}!" "Log Directory Creation Error";
return;
fi;
if ! make_file ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
${echo} "Linux From Scratch, version ${profile}, log created on `date`." > ${run_dir}/log/${1};
${echo} "Created by user `whoami` (session initiated by ${init_user})" >> ${run_dir}/log/${1};
${echo} "" >> ${run_dir}/log/${1};
if ! ${cat} ${2} >> ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
return
}
directory_writable => () { if [ $# -ne 1 ]; then
message "Usage: directory_writable <directory>" "directory_writable";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
if ${touch} ${1}/test 2> /dev/null; then
remove_file ${1}/test;
return 0;
else
message "Your permissions do not allow you to write to directory '${1}'." "Directory Not Writable";
return 1;
fi
}
remove_run_level => () { if [ $# -ne 2 ]; then
message "Usage: remove_run_level <tarball base name> <run level>" "remove_run_level";
return 1;
fi;
local count=0;
local list1="";
local list2="";
local scs=0;
local dir1="" && export dir1;
[ ! -d "${data_dir}/${1}" ] && return 0;
list1="`ls ${data_dir}/${1}`";
for i in ${list1};
do
[ "${i}" == "count" ] && continue;
if are_digits ${i}; then
count=$(( ++count ));
fi;
done;
if [ ${count} -eq 0 ]; then
message "There are no run-levels to display." "No Run-Levels";
return 0;
fi;
while :; do
if [ ${count} -eq 1 ]; then
dir1="${data_dir}/${1}";
if yesno_inquiry "Removal Of Data Directory: ${1}" "There is, at max, one run level for ${1}. Delete the entire data directory?"; then
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No data directory will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
else
dir1="${data_dir}/${1}/${2}";
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${dir1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${error_in_chroot} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No run level will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
break 1;
done;
unset dir1;
return 0
}
remove_dups => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
var1_rd="";
var2_rd="";
global_list="";
for i in $@;
do
var2_rd=0;
var1_rd="`${echo} ${i} | cut -d: -f1`";
for j in ${global_list};
do
if [ "${var1_rd}" == "`${echo} ${j} | cut -d: -f1`" ]; then
var2_rd=1;
break 1;
fi;
done;
[ ${var2_rd} -eq 0 ] && global_list="${global_list} ${i}";
done;
[ -z "${global_list}" ] && return 1;
return 0
}
create_structure => () { if [ $# -lt 1 ]; then
message "Usage: create_structure <path to tarball> [run level]" "create_structure";
fi;
run=1;
[ ! -z "${2}" ] && run=${2};
[ -z "${tarball_name}" ] && tarball_name=`${basename} ${1}`;
[ -z "${tarball_base_name}" ] && return 1;
local sub_pid1;
height=15;
width=90;
calculate_dimensions;
${echo} "Creating file structure for ${tarball_base_name}..." > ${global_temp_file1};
make_title "Create Program Structure";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
success=1;
while :; do
for dir in "${tarball_base_name}" "${tarball_base_name}/${run}" "${tarball_base_name}/${run}/log";
do
if ! check_for_directory "${data_dir}/${dir}"; then
if ! make_dir "${data_dir}/${dir}"; then
break 2;
fi;
fi;
done;
${touch} "${data_dir}/${tarball_base_name}/mstr_conf" || break 1;
move ${1} ${prog_src_dir} || break 1;
for file in "df" "tb_name" "purl" "checksum";
do
make_file "${data_dir}/${tarball_base_name}/${file}" || break 2;
[ "${file}" == "tb_name" ] && ${echo} "${tarball_name}" > ${data_dir}/${tarball_base_name}/${file};
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
make_file "${data_dir}/${tarball_base_name}/${run}/${file}" || break 2;
done;
success=0;
${echo} "Successfully created structure for ${tarball_base_name}." >> ${global_temp_file1};
break 1;
done;
if [ ${success} -eq 1 ]; then
${echo} "There was an error creating the structure for ${tarball_base_name}." >> ${global_temp_file1};
fi;
sleep 2;
while file_empty ${global_temp_file2}; do
sleep 1;
done;
sub_pid1=`${cat} ${global_temp_file2}`;
kill_proc ${sub_pid1} || return 1;
return ${success}
}
verify_tarball_url => () { if [ $# -ne 1 ]; then
message "Usage: verify_tarball_url <url1>" "verify_tarball_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\|https\)://.*\(bz2\|zip\|gz\|tgz\|zip\|xz\)$"; then
return 0;
else
message "The supplied URL is invalid." "Invalid Program URL";
return 1;
fi
}
compress_log => () { [ ! -f "${1}" ] && return;
local file="`${basename} ${1}`";
local dir="`${dirname} ${1}`";
cd ${dir};
[ -f "${file}.tar.bz2" ] && remove_file "${file}.tar.bz2" &>/dev/null;
${tar} -cjf "${file}.tar.bz2" --remove-files ${file} &>/dev/null;
return $?
}
sec_to_time => () { if [ $# -ne 1 ]; then
message "Usage: sec_to_time <seconds>" "sec_to_time";
return 1;
fi;
local var1="";
local t_sec=0;
total_sec=${1};
batch_hour=0;
batch_min=0;
batch_sec=0;
total_min=$(${echo} "scale=5; ${total_sec}/60" | bc);
batch_min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${batch_min}" ] && batch_min=0;
t1="`${echo} ${batch_min}*60 | bc`";
batch_sec="$(${echo} ${total_sec}-${t1} | bc)";
if [ ${batch_min} -ge 60 ]; then
batch_hour=`${echo} "scale=5; ${batch_min}/60" | bc`;
batch_hour=`${echo} ${batch_hour} | cut -d"." -f1`;
t1=`${echo} "${batch_hour}*60" | bc`;
batch_min=`${echo} "${batch_min}-${t1}" | bc`;
fi;
return 0
}
chg_dir => () { if cd ${1}; then
return 0;
else
message "Unable to change to directory ${1}" "Change Directory";
return 1;
fi
}
check_sig_patch => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_patch <file list>" "check_sig_patch";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
tb_name="`${echo} ${line} | ${cut} -d: -f1`";
run="`${echo} ${line} | ${cut} -d: -f2`";
file_empty ${data_dir}/${tb_name}/${run}/patch_list && continue;
if [ ${flag} -eq 0 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Patch" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
flag=$(( ++flag ));
fi;
for base_name in `${cat} ${data_dir}/${tb_name}/${run}/patch_list`;
do
`${echo} ${base_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
if ! find_file ${base_name} ${patch_src_dir}; then
${echo} "Unable to find patch, ${base_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 2;
fi;
${echo} "Checking signature for patch ${base_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${grep} -m1 ${base_name} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 3;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
${echo} "MD5: signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
break 1;
done;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
release_tarball => () { if [ $# -lt 3 ]; then
message "Usage: release_tarball <path to tarball source> <install dir> <removal flag> [append commands]" "release_tarball";
return 1;
fi;
local sub_pid1;
local command;
local scs=1;
local location="${2}/${tarball_base_name}";
export location;
return_val=0;
if [ -d "${location}" ]; then
remove_dir ${location};
if [ $? -ne 0 ]; then
if yesno_inquiry "Base-Directory Deletion" "Would you like to escalate your privileges and remove the base-directory '${tarball_base_name}'?"; then
while true; do
${clear};
${echo} -e "*** Enter root password to proceed with directory removal ***\n";
${su} -c '(
remove_dir ${location} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
message "Removal of the directory, ${tarball_base_name}, was unsuccessful. Aborting install." "Directory Removal Error";
return 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
ontinue;
else
message "Privilege escalation was necessary to delete directory ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
else
scs=0;
fi;
fi;
break 1;
done;
else
message "You elected not to delete the base-directory for ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
fi;
fi;
if `${echo} ${1} | ${grep} -q "^.*\.tar\.bz2$"`; then
command="${tar} --directory=${2} -xvjf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.gz$" -e "^.*\.tgz$"`; then
command="${tar} --directory=${2} -xvzf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.lzma$"`; then
command="${tar} --directory=${2} --lzma -xvf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q "^.*\.tar\.xz$"`; then
xz_file="`${basename} ${1}`";
tar_file="`${echo} ${xz_file} | ${sed} -e 's;\.xz;;g'`";
command="copy ${1} ${2} && cd ${2} && ${xz} -d ${xz_file} && tar -xvf ${tar_file} && remove_file ${tar_file}";
unset xz_file tar_file;
else
if `${echo} ${1} | ${grep} -q "^.*\.zip$"`; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
command="${unzip} -d ${2} ${1}";
else
command="${unzip} -d ${2}/${tarball_base_name} ${1}";
fi;
else
message "Unable determine how to uncompress package, ${1}" "Uncompress Failure";
return 1;
fi;
fi;
fi;
fi;
fi;
height=35;
width=150;
calculate_dimensions;
eval ${command} > ${global_temp_file1} 2>&1 & sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "Releasing ${tarball_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Releasing ${tarball_name} ($start_time)";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Unpacking ${tarball_base_name} into \Z1${2}\Zn... - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
kill_proc `${cat} ${global_temp_file2}`;
${sleep} 1;
if [ ${return_val} -ne 0 ]; then
message "Error uncompressing ${tarball_base_name}" "Uncompress Failure";
return 1;
fi;
return 0
}
check_remote_file_exists => () { if [ $# -ne 1 ]; then
message "check_remote_file_exists <url>" "check_remote_file_exists";
return 1;
fi;
local pid1;
check_connection || return 1;
${wget} -v --tries 2 --timeout=40 --spider ${1} &>${global_temp_file3} & pid1=$!;
wait ${pid1};
return_val=$?;
[ ${return_val} -ne 0 ] && return 1;
${grep} -iq -e "No such file" -e "unable to resolve" -e "HTTP_NOT_FOUND" -e "Invalid PORT" -e "Remote file does not exist" -e "not retrieving" ${global_temp_file3};
return_val=$?;
[ ${return_val} -eq 0 ] && return 1;
return 0
}
chg_file_owner => () { if [ $# -ne 2 ]; then
message "Usage: chg_file_owner <new owner> <file>" "chg_file_owner";
return 1;
fi;
if ! ${chown} "${1}:${1}" "${2}"; then
message "There was an error changing ownership of file ${2} to ${1}." "Message";
fi
}
display_batch_list => () { if [ $# -eq 0 ]; then
make_title "Batch List Display";
${dialog} --backtitle "${main_title}" --colors --infobox "\Z1Batch list is empty.\Zn" 8 60 1>&0;
sleep 2;
return 0;
fi;
local command;
local file2_dbl;
local description_dbl;
local count=0;
height=20;
width=130;
calculate_dimensions;
make_title "Batch List Display";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"Remove\" --cancel-label \"Prev\" --extra-button --extra-label \"Clear\" --menu \"Current batch list\" ${height} ${width} ${height} ";
for i in $@;
do
count=$(( ++count ));
if `${echo} ${i} | ${grep} -iq "script:"`; then
file2_dbl="`${echo} ${i} | cut -d: -f2 | ${sed} -e 's;^\s+;;g'`";
description_dbl="`${cat} ${file2_dbl} | ${grep} -i "^#Desc:.*" | ${sed} -e 's;^#Desc:;;g'`";
[ -z "${description_dbl}" ] && description_dbl="No description";
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. `${basename} ${i}`\" \"SCRIPT: ${description_dbl}\" ";
else
file2_dbl="${data_dir}/${i}/df";
if ! file_empty ${file2_dbl}; then
description_dbl=`${cat} ${file2_dbl}`;
else
description_dbl="No description";
fi;
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. ${i}\" \"${description_dbl}\" ";
fi;
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return $?
}
main_window => () { height=35;
width=100;
calculate_dimensions;
make_title "Main Selection Window";
command="${dialog} --backtitle \"${main_title}\" --cancel-label \"Exit\" ";
command="${command} --menu \"What would you like to do?\n\" ${height} ${width} 50 \"Install\" \"Configure & Install A Program\" ";
command="${command} \"Check Config\" \"Review Program Configuration\" ";
command="${command} \"Get Program\" \"Download New Program & Create Directory Structure\" ";
command="${command} \"Create Batch\" \"Create A Batch File\" ";
command="${command} \"Edit Batch\" \"Edit A Batch File\" ";
command="${command} \"Run Batch\" \"Load An Existing Batch File\" ";
command="${command} \"Edit MD5/SHA Checksum\" \"Edit File Signatures\" ";
if [ -f "${profile}/requisites" ]; then
command="${command} \"Version Check\" \"Host System Program Requirement Versions\" ";
fi;
command="${command} \"Variables\" \"View & Set Variables\" ";
command="${command} \"Scripts\" \"Run & Edit Scripts\" ";
command="${command} \"Shell\" \"Run shell\"";
command="${command} \"About\" \"\"";
eval ${command} 2> ${global_temp_file5};
return $?
}
script_options => () { if [ $# -ne 1 ]; then
message "Usage: script_options <file>" "script_options";
return 1;
fi;
local command;
selection="";
height=20;
width=120;
calculate_dimensions;
make_title "Options";
get_time "`${basename} ${1}`" "-";
command="${dialog} --backtitle \"${main_title}\" --title \"File '${1}' Options (Run Time: ${hour}h ${min}m ${sec}s)\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Execute\" \"\" off";
command="${command} \"Modify\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"Move File\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
copy => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
if [ -d "${1}" ]; then
${cp} -r "${1}" "${2}";
else
if [ -f "${1}" ]; then
${cp} "${1}" "${2}";
fi;
fi;
if [ $? -eq 1 ]; then
message "Unable to copy ${1} to ${2}." "Copy Error";
return 1;
fi;
return 0
}
retrieve_pkg => () { if [ $# -ne 2 ]; then
message "Usage: retrieve_pkg <url> <install dir>" "retrieve_pkg";
return 1;
fi;
height=20;
width=135;
calculate_dimensions;
local sub_pid1;
clear_global_files;
${echo} "Retrieving file ${1}..." > ${global_temp_file3};
${echo} "" >> ${global_temp_file3};
make_title "Retrieving ${1}";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Retrieval Of ${1}" --no-kill --tailboxbg "${global_temp_file3}" ${height} ${width} 2> ${global_temp_file4};
while file_empty ${global_temp_file4}; do
${sleep} 1;
done;
fi;
${wget} -v --timeout=30 --directory-prefix=${2} -o /dev/null ${1} & sub_pid1=$!;
wait ${sub_pid1};
return_val=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file4}`;
if [ ${return_val} -ne 0 ]; then
message "Failed to download `${basename} ${1}` at ${1}" "Download Failure";
fi;
return 0
}
get_time => () { if [ $# -ne 2 ]; then
message "Usage: get_time <search-for name> <run level or '-' for script>" "get_time";
return 1;
fi;
local t1=0;
local total_min=0;
local t_sec=0;
local line;
hour=0;
min=0;
sec=0;
[ ! -f "${times_file}" ] && return 0;
if [ "${2}" == "-" ]; then
line=`${grep} "^${1}:-.*" ${times_file}`;
else
if [ "${2}" != "-" ]; then
line=`${grep} "^${1}:${2}.*" ${times_file}`;
else
return;
fi;
fi;
[ -z "${line}" ] && return 0;
t_sec="`${echo} ${line} | cut -d: -f3`";
total_sec=$(( total_sec + t_sec ));
[ ${total_sec} -eq 0 ] && return;
total_min=$(${echo} "scale=5; ${t_sec}/60" | bc);
min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${min}" ] && min=0;
t1="`${echo} ${min}*60 | bc`";
sec="$(${echo} ${t_sec}-${t1} | bc)";
if [ ${min} -ge 60 ]; then
hour=`${echo} "scale=5; ${min}/60" | bc`;
hour=`${echo} ${hour} | cut -d"." -f1`;
t1=`${echo} "${hour}*60" | bc`;
min=`${echo} "${min}-${t1}" | bc`;
fi;
return
}
global_script_run_root => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run_root <path to script> <title>" "global_script_run_root";
return 1;
fi;
local scs=0;
local return_val=0;
export path=${1};
export title=${2};
if ! root; then
while :; do
${clear};
${echo} "*** Enter root password to proceed with installation of ${title} ***";
${su} -c '(
global_script_run "${path}" "${title}" || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
if ! global_script_run "${path}" "${title}"; then
return_val=1;
fi;
fi;
export -n path title error_in_chroot;
return ${return_val}
}
yesno_inquiry => () { if [ $# -ne 2 ]; then
message "Usage: yesno_inquiry <title> <prompt>" "yesno_inquiry";
return 1;
fi;
make_title "Inquiry";
${dialog} --backtitle "${main_title}" --colors --title "${1}" --yesno "${2}" 15 100;
[ $? -eq 1 ] && return 1;
return 0
}
global_script_run => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run <path to script> <title>" "global_script_run";
return 1;
fi;
declare -i j=0;
local var1;
local sub_pid1;
local sub_pid2;
local env_cmd="";
var1=${2};
check_for_directory "${release_dir}/${tarball_base_name}" || return 1;
make_executable_file ${global_temp_file2} || return 1;
if `${grep} -q "#build" ${prog_dir}/mstr_conf`; then
if ! check_for_directory "${release_dir}/${tarball_base_name}/build"; then
make_dir "${release_dir}/${tarball_base_name}/build" || return 1;
fi;
${echo} -e "cd ${install_dir}/${tarball_base_name}/build\n" > ${global_temp_file2};
else
${echo} -e "cd ${install_dir}/${tarball_base_name}\n" > ${global_temp_file2};
fi;
${cat} ${1} >> ${global_temp_file2};
height=35;
width=150;
calculate_dimensions;
if `${grep} -m1 -q "^#pre_lfs" ${run_dir}/conf`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
${clear};
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
else
${clear};
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
fi;
kill ${tail_pid};
else
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} | tee ${global_temp_file1} &
else
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} &
fi;
else
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${global_temp_file2} | tee ${global_temp_file1} &
else
${global_temp_file2} &>${global_temp_file1} &
fi;
fi;
sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "${var1} Of ${tarball_base_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "${var1} Of ${tarball_base_name} (${start_time})";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Run level ${run} - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file3};
while file_empty ${global_temp_file3}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
${sleep} 2;
return_val=$?;
kill_proc `${cat} ${global_temp_file3}`;
fi;
if [ ${return_val} -eq 0 ]; then
${sleep} 2;
else
${sleep} 3;
fi;
${rm} -f ${chroot_dir}/tmp/lfs* &>/dev/null;
if [ ${return_val} -ne 0 ]; then
return 1;
else
return 0;
fi
}
are_digits => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
if `${echo} ${1} | ${grep} -q -e "\." -e "[^0-9]"`; then
return 1;
else
return 0;
fi
}
calculate_dimensions => () { local value;
local max_ht=0;
local max_wd=0;
value=`stty size`;
max_ht=`${echo} ${value} | cut -d" " -f1`;
max_wd=`${echo} ${value} | cut -d" " -f2`;
max_ht=$(( max_ht - 10 ));
max_wd=$(( max_wd - 10 ));
[ ${height} -le ${max_ht} ] || height=${max_ht};
[ ${width} -le ${max_wd} ] || width=${max_wd};
return 0
}
check_sig_rpkg => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_rpkg <file list>" "check_sig_rpkg";
return 1;
fi;
clear_global_files;
local prog;
local run;
local rp_name;
local sig1;
local sig2;
local list;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
run="`${echo} ${line} | ${cut} -d: -f2`";
prog="`${echo} ${line} | ${cut} -d: -f1`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Required Tarballs For ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
list="`${cat} ${data_dir}/${prog}/${run}/rpkg`";
for rp_name in ${list};
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
if ! find_file ${rp_name} ${prog_src_dir}; then
${echo} "Unable to find required package ${rp_name}..." > ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Checking ${rp_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} -m1 ${rp_name} ${data_dir}/${prog}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${rp_name}\" ${data_dir}/${prog}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
${echo} "MD5: signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
${sleep} 2;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
flag=0;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
[ ${error} -eq 0 ] && break 1;
done;
${sleep} 1;
[ ${error} -eq 0 ] && return 1;
return 0
}
get_tarball_base_from_tb => () { if [ $# -gt 2 ]; then
message "Usage: get_tarball_base_from_tb <path to tarball> [remove tmp file]" "get_tarball_base_from_tb";
return 1;
fi;
rm_file=${2:-0};
local sub_pid1;
if [ ! -e "${1}" ]; then
message "Unable to find tarball `${basename} ${1}`." "Tarball Find Failure";
return 1;
fi;
local scs=0;
while :; do
if ${echo} "${1}" | ${grep} -q -e "^.*xz$"; then
bn="`${basename} ${1}`";
bu="${bn}.bk";
[ ! -f "/tmp/${bn}" ] && copy ${1} /tmp;
copy "${1}" "/tmp/${bu}";
${xz} -d "/tmp/${bn}";
bn="`${echo} ${bn} | ${sed} -e 's;\.xz$;;g'`";
${tar} -t -f /tmp/${bn} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
remove_file "/tmp/${bn}";
if [ ${rm_file} -eq 0 ]; then
remove_file "/tmp/${bu}" || return 1;
else
move "/tmp/${bu}" "/tmp/${bn}.xz" || return 1;
fi;
else
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
${unzip} -l ${1} &>${global_temp_file1};
else
${tar} -t -f ${1} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
fi;
fi;
if `file_empty ${global_temp_file1}`; then
message "Unable to get tarball base name from temporary file for `${basename} ${1}`." "Tarball Base Name Retrieval";
scs=1;
break 1;
fi;
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
tarball_base_name="`${echo} ${temp_name} | ${sed} -e 's;\(^.*\)\/;\1;g'`";
else
tarball_base_name="`${basename} ${1} | ${sed} -e 's;\(^.*\)\.zip;\1;g'`";
fi;
else
tarball_base_name=`${grep} -m1 "\(^[^/]\+\)\/.*$" ${global_temp_file1} | ${sed} -e 's;\(^[^/]\+\)\/.*$;\1;g'`;
fi;
tarball_base_name="`${echo} ${tarball_base_name} | tr ' ' '_'`";
break 1;
done;
return ${scs}
}
batch_program_and_script_screen => () { if [ $# -lt 1 ]; then
message "Usage: batch_program_and_script_screen <prog_list>" "batch_program_and_script_screen";
return 1;
fi;
prog_list="";
old_prog_list="";
local count_bp=0;
local selection_bpss;
while :; do
height=10;
width=65;
calculate_dimensions;
make_title "Batch Script Selection";
${dialog} --backtitle "${main_title}" --no-cancel --radiolist "Select either programs or scripts to add to the batch list" ${height} ${width} ${height} "Add program(s)" "" off "Add script(s)" "" off "View Current List" "" off 2> ${global_temp_file4};
return_val=$?;
selection_bpss="`${cat} ${global_temp_file4}`";
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && [ -z "${selection_bpss}" ] && return 0;
case ${selection_bpss} in
"Add program(s)")
while :; do
please_wait;
old_prog_list=${prog_list};
batch_program_listing $@;
return_val=$?;
if [ ! -z "${prog_list}" ]; then
prog_list="${old_prog_list} ${prog_list}";
else
prog_list="${old_prog_list}";
fi;
kill_please_wait;
[ $return_val -eq 1 ] && break 1;
done
;;
"Add script(s)")
local y;
local directory_bpss="";
local scripts_bpss="";
local script_bpss="";
y=`ls ${scripts_dir}`;
if [ ! -z "$y" ]; then
while :; do
select_from_list "Select a script directory" `ls ${scripts_dir}` || break 1;
directory_bpss=${selection};
scripts_bpss=`ls ${scripts_dir}/${directory_bpss}`;
if [ -z "${scripts_bpss}" ]; then
message "No scripts to select!" "No Scripts Found";
continue;
fi;
select_from_list "Select a script" ${scripts_bpss} || continue;
script_bpss=${selection};
[ -z "${script_bpss}" ] && continue;
${echo} "script:${scripts_dir}/${directory_bpss}/${script_bpss}" >> ${batch_file};
prog_list="${prog_list} script:${scripts_dir}/${directory_bpss}/${script_bpss}";
break 1;
done;
else
message "No script directories to select!" "No Script Directories Found";
fi;
unset y
;;
"View Current List")
display_batch_list ${prog_list};
case $? in
0)
if [ ! -z "${prog_list}" ]; then
remove_prog=`${cat} ${global_temp_file1}`;
[ -z "remove_prog" ] && continue;
line_no=${remove_prog:0:1};
remove_prog=`${echo} ${remove_prog} | cut -d" " -f2`;
if yesno_inquiry "Confirm Removal" "Are you sure that you want to remove the entry '${remove_prog}'?"; then
old_prog_list=${prog_list};
prog_list="";
count_bp=1;
for j in ${old_prog_list};
do
[ $(( count_bp++ )) -eq ${line_no} ] && continue;
prog_list="${prog_list} ${j}";
done;
if [ -f "${batch_file}" ]; then
eval ${sed} -i "${line_no}d" ${batch_file};
else
message "Unable to locate the batch file!" "Batch File Error";
return 1;
fi;
fi;
unset remove_prog old_prog_list;
fi
;;
3)
if yesno_inquiry "Confirm Clearing Of List" "Are you sure that you want to clear the batch list?"; then
prog_list="";
clear_file "${global_temp_file1}" || return 1;
clear_file "${batch_file}" || return 1;
fi
;;
esac
;;
esac;
done
}
download_prog => () { if [ $# -lt 1 ]; then
message "Usage: download_prog <program list>" "download_prog ";
fi;
clear_global_files;
local prog="";
local run="";
local scs;
local found;
local list1="";
local list2="";
local command="";
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
scs=1;
found=1;
tarball_name="";
run="`${echo} ${z} | ${cut} -d: -f2`";
prog="`${echo} ${z} | ${cut} -d: -f1`";
if ! file_empty ${data_dir}/${prog}/tb_name; then
tarball_name=`${cat} ${data_dir}/${prog}/tb_name`;
if [ ! -z "${tarball_name}" ]; then
tarball_in_string ${tarball_name};
scs=0;
fi;
fi;
if [ ${scs} -eq 1 ]; then
list1="`${grep} ${prog} ${shasum_file}`";
z=0;
for i in ${list1};
do
if `${echo} ${i} | ${grep} -q "${prog}\.\(tar\|tzg\|zip\|xz\|lzma\).*"`; then
list2="${list2} ${i}";
else
continue;
fi;
z=$(( ++z ));
done;
if [ ${z} -gt 1 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Choose A Tarball For Installation";
command="${dialog} --backtitle \"${main_title}\" --menu \"Select the tarball to use\" ${height} ${width} ${height}";
z=1;
for i in ${list};
do
command="${command} \"${z}. ${i}\" \"\"";
z=$(( ++z ));
done;
eval ${command} 2> ${global_temp_file1};
tarball_name="`${cat} ${global_temp_file1} | ${cut} -d\" \" -f2`";
else
tarball_name="${list2}";
fi;
unset z;
if [ ! -z "${tarball_name}" ]; then
[ ! -f "${data_dir}/${prog}/tb_name" ] && ${touch} "${data_dir}/${prog}/tb_name";
${echo} "${tarball_name}" > "${data_dir}/${prog}/tb_name";
fi;
fi;
if [ -z "${tarball_name}" ]; then
message "Unable to set tarball name for ${prog}." "Unable To Set Tarball Name";
return 1;
fi;
tarball_name="`trim_spaces ${tarball_name}`";
if find_file ${tarball_name} ${prog_src_dir}; then
path="${file_name_path}";
[ ! -z "${path}" ] && found=0;
fi;
if [ ${found} -eq 1 ]; then
if ! file_empty "${profile}/mstr_urls"; then
scs=1;
height=20;
width=120;
list1="";
calculate_dimensions;
check_connection || return 1;
${echo} "Searching for ${tarball_name}..." > ${global_temp_file1};
make_title "Tarball Search For ${tarball_name}";
${dialog} --backtitle "${main_title}" --title "Tarball Search For ${tarball_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;\(^.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
for line in ${list1};
do
`${echo} ${line} | ${grep} -iq -e "^#.*$" -e "^$" -` && continue;
url="`${echo} ${line}/${tarball_name}`";
if verify_tarball_url "${url}"; then
${echo} "Searching at ${line}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Found at ${url}..." >> ${global_temp_file1};
${sleep} 2;
found=0;
${echo} "${line}" > "${data_dir}/${prog}/purl";
break 1;
fi;
fi;
done;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
else
scs=0;
fi;
if [ ${scs} -eq 1 ] && [ ${found} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${line}/${tarball_name}" /tmp; then
message "Unable to download ${name} from ${line}" "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
while :; do
prompt_for_value "Program URL" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${tarball_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
return 1;
fi;
fi;
break 1;
done;
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
if check_remote_file_exists "${prompt_value}"; then
located=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
tarball_name=`${basename} ${prompt_value}`;
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && ${echo} "${url_dir}" >> ${profile}/mstr_urls;
${echo} "${url_dir}" > "${data_dir}/${prog}/purl";
fi;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
if [ ${located} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${prompt_value}" /tmp; then
message "Unable to download ${tarball_name} from ${url_dir}." "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
fi;
done;
return 0
}
log_viewer => () { if [ $# -ne 2 ]; then
message "Usage: log_viewer <tarball base name> <run level>" "log_viewer";
return 1;
fi;
local scs=0;
while :; do
[ ! -d "${data_dir}/${1}/${2}/log" ] && message "Unable to find log directory for ${1}." "No Log Directory" && return 1;
local list1="`ls ${data_dir}/${1}/${2}/log`";
if [ -z "${list1}" ]; then
message "There are no log files to view for ${1} (run level ${2})." "No Log Files";
break 1;
fi;
local command="";
make_title "Log File Viewer";
command="${dialog} --colors --backtitle \"${main_title}\" --title \"${1} - run level: ${run}\" --cancel-label \"Prev\" --radiolist \"Log files for ${1}\" 20 90 20";
for i in ${list1};
do
command="${command} \"${i}\" \"\" \"off\"";
done;
eval ${command} 2> ${global_temp_file2};
return_val=$?;
if [ ${return_val} -ne 0 ] || file_empty ${global_temp_file2}; then
break 1;
else
local file="`${cat} ${global_temp_file2}`";
local file2="";
[ -z "${file}" ] && return 1;
if ! check_for_file "${data_dir}/${1}/${2}/log/${file}"; then
message "Unable to find log file '${file}'." "Log File Not Found";
scs=1;
break 1;
fi;
if `${echo} $file | ${grep} -q ".*bz2$"`; then
file2="`${echo} $file | ${sed} -e 's;\.tar\.bz2;;g' -e 's;\.old;;g'`";
${tar} -C /tmp -xjf "${data_dir}/${1}/${2}/log/${file}";
else
message "Unknown extension; unable to extract log data for ${1}." "Extraction Error";
scs=1;
break 1;
fi;
if [ ! -f "/tmp/${file2}" ]; then
message "Failed to locate the uncompressed log file in the tmp directory." "Log File Not Found";
scs=1;
break 1;
else
if ! edit_file "/tmp/${file2}" "1"; then
message "There was an error editing the file, '${file}', for ${1}." "File Edit Error";
fi;
fi;
remove_file "/tmp/${file2}";
fi;
done;
return ${scs}
}
file_empty => () { if [ $# -ne 1 ]; then
message "Usage: file_empty <path to file>" "file_empty";
return 1;
fi;
local var1;
[ ! -e "${1}" ] && return 0;
var1=`${cat} ${1}`;
[ -z "${var1}" ] && return 0;
unset var1;
return 1
}
update_time => () { if [ $# -ne 3 ]; then
message "Usage: update_time <tarball base name or script name> <run level (or - for script)> <new_time>" "update_time";
return 1;
fi;
local sec=${3};
[ ! -f "${times_file}" ] && ${touch} ${times_file};
sec=$(( sec + 0 ));
if [ "${2}" == "-" ]; then
if `${grep} -q ${1}:-:* ${times_file}`; then
${sed} -i -e "s;^${1}:-:.*$;${1}:-:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:-:${sec}" >> ${times_file} || return 1;
fi;
else
if `${grep} -q ${1}:${2}:* ${times_file}`; then
${sed} -i -e "s;^${1}:${2}:.*$;${1}:${2}:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:${2}:${sec}" >> ${times_file} || return 1;
fi;
fi;
return 0
}
get_run_level => () { if [ $# -ne 1 ]; then
message "Usage: get_run_level <program name>" "get_run_level";
return 1;
fi;
local var1_grl=${1};
local list1_grl="";
local list2_grl="";
local command="";
local count=0;
local desc="";
list1_grl=`ls ${data_dir}/${var1_grl}`;
for i in ${list1_grl};
do
[ "${i}" == "list1_grl" ] && continue;
! are_digits "${i}" && continue;
list2_grl="${list2_grl} ${i}" && count=$(( ++count ));
done;
[ -z "${list2_grl}" ] && return 1;
if [ ${count} -le 1 ]; then
run=1;
return 0;
else
while :; do
height=20;
width=120;
calculate_dimensions;
command="${dialog} --backtitle \"${gen_title}\" --no-cancel --ok-label \"Submit\" --title \"Multiple run levels found for ${var1_grl}\" --radiolist \"Select a run level\" ${height} ${width} 20 ";
for i in ${list2_grl};
do
desc="`${grep} '^#Desc:.*$' ${data_dir}/${var1_grl}/${i}/conf`";
if [ ! -z "${desc}" ]; then
desc="`${echo} ${desc} | ${sed} -e 's;^#Desc:\ *\(.*$\);\1;g'`";
else
desc="No Description Found";
fi;
desc="${desc:0:255}";
command="${command} \"${i}\" \"${desc}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && file_empty ${global_temp_file1} && break 1;
if ! file_empty ${global_temp_file1}; then
run=`${cat} ${global_temp_file1}`;
break 1;
fi;
done;
[ -z "${run}" ] && run=1;
return 0;
fi
}
add_addl_run_dir => () { if [ $# -ne 1 ]; then
message "Usage: add_addl_run_dir <program base name>" "add_addl_run_dir";
fi;
yesno_inquiry "Add Run Directory" "You chose to add an additional run-level. Is this correct?" || return 1;
local success=1;
local make_copy=0;
local next=0;
current=0 && export current;
highest_run_level ${1} || return 1;
next=$((current+1));
if yesno_inquiry "Copy Directory" "Would you like to copy the most recent run level (${current}) to the new run level (${next})?"; then
make_copy=0;
else
make_copy=1;
fi;
height=20;
width=120;
calculate_dimensions;
case ${make_copy} in
"0")
${echo} "Copying file structure for ${tarball_base_name}..." > ${global_temp_file1}
;;
"1")
${echo} "Creating file structure for ${tarball_base_name}, run-level ${next}..." > ${global_temp_file1}
;;
esac;
${echo} "" >> ${global_temp_file1};
make_title "Additional Run Level";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
case ${make_copy} in
"0")
if ! copy "${prog_dir}/${current}" "${prog_dir}/${next}"; then
${echo} "An error occurred copying data to the new run level!" >> ${global_temp_file1};
else
${echo} "Copied run level ${current} to new run level ${next} for ${1}..." >> ${global_temp_file1};
success=0;
fi
;;
"1")
while :; do
for dir in "${prog_dir}/${next}" "${prog_dir}/${next}/ef" "${prog_dir}/${next}/log";
do
if ! check_for_directory "${dir}"; then
make_dir "${dir}" || break 2;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "ip" "mf" "mi" "make_check_test" "pf" "rpkg" "patch_list" "conf";
do
make_file "${prog_dir}/${next}/${file}" || break 2;
done;
success=0;
break 1;
done;
if [ ${success} -eq 0 ]; then
${echo} "Creation of run-level ${next} for ${tarball_base_name} successful..." >> ${global_temp_file1};
else
if [ ${success} -eq 1 ]; then
${echo} "An error occurred in the creation of run-level ${next} for ${tarball_base_name}!" >> ${global_temp_file1};
fi;
fi
;;
esac;
${sleep} 3;
kill_proc `${cat} ${global_temp_file2}` || exit 1;
export -n current;
return ${success}
}
check_for_file => () { if [ $# -ne 1 ]; then
message "Usage: check_for_file <file path>" "check_for_file";
return 1;
fi;
[ ! -f "${1}" ] && return 1;
return 0
}
create_directory_listing => () { if [ $# -ne 1 ]; then
message "Usage: create_program_list <directory>" "create_program_list";
return 1;
else
if [ ! -d "${1}" ]; then
message "Argument ${1} is not a directory." "create_program_list";
return 1;
fi;
fi;
prog_list="";
for i in `ls ${1}`;
do
[ -z "${i}" ] && break 1;
[ ! -d "${1}/${i}" ] && continue;
prog_list="${prog_list} ${i}";
done;
if [ -z "${prog_list}" ]; then
message "Empty program listing!" "Directory Listing Creation";
return 1;
else
return 0;
fi
}
trim_spaces => () { if [ $# -lt 1 ]; then
message "Usage: trim_spaces <string(s)>" "trim_space";
return 1;
fi;
${echo} ${1} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"
}
make_dir => () { if [ $# -ne 1 ]; then
message "Usage: make_dir <path>" "make_dir";
return 1;
fi;
[ -d "${1}" ] && return 0;
if ! ${mkdir} -p ${1} &>/dev/null; then
message "Unable to make directory ${1}" "Make directory";
return 1;
fi;
if ! eval ${chmod} 775 ${1} || ! eval ${chmod} ug+s ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
return 0
}
download_patch => () { if [ $# -lt 1 ]; then
message "Usage: download_patch <program list>" "download_patch";
return 1;
fi;
clear_global_files;
local prog;
local run;
local list1="";
local list2="";
local found;
local patch_name;
for line in $@;
do
`${echo} ${line} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
error=0;
prog="`${echo} ${line} | cut -d: -f1`";
run="`${echo} ${line} | cut -d: -f2`";
file_empty "${data_dir}/${prog}/${run}/patch_list" && continue;
height=20;
width=120;
calculate_dimensions;
make_title "Patch Search For ${prog}";
IFS=$(${echo} -e "\n\r");
for patch_name in `${cat} ${data_dir}/${prog}/${run}/patch_list`;
do
`${echo} ${patch_name} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
found=1;
scs=1;
unset IFS;
find_file ${patch_name} ${patch_src_dir} && continue;
IFS=$(${echo} -e "\n\r");
${dialog} --backtitle "${main_title}" --title "Patch Search - ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
${echo} "Searching for patch, ${patch_name}..." > ${global_temp_file1};
${echo} "" >> ${global_temp_file1};
! file_empty "${data_dir}/${prog}/purl" && list1="`head -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
for h in `${cat} "${profile}/mstr_urls"`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
`${echo} ${url} | ${grep} -iq -e '^#.*' -e '^$' -` && continue;
${echo} "Searching at ${url}..." >> ${global_temp_file1};
url="${url}/${patch_name}";
url="${url:0:255}";
! verify_url ${url} && continue;
if ! check_connection; then
${echo} "Network connection failed...please check." >> ${global_temp_file1};
error=1;
break 1;
fi;
check_remote_file_exists ${url};
rt=$?;
if [ ${rt} -eq 0 ]; then
${echo} "" >> ${global_temp_file1};
${echo} "Patch ${patch_name} found at ${url}." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
[ ${error} -eq 1 ] && break 1;
clear_global_files;
if [ ${found} -ne 0 ]; then
while :; do
if ! prompt_for_value "Patch URL" "Enter URL for patch '${patch_name}'" "URL"; then
return 1;
fi;
if [ -z "${prompt_value}" ]; then
if yesno_inquiry "Try Again?" "No URL was entered. Would you like to try again?"; then
continue;
else
error=1;
break 3;
fi;
fi;
break 1;
done;
if ! verify_url ${prompt_value}; then
message "Unable to verify URL for patch, ${patch_name}." "Failed URL Verification";
error=1;
break 2;
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=0;
break 2;
fi;
clear_global_files;
if ! check_remote_file_exists ${prompt_value}; then
message "Patch, ${patch_name}, does not exist at the supplied URL, ${url}...exiting." "Remote File Non-Existent";
error=1;
break 2;
fi;
url="${prompt_value:0:255}";
fi;
if ! ${grep} -iq "`${dirname} ${url}`" "${profile}/mstr_urls"; then
${echo} "`${dirname} ${url}`" >> "${profile}/mstr_urls";
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=1;
break 2;
fi;
clear_global_files;
if ! retrieve_pkg ${url} /tmp; then
message "Unable to retrieve required tarball, ${patch_name}." "Patch Tarball Retrieval Error";
error=1;
break 2;
fi;
if [ ! -f "/tmp/${patch_name}" ]; then
message "Unable to find the patch, ${patch_name}, in the /tmp directory.";
error=1;
break 1;
fi;
if ! move "/tmp/${patch_name}" "${patch_src_dir}"; then
message "There was an error moving patch ${patch_name} to the source directory." "File Move Error";
error=1;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 1 ] && break 1;
done;
return ${error}
}
make_file => () { if [ $# -ne 1 ]; then
message "Usage: make_file <file path>" "make_file";
return 1;
fi;
check_for_file "${1}" && return 0;
err=1;
while :; do
if ! ${touch} ${1}; then
err=0;
break 1;
fi;
${chmod} 775 ${1} || err=0;
break 1;
done;
if [ ${err} -eq 0 ]; then
message "Error creating file ${1}." "File Creation" && return 1;
return 1;
fi;
return 0
}
chroot_mounted => () { `${mount} -l | cut -d' ' -f3 | ${grep} -q "${chroot_dir}"` || return 1;
return 0
}
execute_script_root => () { if [ $# -ne 1 ]; then
message "Usage: execute_script_root <path to script>" "execute_script_root";
return 1;
fi;
local script_esr="${1}";
export script_esr;
local return_val=0;
if ! root; then
while :; do
${clear};
${echo} -e "*** Enter root password to proceed ***\n";
${su} -c '(
execute_script ${script_esr} || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
execute_script ${script_esr} || return_val=1;
fi;
unset script_esr;
return ${return_val}
}
tarball_in_string => () { if [ $# -ne 1 ]; then
message "Usage: tarball_in_string <string>" "tarball_in_string";
return 1;
fi;
if ${echo} ${1} | ${grep} -iq -e ".*tgz$" -e ".*gz$" -e ".*bz2$" -e ".*zip$" -e ".*xz$" -e ".*lzma$"; then
return 0;
else
return 1;
fi
}
new_dir_name => () { prompt_for_value "Script Directory Name" "Enter new directory name" "Name" || return 1;
return 0
}
edit_file => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: edit_file <path to file> [save flag]" "edit_file";
return 1;
fi;
local scs=1;
local save_flag="${2:-0}";
EDITOR="vi";
if [ ! -f "${1}" ]; then
make_file ${1} || return 1;
fi;
find_file "`${basename} ${EDITOR}`";
if [ ! -z "${file_name_path}" ] && [ -f "${file_name_path}" ]; then
${cat} ${1} > ${global_temp_file3};
${file_name_path} ${global_temp_file3};
if [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
else
return_val=0;
fi;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
local command="";
height=35;
width=150;
calculate_dimensions;
make_title "File Edit";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Save\" --cancel-label \"Do Not Save\" --cr-wrap --editbox \"${1}\" ${height} ${width}";
eval ${command} 2> ${global_temp_file3};
return_val=$?;
if [ ${return_val} -eq 0 ] && [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
fi;
fi;
fi;
return ${return_val}
}
new_batch_name => () { prompt_for_value "Batch File Name" "Enter new batch file name" "Name" || return 1;
return 0
}
clear_global_files => () { for i in ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4};
do
clear_file "${i}" || return 1;
${touch} ${i} || return 1;
done;
return 0
}
move => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
${mv} -f "${1}" "${2}";
if [ $? -eq 1 ]; then
message "There was an error moving file ${1} --> ${2}." "File Move";
return 1;
fi;
return 0
}
save_file => () { if [ $# -ne 2 ]; then
message "Usage: save_file <file name> <file to copy>" "save_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
make_file ${1} || return 1;
else
if [ ! -e "${2}" ]; then
message "File to copy is missing or empty. No save will be done." "Missing Save-From File";
return 0;
fi;
fi;
if ! copy "${2}" "${1}"; then
message "Error saving file." "File Save";
return 1;
fi;
if [ -O ${1} ]; then
if ! ${chmod} 775 ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
fi;
return 0
}
check_for_directory => () { if [ -d "${1}" ]; then
return 0;
else
return 1;
fi
}
prompt_for_value => () { if [ $# -ne 3 ]; then
message "Usage: prompt_for_value <title> <tag> <prompt>" "prompt_for_value";
return 1;
fi;
height=20;
width=120;
p_lgth=${#3};
local command;
calculate_dimensions;
make_title "Prompt";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Submit\" --form \"${2}\" ${height} ${width} 1 \"${3}:\" 1 1 \"\" 1 $(( p_lgth + 2 )) ${width} 200";
eval ${command} 2> ${global_temp_file1};
return_val=$?;
prompt_value=`${cat} ${global_temp_file1}`;
if [ ${#prompt_value} -gt 200 ]; then
prompt_value=${prompt_value:0:255};
fi;
if [ ${return_val} -ne 0 ] || [ -z "${prompt_value}" ]; then
prompt_value="";
return 1;
else
prompt_value="`${echo} ${prompt_value} | tr ' ' '_'`";
return 0;
fi
}
execute_script => () { if [ $# -ne 1 ]; then
message "Usage: execute_script <path to script file>" "execute_script";
return 1;
fi;
if [ ! -f "${1}" ]; then
message "No script found!" "Script Find Error";
return 1;
fi;
if `${grep} -m 1 -q "^#chroot_flag" ${1}` && ! check_for_directory ${chroot_dir}/tmp; then
if ! make_dir ${chroot_dir}/tmp; then
message "Unable to make chroot temporary directory." "Chroot Tmp Directory Creation Error";
return 1;
fi;
fi;
if [ ${global_no_dialog} -eq 1 ]; then
`${grep} -m 1 -q "^#no_dialog" "${1}"` && no_dialog=0;
fi;
base_script_name="`${basename} ${1}`";
make_executable_file "${global_temp_file3}";
${cat} ${1} > ${global_temp_file3};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
if ! copy ${global_temp_file3} "${chroot_dir}/tmp/"; then
message "There was an error copying the script, '${1}', to the chroot temporary directory." "Script Copy Error";
return 1;
fi;
fi;
get_time ${base_script_name} "-";
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} $calc > ${global_time_file} && ${sleep} 1;
done & sub_pid2=$!;
if `${grep} -m 1 -q "^#pre_lfs" ${global_temp_file3}`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host directory." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
${clear};
${echo} "Running script...";
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} | tee ${global_temp_file4};
else
${global_temp_file3} | tee ${global_temp_file4};
fi;
return_val=$?;
${sleep} 5;
else
height=35;
width=150;
calculate_dimensions;
local sub_pid1;
if [ ${batch_flag} -eq 0 ]; then
make_title "Running script ${base_script_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Running script ${base_script_name} (${start_time})";
fi;
${echo} "Running script..." > ${global_temp_file4};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} &>>${global_temp_file4} &
else
${global_temp_file3} &>>${global_temp_file4} &
fi;
sub_pid1=$!;
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Running Script: ${base_script_name} (Est. Completion Time: ${hour}h ${min}m ${sec}s)" --no-kill --tailboxbg ${global_temp_file4} ${height} ${width} 2> ${global_temp_file5};
while file_empty ${global_temp_file5}; do
${sleep} .5;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 5;
kill_proc `${cat} ${global_temp_file5}`;
fi;
disown ${sub_pid2};
kill ${sub_pid2};
${rm} -f ${chroot_dir}/tmp/lfs_script* &>/dev/null;
if ! update_time ${base_script_name} "-" `${cat} ${global_time_file}`; then
message "Warning: There was an error updating the time file for (script) ${base_script_name}...continuing." "Update Time File Error";
fi;
if [ ${return_val} -eq 1 ]; then
${echo} "Script error: ${base_script_name} @ `date`" >> ${install_log};
message "Script error: ${base_script_name}." "Script Error";
else
if [ ${return_val} -eq 0 ]; then
${echo} "Script finish: ${base_script_name} @ `date`" >> ${install_log};
fi;
fi;
return ${return_val}
}
remove_file => () { if [ $# -lt 1 ]; then
message "Usage: remove_file <file path> ..." "remove_file";
return 1;
fi;
for z in $@;
do
[ ! -e "${z}" ] && continue;
${rm} -rf ${z} &>/dev/null;
if [ $? -eq 1 ]; then
message "There was an error removing file ${z}." "File Removal Error";
return 1;
fi;
done;
return 0
}
abort_message => () { if [ $# -lt 1 ] || [ -z "${1}" ]; then
message "Usage: abort_message <text> [title]" && return 1;
fi;
local message_title;
message_title="${2}";
if [ -z "${message_title}" ]; then
${dialog} --sleep 2 --title "Installation Abort" --infobox "${1}" 10 30;
else
${dialog} --sleep 2 --title "Aborting Installation: ${message_title}." --infobox "${1}" 10 30;
fi;
exit 1
}
make_executable_file => () { if [ $# -ne 1 ]; then
message "Usage: make_executable_file <file name>" "make_executable_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
if ! make_file "${1}" || ! ${chmod} u+x ${1}; then
message "Unable to create file: ${1}." "Executable File Error";
return 1;
fi;
else
if [ ! -x "${1}" ]; then
if ! ${chmod} u+x ${1}; then
message "Unable to make file '${1}' executable." "Executable File Error";
return 1;
fi;
fi;
fi;
return 0
}
kill_proc => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: kill_proc <proc1> [proc2]" "kill_proc";
return 1;
fi;
[ -z "${1}" ] && return 0;
if [ $# -eq 1 ]; then
${ps} -p ${1} &>/dev/null || return 0;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
else
if [ $# -eq 2 ]; then
while ${ps} -p ${1} &>/dev/null 2>&1; do
${sleep} 1;
done;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
fi;
fi;
return 0
}
verify_signature => () { if [ $# -ne 2 ]; then
message "Usage: verify_signature <sig1> <sig2>" "verify_signature";
return 1;
fi;
if [ "${1}" != "${2}" ]; then
return 1;
else
return 0;
fi
}
single_program_configuration => () { program_selection "Select a program to check and configure" "single" "Select" $@ || return 1
}
chg_tmp_file_owner => () { if [ $# -ne 1 ]; then
message "Usage: chg_tmp_file_owner <file>" "chg_tmp_file_owner";
return 1;
fi;
local owner="${1}";
for i in ${batch_file} ${return_val_file} ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4} ${global_time_file} ${global_temp_file5};
do
[ ! -f "${i}" ] && continue;
chg_file_owner ${owner} ${i} || return 1;
done;
return 0
}
root => () { if [ `id -u` -eq 0 ]; then
return 0;
else
return 1;
fi
}
remove_dir => () { if [ $# -ne 1 ]; then
message "Usage: remove_dir <dir>" "remove_dir";
return 1;
fi;
[ ! -d "${1}" ] && return 0;
local sub_pid1;
height=10;
width=80;
calculate_dimensions;
${echo} "Please wait while removing directory `${basename} ${1}`..." > ${global_temp_file1};
${rm} -rf ${1} &>/dev/null & sub_pid1=$!;
make_title "Directory Removal";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Removing Directory" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 1;
kill_proc `${cat} ${global_temp_file2}`;
return ${return_val}
}
verify_url => () { if [ $# -ne 1 ]; then
message "Usage: verify_signature <string>" "verify_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\)://.*$"; then
return 0;
else
return 1;
fi
}
message => () { if [ $# -lt 1 ]; then
message="Usage: message <text> [title]" "message";
fi;
local message;
local message_title;
message="${1}";
message_title="${2}";
if [ -z "${message_title}" ]; then
message_title="Message";
fi;
${dialog} --colors --backtitle "${gen_title}" --title "${message_title}" --msgbox "${message}" 15 100;
return $?
}
please_wait => () { height=10;
width=60;
kill_please_wait;
calculate_dimensions;
make_title "Processing";
${echo} "Please wait..." > ${global_temp_file5};
${dialog} --backtitle "${main_title}" --title "Processing" --no-kill --tailboxbg ${global_temp_file5} ${height} ${width} 2> ${global_temp_file6};
while file_empty ${global_temp_file6}; do
sleep .5;
done;
please_wait_pid="`cat ${global_temp_file6}`";
return 0
}
new_script_name => () { prompt_for_value "New Script Name" "Enter Script Name (NOTE: empty files will still save)" "Name" || return 1;
return 0
}
confirm_selection => () { if [ $# -lt 1 ]; then
message "Usage: confirm_selection <list>" "confirm_selection";
return 1;
fi;
local list1="$@";
local prog;
local rn;
local return_val;
local command="";
local i;
local kill_wait_pid_cs="";
declare -i i=1;
if [ -z "${list1}" ]; then
message "No programs were selected for confirmation." "Installation Selection Confirmation";
return 1;
fi;
please_wait;
height=25;
width=60;
for j in $@;
do
[ ${#j} -gt ${width} ] && width=${#j};
done;
width=$(( width + 15 ));
calculate_dimensions;
make_title "Selection Confirmation";
command="${dialog} --backtitle \"${main_title}\" --title \"Selected programs\" ";
command="${command} --ok-label \"Yes\" --cancel-label \"No\" --menu \"Is the selection correct?\" ${height} ${width} ${height} ";
command="${command} \"PROGRAM\" \"RUN-LEVEL\"";
command="${command} \"=================\" \"=========\"";
for j in ${list1};
do
if `${echo} ${j} | ${grep} -q "^script:.*$"`; then
prog="`${echo} ${j} | cut -d: -f2`";
prog="script - `basename ${prog}`";
rn="N/A";
else
prog="`${echo} ${j} | cut -d: -f1`";
rn="`${echo} ${j} | cut -d: -f2`";
fi;
command="${command} \"${i}. ${prog}\" \"${rn}\"";
i=$(( ++i ));
done;
eval ${command} 2> /dev/null;
return_val=$?;
kill_please_wait;
return $return_val
}
edit_configuration => () { if [ $# -ne 1 ]; then
message "Usage: edit_configuration <program name>" "edit_configuration";
return 1;
fi;
local var1_ec;
local scs=0;
prog_dir="${data_dir}/${1}";
run_dir="${prog_dir}/${run}";
get_time ${tarball_base_name} ${run} || return 1;
make_title "Configuration Edit";
while :; do
${dialog} --colors --backtitle "${main_title}" --title "${1} - run level: ${run} - \Z1Est. Build Time: ${hour}h ${min}m ${sec}s\Zn" --no-cancel --extra-button --extra-label "New Run Level" --radiolist "Configuration/Installation files for ${1}" 20 90 20 "Configuration" "View/edit configuration commands" "off" "Make Flags" "View/edit list of make flags" "off" "Make (Check/Test) Flags" "View/edit list of make (check/test) commands" "off" "Make (Install) Flags" "View/edit list of make (install) commands" "off" "Master Base URL's" "View/edit base URL's for downloading packages" "off" "Master Conf File" "View/edit master configuration file (in parent directory)" "off" "Patch List" "View/edit patch list file" "off" "Post-configuration" "View/edit post-configuration commands" "off" "Pre-configuration" "View/edit pre-configuration commands" "off" "Preferred URL" "View/edit this program's preferred URL" "off" "Program Description" "View/edit program description" "off" "Required Packages" "View/edit packages to be present in source directory" "off" "Run Level Conf File" "View/edit run level configuration file" "off" "View Logs" "View logs for this run-level" "off" "Remove Run-Level" "Delete this run-level" "off" 2> ${global_temp_file1};
return_val=$?;
if [ ${return_val} -eq 3 ]; then
return 3;
else
if file_empty ${global_temp_file1}; then
return 1;
fi;
fi;
case `${cat} ${global_temp_file1}` in
"Configuration")
var1_ec="${run_dir}/cf"
;;
"Pre-configuration")
var1_ec="${run_dir}/pre-cf"
;;
"Post-configuration")
var1_ec="${run_dir}/post-cf"
;;
"Program Description")
var1_ec="${prog_dir}/df"
;;
"Installed Programs")
var1_ec="${run_dir}/ip"
;;
"Make Flags")
var1_ec="${run_dir}/mf"
;;
"Make (Install) Flags")
var1_ec="${run_dir}/mi"
;;
"Make (Check/Test) Flags")
var1_ec="${run_dir}/make_check_test"
;;
"Patch List")
var1_ec="${run_dir}/patch_list"
;;
"Preferred URL")
var1_ec="${prog_dir}/purl"
;;
"Required Packages")
var1_ec="${run_dir}/rpkg"
;;
"Master Conf File")
var1_ec="${prog_dir}/mstr_conf"
;;
"Run Level Conf File")
var1_ec="${run_dir}/conf"
;;
"Master Base URL's")
var1_ec="${profile}/mstr_urls"
;;
"View Logs")
log_viewer ${tarball_base_name} ${run};
continue
;;
"Remove Run-Level")
if remove_run_level "${tarball_base_name}" "${run}"; then
return 0;
else
continue;
fi
;;
*)
continue
;;
esac;
! check_for_file ${var1_ec} && ${touch} ${var1_ec};
edit_file ${var1_ec};
done;
return ${scs}
}
clear_file => () { if [ $# -ne 1 ]; then
message "Usage: clear_file <file>" "clear_file";
return 1;
fi;
[ ! -f "${1}" ] && return 0;
scs_cgf=0;
${rm} ${1} &>/dev/null || scs_cgf=1;
${touch} ${1} &>/dev/null || scs_cgf=1;
if [ ${scs_cgf} -eq 1 ]; then
message "An error occurred while attempting to clear a file: ${1}." "File-Clear Error";
return 1;
fi;
return 0
}
highest_run_level => () { if [ $# -ne 1 ]; then
message "Usage: highest_run_level <tarball base directory>" "highest_run_level";
return 1;
fi;
[ ! -d "${data_dir}/${1}" ] && return 1;
local list_hrl=`ls ${data_dir}/${1}`;
for i in ${list_hrl};
do
[ "${i}" == "list_hrl" ] && continue;
if are_digits ${i}; then
[ ${current} -lt ${i} ] && current=${i};
fi;
done;
return 0
}
download_rpkg => () { if [ $# -lt 1 ]; then
message "Usage: download_rpkg <program list>" "download_rpkg ";
fi;
clear_global_files;
local prog="";
local run="";
local rp_name="";
local list1="";
local list2="";
local error=1;
local found;
height=20;
width=120;
calculate_dimensions;
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
prog="`${echo} ${z} | ${cut} -d: -f1`";
run="`${echo} ${z} | ${cut} -d: -f2`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
IFS=$(${echo} -e "\n\r");
for rp_name in `${cat} ${data_dir}/${prog}/${run}/rpkg`;
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
found=1;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
find_file ${rp_name} ${prog_src_dir} && continue;
if ! file_empty ${profile}/mstr_urls; then
${echo} "Searching for ${rp_name}..." > ${global_temp_file1};
make_title "Required Tarball Search For ${rp_name}";
${dialog} --backtitle "${main_title}" --title "Required Tarball Search For ${rp_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
url="`${echo} ${url}/${rp_name}`";
! verify_tarball_url "${url}" && continue;
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Searching for ${rp_name} at ${url}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Required tarball, ${rp_name}, found at ${url}..." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
clear_global_files;
if [ ${found} -eq 1 ]; then
while :; do
prompt_for_value "Required Program URL (${rp_name})" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${rp_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
error=0;
break 1;
fi;
fi;
break 1;
done;
while :; do
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Required Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
check_remote_file_exists "${prompt_value}";
if [ $? -eq 0 ]; then
found=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && echo "${url_dir}" >> ${profile}/mstr_urls;
url="${prompt_value}";
break 1;
fi;
done;
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
if [ ${found} -eq 1 ]; then
message "Unable to find required tarball, ${rp_name}. Aborting installation..." "File Find Failed";
error=0;
break 1;
fi;
if ! check_connection; then
error=0;
break 1;
fi;
if ! retrieve_pkg "${url}" /tmp; then
message "Unable to download ${rp_name} from `${dirname} ${url}`." "File Download Failed";
error=0;
break 1;
fi;
if [ ! -f "/tmp/${rp_name}" ]; then
message "Required tarball file not found in /tmp directory." "Tarball Not Found";
error=0;
break 1;
fi;
if ! move "/tmp/${rp_name}" "${prog_src_dir}"; then
message "Unable to move file ${rp_name} to source directory." "Tarball File Move Error";
error=0;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 0 ] && return 1;
done;
[ ${error} -eq 0 ] && return 1;
return 0
}
script_options_m1 => () { if [ $# -ne 1 ]; then
message "Usage: script_options_m1 <file>" "script_options_m1";
return 1;
fi;
local command;
height=20;
width=60;
calculate_dimensions;
make_title "Options";
command="${dialog} --backtitle \"${main_title}\" --title \"File '`${basename} ${1}`' Options\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Modify\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"View Completion Time(s)\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
install_one => () { if [ $# -ne 1 ]; then
message "Usage: install_one <program name>" "install_one";
return 1;
fi;
local path;
local located=1;
local success=1;
local runtime_error=1;
no_dialog=1;
tarball_name="";
prog_dir="${data_dir}/${tarball_base_name}";
run_dir="${prog_dir}/${run}";
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf` && ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
install_dir="${in_chroot_install_dir}";
release_dir="${chroot_dir}${in_chroot_install_dir}";
check_for_directory ${chroot_dir}/tmp || make_dir ${chroot_dir}/tmp;
if ! directory_writable "${chroot_dir}/${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
else
install_dir="$out_chroot_install_dir";
release_dir="$out_chroot_install_dir";
if ! directory_writable "${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
fi;
if ! `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
if `${echo} "${install_dir}" | ${grep} -q "${chroot_dir}"` || `${echo} "${release_dir}" | ${grep} -q "${chroot_dir}"`; then
if ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
check_for_directory "${chroot_dir}${install_dir}";
else
check_for_directory "${install_dir}";
fi;
if [ $? -ne 0 ]; then
if ! make_dir "${install_dir}"; then
message "Unable to create install directory (${install_dir})." "Installation Directory Creation Error";
break 1;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
directory_writable ${chroot_dir}${install_dir} || return 1;
else
directory_writable ${install_dir} || return 1;
fi;
if ! check_structure ${run_dir}; then
message "Program directory for ${1} not set up properly." "Improper Directory Structure";
return 1;
fi;
get_time ${tarball_base_name} ${run};
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} ${calc} > ${global_time_file} && sleep 1;
done & sub_pid2=$!;
! file_empty ${prog_dir}/tb_name && tarball_name="`${cat} ${prog_dir}/tb_name`";
[ -z "${tarball_name}" ] && return 1;
if find_file "${tarball_name}" "${prog_src_dir}"; then
release_tarball "${file_name_path}" "${release_dir}" 0 || return 1;
else
message "Unable to find file, ${tarball_name}." "File Not Found";
return 1;
fi;
parent_tb_base_name=${tarball_base_name};
release_isp ${run_dir}/rpkg || return 1;
tarball_base_name=${parent_tb_base_name};
no_dialog=1;
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/patch_list";
fi;
IFS=$(${echo} -e "\n\r");
for item in `${cat} ${run_dir}/patch_list`;
do
`${echo} ${item} | ${grep} -q -e "^#.*$" -e "^$" -` && continue;
if ! run_patch ${item}; then
message "An error occurred running the patch (${item}) for ${tarball_base_name}." "Patch-Run Error";
return 1;
fi;
done;
unset IFS;
j="`ls ${run_dir}/log | grep -v ^.*old`";
for k in ${j};
do
h="`echo ${k} | sed -e 's;\.tar\.bz2$;;g'`";
move "${run_dir}/log/${k}" "${run_dir}/log/${h}.old.tar.bz2" || return 1;
done;
unset j k;
while true; do
if file_empty "${run_dir}/pre-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/pre-cf";
fi;
if ${grep} -q "^#run_as_root" ${run_dir}/pre-cf && ! root; then
if ! global_script_run_root "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "pre_conf" ${global_temp_file1};
compress_log "${run_dir}/log/pre_conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/cf";
fi;
if ! global_script_run "${run_dir}/cf" "Configuration"; then
message "The configuration script for ${tarball_base_name}, run level ${run}, failed." "Configuration Failure";
runtime_error=0;
fi;
save_log "conf" ${global_temp_file1};
compress_log "${run_dir}/log/conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mf";
fi;
if ! global_script_run "${run_dir}/mf" "Make"; then
message "The Make script for ${tarball_base_name}, run level ${run}, failed." "Make Failure";
runtime_error=0;
fi;
save_log "make" ${global_temp_file1};
compress_log "${run_dir}/log/make" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/make_check_test"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/make_check_test";
fi;
if ! global_script_run "${run_dir}/make_check_test" "Make Check/Test"; then
if ! `grep -q -m1 "#ignore_check_errors" "${run_dir}/conf"`; then
message "The Make-Check script for ${tarball_base_name}, run level ${run}, failed." "Make-Check Failed";
runtime_error=0;
else
${echo} "Warning: Make/Check error for ${tarball_base_name} @ `date`" >> ${install_log};
fi;
fi;
save_log "make_check_test" ${global_temp_file1};
compress_log "${run_dir}/log/make_check_test" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mi"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mi";
fi;
if ${grep} -q "^#no_root_install" ${run_dir}/mi; then
if ! global_script_run "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
else
if ! global_script_run_root "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
fi;
save_log "make_install" ${global_temp_file1};
compress_log "${run_dir}/log/make_install" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/post-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/post-cf";
fi;
if ${grep} -q "#run_as_root" ${run_dir}/post-cf; then
if ! global_script_run_root "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "post_cf" ${global_temp_file1};
compress_log "${run_dir}/log/post_cf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
break 1;
done;
disown ${sub_pid2};
${kill} ${sub_pid2};
if [ ${runtime_error} -ne 0 ]; then
if ! update_time ${tarball_base_name} ${run} `${cat} ${global_time_file}`; then
message "Warning: A failure occurred while updating the time file for ${tarball_base_name}...continuing." "Update Time File Error";
fi;
fi;
remove_ext_tb=1;
if [ ${global_remove_ext_tb} -eq 0 ]; then
remove_ext_tb=0;
else
if `${grep} -q "^#remove_ext_tb" ${run_dir}/conf`; then
remove_ext_tb=0;
fi;
fi;
if [ ${remove_ext_tb} -eq 0 ] && [ -d "${release_dir}/${tarball_base_name}" ]; then
if ! remove_dir "${release_dir}/${tarball_base_name}"; then
message "A failure occurred during the removal of directory, ${release_dir}/${tarball_base_name}." "Directory Removal Error";
return 1;
fi;
fi;
if [ ${runtime_error} -eq 1 ]; then
${echo} "Installed: ${tarball_base_name} @ `date`" >> ${install_log};
return 0;
else
if [ ${runtime_error} -eq 0 ]; then
${echo} "Install Failure: ${tarball_base_name} @ `date` (check log files)" >> ${install_log};
message "Install Failure: ${tarball_base_name} @ `date` (check log files)" "Install Failure";
return 1;
fi;
fi
}
check_sig_prog => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_prog <file list>" "check_sig_prog";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local listing;
local flag=0;
local error=1;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
base_name="`${echo} ${line} | ${cut} -d: -f1`";
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Main Program" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
${echo} "Checking ${base_name}..." >> ${global_temp_file1};
if file_empty "${data_dir}/${base_name}/tb_name"; then
${echo} "${base_name}: Unable to find the name of the tarball to check!" >> ${global_temp_file1};
error=0;
break 1;
else
tb_name="`${head} -n1 ${data_dir}/${base_name}/tb_name`";
if [ -z "${tb_name}" ]; then
${echo} "${base_name}: Unable to find the name of the tarball being used for installation!" >> ${global_temp_file1};
error=0;
break 1;
fi;
fi;
if ! find_file ${tb_name} ${prog_src_dir}; then
${echo} "Unable to find program, ${tb_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 1;
fi;
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
${echo} "MD5: signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
release_isp => () { if [ $# -ne 1 ]; then
message "Usage: release_isp <run directory>" "release_isp";
return 1;
fi;
file_empty "${1}" && return 0;
local signature;
local full_path;
local found;
local url;
IFS=$(${echo} -e "\n\r");
for pkg in `${cat} ${1}`;
do
${echo} ${pkg} | ${grep} -iq -e '^#.*' -e '^$' && continue;
found=1;
scs=1;
name=`${echo} ${pkg} | ${cut} -d: -f1`;
if [ -z "${name}" ]; then
message "Unable to find the name of a required package!" "Required Package Name Missing";
return 1;
fi;
if ! find_file ${name} ${prog_src_dir}; then
message "Unable to find required tarball, ${name}, in source directory." "Required Package Missing";
return 1;
fi;
rename=`${echo} ${pkg} | ${cut} -d: -f2`;
append_cmds=`${echo} ${pkg} | ${cut} -d: -f3`;
get_tarball_base_from_tb ${file_name_path} || return 1;
if [ -f "${release_dir}/${parent_tb_base_name}/${tarball_base_name}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${tarball_base_name};
fi;
if release_tarball ${file_name_path} ${release_dir}/${parent_tb_base_name} 1 "${append_cmds}"; then
if [ ! -z "${rename}" ]; then
if [ -d "${release_dir}/${parent_tb_base_name}/${rename}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
move ${release_dir}/${parent_tb_base_name}/${tarball_base_name} ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
else
message "There was an error releasing the tarball, ${name}, into its parent directory (${parent_tb_base_name})!" "Tarball Release Error";
return 1;
fi;
done;
unset IFS;
return 0
}
rename_script_name => () { prompt_for_value "Script Rename" "Script Rename" "Name" || return 1;
return 0
}
program_selection => () { if [ $# -lt 4 ]; then
message "Usage: output_dialog_selection_batch <title> <type> <ok label> <list>" "output_dialog_selection_batch";
return 1;
fi;
local command;
local description_ps;
local file1_ps;
local file3_ps;
local batch_prog_temp_ps="";
local batch_progs_ps="";
local orig_list_ps;
local batch_run_level_ps="";
local type_ps;
local title_ps;
local ok_label_ps;
local cancel_label_ps;
return_val="";
title_ps="${1}";
type_ps="${2}";
ok_label_ps="${3}";
shift 3;
orig_list_ps=$@;
prog_list="";
while :; do
kill_please_wait;
please_wait;
height=50;
width=160;
calculate_dimensions;
make_title "Batch Listing";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"${ok_label_ps}\" --no-cancel --radiolist \"${title_ps}\" ${height} ${width} ${height} ";
for i in ${orig_list_ps};
do
file1_ps="${data_dir}/${i}/df";
if ! file_empty ${file1_ps}; then
description_ps=`${cat} ${file1_ps}`;
else
description_ps="No description";
fi;
description_ps="${description_ps:0:255}";
command="${command} \"${i}\" \"${description_ps}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
{
[ ${return_val} -eq 1 ] || file_empty ${global_temp_file1}
} && return 1;
batch_prog_temp_ps="`${cat} ${global_temp_file1} | ${sed} -e 's;";;g'`";
if [ "${type_ps}" == "single" ] || [ "${type_ps}" == "checksum" ]; then
prog_list=${batch_prog_temp_ps};
break 1;
else
if [ "${type_ps}" == "batch" ]; then
get_run_level ${batch_prog_temp_ps};
${echo} "${batch_prog_temp_ps}:${run}" >> ${batch_file};
prog_list="${prog_list} ${batch_prog_temp_ps}";
fi;
fi;
done;
return ${return_val}
}
verify_sha_alg => () { case ${sha_alg} in
"1" | "224" | "256" | "384" | "512" | "512224" | "512256")
:
;;
*)
sha_alg=1
;;
esac;
return 0
}
run_patch => () { if [ $# -ne 1 ]; then
message "Usage: run_patch <patch file>" "run_patch";
return 1;
fi;
clear_global_files;
local pfile_raw="${1}";
local pfile_uncomp="${1}";
local list;
local sub_pid1;
local scs=0;
chg_dir "${release_dir}/${tarball_base_name}" || return 1;
if `${echo} ${pfile_raw} | ${grep} -q ".*\.gz"`; then
pfile_uncomp="`${echo} ${pfile_raw} | ${sed} -e 's;\(^.*\)\.gz;\1;g'`";
if [ ! -f "${patch_src_dir}/${pfile_uncomp}" ]; then
if ! ${gunzip} ${patch_src_dir}/${pfile_raw}; then
message "There was a problem uncompressing '${pfile_raw}'." "Patch Un-Compression";
return 1;
fi;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
clear;
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp};
scs=$?;
else
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp} &>${global_temp_file2} & sub_pid1=$!;
if debug; then
:;
else
${dialog} --title "Patching ${tarball_base_name} (${pfile_raw})" --no-kill --tailboxbg ${global_temp_file2} 40 130 2> ${global_temp_file1};
while file_empty ${global_temp_file1}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
scs=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file1}`;
fi;
${sleep} 1;
return ${scs}
}
make_temp_file => () { local tmp_file;
local scs=0;
tmp_file=`${mktemp} -p /tmp lfs_script.XXXXXXXX`;
trap "remove_file ${tmp_file}" SIGINT;
if [ ! -z "${tmp_file}" ] && [ -f "${tmp_file}" ]; then
${echo} ${tmp_file};
else
scs=1;
fi;
trap - SIGINT;
if [ ${scs} -eq 1 ]; then
exit 1;
else
return ${scs};
fi
}
check_owner => () { local var1;
local var2;
local var3;
if [ $# -ne 2 ]; then
message "Usage: check_owner <user> <file/directory>" "check_owner";
return 1;
fi;
var1=`${dirname} ${2}`;
var2=`${echo} ${1} | ${sed} -e 's;${var1};;g'`;
var3=`ls -n ${var1} | ${grep} ${var2} | ${sed} -e 's;^[a-zA-Z0-9-]\+\s\+[a-zA-Z0-9]\+\s\+\(.*$\);\1;g'`;
if [ "${1}" == "${var3}" ]; then
return 0;
else
return 1;
fi
}
batch_program_listing => () { program_selection "Select programs to install (batch mode)" "batch" "Add" $@ || return 1
}
make_title => () { if [ $# -lt 1 ]; then
message "Usage: make_title <type title>..." "make_title";
return 1;
fi;
local c;
local mt_length=${#gen_title};
local ty_length=${#1};
local var1=$(( mt_length + ty_length ));
local max_wd=`stty size | cut -d" " -f2`;
main_title="";
if [ ${var1} -gt ${max_wd} ]; then
main_title="${gen_title}";
return 0;
fi;
var1=$(( max_wd - mt_length - ty_length - 2 ));
local spaces="`${echo} ${var1} | bc`";
main_title="${gen_title}";
for ((c=1; c<=${spaces}; c++ ))
do
main_title="${main_title}+";
done;
main_title="${main_title}${1}";
return 0
}
checksum_program_listing => () { program_selection "Select a program to view/edit checksum" "checksum" "Select" $@ || return 1
}
check_profile_struc => () { if [ $# -ne 1 ]; then
message "Usage: check_profile_structure <profile dir>" "check_profile_struc";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
for h in "batch" "data" "scripts" "doc";
do
[ -d "${1}/${h}" ] || return 1;
done;
return 0
}
select_from_list => () { if [ $# -lt 2 ]; then
message "Usage: select_from_list <title> <list>" "select_from_list";
return 1;
fi;
local command="";
local title_sfl=${1};
height=20;
width=120;
local list_height_sfl=20;
calculate_dimensions;
shift 1;
make_title "List Selection";
command="${dialog} --colors --backtitle \"${main_title}\" --ok-label \"Select\" --no-cancel --radiolist \"${title_sfl}\" ${height} ${width} ${list_height_sfl}";
for z in $@;
do
command="${command} \"${z}\" \"\" off";
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
selection=`${cat} ${global_temp_file1}`;
if [ ${return_val} -eq 1 ] || {
[ ${return_val} -eq 0 ] && [ -z "${selection}" ]
}; then
return 1;
else
return 0;
fi
}
find_file => () { if [ $# -lt 1 ]; then
message "Usage: find_file <file name> [path]" "find_file";
return 1;
fi;
local local_path;
local real_paths="";
if [ -z "${2}" ]; then
local_path=`${echo} ${PATH} | tr ":" " "`;
else
local_path="${2}";
fi;
for i in ${local_path};
do
[ -d "${i}" ] && real_paths="${real_paths} ${i}";
done;
real_paths=`${echo} ${real_paths} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"`;
file_name_path=`${find} ${real_paths} -name "${1}"`;
file_name_path="`${echo} ${file_name_path} | cut -d" " -f1`";
if [ -z "${file_name_path}" ]; then
return 1;
else
return 0;
fi
}
get_dialog => () { if [ $# -ne 1 ]; then
message "Usage: get_dialog <file>" "get_dialog";
return 1;
fi;
if ! check_for_file "${1}"; then
message "Unable to find file used to set the dialog variable." "No-Dialog File Error";
return 1;
fi;
if ${grep} -q "no_dialog" ${1}; then
no_dialog=0;
else
no_dialog=1;
fi;
return 0
}
move_dir => () { if [ $# -ne 2 ]; then
message "Usage: move_dir <dir> <path to new name>" "move_dir";
return 1;
fi;
if [ -d "${1}" ]; then
local dest_dir;
dest_dir="`${echo} ${2} | ${tr} ' ' '_'`";
if ! ${mv} ${1} ${dest_dir} &>/dev/null; then
:;
else
message "Directory renamed to ${dest_dir}." "Move Directory";
fi;
fi;
return 0
}
kill_please_wait => () { `${ps} -p ${please_wait_pid} &> /dev/null` && kill -SIGINT ${please_wait_pid};
return 0
}
PHP Variables
Variable => Value
_SERVER["grep"] => /bin/grep
_SERVER["kill"] => /bin/kill
_SERVER["printf"] => /usr/bin/printf
_SERVER["HZ"] => 100
_SERVER["out_chroot_install_dir"] => /usr/src
_SERVER["basename"] => /usr/bin/basename
_SERVER["sources_dir"] => /home/yp58t/Sources
_SERVER["XORG_CONFIG"] => --prefix=/usr --sysconfdir=/etc --mandir=/usr/share/man --localstatedir=/var
_SERVER["TEST_PHP_SRCDIR"] => /usr/src/php-5.4.1
_SERVER["no_patch_dialog"] => 1
_SERVER["SHELL"] => /bin/bash
_SERVER["chroot_flag"] => 1
_SERVER["batch_sec"] => 21
_SERVER["tail"] => /usr/bin/tail
_SERVER["TERM"] => screen.linux
_SERVER["MAKEFLAGS"] =>
_SERVER["chown"] => /bin/chown
_SERVER["HISTSIZE"] => 1000
_SERVER["SSH_CLIENT"] => deleted
_SERVER["please_wait_pid"] => 31351
_SERVER["install_dir"] => /usr/src
_SERVER["patch"] => /usr/bin/patch
_SERVER["HUSHLOGIN"] => FALSE
_SERVER["no_script_dialog"] => 1
_SERVER["fail_on_shasum"] => 1
_SERVER["SSH_TTY"] => deleted
_SERVER["etc_dir"] => /etc/takenset
_SERVER["return_val"] => 0
_SERVER["prog_src_dir"] => /home/yp58t/Sources/prog
_SERVER["release_dir"] => /usr/src
_SERVER["total_sec"] => 522
_SERVER["reqd_dir"] =>
_SERVER["prog_dir"] => /etc/takenset/blfs/data/php-5.4.1
_SERVER["got_level"] => 0
_SERVER["USER"] => yp58t
_SERVER["batch_file"] => /tmp/lfs_script.eKp3FNW7
_SERVER["xz"] => /usr/bin/xz
_SERVER["LS_COLORS"] => rs=0:di=01;34:ln=01;36:mh=00:pi=40;33:so=01;35:do=01;35:bd=40;33;01:cd=40;33;01:or=40;31;01:su=37;41:sg=30;43:ca=30;41:tw=30;42:ow=34;42:st=37;44:ex=01;32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.lzma=01;31:*.tlz=01;31:*.txz=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.dz=01;31:*.gz=01;31:*.lz=01;31:*.xz=01;31:*.bz2=01;31:*.bz=01;31:*.tbz=01;31:*.tbz2=01;31:*.tz=01;31:*.deb=01;31:*.rpm=01;31:*.jar=01;31:*.war=01;31:*.ear=01;31:*.sar=01;31:*.rar=01;31:*.ace=01;31:*.zoo=01;31:*.cpio=01;31:*.7z=01;31:*.rz=01;31:*.jpg=01;35:*.jpeg=01;35:*.gif=01;35:*.bmp=01;35:*.pbm=01;35:*.pgm=01;35:*.ppm=01;35:*.tga=01;35:*.xbm=01;35:*.xpm=01;35:*.tif=01;35:*.tiff=01;35:*.png=01;35:*.svg=01;35:*.svgz=01;35:*.mng=01;35:*.pcx=01;35:*.mov=01;35:*.mpg=01;35:*.mpeg=01;35:*.m2v=01;35:*.mkv=01;35:*.webm=01;35:*.ogm=01;35:*.mp4=01;35:*.m4v=01;35:*.mp4v=01;35:*.vob=01;35:*.qt=01;35:*.nuv=01;35:*.wmv=01;35:*.asf=01;35:*.rm=01;35:*.rmvb=01;35:*.flc=01;35:*.avi=01;35:*.fli=01;35:*.flv=01;35:*.gl=01;35:*.dl=01;35:*.xcf=01;35:*.xwd=01;35:*.yuv=01;35:*.cgm=01;35:*.emf=01;35:*.axv=01;35:*.anx=01;35:*.ogv=01;35:*.ogx=01;35:*.aac=00;36:*.au=00;36:*.flac=00;36:*.mid=00;36:*.midi=00;36:*.mka=00;36:*.mp3=00;36:*.mpc=00;36:*.ogg=00;36:*.ra=00;36:*.wav=00;36:*.axa=00;36:*.oga=00;36:*.spx=00;36:*.xspf=00;36:
_SERVER["shasum"] => /usr/bin/shasum
_SERVER["global_time_file"] => /tmp/lfs_script.gRls6AQe
_SERVER["batch_hour"] => 0
_SERVER["SSH_AUTH_SOCK"] => deleted
_SERVER["head"] => /bin/head
_SERVER["TERMCAP"] => SC|screen.linux|VT 100/ANSI X3.64 virtual terminal:\
:DO=\E[%dB:LE=\E[%dD:RI=\E[%dC:UP=\E[%dA:bs:bt=\E[Z:\
:cd=\E[J:ce=\E[K:cl=\E[H\E[J:cm=\E[%i%d;%dH:ct=\E[3g:\
:do=^J:nd=\E[C:pt:rc=\E8:rs=\Ec:sc=\E7:st=\EH:up=\EM:\
:le=^H:bl=^G:cr=^M:it#8:ho=\E[H:nw=\EE:ta=^I:is=\E)0:\
:li#64:co#160:am:xn:xv:LP:sr=\EM:al=\E[L:AL=\E[%dL:\
:cs=\E[%i%d;%dr:dl=\E[M:DL=\E[%dM:dc=\E[P:DC=\E[%dP:\
:im=\E[4h:ei=\E[4l:mi:IC=\E[%d@:ks=\E[?1h\E=:\
:ke=\E[?1l\E>:vi=\E[?25l:ve=\E[34h\E[?25h:vs=\E[34l:\
:ti=\E[?1049h:te=\E[?1049l:us=\E[4m:ue=\E[24m:so=\E[3m:\
:se=\E[23m:mb=\E[5m:md=\E[1m:mh=\E[2m:mr=\E[7m:\
:me=\E[m:ms:\
:Co#8:pa#64:AF=\E[3%dm:AB=\E[4%dm:op=\E[39;49m:AX:\
:vb=\Eg:as=\E(0:ae=\E(B:\
:ac=\140\140aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~..--++,,hhII00:\
:k0=\E[10~:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:k5=\E[15~:\
:k6=\E[17~:k7=\E[18~:k8=\E[19~:k9=\E[20~:k;=\E[21~:\
:F1=\E[23~:F2=\E[24~:F3=\E[25~:F4=\E[26~:F5=\E[28~:\
:F6=\E[29~:F7=\E[31~:F8=\E[32~:F9=\E[33~:FA=\E[34~:kb=:\
:K2=\E[G:kB=\E[Z:kh=\E[1~:@1=\E[1~:kH=\E[4~:@7=\E[4~:\
:kN=\E[6~:kP=\E[5~:kI=\E[2~:kD=\E[3~:ku=\EOA:kd=\EOB:\
:kr=\EOC:kl=\EOD:
_SERVER["run_dir"] => /etc/takenset/blfs/data/php-5.4.1/1
_SERVER["run"] => 1
_SERVER["prompt_value"] =>
_SERVER["MAKELEVEL"] => 1
_SERVER["height"] => 35
_SERVER["selection"] =>
_SERVER["MFLAGS"] =>
_SERVER["rm"] => /bin/rm
_SERVER["chmod"] => /bin/chmod
_SERVER["echo"] => /bin/echo
_SERVER["dirname"] => /usr/bin/dirname
_SERVER["batch_dir"] => /etc/takenset/blfs/batch
_SERVER["connect_pid"] => 16438
_SERVER["cat"] => /bin/cat
_SERVER["touch"] => /usr/bin/touch
_SERVER["PATH"] => /usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/X11R6/bin
_SERVER["lib_dir"] => /usr/lib/takenset
_SERVER["MAIL"] => /var/mail/yp58t
_SERVER["tarball_is_local"] => 0
_SERVER["wget"] => /usr/bin/wget
_SERVER["STY"] => 23215.tty1.lfs
_SERVER["_"] => /usr/src/php-5.4.1/sapi/cli/php
_SERVER["mount"] => /bin/mount
_SERVER["check_signature"] => 1
_SERVER["sed"] => /bin/sed
_SERVER["main_title"] => Ta-Kenset - Profile: /etc/takenset/blfs+++++++++++++++++++++++++++++++++++++++++++++++++++++Releasing php-5.4.1.tar.bz2 (Started on April 28, 2012 @ 19:07:37)
_SERVER["sleep"] => /bin/sleep
_SERVER["PWD"] => /usr/src/php-5.4.1
_SERVER["lfs_user"] => yp58t
_SERVER["mv"] => /bin/mv
_SERVER["INPUTRC"] => /etc/inputrc
_SERVER["LIBXCB_ALLOW_SLOPPY_LOCK"] => 1
_SERVER["install_log"] => /etc/takenset/log/log_install
_SERVER["ps"] => /bin/ps
_SERVER["scripts_dir"] => /etc/takenset/blfs/scripts
_SERVER["width"] => 150
_SERVER["LANG"] => en_US
_SERVER["TEST_PHP_EXECUTABLE"] => /usr/src/php-5.4.1/sapi/cli/php
_SERVER["XORG_PREFIX"] => /usr
_SERVER["global_remove_ext_tb"] => 1
_SERVER["mktemp"] => /usr/bin/mktemp
_SERVER["sec"] => 21
_SERVER["profile"] => /etc/takenset/blfs
_SERVER["global_temp_file5"] => /tmp/lfs_script.qH0DiJm4
_SERVER["ping"] => /bin/ping
_SERVER["in_chroot_install_dir"] => /usr/src
_SERVER["mkdir"] => /bin/mkdir
_SERVER["cp"] => /bin/cp
_SERVER["global_temp_file4"] => /tmp/lfs_script.rXVIqxve
_SERVER["return_string"] =>
_SERVER["file_name_path"] => /home/yp58t/Sources/prog/php-5.4.1.tar.bz2
_SERVER["HISTIGNORE"] => &:[bf]g:exit
_SERVER["vi"] => /usr/bin/vi
_SERVER["global_temp_file6"] => /tmp/lfs_script.GJ53mnIW
_SERVER["global_temp_file1"] => /tmp/lfs_script.eseAAyNr
_SERVER["shasum_file"] => /etc/takenset/SHASUM
_SERVER["data_dir"] => /etc/takenset/blfs/data
_SERVER["HOME"] => /home/yp58t
_SERVER["SHLVL"] => 6
_SERVER["batch_flag"] => 1
_SERVER["chroot_dir"] => /mnt/lfs
_SERVER["batch_min"] => 4
_SERVER["tr"] => /usr/bin/tr
_SERVER["global_temp_file3"] => /tmp/lfs_script.9YDLo2Mg
_SERVER["global_temp_file2"] => /tmp/lfs_script.EPaFl0SK
_SERVER["cut"] => /usr/bin/cut
_SERVER["no_dialog"] => 0
_SERVER["dialog"] => /usr/bin/dialog
_SERVER["start_time"] => Started on April 28, 2012 @ 19:07:37
_SERVER["global_list"] =>
_SERVER["success"] => 1
_SERVER["sha_alg"] => 1
_SERVER["hour"] => 0
_SERVER["LOGNAME"] => yp58t
_SERVER["G_FILENAME_ENCODING"] => @locale
_SERVER["screen_fail"] => 0
_SERVER["min"] => 4
_SERVER["WINDOW"] => 2
_SERVER["tarball_base_name"] => php-5.4.1
_SERVER["SSH_CONNECTION"] => deleted
_SERVER["tar"] => /bin/tar
_SERVER["unzip"] => /usr/bin/unzip
_SERVER["PKG_CONFIG_PATH"] => :/usr/X11R6/lib/pkgconfig:/usr/X11R6/lib/pkgconfig
_SERVER["global_no_dialog"] => 0
_SERVER["find"] => /bin/find
_SERVER["run_all_as_root"] => 1
_SERVER["CC"] => cc
_SERVER["gunzip"] => /bin/gunzip
_SERVER["return_val_file"] => /tmp/lfs_script.1PFeK9xp
_SERVER["init_user"] => yp58t
_SERVER["su"] => /bin/su
_SERVER["patch_src_dir"] => /home/yp58t/Sources/patch
_SERVER["gen_title"] => Ta-Kenset - Profile: /etc/takenset/blfs
_SERVER["md5sum"] => /usr/bin/md5sum
_SERVER["prog_list"] => php-5.4.1
_SERVER["clear"] => /usr/bin/clear
_SERVER["times_file"] => /etc/takenset/blfs/prog_times
_SERVER["single_program_listing"] => () { program_selection "Select a program to install" "single" "Select" $@ || return 1
}
_SERVER["check_structure"] => () { if [ $# -ne 1 ]; then
message "Usage: check_structure <path to program directory>" "check_structure";
fi;
local parent_dir=`${dirname} ${1}`;
local bn=`${basename} ${1}`;
local directory;
local file;
for directory in ${1} ${1}/log;
do
if ! check_for_directory ${directory}; then
message "Missing directory: ${directory}" "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
if ! check_for_file ${1}/${file}; then
message "Missing file: ${file}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for j in mstr_conf df purl;
do
if [ ! -f "${parent_dir}/${j}" ]; then
message "Missing file: ${j}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
return 0
}
_SERVER["check_connection"] => () { if `${cat} /tmp/con_status* | ${grep} -q "u" -`; then
return 0;
else
message "Your internet connection is down. Aborting the installation" "Internet Connection Down";
return 1;
fi
}
_SERVER["save_log"] => () { if [ $# -ne 2 ]; then
message "Usage: save_log <prefix> <file to save>" "save_log";
return 1;
fi;
if [ -z "${run_dir}" ] || [ ! -d "${run_dir}" ]; then
message "Run directory for ${tarball_base_name} empty. Logs for ${1} will not be saved." "Log Save Error";
return;
fi;
if ! make_dir "${run_dir}/log"; then
message "There was an error creating the log directory for ${tarball_base_name}!" "Log Directory Creation Error";
return;
fi;
if ! make_file ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
${echo} "Linux From Scratch, version ${profile}, log created on `date`." > ${run_dir}/log/${1};
${echo} "Created by user `whoami` (session initiated by ${init_user})" >> ${run_dir}/log/${1};
${echo} "" >> ${run_dir}/log/${1};
if ! ${cat} ${2} >> ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
return
}
_SERVER["directory_writable"] => () { if [ $# -ne 1 ]; then
message "Usage: directory_writable <directory>" "directory_writable";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
if ${touch} ${1}/test 2> /dev/null; then
remove_file ${1}/test;
return 0;
else
message "Your permissions do not allow you to write to directory '${1}'." "Directory Not Writable";
return 1;
fi
}
_SERVER["remove_run_level"] => () { if [ $# -ne 2 ]; then
message "Usage: remove_run_level <tarball base name> <run level>" "remove_run_level";
return 1;
fi;
local count=0;
local list1="";
local list2="";
local scs=0;
local dir1="" && export dir1;
[ ! -d "${data_dir}/${1}" ] && return 0;
list1="`ls ${data_dir}/${1}`";
for i in ${list1};
do
[ "${i}" == "count" ] && continue;
if are_digits ${i}; then
count=$(( ++count ));
fi;
done;
if [ ${count} -eq 0 ]; then
message "There are no run-levels to display." "No Run-Levels";
return 0;
fi;
while :; do
if [ ${count} -eq 1 ]; then
dir1="${data_dir}/${1}";
if yesno_inquiry "Removal Of Data Directory: ${1}" "There is, at max, one run level for ${1}. Delete the entire data directory?"; then
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No data directory will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
else
dir1="${data_dir}/${1}/${2}";
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${dir1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${error_in_chroot} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No run level will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
break 1;
done;
unset dir1;
return 0
}
_SERVER["remove_dups"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
var1_rd="";
var2_rd="";
global_list="";
for i in $@;
do
var2_rd=0;
var1_rd="`${echo} ${i} | cut -d: -f1`";
for j in ${global_list};
do
if [ "${var1_rd}" == "`${echo} ${j} | cut -d: -f1`" ]; then
var2_rd=1;
break 1;
fi;
done;
[ ${var2_rd} -eq 0 ] && global_list="${global_list} ${i}";
done;
[ -z "${global_list}" ] && return 1;
return 0
}
_SERVER["create_structure"] => () { if [ $# -lt 1 ]; then
message "Usage: create_structure <path to tarball> [run level]" "create_structure";
fi;
run=1;
[ ! -z "${2}" ] && run=${2};
[ -z "${tarball_name}" ] && tarball_name=`${basename} ${1}`;
[ -z "${tarball_base_name}" ] && return 1;
local sub_pid1;
height=15;
width=90;
calculate_dimensions;
${echo} "Creating file structure for ${tarball_base_name}..." > ${global_temp_file1};
make_title "Create Program Structure";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
success=1;
while :; do
for dir in "${tarball_base_name}" "${tarball_base_name}/${run}" "${tarball_base_name}/${run}/log";
do
if ! check_for_directory "${data_dir}/${dir}"; then
if ! make_dir "${data_dir}/${dir}"; then
break 2;
fi;
fi;
done;
${touch} "${data_dir}/${tarball_base_name}/mstr_conf" || break 1;
move ${1} ${prog_src_dir} || break 1;
for file in "df" "tb_name" "purl" "checksum";
do
make_file "${data_dir}/${tarball_base_name}/${file}" || break 2;
[ "${file}" == "tb_name" ] && ${echo} "${tarball_name}" > ${data_dir}/${tarball_base_name}/${file};
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
make_file "${data_dir}/${tarball_base_name}/${run}/${file}" || break 2;
done;
success=0;
${echo} "Successfully created structure for ${tarball_base_name}." >> ${global_temp_file1};
break 1;
done;
if [ ${success} -eq 1 ]; then
${echo} "There was an error creating the structure for ${tarball_base_name}." >> ${global_temp_file1};
fi;
sleep 2;
while file_empty ${global_temp_file2}; do
sleep 1;
done;
sub_pid1=`${cat} ${global_temp_file2}`;
kill_proc ${sub_pid1} || return 1;
return ${success}
}
_SERVER["verify_tarball_url"] => () { if [ $# -ne 1 ]; then
message "Usage: verify_tarball_url <url1>" "verify_tarball_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\|https\)://.*\(bz2\|zip\|gz\|tgz\|zip\|xz\)$"; then
return 0;
else
message "The supplied URL is invalid." "Invalid Program URL";
return 1;
fi
}
_SERVER["compress_log"] => () { [ ! -f "${1}" ] && return;
local file="`${basename} ${1}`";
local dir="`${dirname} ${1}`";
cd ${dir};
[ -f "${file}.tar.bz2" ] && remove_file "${file}.tar.bz2" &>/dev/null;
${tar} -cjf "${file}.tar.bz2" --remove-files ${file} &>/dev/null;
return $?
}
_SERVER["sec_to_time"] => () { if [ $# -ne 1 ]; then
message "Usage: sec_to_time <seconds>" "sec_to_time";
return 1;
fi;
local var1="";
local t_sec=0;
total_sec=${1};
batch_hour=0;
batch_min=0;
batch_sec=0;
total_min=$(${echo} "scale=5; ${total_sec}/60" | bc);
batch_min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${batch_min}" ] && batch_min=0;
t1="`${echo} ${batch_min}*60 | bc`";
batch_sec="$(${echo} ${total_sec}-${t1} | bc)";
if [ ${batch_min} -ge 60 ]; then
batch_hour=`${echo} "scale=5; ${batch_min}/60" | bc`;
batch_hour=`${echo} ${batch_hour} | cut -d"." -f1`;
t1=`${echo} "${batch_hour}*60" | bc`;
batch_min=`${echo} "${batch_min}-${t1}" | bc`;
fi;
return 0
}
_SERVER["chg_dir"] => () { if cd ${1}; then
return 0;
else
message "Unable to change to directory ${1}" "Change Directory";
return 1;
fi
}
_SERVER["check_sig_patch"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_patch <file list>" "check_sig_patch";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
tb_name="`${echo} ${line} | ${cut} -d: -f1`";
run="`${echo} ${line} | ${cut} -d: -f2`";
file_empty ${data_dir}/${tb_name}/${run}/patch_list && continue;
if [ ${flag} -eq 0 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Patch" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
flag=$(( ++flag ));
fi;
for base_name in `${cat} ${data_dir}/${tb_name}/${run}/patch_list`;
do
`${echo} ${base_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
if ! find_file ${base_name} ${patch_src_dir}; then
${echo} "Unable to find patch, ${base_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 2;
fi;
${echo} "Checking signature for patch ${base_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${grep} -m1 ${base_name} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 3;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
${echo} "MD5: signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
break 1;
done;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
_SERVER["release_tarball"] => () { if [ $# -lt 3 ]; then
message "Usage: release_tarball <path to tarball source> <install dir> <removal flag> [append commands]" "release_tarball";
return 1;
fi;
local sub_pid1;
local command;
local scs=1;
local location="${2}/${tarball_base_name}";
export location;
return_val=0;
if [ -d "${location}" ]; then
remove_dir ${location};
if [ $? -ne 0 ]; then
if yesno_inquiry "Base-Directory Deletion" "Would you like to escalate your privileges and remove the base-directory '${tarball_base_name}'?"; then
while true; do
${clear};
${echo} -e "*** Enter root password to proceed with directory removal ***\n";
${su} -c '(
remove_dir ${location} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
message "Removal of the directory, ${tarball_base_name}, was unsuccessful. Aborting install." "Directory Removal Error";
return 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
ontinue;
else
message "Privilege escalation was necessary to delete directory ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
else
scs=0;
fi;
fi;
break 1;
done;
else
message "You elected not to delete the base-directory for ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
fi;
fi;
if `${echo} ${1} | ${grep} -q "^.*\.tar\.bz2$"`; then
command="${tar} --directory=${2} -xvjf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.gz$" -e "^.*\.tgz$"`; then
command="${tar} --directory=${2} -xvzf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.lzma$"`; then
command="${tar} --directory=${2} --lzma -xvf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q "^.*\.tar\.xz$"`; then
xz_file="`${basename} ${1}`";
tar_file="`${echo} ${xz_file} | ${sed} -e 's;\.xz;;g'`";
command="copy ${1} ${2} && cd ${2} && ${xz} -d ${xz_file} && tar -xvf ${tar_file} && remove_file ${tar_file}";
unset xz_file tar_file;
else
if `${echo} ${1} | ${grep} -q "^.*\.zip$"`; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
command="${unzip} -d ${2} ${1}";
else
command="${unzip} -d ${2}/${tarball_base_name} ${1}";
fi;
else
message "Unable determine how to uncompress package, ${1}" "Uncompress Failure";
return 1;
fi;
fi;
fi;
fi;
fi;
height=35;
width=150;
calculate_dimensions;
eval ${command} > ${global_temp_file1} 2>&1 & sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "Releasing ${tarball_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Releasing ${tarball_name} ($start_time)";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Unpacking ${tarball_base_name} into \Z1${2}\Zn... - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
kill_proc `${cat} ${global_temp_file2}`;
${sleep} 1;
if [ ${return_val} -ne 0 ]; then
message "Error uncompressing ${tarball_base_name}" "Uncompress Failure";
return 1;
fi;
return 0
}
_SERVER["check_remote_file_exists"] => () { if [ $# -ne 1 ]; then
message "check_remote_file_exists <url>" "check_remote_file_exists";
return 1;
fi;
local pid1;
check_connection || return 1;
${wget} -v --tries 2 --timeout=40 --spider ${1} &>${global_temp_file3} & pid1=$!;
wait ${pid1};
return_val=$?;
[ ${return_val} -ne 0 ] && return 1;
${grep} -iq -e "No such file" -e "unable to resolve" -e "HTTP_NOT_FOUND" -e "Invalid PORT" -e "Remote file does not exist" -e "not retrieving" ${global_temp_file3};
return_val=$?;
[ ${return_val} -eq 0 ] && return 1;
return 0
}
_SERVER["chg_file_owner"] => () { if [ $# -ne 2 ]; then
message "Usage: chg_file_owner <new owner> <file>" "chg_file_owner";
return 1;
fi;
if ! ${chown} "${1}:${1}" "${2}"; then
message "There was an error changing ownership of file ${2} to ${1}." "Message";
fi
}
_SERVER["display_batch_list"] => () { if [ $# -eq 0 ]; then
make_title "Batch List Display";
${dialog} --backtitle "${main_title}" --colors --infobox "\Z1Batch list is empty.\Zn" 8 60 1>&0;
sleep 2;
return 0;
fi;
local command;
local file2_dbl;
local description_dbl;
local count=0;
height=20;
width=130;
calculate_dimensions;
make_title "Batch List Display";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"Remove\" --cancel-label \"Prev\" --extra-button --extra-label \"Clear\" --menu \"Current batch list\" ${height} ${width} ${height} ";
for i in $@;
do
count=$(( ++count ));
if `${echo} ${i} | ${grep} -iq "script:"`; then
file2_dbl="`${echo} ${i} | cut -d: -f2 | ${sed} -e 's;^\s+;;g'`";
description_dbl="`${cat} ${file2_dbl} | ${grep} -i "^#Desc:.*" | ${sed} -e 's;^#Desc:;;g'`";
[ -z "${description_dbl}" ] && description_dbl="No description";
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. `${basename} ${i}`\" \"SCRIPT: ${description_dbl}\" ";
else
file2_dbl="${data_dir}/${i}/df";
if ! file_empty ${file2_dbl}; then
description_dbl=`${cat} ${file2_dbl}`;
else
description_dbl="No description";
fi;
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. ${i}\" \"${description_dbl}\" ";
fi;
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return $?
}
_SERVER["main_window"] => () { height=35;
width=100;
calculate_dimensions;
make_title "Main Selection Window";
command="${dialog} --backtitle \"${main_title}\" --cancel-label \"Exit\" ";
command="${command} --menu \"What would you like to do?\n\" ${height} ${width} 50 \"Install\" \"Configure & Install A Program\" ";
command="${command} \"Check Config\" \"Review Program Configuration\" ";
command="${command} \"Get Program\" \"Download New Program & Create Directory Structure\" ";
command="${command} \"Create Batch\" \"Create A Batch File\" ";
command="${command} \"Edit Batch\" \"Edit A Batch File\" ";
command="${command} \"Run Batch\" \"Load An Existing Batch File\" ";
command="${command} \"Edit MD5/SHA Checksum\" \"Edit File Signatures\" ";
if [ -f "${profile}/requisites" ]; then
command="${command} \"Version Check\" \"Host System Program Requirement Versions\" ";
fi;
command="${command} \"Variables\" \"View & Set Variables\" ";
command="${command} \"Scripts\" \"Run & Edit Scripts\" ";
command="${command} \"Shell\" \"Run shell\"";
command="${command} \"About\" \"\"";
eval ${command} 2> ${global_temp_file5};
return $?
}
_SERVER["script_options"] => () { if [ $# -ne 1 ]; then
message "Usage: script_options <file>" "script_options";
return 1;
fi;
local command;
selection="";
height=20;
width=120;
calculate_dimensions;
make_title "Options";
get_time "`${basename} ${1}`" "-";
command="${dialog} --backtitle \"${main_title}\" --title \"File '${1}' Options (Run Time: ${hour}h ${min}m ${sec}s)\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Execute\" \"\" off";
command="${command} \"Modify\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"Move File\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
_SERVER["copy"] => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
if [ -d "${1}" ]; then
${cp} -r "${1}" "${2}";
else
if [ -f "${1}" ]; then
${cp} "${1}" "${2}";
fi;
fi;
if [ $? -eq 1 ]; then
message "Unable to copy ${1} to ${2}." "Copy Error";
return 1;
fi;
return 0
}
_SERVER["retrieve_pkg"] => () { if [ $# -ne 2 ]; then
message "Usage: retrieve_pkg <url> <install dir>" "retrieve_pkg";
return 1;
fi;
height=20;
width=135;
calculate_dimensions;
local sub_pid1;
clear_global_files;
${echo} "Retrieving file ${1}..." > ${global_temp_file3};
${echo} "" >> ${global_temp_file3};
make_title "Retrieving ${1}";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Retrieval Of ${1}" --no-kill --tailboxbg "${global_temp_file3}" ${height} ${width} 2> ${global_temp_file4};
while file_empty ${global_temp_file4}; do
${sleep} 1;
done;
fi;
${wget} -v --timeout=30 --directory-prefix=${2} -o /dev/null ${1} & sub_pid1=$!;
wait ${sub_pid1};
return_val=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file4}`;
if [ ${return_val} -ne 0 ]; then
message "Failed to download `${basename} ${1}` at ${1}" "Download Failure";
fi;
return 0
}
_SERVER["get_time"] => () { if [ $# -ne 2 ]; then
message "Usage: get_time <search-for name> <run level or '-' for script>" "get_time";
return 1;
fi;
local t1=0;
local total_min=0;
local t_sec=0;
local line;
hour=0;
min=0;
sec=0;
[ ! -f "${times_file}" ] && return 0;
if [ "${2}" == "-" ]; then
line=`${grep} "^${1}:-.*" ${times_file}`;
else
if [ "${2}" != "-" ]; then
line=`${grep} "^${1}:${2}.*" ${times_file}`;
else
return;
fi;
fi;
[ -z "${line}" ] && return 0;
t_sec="`${echo} ${line} | cut -d: -f3`";
total_sec=$(( total_sec + t_sec ));
[ ${total_sec} -eq 0 ] && return;
total_min=$(${echo} "scale=5; ${t_sec}/60" | bc);
min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${min}" ] && min=0;
t1="`${echo} ${min}*60 | bc`";
sec="$(${echo} ${t_sec}-${t1} | bc)";
if [ ${min} -ge 60 ]; then
hour=`${echo} "scale=5; ${min}/60" | bc`;
hour=`${echo} ${hour} | cut -d"." -f1`;
t1=`${echo} "${hour}*60" | bc`;
min=`${echo} "${min}-${t1}" | bc`;
fi;
return
}
_SERVER["global_script_run_root"] => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run_root <path to script> <title>" "global_script_run_root";
return 1;
fi;
local scs=0;
local return_val=0;
export path=${1};
export title=${2};
if ! root; then
while :; do
${clear};
${echo} "*** Enter root password to proceed with installation of ${title} ***";
${su} -c '(
global_script_run "${path}" "${title}" || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
if ! global_script_run "${path}" "${title}"; then
return_val=1;
fi;
fi;
export -n path title error_in_chroot;
return ${return_val}
}
_SERVER["yesno_inquiry"] => () { if [ $# -ne 2 ]; then
message "Usage: yesno_inquiry <title> <prompt>" "yesno_inquiry";
return 1;
fi;
make_title "Inquiry";
${dialog} --backtitle "${main_title}" --colors --title "${1}" --yesno "${2}" 15 100;
[ $? -eq 1 ] && return 1;
return 0
}
_SERVER["global_script_run"] => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run <path to script> <title>" "global_script_run";
return 1;
fi;
declare -i j=0;
local var1;
local sub_pid1;
local sub_pid2;
local env_cmd="";
var1=${2};
check_for_directory "${release_dir}/${tarball_base_name}" || return 1;
make_executable_file ${global_temp_file2} || return 1;
if `${grep} -q "#build" ${prog_dir}/mstr_conf`; then
if ! check_for_directory "${release_dir}/${tarball_base_name}/build"; then
make_dir "${release_dir}/${tarball_base_name}/build" || return 1;
fi;
${echo} -e "cd ${install_dir}/${tarball_base_name}/build\n" > ${global_temp_file2};
else
${echo} -e "cd ${install_dir}/${tarball_base_name}\n" > ${global_temp_file2};
fi;
${cat} ${1} >> ${global_temp_file2};
height=35;
width=150;
calculate_dimensions;
if `${grep} -m1 -q "^#pre_lfs" ${run_dir}/conf`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
${clear};
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
else
${clear};
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
fi;
kill ${tail_pid};
else
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} | tee ${global_temp_file1} &
else
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} &
fi;
else
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${global_temp_file2} | tee ${global_temp_file1} &
else
${global_temp_file2} &>${global_temp_file1} &
fi;
fi;
sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "${var1} Of ${tarball_base_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "${var1} Of ${tarball_base_name} (${start_time})";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Run level ${run} - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file3};
while file_empty ${global_temp_file3}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
${sleep} 2;
return_val=$?;
kill_proc `${cat} ${global_temp_file3}`;
fi;
if [ ${return_val} -eq 0 ]; then
${sleep} 2;
else
${sleep} 3;
fi;
${rm} -f ${chroot_dir}/tmp/lfs* &>/dev/null;
if [ ${return_val} -ne 0 ]; then
return 1;
else
return 0;
fi
}
_SERVER["are_digits"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
if `${echo} ${1} | ${grep} -q -e "\." -e "[^0-9]"`; then
return 1;
else
return 0;
fi
}
_SERVER["calculate_dimensions"] => () { local value;
local max_ht=0;
local max_wd=0;
value=`stty size`;
max_ht=`${echo} ${value} | cut -d" " -f1`;
max_wd=`${echo} ${value} | cut -d" " -f2`;
max_ht=$(( max_ht - 10 ));
max_wd=$(( max_wd - 10 ));
[ ${height} -le ${max_ht} ] || height=${max_ht};
[ ${width} -le ${max_wd} ] || width=${max_wd};
return 0
}
_SERVER["check_sig_rpkg"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_rpkg <file list>" "check_sig_rpkg";
return 1;
fi;
clear_global_files;
local prog;
local run;
local rp_name;
local sig1;
local sig2;
local list;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
run="`${echo} ${line} | ${cut} -d: -f2`";
prog="`${echo} ${line} | ${cut} -d: -f1`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Required Tarballs For ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
list="`${cat} ${data_dir}/${prog}/${run}/rpkg`";
for rp_name in ${list};
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
if ! find_file ${rp_name} ${prog_src_dir}; then
${echo} "Unable to find required package ${rp_name}..." > ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Checking ${rp_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} -m1 ${rp_name} ${data_dir}/${prog}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${rp_name}\" ${data_dir}/${prog}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
${echo} "MD5: signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
${sleep} 2;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
flag=0;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
[ ${error} -eq 0 ] && break 1;
done;
${sleep} 1;
[ ${error} -eq 0 ] && return 1;
return 0
}
_SERVER["get_tarball_base_from_tb"] => () { if [ $# -gt 2 ]; then
message "Usage: get_tarball_base_from_tb <path to tarball> [remove tmp file]" "get_tarball_base_from_tb";
return 1;
fi;
rm_file=${2:-0};
local sub_pid1;
if [ ! -e "${1}" ]; then
message "Unable to find tarball `${basename} ${1}`." "Tarball Find Failure";
return 1;
fi;
local scs=0;
while :; do
if ${echo} "${1}" | ${grep} -q -e "^.*xz$"; then
bn="`${basename} ${1}`";
bu="${bn}.bk";
[ ! -f "/tmp/${bn}" ] && copy ${1} /tmp;
copy "${1}" "/tmp/${bu}";
${xz} -d "/tmp/${bn}";
bn="`${echo} ${bn} | ${sed} -e 's;\.xz$;;g'`";
${tar} -t -f /tmp/${bn} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
remove_file "/tmp/${bn}";
if [ ${rm_file} -eq 0 ]; then
remove_file "/tmp/${bu}" || return 1;
else
move "/tmp/${bu}" "/tmp/${bn}.xz" || return 1;
fi;
else
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
${unzip} -l ${1} &>${global_temp_file1};
else
${tar} -t -f ${1} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
fi;
fi;
if `file_empty ${global_temp_file1}`; then
message "Unable to get tarball base name from temporary file for `${basename} ${1}`." "Tarball Base Name Retrieval";
scs=1;
break 1;
fi;
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
tarball_base_name="`${echo} ${temp_name} | ${sed} -e 's;\(^.*\)\/;\1;g'`";
else
tarball_base_name="`${basename} ${1} | ${sed} -e 's;\(^.*\)\.zip;\1;g'`";
fi;
else
tarball_base_name=`${grep} -m1 "\(^[^/]\+\)\/.*$" ${global_temp_file1} | ${sed} -e 's;\(^[^/]\+\)\/.*$;\1;g'`;
fi;
tarball_base_name="`${echo} ${tarball_base_name} | tr ' ' '_'`";
break 1;
done;
return ${scs}
}
_SERVER["batch_program_and_script_screen"] => () { if [ $# -lt 1 ]; then
message "Usage: batch_program_and_script_screen <prog_list>" "batch_program_and_script_screen";
return 1;
fi;
prog_list="";
old_prog_list="";
local count_bp=0;
local selection_bpss;
while :; do
height=10;
width=65;
calculate_dimensions;
make_title "Batch Script Selection";
${dialog} --backtitle "${main_title}" --no-cancel --radiolist "Select either programs or scripts to add to the batch list" ${height} ${width} ${height} "Add program(s)" "" off "Add script(s)" "" off "View Current List" "" off 2> ${global_temp_file4};
return_val=$?;
selection_bpss="`${cat} ${global_temp_file4}`";
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && [ -z "${selection_bpss}" ] && return 0;
case ${selection_bpss} in
"Add program(s)")
while :; do
please_wait;
old_prog_list=${prog_list};
batch_program_listing $@;
return_val=$?;
if [ ! -z "${prog_list}" ]; then
prog_list="${old_prog_list} ${prog_list}";
else
prog_list="${old_prog_list}";
fi;
kill_please_wait;
[ $return_val -eq 1 ] && break 1;
done
;;
"Add script(s)")
local y;
local directory_bpss="";
local scripts_bpss="";
local script_bpss="";
y=`ls ${scripts_dir}`;
if [ ! -z "$y" ]; then
while :; do
select_from_list "Select a script directory" `ls ${scripts_dir}` || break 1;
directory_bpss=${selection};
scripts_bpss=`ls ${scripts_dir}/${directory_bpss}`;
if [ -z "${scripts_bpss}" ]; then
message "No scripts to select!" "No Scripts Found";
continue;
fi;
select_from_list "Select a script" ${scripts_bpss} || continue;
script_bpss=${selection};
[ -z "${script_bpss}" ] && continue;
${echo} "script:${scripts_dir}/${directory_bpss}/${script_bpss}" >> ${batch_file};
prog_list="${prog_list} script:${scripts_dir}/${directory_bpss}/${script_bpss}";
break 1;
done;
else
message "No script directories to select!" "No Script Directories Found";
fi;
unset y
;;
"View Current List")
display_batch_list ${prog_list};
case $? in
0)
if [ ! -z "${prog_list}" ]; then
remove_prog=`${cat} ${global_temp_file1}`;
[ -z "remove_prog" ] && continue;
line_no=${remove_prog:0:1};
remove_prog=`${echo} ${remove_prog} | cut -d" " -f2`;
if yesno_inquiry "Confirm Removal" "Are you sure that you want to remove the entry '${remove_prog}'?"; then
old_prog_list=${prog_list};
prog_list="";
count_bp=1;
for j in ${old_prog_list};
do
[ $(( count_bp++ )) -eq ${line_no} ] && continue;
prog_list="${prog_list} ${j}";
done;
if [ -f "${batch_file}" ]; then
eval ${sed} -i "${line_no}d" ${batch_file};
else
message "Unable to locate the batch file!" "Batch File Error";
return 1;
fi;
fi;
unset remove_prog old_prog_list;
fi
;;
3)
if yesno_inquiry "Confirm Clearing Of List" "Are you sure that you want to clear the batch list?"; then
prog_list="";
clear_file "${global_temp_file1}" || return 1;
clear_file "${batch_file}" || return 1;
fi
;;
esac
;;
esac;
done
}
_SERVER["download_prog"] => () { if [ $# -lt 1 ]; then
message "Usage: download_prog <program list>" "download_prog ";
fi;
clear_global_files;
local prog="";
local run="";
local scs;
local found;
local list1="";
local list2="";
local command="";
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
scs=1;
found=1;
tarball_name="";
run="`${echo} ${z} | ${cut} -d: -f2`";
prog="`${echo} ${z} | ${cut} -d: -f1`";
if ! file_empty ${data_dir}/${prog}/tb_name; then
tarball_name=`${cat} ${data_dir}/${prog}/tb_name`;
if [ ! -z "${tarball_name}" ]; then
tarball_in_string ${tarball_name};
scs=0;
fi;
fi;
if [ ${scs} -eq 1 ]; then
list1="`${grep} ${prog} ${shasum_file}`";
z=0;
for i in ${list1};
do
if `${echo} ${i} | ${grep} -q "${prog}\.\(tar\|tzg\|zip\|xz\|lzma\).*"`; then
list2="${list2} ${i}";
else
continue;
fi;
z=$(( ++z ));
done;
if [ ${z} -gt 1 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Choose A Tarball For Installation";
command="${dialog} --backtitle \"${main_title}\" --menu \"Select the tarball to use\" ${height} ${width} ${height}";
z=1;
for i in ${list};
do
command="${command} \"${z}. ${i}\" \"\"";
z=$(( ++z ));
done;
eval ${command} 2> ${global_temp_file1};
tarball_name="`${cat} ${global_temp_file1} | ${cut} -d\" \" -f2`";
else
tarball_name="${list2}";
fi;
unset z;
if [ ! -z "${tarball_name}" ]; then
[ ! -f "${data_dir}/${prog}/tb_name" ] && ${touch} "${data_dir}/${prog}/tb_name";
${echo} "${tarball_name}" > "${data_dir}/${prog}/tb_name";
fi;
fi;
if [ -z "${tarball_name}" ]; then
message "Unable to set tarball name for ${prog}." "Unable To Set Tarball Name";
return 1;
fi;
tarball_name="`trim_spaces ${tarball_name}`";
if find_file ${tarball_name} ${prog_src_dir}; then
path="${file_name_path}";
[ ! -z "${path}" ] && found=0;
fi;
if [ ${found} -eq 1 ]; then
if ! file_empty "${profile}/mstr_urls"; then
scs=1;
height=20;
width=120;
list1="";
calculate_dimensions;
check_connection || return 1;
${echo} "Searching for ${tarball_name}..." > ${global_temp_file1};
make_title "Tarball Search For ${tarball_name}";
${dialog} --backtitle "${main_title}" --title "Tarball Search For ${tarball_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;\(^.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
for line in ${list1};
do
`${echo} ${line} | ${grep} -iq -e "^#.*$" -e "^$" -` && continue;
url="`${echo} ${line}/${tarball_name}`";
if verify_tarball_url "${url}"; then
${echo} "Searching at ${line}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Found at ${url}..." >> ${global_temp_file1};
${sleep} 2;
found=0;
${echo} "${line}" > "${data_dir}/${prog}/purl";
break 1;
fi;
fi;
done;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
else
scs=0;
fi;
if [ ${scs} -eq 1 ] && [ ${found} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${line}/${tarball_name}" /tmp; then
message "Unable to download ${name} from ${line}" "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
while :; do
prompt_for_value "Program URL" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${tarball_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
return 1;
fi;
fi;
break 1;
done;
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
if check_remote_file_exists "${prompt_value}"; then
located=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
tarball_name=`${basename} ${prompt_value}`;
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && ${echo} "${url_dir}" >> ${profile}/mstr_urls;
${echo} "${url_dir}" > "${data_dir}/${prog}/purl";
fi;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
if [ ${located} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${prompt_value}" /tmp; then
message "Unable to download ${tarball_name} from ${url_dir}." "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
fi;
done;
return 0
}
_SERVER["log_viewer"] => () { if [ $# -ne 2 ]; then
message "Usage: log_viewer <tarball base name> <run level>" "log_viewer";
return 1;
fi;
local scs=0;
while :; do
[ ! -d "${data_dir}/${1}/${2}/log" ] && message "Unable to find log directory for ${1}." "No Log Directory" && return 1;
local list1="`ls ${data_dir}/${1}/${2}/log`";
if [ -z "${list1}" ]; then
message "There are no log files to view for ${1} (run level ${2})." "No Log Files";
break 1;
fi;
local command="";
make_title "Log File Viewer";
command="${dialog} --colors --backtitle \"${main_title}\" --title \"${1} - run level: ${run}\" --cancel-label \"Prev\" --radiolist \"Log files for ${1}\" 20 90 20";
for i in ${list1};
do
command="${command} \"${i}\" \"\" \"off\"";
done;
eval ${command} 2> ${global_temp_file2};
return_val=$?;
if [ ${return_val} -ne 0 ] || file_empty ${global_temp_file2}; then
break 1;
else
local file="`${cat} ${global_temp_file2}`";
local file2="";
[ -z "${file}" ] && return 1;
if ! check_for_file "${data_dir}/${1}/${2}/log/${file}"; then
message "Unable to find log file '${file}'." "Log File Not Found";
scs=1;
break 1;
fi;
if `${echo} $file | ${grep} -q ".*bz2$"`; then
file2="`${echo} $file | ${sed} -e 's;\.tar\.bz2;;g' -e 's;\.old;;g'`";
${tar} -C /tmp -xjf "${data_dir}/${1}/${2}/log/${file}";
else
message "Unknown extension; unable to extract log data for ${1}." "Extraction Error";
scs=1;
break 1;
fi;
if [ ! -f "/tmp/${file2}" ]; then
message "Failed to locate the uncompressed log file in the tmp directory." "Log File Not Found";
scs=1;
break 1;
else
if ! edit_file "/tmp/${file2}" "1"; then
message "There was an error editing the file, '${file}', for ${1}." "File Edit Error";
fi;
fi;
remove_file "/tmp/${file2}";
fi;
done;
return ${scs}
}
_SERVER["file_empty"] => () { if [ $# -ne 1 ]; then
message "Usage: file_empty <path to file>" "file_empty";
return 1;
fi;
local var1;
[ ! -e "${1}" ] && return 0;
var1=`${cat} ${1}`;
[ -z "${var1}" ] && return 0;
unset var1;
return 1
}
_SERVER["update_time"] => () { if [ $# -ne 3 ]; then
message "Usage: update_time <tarball base name or script name> <run level (or - for script)> <new_time>" "update_time";
return 1;
fi;
local sec=${3};
[ ! -f "${times_file}" ] && ${touch} ${times_file};
sec=$(( sec + 0 ));
if [ "${2}" == "-" ]; then
if `${grep} -q ${1}:-:* ${times_file}`; then
${sed} -i -e "s;^${1}:-:.*$;${1}:-:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:-:${sec}" >> ${times_file} || return 1;
fi;
else
if `${grep} -q ${1}:${2}:* ${times_file}`; then
${sed} -i -e "s;^${1}:${2}:.*$;${1}:${2}:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:${2}:${sec}" >> ${times_file} || return 1;
fi;
fi;
return 0
}
_SERVER["get_run_level"] => () { if [ $# -ne 1 ]; then
message "Usage: get_run_level <program name>" "get_run_level";
return 1;
fi;
local var1_grl=${1};
local list1_grl="";
local list2_grl="";
local command="";
local count=0;
local desc="";
list1_grl=`ls ${data_dir}/${var1_grl}`;
for i in ${list1_grl};
do
[ "${i}" == "list1_grl" ] && continue;
! are_digits "${i}" && continue;
list2_grl="${list2_grl} ${i}" && count=$(( ++count ));
done;
[ -z "${list2_grl}" ] && return 1;
if [ ${count} -le 1 ]; then
run=1;
return 0;
else
while :; do
height=20;
width=120;
calculate_dimensions;
command="${dialog} --backtitle \"${gen_title}\" --no-cancel --ok-label \"Submit\" --title \"Multiple run levels found for ${var1_grl}\" --radiolist \"Select a run level\" ${height} ${width} 20 ";
for i in ${list2_grl};
do
desc="`${grep} '^#Desc:.*$' ${data_dir}/${var1_grl}/${i}/conf`";
if [ ! -z "${desc}" ]; then
desc="`${echo} ${desc} | ${sed} -e 's;^#Desc:\ *\(.*$\);\1;g'`";
else
desc="No Description Found";
fi;
desc="${desc:0:255}";
command="${command} \"${i}\" \"${desc}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && file_empty ${global_temp_file1} && break 1;
if ! file_empty ${global_temp_file1}; then
run=`${cat} ${global_temp_file1}`;
break 1;
fi;
done;
[ -z "${run}" ] && run=1;
return 0;
fi
}
_SERVER["add_addl_run_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: add_addl_run_dir <program base name>" "add_addl_run_dir";
fi;
yesno_inquiry "Add Run Directory" "You chose to add an additional run-level. Is this correct?" || return 1;
local success=1;
local make_copy=0;
local next=0;
current=0 && export current;
highest_run_level ${1} || return 1;
next=$((current+1));
if yesno_inquiry "Copy Directory" "Would you like to copy the most recent run level (${current}) to the new run level (${next})?"; then
make_copy=0;
else
make_copy=1;
fi;
height=20;
width=120;
calculate_dimensions;
case ${make_copy} in
"0")
${echo} "Copying file structure for ${tarball_base_name}..." > ${global_temp_file1}
;;
"1")
${echo} "Creating file structure for ${tarball_base_name}, run-level ${next}..." > ${global_temp_file1}
;;
esac;
${echo} "" >> ${global_temp_file1};
make_title "Additional Run Level";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
case ${make_copy} in
"0")
if ! copy "${prog_dir}/${current}" "${prog_dir}/${next}"; then
${echo} "An error occurred copying data to the new run level!" >> ${global_temp_file1};
else
${echo} "Copied run level ${current} to new run level ${next} for ${1}..." >> ${global_temp_file1};
success=0;
fi
;;
"1")
while :; do
for dir in "${prog_dir}/${next}" "${prog_dir}/${next}/ef" "${prog_dir}/${next}/log";
do
if ! check_for_directory "${dir}"; then
make_dir "${dir}" || break 2;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "ip" "mf" "mi" "make_check_test" "pf" "rpkg" "patch_list" "conf";
do
make_file "${prog_dir}/${next}/${file}" || break 2;
done;
success=0;
break 1;
done;
if [ ${success} -eq 0 ]; then
${echo} "Creation of run-level ${next} for ${tarball_base_name} successful..." >> ${global_temp_file1};
else
if [ ${success} -eq 1 ]; then
${echo} "An error occurred in the creation of run-level ${next} for ${tarball_base_name}!" >> ${global_temp_file1};
fi;
fi
;;
esac;
${sleep} 3;
kill_proc `${cat} ${global_temp_file2}` || exit 1;
export -n current;
return ${success}
}
_SERVER["check_for_file"] => () { if [ $# -ne 1 ]; then
message "Usage: check_for_file <file path>" "check_for_file";
return 1;
fi;
[ ! -f "${1}" ] && return 1;
return 0
}
_SERVER["create_directory_listing"] => () { if [ $# -ne 1 ]; then
message "Usage: create_program_list <directory>" "create_program_list";
return 1;
else
if [ ! -d "${1}" ]; then
message "Argument ${1} is not a directory." "create_program_list";
return 1;
fi;
fi;
prog_list="";
for i in `ls ${1}`;
do
[ -z "${i}" ] && break 1;
[ ! -d "${1}/${i}" ] && continue;
prog_list="${prog_list} ${i}";
done;
if [ -z "${prog_list}" ]; then
message "Empty program listing!" "Directory Listing Creation";
return 1;
else
return 0;
fi
}
_SERVER["trim_spaces"] => () { if [ $# -lt 1 ]; then
message "Usage: trim_spaces <string(s)>" "trim_space";
return 1;
fi;
${echo} ${1} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"
}
_SERVER["make_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: make_dir <path>" "make_dir";
return 1;
fi;
[ -d "${1}" ] && return 0;
if ! ${mkdir} -p ${1} &>/dev/null; then
message "Unable to make directory ${1}" "Make directory";
return 1;
fi;
if ! eval ${chmod} 775 ${1} || ! eval ${chmod} ug+s ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
return 0
}
_SERVER["download_patch"] => () { if [ $# -lt 1 ]; then
message "Usage: download_patch <program list>" "download_patch";
return 1;
fi;
clear_global_files;
local prog;
local run;
local list1="";
local list2="";
local found;
local patch_name;
for line in $@;
do
`${echo} ${line} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
error=0;
prog="`${echo} ${line} | cut -d: -f1`";
run="`${echo} ${line} | cut -d: -f2`";
file_empty "${data_dir}/${prog}/${run}/patch_list" && continue;
height=20;
width=120;
calculate_dimensions;
make_title "Patch Search For ${prog}";
IFS=$(${echo} -e "\n\r");
for patch_name in `${cat} ${data_dir}/${prog}/${run}/patch_list`;
do
`${echo} ${patch_name} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
found=1;
scs=1;
unset IFS;
find_file ${patch_name} ${patch_src_dir} && continue;
IFS=$(${echo} -e "\n\r");
${dialog} --backtitle "${main_title}" --title "Patch Search - ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
${echo} "Searching for patch, ${patch_name}..." > ${global_temp_file1};
${echo} "" >> ${global_temp_file1};
! file_empty "${data_dir}/${prog}/purl" && list1="`head -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
for h in `${cat} "${profile}/mstr_urls"`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
`${echo} ${url} | ${grep} -iq -e '^#.*' -e '^$' -` && continue;
${echo} "Searching at ${url}..." >> ${global_temp_file1};
url="${url}/${patch_name}";
url="${url:0:255}";
! verify_url ${url} && continue;
if ! check_connection; then
${echo} "Network connection failed...please check." >> ${global_temp_file1};
error=1;
break 1;
fi;
check_remote_file_exists ${url};
rt=$?;
if [ ${rt} -eq 0 ]; then
${echo} "" >> ${global_temp_file1};
${echo} "Patch ${patch_name} found at ${url}." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
[ ${error} -eq 1 ] && break 1;
clear_global_files;
if [ ${found} -ne 0 ]; then
while :; do
if ! prompt_for_value "Patch URL" "Enter URL for patch '${patch_name}'" "URL"; then
return 1;
fi;
if [ -z "${prompt_value}" ]; then
if yesno_inquiry "Try Again?" "No URL was entered. Would you like to try again?"; then
continue;
else
error=1;
break 3;
fi;
fi;
break 1;
done;
if ! verify_url ${prompt_value}; then
message "Unable to verify URL for patch, ${patch_name}." "Failed URL Verification";
error=1;
break 2;
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=0;
break 2;
fi;
clear_global_files;
if ! check_remote_file_exists ${prompt_value}; then
message "Patch, ${patch_name}, does not exist at the supplied URL, ${url}...exiting." "Remote File Non-Existent";
error=1;
break 2;
fi;
url="${prompt_value:0:255}";
fi;
if ! ${grep} -iq "`${dirname} ${url}`" "${profile}/mstr_urls"; then
${echo} "`${dirname} ${url}`" >> "${profile}/mstr_urls";
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=1;
break 2;
fi;
clear_global_files;
if ! retrieve_pkg ${url} /tmp; then
message "Unable to retrieve required tarball, ${patch_name}." "Patch Tarball Retrieval Error";
error=1;
break 2;
fi;
if [ ! -f "/tmp/${patch_name}" ]; then
message "Unable to find the patch, ${patch_name}, in the /tmp directory.";
error=1;
break 1;
fi;
if ! move "/tmp/${patch_name}" "${patch_src_dir}"; then
message "There was an error moving patch ${patch_name} to the source directory." "File Move Error";
error=1;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 1 ] && break 1;
done;
return ${error}
}
_SERVER["make_file"] => () { if [ $# -ne 1 ]; then
message "Usage: make_file <file path>" "make_file";
return 1;
fi;
check_for_file "${1}" && return 0;
err=1;
while :; do
if ! ${touch} ${1}; then
err=0;
break 1;
fi;
${chmod} 775 ${1} || err=0;
break 1;
done;
if [ ${err} -eq 0 ]; then
message "Error creating file ${1}." "File Creation" && return 1;
return 1;
fi;
return 0
}
_SERVER["chroot_mounted"] => () { `${mount} -l | cut -d' ' -f3 | ${grep} -q "${chroot_dir}"` || return 1;
return 0
}
_SERVER["execute_script_root"] => () { if [ $# -ne 1 ]; then
message "Usage: execute_script_root <path to script>" "execute_script_root";
return 1;
fi;
local script_esr="${1}";
export script_esr;
local return_val=0;
if ! root; then
while :; do
${clear};
${echo} -e "*** Enter root password to proceed ***\n";
${su} -c '(
execute_script ${script_esr} || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
execute_script ${script_esr} || return_val=1;
fi;
unset script_esr;
return ${return_val}
}
_SERVER["tarball_in_string"] => () { if [ $# -ne 1 ]; then
message "Usage: tarball_in_string <string>" "tarball_in_string";
return 1;
fi;
if ${echo} ${1} | ${grep} -iq -e ".*tgz$" -e ".*gz$" -e ".*bz2$" -e ".*zip$" -e ".*xz$" -e ".*lzma$"; then
return 0;
else
return 1;
fi
}
_SERVER["new_dir_name"] => () { prompt_for_value "Script Directory Name" "Enter new directory name" "Name" || return 1;
return 0
}
_SERVER["edit_file"] => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: edit_file <path to file> [save flag]" "edit_file";
return 1;
fi;
local scs=1;
local save_flag="${2:-0}";
EDITOR="vi";
if [ ! -f "${1}" ]; then
make_file ${1} || return 1;
fi;
find_file "`${basename} ${EDITOR}`";
if [ ! -z "${file_name_path}" ] && [ -f "${file_name_path}" ]; then
${cat} ${1} > ${global_temp_file3};
${file_name_path} ${global_temp_file3};
if [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
else
return_val=0;
fi;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
local command="";
height=35;
width=150;
calculate_dimensions;
make_title "File Edit";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Save\" --cancel-label \"Do Not Save\" --cr-wrap --editbox \"${1}\" ${height} ${width}";
eval ${command} 2> ${global_temp_file3};
return_val=$?;
if [ ${return_val} -eq 0 ] && [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
fi;
fi;
fi;
return ${return_val}
}
_SERVER["new_batch_name"] => () { prompt_for_value "Batch File Name" "Enter new batch file name" "Name" || return 1;
return 0
}
_SERVER["clear_global_files"] => () { for i in ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4};
do
clear_file "${i}" || return 1;
${touch} ${i} || return 1;
done;
return 0
}
_SERVER["move"] => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
${mv} -f "${1}" "${2}";
if [ $? -eq 1 ]; then
message "There was an error moving file ${1} --> ${2}." "File Move";
return 1;
fi;
return 0
}
_SERVER["save_file"] => () { if [ $# -ne 2 ]; then
message "Usage: save_file <file name> <file to copy>" "save_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
make_file ${1} || return 1;
else
if [ ! -e "${2}" ]; then
message "File to copy is missing or empty. No save will be done." "Missing Save-From File";
return 0;
fi;
fi;
if ! copy "${2}" "${1}"; then
message "Error saving file." "File Save";
return 1;
fi;
if [ -O ${1} ]; then
if ! ${chmod} 775 ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
fi;
return 0
}
_SERVER["check_for_directory"] => () { if [ -d "${1}" ]; then
return 0;
else
return 1;
fi
}
_SERVER["prompt_for_value"] => () { if [ $# -ne 3 ]; then
message "Usage: prompt_for_value <title> <tag> <prompt>" "prompt_for_value";
return 1;
fi;
height=20;
width=120;
p_lgth=${#3};
local command;
calculate_dimensions;
make_title "Prompt";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Submit\" --form \"${2}\" ${height} ${width} 1 \"${3}:\" 1 1 \"\" 1 $(( p_lgth + 2 )) ${width} 200";
eval ${command} 2> ${global_temp_file1};
return_val=$?;
prompt_value=`${cat} ${global_temp_file1}`;
if [ ${#prompt_value} -gt 200 ]; then
prompt_value=${prompt_value:0:255};
fi;
if [ ${return_val} -ne 0 ] || [ -z "${prompt_value}" ]; then
prompt_value="";
return 1;
else
prompt_value="`${echo} ${prompt_value} | tr ' ' '_'`";
return 0;
fi
}
_SERVER["execute_script"] => () { if [ $# -ne 1 ]; then
message "Usage: execute_script <path to script file>" "execute_script";
return 1;
fi;
if [ ! -f "${1}" ]; then
message "No script found!" "Script Find Error";
return 1;
fi;
if `${grep} -m 1 -q "^#chroot_flag" ${1}` && ! check_for_directory ${chroot_dir}/tmp; then
if ! make_dir ${chroot_dir}/tmp; then
message "Unable to make chroot temporary directory." "Chroot Tmp Directory Creation Error";
return 1;
fi;
fi;
if [ ${global_no_dialog} -eq 1 ]; then
`${grep} -m 1 -q "^#no_dialog" "${1}"` && no_dialog=0;
fi;
base_script_name="`${basename} ${1}`";
make_executable_file "${global_temp_file3}";
${cat} ${1} > ${global_temp_file3};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
if ! copy ${global_temp_file3} "${chroot_dir}/tmp/"; then
message "There was an error copying the script, '${1}', to the chroot temporary directory." "Script Copy Error";
return 1;
fi;
fi;
get_time ${base_script_name} "-";
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} $calc > ${global_time_file} && ${sleep} 1;
done & sub_pid2=$!;
if `${grep} -m 1 -q "^#pre_lfs" ${global_temp_file3}`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host directory." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
${clear};
${echo} "Running script...";
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} | tee ${global_temp_file4};
else
${global_temp_file3} | tee ${global_temp_file4};
fi;
return_val=$?;
${sleep} 5;
else
height=35;
width=150;
calculate_dimensions;
local sub_pid1;
if [ ${batch_flag} -eq 0 ]; then
make_title "Running script ${base_script_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Running script ${base_script_name} (${start_time})";
fi;
${echo} "Running script..." > ${global_temp_file4};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} &>>${global_temp_file4} &
else
${global_temp_file3} &>>${global_temp_file4} &
fi;
sub_pid1=$!;
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Running Script: ${base_script_name} (Est. Completion Time: ${hour}h ${min}m ${sec}s)" --no-kill --tailboxbg ${global_temp_file4} ${height} ${width} 2> ${global_temp_file5};
while file_empty ${global_temp_file5}; do
${sleep} .5;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 5;
kill_proc `${cat} ${global_temp_file5}`;
fi;
disown ${sub_pid2};
kill ${sub_pid2};
${rm} -f ${chroot_dir}/tmp/lfs_script* &>/dev/null;
if ! update_time ${base_script_name} "-" `${cat} ${global_time_file}`; then
message "Warning: There was an error updating the time file for (script) ${base_script_name}...continuing." "Update Time File Error";
fi;
if [ ${return_val} -eq 1 ]; then
${echo} "Script error: ${base_script_name} @ `date`" >> ${install_log};
message "Script error: ${base_script_name}." "Script Error";
else
if [ ${return_val} -eq 0 ]; then
${echo} "Script finish: ${base_script_name} @ `date`" >> ${install_log};
fi;
fi;
return ${return_val}
}
_SERVER["remove_file"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_file <file path> ..." "remove_file";
return 1;
fi;
for z in $@;
do
[ ! -e "${z}" ] && continue;
${rm} -rf ${z} &>/dev/null;
if [ $? -eq 1 ]; then
message "There was an error removing file ${z}." "File Removal Error";
return 1;
fi;
done;
return 0
}
_SERVER["abort_message"] => () { if [ $# -lt 1 ] || [ -z "${1}" ]; then
message "Usage: abort_message <text> [title]" && return 1;
fi;
local message_title;
message_title="${2}";
if [ -z "${message_title}" ]; then
${dialog} --sleep 2 --title "Installation Abort" --infobox "${1}" 10 30;
else
${dialog} --sleep 2 --title "Aborting Installation: ${message_title}." --infobox "${1}" 10 30;
fi;
exit 1
}
_SERVER["make_executable_file"] => () { if [ $# -ne 1 ]; then
message "Usage: make_executable_file <file name>" "make_executable_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
if ! make_file "${1}" || ! ${chmod} u+x ${1}; then
message "Unable to create file: ${1}." "Executable File Error";
return 1;
fi;
else
if [ ! -x "${1}" ]; then
if ! ${chmod} u+x ${1}; then
message "Unable to make file '${1}' executable." "Executable File Error";
return 1;
fi;
fi;
fi;
return 0
}
_SERVER["kill_proc"] => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: kill_proc <proc1> [proc2]" "kill_proc";
return 1;
fi;
[ -z "${1}" ] && return 0;
if [ $# -eq 1 ]; then
${ps} -p ${1} &>/dev/null || return 0;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
else
if [ $# -eq 2 ]; then
while ${ps} -p ${1} &>/dev/null 2>&1; do
${sleep} 1;
done;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
fi;
fi;
return 0
}
_SERVER["verify_signature"] => () { if [ $# -ne 2 ]; then
message "Usage: verify_signature <sig1> <sig2>" "verify_signature";
return 1;
fi;
if [ "${1}" != "${2}" ]; then
return 1;
else
return 0;
fi
}
_SERVER["single_program_configuration"] => () { program_selection "Select a program to check and configure" "single" "Select" $@ || return 1
}
_SERVER["chg_tmp_file_owner"] => () { if [ $# -ne 1 ]; then
message "Usage: chg_tmp_file_owner <file>" "chg_tmp_file_owner";
return 1;
fi;
local owner="${1}";
for i in ${batch_file} ${return_val_file} ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4} ${global_time_file} ${global_temp_file5};
do
[ ! -f "${i}" ] && continue;
chg_file_owner ${owner} ${i} || return 1;
done;
return 0
}
_SERVER["root"] => () { if [ `id -u` -eq 0 ]; then
return 0;
else
return 1;
fi
}
_SERVER["remove_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: remove_dir <dir>" "remove_dir";
return 1;
fi;
[ ! -d "${1}" ] && return 0;
local sub_pid1;
height=10;
width=80;
calculate_dimensions;
${echo} "Please wait while removing directory `${basename} ${1}`..." > ${global_temp_file1};
${rm} -rf ${1} &>/dev/null & sub_pid1=$!;
make_title "Directory Removal";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Removing Directory" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 1;
kill_proc `${cat} ${global_temp_file2}`;
return ${return_val}
}
_SERVER["verify_url"] => () { if [ $# -ne 1 ]; then
message "Usage: verify_signature <string>" "verify_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\)://.*$"; then
return 0;
else
return 1;
fi
}
_SERVER["message"] => () { if [ $# -lt 1 ]; then
message="Usage: message <text> [title]" "message";
fi;
local message;
local message_title;
message="${1}";
message_title="${2}";
if [ -z "${message_title}" ]; then
message_title="Message";
fi;
${dialog} --colors --backtitle "${gen_title}" --title "${message_title}" --msgbox "${message}" 15 100;
return $?
}
_SERVER["please_wait"] => () { height=10;
width=60;
kill_please_wait;
calculate_dimensions;
make_title "Processing";
${echo} "Please wait..." > ${global_temp_file5};
${dialog} --backtitle "${main_title}" --title "Processing" --no-kill --tailboxbg ${global_temp_file5} ${height} ${width} 2> ${global_temp_file6};
while file_empty ${global_temp_file6}; do
sleep .5;
done;
please_wait_pid="`cat ${global_temp_file6}`";
return 0
}
_SERVER["new_script_name"] => () { prompt_for_value "New Script Name" "Enter Script Name (NOTE: empty files will still save)" "Name" || return 1;
return 0
}
_SERVER["confirm_selection"] => () { if [ $# -lt 1 ]; then
message "Usage: confirm_selection <list>" "confirm_selection";
return 1;
fi;
local list1="$@";
local prog;
local rn;
local return_val;
local command="";
local i;
local kill_wait_pid_cs="";
declare -i i=1;
if [ -z "${list1}" ]; then
message "No programs were selected for confirmation." "Installation Selection Confirmation";
return 1;
fi;
please_wait;
height=25;
width=60;
for j in $@;
do
[ ${#j} -gt ${width} ] && width=${#j};
done;
width=$(( width + 15 ));
calculate_dimensions;
make_title "Selection Confirmation";
command="${dialog} --backtitle \"${main_title}\" --title \"Selected programs\" ";
command="${command} --ok-label \"Yes\" --cancel-label \"No\" --menu \"Is the selection correct?\" ${height} ${width} ${height} ";
command="${command} \"PROGRAM\" \"RUN-LEVEL\"";
command="${command} \"=================\" \"=========\"";
for j in ${list1};
do
if `${echo} ${j} | ${grep} -q "^script:.*$"`; then
prog="`${echo} ${j} | cut -d: -f2`";
prog="script - `basename ${prog}`";
rn="N/A";
else
prog="`${echo} ${j} | cut -d: -f1`";
rn="`${echo} ${j} | cut -d: -f2`";
fi;
command="${command} \"${i}. ${prog}\" \"${rn}\"";
i=$(( ++i ));
done;
eval ${command} 2> /dev/null;
return_val=$?;
kill_please_wait;
return $return_val
}
_SERVER["edit_configuration"] => () { if [ $# -ne 1 ]; then
message "Usage: edit_configuration <program name>" "edit_configuration";
return 1;
fi;
local var1_ec;
local scs=0;
prog_dir="${data_dir}/${1}";
run_dir="${prog_dir}/${run}";
get_time ${tarball_base_name} ${run} || return 1;
make_title "Configuration Edit";
while :; do
${dialog} --colors --backtitle "${main_title}" --title "${1} - run level: ${run} - \Z1Est. Build Time: ${hour}h ${min}m ${sec}s\Zn" --no-cancel --extra-button --extra-label "New Run Level" --radiolist "Configuration/Installation files for ${1}" 20 90 20 "Configuration" "View/edit configuration commands" "off" "Make Flags" "View/edit list of make flags" "off" "Make (Check/Test) Flags" "View/edit list of make (check/test) commands" "off" "Make (Install) Flags" "View/edit list of make (install) commands" "off" "Master Base URL's" "View/edit base URL's for downloading packages" "off" "Master Conf File" "View/edit master configuration file (in parent directory)" "off" "Patch List" "View/edit patch list file" "off" "Post-configuration" "View/edit post-configuration commands" "off" "Pre-configuration" "View/edit pre-configuration commands" "off" "Preferred URL" "View/edit this program's preferred URL" "off" "Program Description" "View/edit program description" "off" "Required Packages" "View/edit packages to be present in source directory" "off" "Run Level Conf File" "View/edit run level configuration file" "off" "View Logs" "View logs for this run-level" "off" "Remove Run-Level" "Delete this run-level" "off" 2> ${global_temp_file1};
return_val=$?;
if [ ${return_val} -eq 3 ]; then
return 3;
else
if file_empty ${global_temp_file1}; then
return 1;
fi;
fi;
case `${cat} ${global_temp_file1}` in
"Configuration")
var1_ec="${run_dir}/cf"
;;
"Pre-configuration")
var1_ec="${run_dir}/pre-cf"
;;
"Post-configuration")
var1_ec="${run_dir}/post-cf"
;;
"Program Description")
var1_ec="${prog_dir}/df"
;;
"Installed Programs")
var1_ec="${run_dir}/ip"
;;
"Make Flags")
var1_ec="${run_dir}/mf"
;;
"Make (Install) Flags")
var1_ec="${run_dir}/mi"
;;
"Make (Check/Test) Flags")
var1_ec="${run_dir}/make_check_test"
;;
"Patch List")
var1_ec="${run_dir}/patch_list"
;;
"Preferred URL")
var1_ec="${prog_dir}/purl"
;;
"Required Packages")
var1_ec="${run_dir}/rpkg"
;;
"Master Conf File")
var1_ec="${prog_dir}/mstr_conf"
;;
"Run Level Conf File")
var1_ec="${run_dir}/conf"
;;
"Master Base URL's")
var1_ec="${profile}/mstr_urls"
;;
"View Logs")
log_viewer ${tarball_base_name} ${run};
continue
;;
"Remove Run-Level")
if remove_run_level "${tarball_base_name}" "${run}"; then
return 0;
else
continue;
fi
;;
*)
continue
;;
esac;
! check_for_file ${var1_ec} && ${touch} ${var1_ec};
edit_file ${var1_ec};
done;
return ${scs}
}
_SERVER["clear_file"] => () { if [ $# -ne 1 ]; then
message "Usage: clear_file <file>" "clear_file";
return 1;
fi;
[ ! -f "${1}" ] && return 0;
scs_cgf=0;
${rm} ${1} &>/dev/null || scs_cgf=1;
${touch} ${1} &>/dev/null || scs_cgf=1;
if [ ${scs_cgf} -eq 1 ]; then
message "An error occurred while attempting to clear a file: ${1}." "File-Clear Error";
return 1;
fi;
return 0
}
_SERVER["highest_run_level"] => () { if [ $# -ne 1 ]; then
message "Usage: highest_run_level <tarball base directory>" "highest_run_level";
return 1;
fi;
[ ! -d "${data_dir}/${1}" ] && return 1;
local list_hrl=`ls ${data_dir}/${1}`;
for i in ${list_hrl};
do
[ "${i}" == "list_hrl" ] && continue;
if are_digits ${i}; then
[ ${current} -lt ${i} ] && current=${i};
fi;
done;
return 0
}
_SERVER["download_rpkg"] => () { if [ $# -lt 1 ]; then
message "Usage: download_rpkg <program list>" "download_rpkg ";
fi;
clear_global_files;
local prog="";
local run="";
local rp_name="";
local list1="";
local list2="";
local error=1;
local found;
height=20;
width=120;
calculate_dimensions;
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
prog="`${echo} ${z} | ${cut} -d: -f1`";
run="`${echo} ${z} | ${cut} -d: -f2`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
IFS=$(${echo} -e "\n\r");
for rp_name in `${cat} ${data_dir}/${prog}/${run}/rpkg`;
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
found=1;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
find_file ${rp_name} ${prog_src_dir} && continue;
if ! file_empty ${profile}/mstr_urls; then
${echo} "Searching for ${rp_name}..." > ${global_temp_file1};
make_title "Required Tarball Search For ${rp_name}";
${dialog} --backtitle "${main_title}" --title "Required Tarball Search For ${rp_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
url="`${echo} ${url}/${rp_name}`";
! verify_tarball_url "${url}" && continue;
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Searching for ${rp_name} at ${url}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Required tarball, ${rp_name}, found at ${url}..." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
clear_global_files;
if [ ${found} -eq 1 ]; then
while :; do
prompt_for_value "Required Program URL (${rp_name})" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${rp_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
error=0;
break 1;
fi;
fi;
break 1;
done;
while :; do
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Required Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
check_remote_file_exists "${prompt_value}";
if [ $? -eq 0 ]; then
found=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && echo "${url_dir}" >> ${profile}/mstr_urls;
url="${prompt_value}";
break 1;
fi;
done;
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
if [ ${found} -eq 1 ]; then
message "Unable to find required tarball, ${rp_name}. Aborting installation..." "File Find Failed";
error=0;
break 1;
fi;
if ! check_connection; then
error=0;
break 1;
fi;
if ! retrieve_pkg "${url}" /tmp; then
message "Unable to download ${rp_name} from `${dirname} ${url}`." "File Download Failed";
error=0;
break 1;
fi;
if [ ! -f "/tmp/${rp_name}" ]; then
message "Required tarball file not found in /tmp directory." "Tarball Not Found";
error=0;
break 1;
fi;
if ! move "/tmp/${rp_name}" "${prog_src_dir}"; then
message "Unable to move file ${rp_name} to source directory." "Tarball File Move Error";
error=0;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 0 ] && return 1;
done;
[ ${error} -eq 0 ] && return 1;
return 0
}
_SERVER["script_options_m1"] => () { if [ $# -ne 1 ]; then
message "Usage: script_options_m1 <file>" "script_options_m1";
return 1;
fi;
local command;
height=20;
width=60;
calculate_dimensions;
make_title "Options";
command="${dialog} --backtitle \"${main_title}\" --title \"File '`${basename} ${1}`' Options\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Modify\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"View Completion Time(s)\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
_SERVER["install_one"] => () { if [ $# -ne 1 ]; then
message "Usage: install_one <program name>" "install_one";
return 1;
fi;
local path;
local located=1;
local success=1;
local runtime_error=1;
no_dialog=1;
tarball_name="";
prog_dir="${data_dir}/${tarball_base_name}";
run_dir="${prog_dir}/${run}";
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf` && ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
install_dir="${in_chroot_install_dir}";
release_dir="${chroot_dir}${in_chroot_install_dir}";
check_for_directory ${chroot_dir}/tmp || make_dir ${chroot_dir}/tmp;
if ! directory_writable "${chroot_dir}/${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
else
install_dir="$out_chroot_install_dir";
release_dir="$out_chroot_install_dir";
if ! directory_writable "${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
fi;
if ! `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
if `${echo} "${install_dir}" | ${grep} -q "${chroot_dir}"` || `${echo} "${release_dir}" | ${grep} -q "${chroot_dir}"`; then
if ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
check_for_directory "${chroot_dir}${install_dir}";
else
check_for_directory "${install_dir}";
fi;
if [ $? -ne 0 ]; then
if ! make_dir "${install_dir}"; then
message "Unable to create install directory (${install_dir})." "Installation Directory Creation Error";
break 1;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
directory_writable ${chroot_dir}${install_dir} || return 1;
else
directory_writable ${install_dir} || return 1;
fi;
if ! check_structure ${run_dir}; then
message "Program directory for ${1} not set up properly." "Improper Directory Structure";
return 1;
fi;
get_time ${tarball_base_name} ${run};
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} ${calc} > ${global_time_file} && sleep 1;
done & sub_pid2=$!;
! file_empty ${prog_dir}/tb_name && tarball_name="`${cat} ${prog_dir}/tb_name`";
[ -z "${tarball_name}" ] && return 1;
if find_file "${tarball_name}" "${prog_src_dir}"; then
release_tarball "${file_name_path}" "${release_dir}" 0 || return 1;
else
message "Unable to find file, ${tarball_name}." "File Not Found";
return 1;
fi;
parent_tb_base_name=${tarball_base_name};
release_isp ${run_dir}/rpkg || return 1;
tarball_base_name=${parent_tb_base_name};
no_dialog=1;
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/patch_list";
fi;
IFS=$(${echo} -e "\n\r");
for item in `${cat} ${run_dir}/patch_list`;
do
`${echo} ${item} | ${grep} -q -e "^#.*$" -e "^$" -` && continue;
if ! run_patch ${item}; then
message "An error occurred running the patch (${item}) for ${tarball_base_name}." "Patch-Run Error";
return 1;
fi;
done;
unset IFS;
j="`ls ${run_dir}/log | grep -v ^.*old`";
for k in ${j};
do
h="`echo ${k} | sed -e 's;\.tar\.bz2$;;g'`";
move "${run_dir}/log/${k}" "${run_dir}/log/${h}.old.tar.bz2" || return 1;
done;
unset j k;
while true; do
if file_empty "${run_dir}/pre-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/pre-cf";
fi;
if ${grep} -q "^#run_as_root" ${run_dir}/pre-cf && ! root; then
if ! global_script_run_root "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "pre_conf" ${global_temp_file1};
compress_log "${run_dir}/log/pre_conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/cf";
fi;
if ! global_script_run "${run_dir}/cf" "Configuration"; then
message "The configuration script for ${tarball_base_name}, run level ${run}, failed." "Configuration Failure";
runtime_error=0;
fi;
save_log "conf" ${global_temp_file1};
compress_log "${run_dir}/log/conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mf";
fi;
if ! global_script_run "${run_dir}/mf" "Make"; then
message "The Make script for ${tarball_base_name}, run level ${run}, failed." "Make Failure";
runtime_error=0;
fi;
save_log "make" ${global_temp_file1};
compress_log "${run_dir}/log/make" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/make_check_test"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/make_check_test";
fi;
if ! global_script_run "${run_dir}/make_check_test" "Make Check/Test"; then
if ! `grep -q -m1 "#ignore_check_errors" "${run_dir}/conf"`; then
message "The Make-Check script for ${tarball_base_name}, run level ${run}, failed." "Make-Check Failed";
runtime_error=0;
else
${echo} "Warning: Make/Check error for ${tarball_base_name} @ `date`" >> ${install_log};
fi;
fi;
save_log "make_check_test" ${global_temp_file1};
compress_log "${run_dir}/log/make_check_test" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mi"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mi";
fi;
if ${grep} -q "^#no_root_install" ${run_dir}/mi; then
if ! global_script_run "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
else
if ! global_script_run_root "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
fi;
save_log "make_install" ${global_temp_file1};
compress_log "${run_dir}/log/make_install" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/post-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/post-cf";
fi;
if ${grep} -q "#run_as_root" ${run_dir}/post-cf; then
if ! global_script_run_root "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "post_cf" ${global_temp_file1};
compress_log "${run_dir}/log/post_cf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
break 1;
done;
disown ${sub_pid2};
${kill} ${sub_pid2};
if [ ${runtime_error} -ne 0 ]; then
if ! update_time ${tarball_base_name} ${run} `${cat} ${global_time_file}`; then
message "Warning: A failure occurred while updating the time file for ${tarball_base_name}...continuing." "Update Time File Error";
fi;
fi;
remove_ext_tb=1;
if [ ${global_remove_ext_tb} -eq 0 ]; then
remove_ext_tb=0;
else
if `${grep} -q "^#remove_ext_tb" ${run_dir}/conf`; then
remove_ext_tb=0;
fi;
fi;
if [ ${remove_ext_tb} -eq 0 ] && [ -d "${release_dir}/${tarball_base_name}" ]; then
if ! remove_dir "${release_dir}/${tarball_base_name}"; then
message "A failure occurred during the removal of directory, ${release_dir}/${tarball_base_name}." "Directory Removal Error";
return 1;
fi;
fi;
if [ ${runtime_error} -eq 1 ]; then
${echo} "Installed: ${tarball_base_name} @ `date`" >> ${install_log};
return 0;
else
if [ ${runtime_error} -eq 0 ]; then
${echo} "Install Failure: ${tarball_base_name} @ `date` (check log files)" >> ${install_log};
message "Install Failure: ${tarball_base_name} @ `date` (check log files)" "Install Failure";
return 1;
fi;
fi
}
_SERVER["check_sig_prog"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_prog <file list>" "check_sig_prog";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local listing;
local flag=0;
local error=1;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
base_name="`${echo} ${line} | ${cut} -d: -f1`";
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Main Program" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
${echo} "Checking ${base_name}..." >> ${global_temp_file1};
if file_empty "${data_dir}/${base_name}/tb_name"; then
${echo} "${base_name}: Unable to find the name of the tarball to check!" >> ${global_temp_file1};
error=0;
break 1;
else
tb_name="`${head} -n1 ${data_dir}/${base_name}/tb_name`";
if [ -z "${tb_name}" ]; then
${echo} "${base_name}: Unable to find the name of the tarball being used for installation!" >> ${global_temp_file1};
error=0;
break 1;
fi;
fi;
if ! find_file ${tb_name} ${prog_src_dir}; then
${echo} "Unable to find program, ${tb_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 1;
fi;
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
${echo} "MD5: signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
_SERVER["release_isp"] => () { if [ $# -ne 1 ]; then
message "Usage: release_isp <run directory>" "release_isp";
return 1;
fi;
file_empty "${1}" && return 0;
local signature;
local full_path;
local found;
local url;
IFS=$(${echo} -e "\n\r");
for pkg in `${cat} ${1}`;
do
${echo} ${pkg} | ${grep} -iq -e '^#.*' -e '^$' && continue;
found=1;
scs=1;
name=`${echo} ${pkg} | ${cut} -d: -f1`;
if [ -z "${name}" ]; then
message "Unable to find the name of a required package!" "Required Package Name Missing";
return 1;
fi;
if ! find_file ${name} ${prog_src_dir}; then
message "Unable to find required tarball, ${name}, in source directory." "Required Package Missing";
return 1;
fi;
rename=`${echo} ${pkg} | ${cut} -d: -f2`;
append_cmds=`${echo} ${pkg} | ${cut} -d: -f3`;
get_tarball_base_from_tb ${file_name_path} || return 1;
if [ -f "${release_dir}/${parent_tb_base_name}/${tarball_base_name}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${tarball_base_name};
fi;
if release_tarball ${file_name_path} ${release_dir}/${parent_tb_base_name} 1 "${append_cmds}"; then
if [ ! -z "${rename}" ]; then
if [ -d "${release_dir}/${parent_tb_base_name}/${rename}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
move ${release_dir}/${parent_tb_base_name}/${tarball_base_name} ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
else
message "There was an error releasing the tarball, ${name}, into its parent directory (${parent_tb_base_name})!" "Tarball Release Error";
return 1;
fi;
done;
unset IFS;
return 0
}
_SERVER["rename_script_name"] => () { prompt_for_value "Script Rename" "Script Rename" "Name" || return 1;
return 0
}
_SERVER["program_selection"] => () { if [ $# -lt 4 ]; then
message "Usage: output_dialog_selection_batch <title> <type> <ok label> <list>" "output_dialog_selection_batch";
return 1;
fi;
local command;
local description_ps;
local file1_ps;
local file3_ps;
local batch_prog_temp_ps="";
local batch_progs_ps="";
local orig_list_ps;
local batch_run_level_ps="";
local type_ps;
local title_ps;
local ok_label_ps;
local cancel_label_ps;
return_val="";
title_ps="${1}";
type_ps="${2}";
ok_label_ps="${3}";
shift 3;
orig_list_ps=$@;
prog_list="";
while :; do
kill_please_wait;
please_wait;
height=50;
width=160;
calculate_dimensions;
make_title "Batch Listing";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"${ok_label_ps}\" --no-cancel --radiolist \"${title_ps}\" ${height} ${width} ${height} ";
for i in ${orig_list_ps};
do
file1_ps="${data_dir}/${i}/df";
if ! file_empty ${file1_ps}; then
description_ps=`${cat} ${file1_ps}`;
else
description_ps="No description";
fi;
description_ps="${description_ps:0:255}";
command="${command} \"${i}\" \"${description_ps}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
{
[ ${return_val} -eq 1 ] || file_empty ${global_temp_file1}
} && return 1;
batch_prog_temp_ps="`${cat} ${global_temp_file1} | ${sed} -e 's;";;g'`";
if [ "${type_ps}" == "single" ] || [ "${type_ps}" == "checksum" ]; then
prog_list=${batch_prog_temp_ps};
break 1;
else
if [ "${type_ps}" == "batch" ]; then
get_run_level ${batch_prog_temp_ps};
${echo} "${batch_prog_temp_ps}:${run}" >> ${batch_file};
prog_list="${prog_list} ${batch_prog_temp_ps}";
fi;
fi;
done;
return ${return_val}
}
_SERVER["verify_sha_alg"] => () { case ${sha_alg} in
"1" | "224" | "256" | "384" | "512" | "512224" | "512256")
:
;;
*)
sha_alg=1
;;
esac;
return 0
}
_SERVER["run_patch"] => () { if [ $# -ne 1 ]; then
message "Usage: run_patch <patch file>" "run_patch";
return 1;
fi;
clear_global_files;
local pfile_raw="${1}";
local pfile_uncomp="${1}";
local list;
local sub_pid1;
local scs=0;
chg_dir "${release_dir}/${tarball_base_name}" || return 1;
if `${echo} ${pfile_raw} | ${grep} -q ".*\.gz"`; then
pfile_uncomp="`${echo} ${pfile_raw} | ${sed} -e 's;\(^.*\)\.gz;\1;g'`";
if [ ! -f "${patch_src_dir}/${pfile_uncomp}" ]; then
if ! ${gunzip} ${patch_src_dir}/${pfile_raw}; then
message "There was a problem uncompressing '${pfile_raw}'." "Patch Un-Compression";
return 1;
fi;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
clear;
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp};
scs=$?;
else
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp} &>${global_temp_file2} & sub_pid1=$!;
if debug; then
:;
else
${dialog} --title "Patching ${tarball_base_name} (${pfile_raw})" --no-kill --tailboxbg ${global_temp_file2} 40 130 2> ${global_temp_file1};
while file_empty ${global_temp_file1}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
scs=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file1}`;
fi;
${sleep} 1;
return ${scs}
}
_SERVER["make_temp_file"] => () { local tmp_file;
local scs=0;
tmp_file=`${mktemp} -p /tmp lfs_script.XXXXXXXX`;
trap "remove_file ${tmp_file}" SIGINT;
if [ ! -z "${tmp_file}" ] && [ -f "${tmp_file}" ]; then
${echo} ${tmp_file};
else
scs=1;
fi;
trap - SIGINT;
if [ ${scs} -eq 1 ]; then
exit 1;
else
return ${scs};
fi
}
_SERVER["check_owner"] => () { local var1;
local var2;
local var3;
if [ $# -ne 2 ]; then
message "Usage: check_owner <user> <file/directory>" "check_owner";
return 1;
fi;
var1=`${dirname} ${2}`;
var2=`${echo} ${1} | ${sed} -e 's;${var1};;g'`;
var3=`ls -n ${var1} | ${grep} ${var2} | ${sed} -e 's;^[a-zA-Z0-9-]\+\s\+[a-zA-Z0-9]\+\s\+\(.*$\);\1;g'`;
if [ "${1}" == "${var3}" ]; then
return 0;
else
return 1;
fi
}
_SERVER["batch_program_listing"] => () { program_selection "Select programs to install (batch mode)" "batch" "Add" $@ || return 1
}
_SERVER["make_title"] => () { if [ $# -lt 1 ]; then
message "Usage: make_title <type title>..." "make_title";
return 1;
fi;
local c;
local mt_length=${#gen_title};
local ty_length=${#1};
local var1=$(( mt_length + ty_length ));
local max_wd=`stty size | cut -d" " -f2`;
main_title="";
if [ ${var1} -gt ${max_wd} ]; then
main_title="${gen_title}";
return 0;
fi;
var1=$(( max_wd - mt_length - ty_length - 2 ));
local spaces="`${echo} ${var1} | bc`";
main_title="${gen_title}";
for ((c=1; c<=${spaces}; c++ ))
do
main_title="${main_title}+";
done;
main_title="${main_title}${1}";
return 0
}
_SERVER["checksum_program_listing"] => () { program_selection "Select a program to view/edit checksum" "checksum" "Select" $@ || return 1
}
_SERVER["check_profile_struc"] => () { if [ $# -ne 1 ]; then
message "Usage: check_profile_structure <profile dir>" "check_profile_struc";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
for h in "batch" "data" "scripts" "doc";
do
[ -d "${1}/${h}" ] || return 1;
done;
return 0
}
_SERVER["select_from_list"] => () { if [ $# -lt 2 ]; then
message "Usage: select_from_list <title> <list>" "select_from_list";
return 1;
fi;
local command="";
local title_sfl=${1};
height=20;
width=120;
local list_height_sfl=20;
calculate_dimensions;
shift 1;
make_title "List Selection";
command="${dialog} --colors --backtitle \"${main_title}\" --ok-label \"Select\" --no-cancel --radiolist \"${title_sfl}\" ${height} ${width} ${list_height_sfl}";
for z in $@;
do
command="${command} \"${z}\" \"\" off";
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
selection=`${cat} ${global_temp_file1}`;
if [ ${return_val} -eq 1 ] || {
[ ${return_val} -eq 0 ] && [ -z "${selection}" ]
}; then
return 1;
else
return 0;
fi
}
_SERVER["find_file"] => () { if [ $# -lt 1 ]; then
message "Usage: find_file <file name> [path]" "find_file";
return 1;
fi;
local local_path;
local real_paths="";
if [ -z "${2}" ]; then
local_path=`${echo} ${PATH} | tr ":" " "`;
else
local_path="${2}";
fi;
for i in ${local_path};
do
[ -d "${i}" ] && real_paths="${real_paths} ${i}";
done;
real_paths=`${echo} ${real_paths} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"`;
file_name_path=`${find} ${real_paths} -name "${1}"`;
file_name_path="`${echo} ${file_name_path} | cut -d" " -f1`";
if [ -z "${file_name_path}" ]; then
return 1;
else
return 0;
fi
}
_SERVER["get_dialog"] => () { if [ $# -ne 1 ]; then
message "Usage: get_dialog <file>" "get_dialog";
return 1;
fi;
if ! check_for_file "${1}"; then
message "Unable to find file used to set the dialog variable." "No-Dialog File Error";
return 1;
fi;
if ${grep} -q "no_dialog" ${1}; then
no_dialog=0;
else
no_dialog=1;
fi;
return 0
}
_SERVER["move_dir"] => () { if [ $# -ne 2 ]; then
message "Usage: move_dir <dir> <path to new name>" "move_dir";
return 1;
fi;
if [ -d "${1}" ]; then
local dest_dir;
dest_dir="`${echo} ${2} | ${tr} ' ' '_'`";
if ! ${mv} ${1} ${dest_dir} &>/dev/null; then
:;
else
message "Directory renamed to ${dest_dir}." "Move Directory";
fi;
fi;
return 0
}
_SERVER["kill_please_wait"] => () { `${ps} -p ${please_wait_pid} &> /dev/null` && kill -SIGINT ${please_wait_pid};
return 0
}
_SERVER["PHP_SELF"] =>
_SERVER["SCRIPT_NAME"] =>
_SERVER["SCRIPT_FILENAME"] =>
_SERVER["PATH_TRANSLATED"] =>
_SERVER["DOCUMENT_ROOT"] =>
_SERVER["REQUEST_TIME_FLOAT"] => 1335662388.5143
_SERVER["REQUEST_TIME"] => 1335662388
_SERVER["argv"] => Array
(
)
_SERVER["argc"] => 0
_ENV["grep"] => /bin/grep
_ENV["kill"] => /bin/kill
_ENV["printf"] => /usr/bin/printf
_ENV["HZ"] => 100
_ENV["out_chroot_install_dir"] => /usr/src
_ENV["basename"] => /usr/bin/basename
_ENV["sources_dir"] => /home/yp58t/Sources
_ENV["XORG_CONFIG"] => --prefix=/usr --sysconfdir=/etc --mandir=/usr/share/man --localstatedir=/var
_ENV["TEST_PHP_SRCDIR"] => /usr/src/php-5.4.1
_ENV["no_patch_dialog"] => 1
_ENV["SHELL"] => /bin/bash
_ENV["chroot_flag"] => 1
_ENV["batch_sec"] => 21
_ENV["tail"] => /usr/bin/tail
_ENV["TERM"] => screen.linux
_ENV["MAKEFLAGS"] =>
_ENV["chown"] => /bin/chown
_ENV["HISTSIZE"] => 1000
_ENV["SSH_CLIENT"] => deleted
_ENV["please_wait_pid"] => 31351
_ENV["install_dir"] => /usr/src
_ENV["patch"] => /usr/bin/patch
_ENV["HUSHLOGIN"] => FALSE
_ENV["no_script_dialog"] => 1
_ENV["fail_on_shasum"] => 1
_ENV["SSH_TTY"] => deleted
_ENV["etc_dir"] => /etc/takenset
_ENV["return_val"] => 0
_ENV["prog_src_dir"] => /home/yp58t/Sources/prog
_ENV["release_dir"] => /usr/src
_ENV["total_sec"] => 522
_ENV["reqd_dir"] =>
_ENV["prog_dir"] => /etc/takenset/blfs/data/php-5.4.1
_ENV["got_level"] => 0
_ENV["USER"] => yp58t
_ENV["batch_file"] => /tmp/lfs_script.eKp3FNW7
_ENV["xz"] => /usr/bin/xz
_ENV["LS_COLORS"] => rs=0:di=01;34:ln=01;36:mh=00:pi=40;33:so=01;35:do=01;35:bd=40;33;01:cd=40;33;01:or=40;31;01:su=37;41:sg=30;43:ca=30;41:tw=30;42:ow=34;42:st=37;44:ex=01;32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.lzma=01;31:*.tlz=01;31:*.txz=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.dz=01;31:*.gz=01;31:*.lz=01;31:*.xz=01;31:*.bz2=01;31:*.bz=01;31:*.tbz=01;31:*.tbz2=01;31:*.tz=01;31:*.deb=01;31:*.rpm=01;31:*.jar=01;31:*.war=01;31:*.ear=01;31:*.sar=01;31:*.rar=01;31:*.ace=01;31:*.zoo=01;31:*.cpio=01;31:*.7z=01;31:*.rz=01;31:*.jpg=01;35:*.jpeg=01;35:*.gif=01;35:*.bmp=01;35:*.pbm=01;35:*.pgm=01;35:*.ppm=01;35:*.tga=01;35:*.xbm=01;35:*.xpm=01;35:*.tif=01;35:*.tiff=01;35:*.png=01;35:*.svg=01;35:*.svgz=01;35:*.mng=01;35:*.pcx=01;35:*.mov=01;35:*.mpg=01;35:*.mpeg=01;35:*.m2v=01;35:*.mkv=01;35:*.webm=01;35:*.ogm=01;35:*.mp4=01;35:*.m4v=01;35:*.mp4v=01;35:*.vob=01;35:*.qt=01;35:*.nuv=01;35:*.wmv=01;35:*.asf=01;35:*.rm=01;35:*.rmvb=01;35:*.flc=01;35:*.avi=01;35:*.fli=01;35:*.flv=01;35:*.gl=01;35:*.dl=01;35:*.xcf=01;35:*.xwd=01;35:*.yuv=01;35:*.cgm=01;35:*.emf=01;35:*.axv=01;35:*.anx=01;35:*.ogv=01;35:*.ogx=01;35:*.aac=00;36:*.au=00;36:*.flac=00;36:*.mid=00;36:*.midi=00;36:*.mka=00;36:*.mp3=00;36:*.mpc=00;36:*.ogg=00;36:*.ra=00;36:*.wav=00;36:*.axa=00;36:*.oga=00;36:*.spx=00;36:*.xspf=00;36:
_ENV["shasum"] => /usr/bin/shasum
_ENV["global_time_file"] => /tmp/lfs_script.gRls6AQe
_ENV["batch_hour"] => 0
_ENV["SSH_AUTH_SOCK"] => deleted
_ENV["head"] => /bin/head
_ENV["TERMCAP"] => SC|screen.linux|VT 100/ANSI X3.64 virtual terminal:\
:DO=\E[%dB:LE=\E[%dD:RI=\E[%dC:UP=\E[%dA:bs:bt=\E[Z:\
:cd=\E[J:ce=\E[K:cl=\E[H\E[J:cm=\E[%i%d;%dH:ct=\E[3g:\
:do=^J:nd=\E[C:pt:rc=\E8:rs=\Ec:sc=\E7:st=\EH:up=\EM:\
:le=^H:bl=^G:cr=^M:it#8:ho=\E[H:nw=\EE:ta=^I:is=\E)0:\
:li#64:co#160:am:xn:xv:LP:sr=\EM:al=\E[L:AL=\E[%dL:\
:cs=\E[%i%d;%dr:dl=\E[M:DL=\E[%dM:dc=\E[P:DC=\E[%dP:\
:im=\E[4h:ei=\E[4l:mi:IC=\E[%d@:ks=\E[?1h\E=:\
:ke=\E[?1l\E>:vi=\E[?25l:ve=\E[34h\E[?25h:vs=\E[34l:\
:ti=\E[?1049h:te=\E[?1049l:us=\E[4m:ue=\E[24m:so=\E[3m:\
:se=\E[23m:mb=\E[5m:md=\E[1m:mh=\E[2m:mr=\E[7m:\
:me=\E[m:ms:\
:Co#8:pa#64:AF=\E[3%dm:AB=\E[4%dm:op=\E[39;49m:AX:\
:vb=\Eg:as=\E(0:ae=\E(B:\
:ac=\140\140aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~..--++,,hhII00:\
:k0=\E[10~:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:k5=\E[15~:\
:k6=\E[17~:k7=\E[18~:k8=\E[19~:k9=\E[20~:k;=\E[21~:\
:F1=\E[23~:F2=\E[24~:F3=\E[25~:F4=\E[26~:F5=\E[28~:\
:F6=\E[29~:F7=\E[31~:F8=\E[32~:F9=\E[33~:FA=\E[34~:kb=:\
:K2=\E[G:kB=\E[Z:kh=\E[1~:@1=\E[1~:kH=\E[4~:@7=\E[4~:\
:kN=\E[6~:kP=\E[5~:kI=\E[2~:kD=\E[3~:ku=\EOA:kd=\EOB:\
:kr=\EOC:kl=\EOD:
_ENV["run_dir"] => /etc/takenset/blfs/data/php-5.4.1/1
_ENV["run"] => 1
_ENV["prompt_value"] =>
_ENV["MAKELEVEL"] => 1
_ENV["height"] => 35
_ENV["selection"] =>
_ENV["MFLAGS"] =>
_ENV["rm"] => /bin/rm
_ENV["chmod"] => /bin/chmod
_ENV["echo"] => /bin/echo
_ENV["dirname"] => /usr/bin/dirname
_ENV["batch_dir"] => /etc/takenset/blfs/batch
_ENV["connect_pid"] => 16438
_ENV["cat"] => /bin/cat
_ENV["touch"] => /usr/bin/touch
_ENV["PATH"] => /usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin:/usr/X11R6/bin
_ENV["lib_dir"] => /usr/lib/takenset
_ENV["MAIL"] => /var/mail/yp58t
_ENV["tarball_is_local"] => 0
_ENV["wget"] => /usr/bin/wget
_ENV["STY"] => 23215.tty1.lfs
_ENV["_"] => /usr/src/php-5.4.1/sapi/cli/php
_ENV["mount"] => /bin/mount
_ENV["check_signature"] => 1
_ENV["sed"] => /bin/sed
_ENV["main_title"] => Ta-Kenset - Profile: /etc/takenset/blfs+++++++++++++++++++++++++++++++++++++++++++++++++++++Releasing php-5.4.1.tar.bz2 (Started on April 28, 2012 @ 19:07:37)
_ENV["sleep"] => /bin/sleep
_ENV["PWD"] => /usr/src/php-5.4.1
_ENV["lfs_user"] => yp58t
_ENV["mv"] => /bin/mv
_ENV["INPUTRC"] => /etc/inputrc
_ENV["LIBXCB_ALLOW_SLOPPY_LOCK"] => 1
_ENV["install_log"] => /etc/takenset/log/log_install
_ENV["ps"] => /bin/ps
_ENV["scripts_dir"] => /etc/takenset/blfs/scripts
_ENV["width"] => 150
_ENV["LANG"] => en_US
_ENV["TEST_PHP_EXECUTABLE"] => /usr/src/php-5.4.1/sapi/cli/php
_ENV["XORG_PREFIX"] => /usr
_ENV["global_remove_ext_tb"] => 1
_ENV["mktemp"] => /usr/bin/mktemp
_ENV["sec"] => 21
_ENV["profile"] => /etc/takenset/blfs
_ENV["global_temp_file5"] => /tmp/lfs_script.qH0DiJm4
_ENV["ping"] => /bin/ping
_ENV["in_chroot_install_dir"] => /usr/src
_ENV["mkdir"] => /bin/mkdir
_ENV["cp"] => /bin/cp
_ENV["global_temp_file4"] => /tmp/lfs_script.rXVIqxve
_ENV["return_string"] =>
_ENV["file_name_path"] => /home/yp58t/Sources/prog/php-5.4.1.tar.bz2
_ENV["HISTIGNORE"] => &:[bf]g:exit
_ENV["vi"] => /usr/bin/vi
_ENV["global_temp_file6"] => /tmp/lfs_script.GJ53mnIW
_ENV["global_temp_file1"] => /tmp/lfs_script.eseAAyNr
_ENV["shasum_file"] => /etc/takenset/SHASUM
_ENV["data_dir"] => /etc/takenset/blfs/data
_ENV["HOME"] => /home/yp58t
_ENV["SHLVL"] => 6
_ENV["batch_flag"] => 1
_ENV["chroot_dir"] => /mnt/lfs
_ENV["batch_min"] => 4
_ENV["tr"] => /usr/bin/tr
_ENV["global_temp_file3"] => /tmp/lfs_script.9YDLo2Mg
_ENV["global_temp_file2"] => /tmp/lfs_script.EPaFl0SK
_ENV["cut"] => /usr/bin/cut
_ENV["no_dialog"] => 0
_ENV["dialog"] => /usr/bin/dialog
_ENV["start_time"] => Started on April 28, 2012 @ 19:07:37
_ENV["global_list"] =>
_ENV["success"] => 1
_ENV["sha_alg"] => 1
_ENV["hour"] => 0
_ENV["LOGNAME"] => yp58t
_ENV["G_FILENAME_ENCODING"] => @locale
_ENV["screen_fail"] => 0
_ENV["min"] => 4
_ENV["WINDOW"] => 2
_ENV["tarball_base_name"] => php-5.4.1
_ENV["SSH_CONNECTION"] => deleted
_ENV["tar"] => /bin/tar
_ENV["unzip"] => /usr/bin/unzip
_ENV["PKG_CONFIG_PATH"] => :/usr/X11R6/lib/pkgconfig:/usr/X11R6/lib/pkgconfig
_ENV["global_no_dialog"] => 0
_ENV["find"] => /bin/find
_ENV["run_all_as_root"] => 1
_ENV["CC"] => cc
_ENV["gunzip"] => /bin/gunzip
_ENV["return_val_file"] => /tmp/lfs_script.1PFeK9xp
_ENV["init_user"] => yp58t
_ENV["su"] => /bin/su
_ENV["patch_src_dir"] => /home/yp58t/Sources/patch
_ENV["gen_title"] => Ta-Kenset - Profile: /etc/takenset/blfs
_ENV["md5sum"] => /usr/bin/md5sum
_ENV["prog_list"] => php-5.4.1
_ENV["clear"] => /usr/bin/clear
_ENV["times_file"] => /etc/takenset/blfs/prog_times
_ENV["single_program_listing"] => () { program_selection "Select a program to install" "single" "Select" $@ || return 1
}
_ENV["check_structure"] => () { if [ $# -ne 1 ]; then
message "Usage: check_structure <path to program directory>" "check_structure";
fi;
local parent_dir=`${dirname} ${1}`;
local bn=`${basename} ${1}`;
local directory;
local file;
for directory in ${1} ${1}/log;
do
if ! check_for_directory ${directory}; then
message "Missing directory: ${directory}" "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
if ! check_for_file ${1}/${file}; then
message "Missing file: ${file}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
for j in mstr_conf df purl;
do
if [ ! -f "${parent_dir}/${j}" ]; then
message "Missing file: ${j}." "Directory Structure Error For ${bn}";
return 1;
fi;
done;
return 0
}
_ENV["check_connection"] => () { if `${cat} /tmp/con_status* | ${grep} -q "u" -`; then
return 0;
else
message "Your internet connection is down. Aborting the installation" "Internet Connection Down";
return 1;
fi
}
_ENV["save_log"] => () { if [ $# -ne 2 ]; then
message "Usage: save_log <prefix> <file to save>" "save_log";
return 1;
fi;
if [ -z "${run_dir}" ] || [ ! -d "${run_dir}" ]; then
message "Run directory for ${tarball_base_name} empty. Logs for ${1} will not be saved." "Log Save Error";
return;
fi;
if ! make_dir "${run_dir}/log"; then
message "There was an error creating the log directory for ${tarball_base_name}!" "Log Directory Creation Error";
return;
fi;
if ! make_file ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
${echo} "Linux From Scratch, version ${profile}, log created on `date`." > ${run_dir}/log/${1};
${echo} "Created by user `whoami` (session initiated by ${init_user})" >> ${run_dir}/log/${1};
${echo} "" >> ${run_dir}/log/${1};
if ! ${cat} ${2} >> ${run_dir}/log/${1}; then
message "There was an error creating the log file, ${1}, for ${tarball_base_name}." "Log File Creation Error";
return;
fi;
return
}
_ENV["directory_writable"] => () { if [ $# -ne 1 ]; then
message "Usage: directory_writable <directory>" "directory_writable";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
if ${touch} ${1}/test 2> /dev/null; then
remove_file ${1}/test;
return 0;
else
message "Your permissions do not allow you to write to directory '${1}'." "Directory Not Writable";
return 1;
fi
}
_ENV["remove_run_level"] => () { if [ $# -ne 2 ]; then
message "Usage: remove_run_level <tarball base name> <run level>" "remove_run_level";
return 1;
fi;
local count=0;
local list1="";
local list2="";
local scs=0;
local dir1="" && export dir1;
[ ! -d "${data_dir}/${1}" ] && return 0;
list1="`ls ${data_dir}/${1}`";
for i in ${list1};
do
[ "${i}" == "count" ] && continue;
if are_digits ${i}; then
count=$(( ++count ));
fi;
done;
if [ ${count} -eq 0 ]; then
message "There are no run-levels to display." "No Run-Levels";
return 0;
fi;
while :; do
if [ ${count} -eq 1 ]; then
dir1="${data_dir}/${1}";
if yesno_inquiry "Removal Of Data Directory: ${1}" "There is, at max, one run level for ${1}. Delete the entire data directory?"; then
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No data directory will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
else
dir1="${data_dir}/${1}/${2}";
if ! remove_dir ${dir1}; then
while :; do
clear;
${echo} -e "Enter root password to remove directory, ${dir1}.\n\n";
${su} -c '(
if ! remove_dir ${dir1}; then
message "An error occurred while trying to remove ${dir1}." "Directory Removal Error"
exit 5
fi
exit 0
)';
return_val=$?;
if [ ${error_in_chroot} -eq 5 ]; then
break 2;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
message "No run level will be removed." "No Directory Removal";
break 2;
fi;
fi;
fi;
break 2;
done;
fi;
fi;
break 1;
done;
unset dir1;
return 0
}
_ENV["remove_dups"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
var1_rd="";
var2_rd="";
global_list="";
for i in $@;
do
var2_rd=0;
var1_rd="`${echo} ${i} | cut -d: -f1`";
for j in ${global_list};
do
if [ "${var1_rd}" == "`${echo} ${j} | cut -d: -f1`" ]; then
var2_rd=1;
break 1;
fi;
done;
[ ${var2_rd} -eq 0 ] && global_list="${global_list} ${i}";
done;
[ -z "${global_list}" ] && return 1;
return 0
}
_ENV["create_structure"] => () { if [ $# -lt 1 ]; then
message "Usage: create_structure <path to tarball> [run level]" "create_structure";
fi;
run=1;
[ ! -z "${2}" ] && run=${2};
[ -z "${tarball_name}" ] && tarball_name=`${basename} ${1}`;
[ -z "${tarball_base_name}" ] && return 1;
local sub_pid1;
height=15;
width=90;
calculate_dimensions;
${echo} "Creating file structure for ${tarball_base_name}..." > ${global_temp_file1};
make_title "Create Program Structure";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
success=1;
while :; do
for dir in "${tarball_base_name}" "${tarball_base_name}/${run}" "${tarball_base_name}/${run}/log";
do
if ! check_for_directory "${data_dir}/${dir}"; then
if ! make_dir "${data_dir}/${dir}"; then
break 2;
fi;
fi;
done;
${touch} "${data_dir}/${tarball_base_name}/mstr_conf" || break 1;
move ${1} ${prog_src_dir} || break 1;
for file in "df" "tb_name" "purl" "checksum";
do
make_file "${data_dir}/${tarball_base_name}/${file}" || break 2;
[ "${file}" == "tb_name" ] && ${echo} "${tarball_name}" > ${data_dir}/${tarball_base_name}/${file};
done;
for file in "cf" "pre-cf" "post-cf" "mf" "mi" "make_check_test" "rpkg" "patch_list" "conf";
do
make_file "${data_dir}/${tarball_base_name}/${run}/${file}" || break 2;
done;
success=0;
${echo} "Successfully created structure for ${tarball_base_name}." >> ${global_temp_file1};
break 1;
done;
if [ ${success} -eq 1 ]; then
${echo} "There was an error creating the structure for ${tarball_base_name}." >> ${global_temp_file1};
fi;
sleep 2;
while file_empty ${global_temp_file2}; do
sleep 1;
done;
sub_pid1=`${cat} ${global_temp_file2}`;
kill_proc ${sub_pid1} || return 1;
return ${success}
}
_ENV["verify_tarball_url"] => () { if [ $# -ne 1 ]; then
message "Usage: verify_tarball_url <url1>" "verify_tarball_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\|https\)://.*\(bz2\|zip\|gz\|tgz\|zip\|xz\)$"; then
return 0;
else
message "The supplied URL is invalid." "Invalid Program URL";
return 1;
fi
}
_ENV["compress_log"] => () { [ ! -f "${1}" ] && return;
local file="`${basename} ${1}`";
local dir="`${dirname} ${1}`";
cd ${dir};
[ -f "${file}.tar.bz2" ] && remove_file "${file}.tar.bz2" &>/dev/null;
${tar} -cjf "${file}.tar.bz2" --remove-files ${file} &>/dev/null;
return $?
}
_ENV["sec_to_time"] => () { if [ $# -ne 1 ]; then
message "Usage: sec_to_time <seconds>" "sec_to_time";
return 1;
fi;
local var1="";
local t_sec=0;
total_sec=${1};
batch_hour=0;
batch_min=0;
batch_sec=0;
total_min=$(${echo} "scale=5; ${total_sec}/60" | bc);
batch_min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${batch_min}" ] && batch_min=0;
t1="`${echo} ${batch_min}*60 | bc`";
batch_sec="$(${echo} ${total_sec}-${t1} | bc)";
if [ ${batch_min} -ge 60 ]; then
batch_hour=`${echo} "scale=5; ${batch_min}/60" | bc`;
batch_hour=`${echo} ${batch_hour} | cut -d"." -f1`;
t1=`${echo} "${batch_hour}*60" | bc`;
batch_min=`${echo} "${batch_min}-${t1}" | bc`;
fi;
return 0
}
_ENV["chg_dir"] => () { if cd ${1}; then
return 0;
else
message "Unable to change to directory ${1}" "Change Directory";
return 1;
fi
}
_ENV["check_sig_patch"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_patch <file list>" "check_sig_patch";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
tb_name="`${echo} ${line} | ${cut} -d: -f1`";
run="`${echo} ${line} | ${cut} -d: -f2`";
file_empty ${data_dir}/${tb_name}/${run}/patch_list && continue;
if [ ${flag} -eq 0 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Patch" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
flag=$(( ++flag ));
fi;
for base_name in `${cat} ${data_dir}/${tb_name}/${run}/patch_list`;
do
`${echo} ${base_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
if ! find_file ${base_name} ${patch_src_dir}; then
${echo} "Unable to find patch, ${base_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 2;
fi;
${echo} "Checking signature for patch ${base_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${grep} -m1 ${base_name} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${base_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 3;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${base_name}\" ${data_dir}/${tb_name}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${base_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${base_name}! @ `date`" >> ${install_log};
error=0;
break 3;
else
${echo} "MD5: signature check passed for ${base_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${base_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
break 1;
done;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
_ENV["release_tarball"] => () { if [ $# -lt 3 ]; then
message "Usage: release_tarball <path to tarball source> <install dir> <removal flag> [append commands]" "release_tarball";
return 1;
fi;
local sub_pid1;
local command;
local scs=1;
local location="${2}/${tarball_base_name}";
export location;
return_val=0;
if [ -d "${location}" ]; then
remove_dir ${location};
if [ $? -ne 0 ]; then
if yesno_inquiry "Base-Directory Deletion" "Would you like to escalate your privileges and remove the base-directory '${tarball_base_name}'?"; then
while true; do
${clear};
${echo} -e "*** Enter root password to proceed with directory removal ***\n";
${su} -c '(
remove_dir ${location} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
message "Removal of the directory, ${tarball_base_name}, was unsuccessful. Aborting install." "Directory Removal Error";
return 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
ontinue;
else
message "Privilege escalation was necessary to delete directory ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
else
scs=0;
fi;
fi;
break 1;
done;
else
message "You elected not to delete the base-directory for ${tarball_base_name}. Aborting install." "Installation Abort";
return 1;
fi;
fi;
fi;
if `${echo} ${1} | ${grep} -q "^.*\.tar\.bz2$"`; then
command="${tar} --directory=${2} -xvjf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.gz$" -e "^.*\.tgz$"`; then
command="${tar} --directory=${2} -xvzf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q -e "^.*\.tar\.lzma$"`; then
command="${tar} --directory=${2} --lzma -xvf ${1} ${4}";
else
if `${echo} ${1} | ${grep} -q "^.*\.tar\.xz$"`; then
xz_file="`${basename} ${1}`";
tar_file="`${echo} ${xz_file} | ${sed} -e 's;\.xz;;g'`";
command="copy ${1} ${2} && cd ${2} && ${xz} -d ${xz_file} && tar -xvf ${tar_file} && remove_file ${tar_file}";
unset xz_file tar_file;
else
if `${echo} ${1} | ${grep} -q "^.*\.zip$"`; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
command="${unzip} -d ${2} ${1}";
else
command="${unzip} -d ${2}/${tarball_base_name} ${1}";
fi;
else
message "Unable determine how to uncompress package, ${1}" "Uncompress Failure";
return 1;
fi;
fi;
fi;
fi;
fi;
height=35;
width=150;
calculate_dimensions;
eval ${command} > ${global_temp_file1} 2>&1 & sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "Releasing ${tarball_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Releasing ${tarball_name} ($start_time)";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Unpacking ${tarball_base_name} into \Z1${2}\Zn... - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
kill_proc `${cat} ${global_temp_file2}`;
${sleep} 1;
if [ ${return_val} -ne 0 ]; then
message "Error uncompressing ${tarball_base_name}" "Uncompress Failure";
return 1;
fi;
return 0
}
_ENV["check_remote_file_exists"] => () { if [ $# -ne 1 ]; then
message "check_remote_file_exists <url>" "check_remote_file_exists";
return 1;
fi;
local pid1;
check_connection || return 1;
${wget} -v --tries 2 --timeout=40 --spider ${1} &>${global_temp_file3} & pid1=$!;
wait ${pid1};
return_val=$?;
[ ${return_val} -ne 0 ] && return 1;
${grep} -iq -e "No such file" -e "unable to resolve" -e "HTTP_NOT_FOUND" -e "Invalid PORT" -e "Remote file does not exist" -e "not retrieving" ${global_temp_file3};
return_val=$?;
[ ${return_val} -eq 0 ] && return 1;
return 0
}
_ENV["chg_file_owner"] => () { if [ $# -ne 2 ]; then
message "Usage: chg_file_owner <new owner> <file>" "chg_file_owner";
return 1;
fi;
if ! ${chown} "${1}:${1}" "${2}"; then
message "There was an error changing ownership of file ${2} to ${1}." "Message";
fi
}
_ENV["display_batch_list"] => () { if [ $# -eq 0 ]; then
make_title "Batch List Display";
${dialog} --backtitle "${main_title}" --colors --infobox "\Z1Batch list is empty.\Zn" 8 60 1>&0;
sleep 2;
return 0;
fi;
local command;
local file2_dbl;
local description_dbl;
local count=0;
height=20;
width=130;
calculate_dimensions;
make_title "Batch List Display";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"Remove\" --cancel-label \"Prev\" --extra-button --extra-label \"Clear\" --menu \"Current batch list\" ${height} ${width} ${height} ";
for i in $@;
do
count=$(( ++count ));
if `${echo} ${i} | ${grep} -iq "script:"`; then
file2_dbl="`${echo} ${i} | cut -d: -f2 | ${sed} -e 's;^\s+;;g'`";
description_dbl="`${cat} ${file2_dbl} | ${grep} -i "^#Desc:.*" | ${sed} -e 's;^#Desc:;;g'`";
[ -z "${description_dbl}" ] && description_dbl="No description";
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. `${basename} ${i}`\" \"SCRIPT: ${description_dbl}\" ";
else
file2_dbl="${data_dir}/${i}/df";
if ! file_empty ${file2_dbl}; then
description_dbl=`${cat} ${file2_dbl}`;
else
description_dbl="No description";
fi;
description_dbl="${description_dbl:0:255}";
command="${command} \"${count}. ${i}\" \"${description_dbl}\" ";
fi;
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return $?
}
_ENV["main_window"] => () { height=35;
width=100;
calculate_dimensions;
make_title "Main Selection Window";
command="${dialog} --backtitle \"${main_title}\" --cancel-label \"Exit\" ";
command="${command} --menu \"What would you like to do?\n\" ${height} ${width} 50 \"Install\" \"Configure & Install A Program\" ";
command="${command} \"Check Config\" \"Review Program Configuration\" ";
command="${command} \"Get Program\" \"Download New Program & Create Directory Structure\" ";
command="${command} \"Create Batch\" \"Create A Batch File\" ";
command="${command} \"Edit Batch\" \"Edit A Batch File\" ";
command="${command} \"Run Batch\" \"Load An Existing Batch File\" ";
command="${command} \"Edit MD5/SHA Checksum\" \"Edit File Signatures\" ";
if [ -f "${profile}/requisites" ]; then
command="${command} \"Version Check\" \"Host System Program Requirement Versions\" ";
fi;
command="${command} \"Variables\" \"View & Set Variables\" ";
command="${command} \"Scripts\" \"Run & Edit Scripts\" ";
command="${command} \"Shell\" \"Run shell\"";
command="${command} \"About\" \"\"";
eval ${command} 2> ${global_temp_file5};
return $?
}
_ENV["script_options"] => () { if [ $# -ne 1 ]; then
message "Usage: script_options <file>" "script_options";
return 1;
fi;
local command;
selection="";
height=20;
width=120;
calculate_dimensions;
make_title "Options";
get_time "`${basename} ${1}`" "-";
command="${dialog} --backtitle \"${main_title}\" --title \"File '${1}' Options (Run Time: ${hour}h ${min}m ${sec}s)\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Execute\" \"\" off";
command="${command} \"Modify\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"Move File\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
_ENV["copy"] => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
if [ -d "${1}" ]; then
${cp} -r "${1}" "${2}";
else
if [ -f "${1}" ]; then
${cp} "${1}" "${2}";
fi;
fi;
if [ $? -eq 1 ]; then
message "Unable to copy ${1} to ${2}." "Copy Error";
return 1;
fi;
return 0
}
_ENV["retrieve_pkg"] => () { if [ $# -ne 2 ]; then
message "Usage: retrieve_pkg <url> <install dir>" "retrieve_pkg";
return 1;
fi;
height=20;
width=135;
calculate_dimensions;
local sub_pid1;
clear_global_files;
${echo} "Retrieving file ${1}..." > ${global_temp_file3};
${echo} "" >> ${global_temp_file3};
make_title "Retrieving ${1}";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Retrieval Of ${1}" --no-kill --tailboxbg "${global_temp_file3}" ${height} ${width} 2> ${global_temp_file4};
while file_empty ${global_temp_file4}; do
${sleep} 1;
done;
fi;
${wget} -v --timeout=30 --directory-prefix=${2} -o /dev/null ${1} & sub_pid1=$!;
wait ${sub_pid1};
return_val=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file4}`;
if [ ${return_val} -ne 0 ]; then
message "Failed to download `${basename} ${1}` at ${1}" "Download Failure";
fi;
return 0
}
_ENV["get_time"] => () { if [ $# -ne 2 ]; then
message "Usage: get_time <search-for name> <run level or '-' for script>" "get_time";
return 1;
fi;
local t1=0;
local total_min=0;
local t_sec=0;
local line;
hour=0;
min=0;
sec=0;
[ ! -f "${times_file}" ] && return 0;
if [ "${2}" == "-" ]; then
line=`${grep} "^${1}:-.*" ${times_file}`;
else
if [ "${2}" != "-" ]; then
line=`${grep} "^${1}:${2}.*" ${times_file}`;
else
return;
fi;
fi;
[ -z "${line}" ] && return 0;
t_sec="`${echo} ${line} | cut -d: -f3`";
total_sec=$(( total_sec + t_sec ));
[ ${total_sec} -eq 0 ] && return;
total_min=$(${echo} "scale=5; ${t_sec}/60" | bc);
min="`${echo} ${total_min} | cut -d"." -f1`";
[ -z "${min}" ] && min=0;
t1="`${echo} ${min}*60 | bc`";
sec="$(${echo} ${t_sec}-${t1} | bc)";
if [ ${min} -ge 60 ]; then
hour=`${echo} "scale=5; ${min}/60" | bc`;
hour=`${echo} ${hour} | cut -d"." -f1`;
t1=`${echo} "${hour}*60" | bc`;
min=`${echo} "${min}-${t1}" | bc`;
fi;
return
}
_ENV["global_script_run_root"] => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run_root <path to script> <title>" "global_script_run_root";
return 1;
fi;
local scs=0;
local return_val=0;
export path=${1};
export title=${2};
if ! root; then
while :; do
${clear};
${echo} "*** Enter root password to proceed with installation of ${title} ***";
${su} -c '(
global_script_run "${path}" "${title}" || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
if ! global_script_run "${path}" "${title}"; then
return_val=1;
fi;
fi;
export -n path title error_in_chroot;
return ${return_val}
}
_ENV["yesno_inquiry"] => () { if [ $# -ne 2 ]; then
message "Usage: yesno_inquiry <title> <prompt>" "yesno_inquiry";
return 1;
fi;
make_title "Inquiry";
${dialog} --backtitle "${main_title}" --colors --title "${1}" --yesno "${2}" 15 100;
[ $? -eq 1 ] && return 1;
return 0
}
_ENV["global_script_run"] => () { if [ $# -ne 2 ]; then
message "Usage: global_script_run <path to script> <title>" "global_script_run";
return 1;
fi;
declare -i j=0;
local var1;
local sub_pid1;
local sub_pid2;
local env_cmd="";
var1=${2};
check_for_directory "${release_dir}/${tarball_base_name}" || return 1;
make_executable_file ${global_temp_file2} || return 1;
if `${grep} -q "#build" ${prog_dir}/mstr_conf`; then
if ! check_for_directory "${release_dir}/${tarball_base_name}/build"; then
make_dir "${release_dir}/${tarball_base_name}/build" || return 1;
fi;
${echo} -e "cd ${install_dir}/${tarball_base_name}/build\n" > ${global_temp_file2};
else
${echo} -e "cd ${install_dir}/${tarball_base_name}\n" > ${global_temp_file2};
fi;
${cat} ${1} >> ${global_temp_file2};
height=35;
width=150;
calculate_dimensions;
if `${grep} -m1 -q "^#pre_lfs" ${run_dir}/conf`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
${clear};
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
else
${clear};
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} > ${global_temp_file1};
return_val=$?;
else
${tail} -f ${global_temp_file1} & tail_pid=$!;
${global_temp_file2} &>${global_temp_file1} & cmd_pid=$!;
wait ${cmd_pid};
return_val=$?;
fi;
fi;
kill ${tail_pid};
else
if `${grep} -m1 -q "^#chroot_flag" ${run_dir}/conf`; then
copy ${global_temp_file2} ${chroot_dir}/tmp || return 1;
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} | tee ${global_temp_file1} &
else
chroot "${chroot_dir}" ${env_cmd} -i HOME=/tmp TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file2} &>${global_temp_file1} &
fi;
else
if `${grep} -m1 -q "^#no_redirect" ${global_temp_file2}`; then
${global_temp_file2} | tee ${global_temp_file1} &
else
${global_temp_file2} &>${global_temp_file1} &
fi;
fi;
sub_pid1=$!;
if [ ${batch_flag} -eq 0 ]; then
make_title "${var1} Of ${tarball_base_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "${var1} Of ${tarball_base_name} (${start_time})";
fi;
if debug; then
:;
else
${dialog} --colors --backtitle "${main_title}" --title "Run level ${run} - \Z1Estimated build time: ${hour}h:${min}m:${sec}s\Zn" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file3};
while file_empty ${global_temp_file3}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
${sleep} 2;
return_val=$?;
kill_proc `${cat} ${global_temp_file3}`;
fi;
if [ ${return_val} -eq 0 ]; then
${sleep} 2;
else
${sleep} 3;
fi;
${rm} -f ${chroot_dir}/tmp/lfs* &>/dev/null;
if [ ${return_val} -ne 0 ]; then
return 1;
else
return 0;
fi
}
_ENV["are_digits"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_dups <list>" "remove_dups";
return 1;
fi;
if `${echo} ${1} | ${grep} -q -e "\." -e "[^0-9]"`; then
return 1;
else
return 0;
fi
}
_ENV["calculate_dimensions"] => () { local value;
local max_ht=0;
local max_wd=0;
value=`stty size`;
max_ht=`${echo} ${value} | cut -d" " -f1`;
max_wd=`${echo} ${value} | cut -d" " -f2`;
max_ht=$(( max_ht - 10 ));
max_wd=$(( max_wd - 10 ));
[ ${height} -le ${max_ht} ] || height=${max_ht};
[ ${width} -le ${max_wd} ] || width=${max_wd};
return 0
}
_ENV["check_sig_rpkg"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_rpkg <file list>" "check_sig_rpkg";
return 1;
fi;
clear_global_files;
local prog;
local run;
local rp_name;
local sig1;
local sig2;
local list;
local error=1;
local flag=0;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
run="`${echo} ${line} | ${cut} -d: -f2`";
prog="`${echo} ${line} | ${cut} -d: -f1`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Required Tarballs For ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
list="`${cat} ${data_dir}/${prog}/${run}/rpkg`";
for rp_name in ${list};
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
if ! find_file ${rp_name} ${prog_src_dir}; then
${echo} "Unable to find required package ${rp_name}..." > ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Checking ${rp_name}..." >> ${global_temp_file1};
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${grep} -m1 ${rp_name} ${data_dir}/${prog}/checksum | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA (algorithm ${sha_alg}): Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${rp_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 2;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${grep} -m1 \"${rp_name}\" ${data_dir}/${prog}/checksum | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${rp_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${rp_name}! @ `date`" >> ${install_log};
error=1;
break 2;
else
${echo} "MD5: signature check passed for ${rp_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${rp_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
${sleep} 2;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
flag=0;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
[ ${error} -eq 0 ] && break 1;
done;
${sleep} 1;
[ ${error} -eq 0 ] && return 1;
return 0
}
_ENV["get_tarball_base_from_tb"] => () { if [ $# -gt 2 ]; then
message "Usage: get_tarball_base_from_tb <path to tarball> [remove tmp file]" "get_tarball_base_from_tb";
return 1;
fi;
rm_file=${2:-0};
local sub_pid1;
if [ ! -e "${1}" ]; then
message "Unable to find tarball `${basename} ${1}`." "Tarball Find Failure";
return 1;
fi;
local scs=0;
while :; do
if ${echo} "${1}" | ${grep} -q -e "^.*xz$"; then
bn="`${basename} ${1}`";
bu="${bn}.bk";
[ ! -f "/tmp/${bn}" ] && copy ${1} /tmp;
copy "${1}" "/tmp/${bu}";
${xz} -d "/tmp/${bn}";
bn="`${echo} ${bn} | ${sed} -e 's;\.xz$;;g'`";
${tar} -t -f /tmp/${bn} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
remove_file "/tmp/${bn}";
if [ ${rm_file} -eq 0 ]; then
remove_file "/tmp/${bu}" || return 1;
else
move "/tmp/${bu}" "/tmp/${bn}.xz" || return 1;
fi;
else
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
${unzip} -l ${1} &>${global_temp_file1};
else
${tar} -t -f ${1} &>${global_temp_file1} & sub_pid1=$!;
wait ${sub_pid1};
fi;
fi;
if `file_empty ${global_temp_file1}`; then
message "Unable to get tarball base name from temporary file for `${basename} ${1}`." "Tarball Base Name Retrieval";
scs=1;
break 1;
fi;
if ${echo} "${1}" | ${grep} -q -e "^.*zip$"; then
temp_name="`${sed} -n 4p ${global_temp_file1} | ${sed} -e 's;^\ *;;g' | ${cut} -d" " -f7`";
if `${echo} ${temp_name} | ${grep} -q "\/$"`; then
tarball_base_name="`${echo} ${temp_name} | ${sed} -e 's;\(^.*\)\/;\1;g'`";
else
tarball_base_name="`${basename} ${1} | ${sed} -e 's;\(^.*\)\.zip;\1;g'`";
fi;
else
tarball_base_name=`${grep} -m1 "\(^[^/]\+\)\/.*$" ${global_temp_file1} | ${sed} -e 's;\(^[^/]\+\)\/.*$;\1;g'`;
fi;
tarball_base_name="`${echo} ${tarball_base_name} | tr ' ' '_'`";
break 1;
done;
return ${scs}
}
_ENV["batch_program_and_script_screen"] => () { if [ $# -lt 1 ]; then
message "Usage: batch_program_and_script_screen <prog_list>" "batch_program_and_script_screen";
return 1;
fi;
prog_list="";
old_prog_list="";
local count_bp=0;
local selection_bpss;
while :; do
height=10;
width=65;
calculate_dimensions;
make_title "Batch Script Selection";
${dialog} --backtitle "${main_title}" --no-cancel --radiolist "Select either programs or scripts to add to the batch list" ${height} ${width} ${height} "Add program(s)" "" off "Add script(s)" "" off "View Current List" "" off 2> ${global_temp_file4};
return_val=$?;
selection_bpss="`${cat} ${global_temp_file4}`";
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && [ -z "${selection_bpss}" ] && return 0;
case ${selection_bpss} in
"Add program(s)")
while :; do
please_wait;
old_prog_list=${prog_list};
batch_program_listing $@;
return_val=$?;
if [ ! -z "${prog_list}" ]; then
prog_list="${old_prog_list} ${prog_list}";
else
prog_list="${old_prog_list}";
fi;
kill_please_wait;
[ $return_val -eq 1 ] && break 1;
done
;;
"Add script(s)")
local y;
local directory_bpss="";
local scripts_bpss="";
local script_bpss="";
y=`ls ${scripts_dir}`;
if [ ! -z "$y" ]; then
while :; do
select_from_list "Select a script directory" `ls ${scripts_dir}` || break 1;
directory_bpss=${selection};
scripts_bpss=`ls ${scripts_dir}/${directory_bpss}`;
if [ -z "${scripts_bpss}" ]; then
message "No scripts to select!" "No Scripts Found";
continue;
fi;
select_from_list "Select a script" ${scripts_bpss} || continue;
script_bpss=${selection};
[ -z "${script_bpss}" ] && continue;
${echo} "script:${scripts_dir}/${directory_bpss}/${script_bpss}" >> ${batch_file};
prog_list="${prog_list} script:${scripts_dir}/${directory_bpss}/${script_bpss}";
break 1;
done;
else
message "No script directories to select!" "No Script Directories Found";
fi;
unset y
;;
"View Current List")
display_batch_list ${prog_list};
case $? in
0)
if [ ! -z "${prog_list}" ]; then
remove_prog=`${cat} ${global_temp_file1}`;
[ -z "remove_prog" ] && continue;
line_no=${remove_prog:0:1};
remove_prog=`${echo} ${remove_prog} | cut -d" " -f2`;
if yesno_inquiry "Confirm Removal" "Are you sure that you want to remove the entry '${remove_prog}'?"; then
old_prog_list=${prog_list};
prog_list="";
count_bp=1;
for j in ${old_prog_list};
do
[ $(( count_bp++ )) -eq ${line_no} ] && continue;
prog_list="${prog_list} ${j}";
done;
if [ -f "${batch_file}" ]; then
eval ${sed} -i "${line_no}d" ${batch_file};
else
message "Unable to locate the batch file!" "Batch File Error";
return 1;
fi;
fi;
unset remove_prog old_prog_list;
fi
;;
3)
if yesno_inquiry "Confirm Clearing Of List" "Are you sure that you want to clear the batch list?"; then
prog_list="";
clear_file "${global_temp_file1}" || return 1;
clear_file "${batch_file}" || return 1;
fi
;;
esac
;;
esac;
done
}
_ENV["download_prog"] => () { if [ $# -lt 1 ]; then
message "Usage: download_prog <program list>" "download_prog ";
fi;
clear_global_files;
local prog="";
local run="";
local scs;
local found;
local list1="";
local list2="";
local command="";
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
scs=1;
found=1;
tarball_name="";
run="`${echo} ${z} | ${cut} -d: -f2`";
prog="`${echo} ${z} | ${cut} -d: -f1`";
if ! file_empty ${data_dir}/${prog}/tb_name; then
tarball_name=`${cat} ${data_dir}/${prog}/tb_name`;
if [ ! -z "${tarball_name}" ]; then
tarball_in_string ${tarball_name};
scs=0;
fi;
fi;
if [ ${scs} -eq 1 ]; then
list1="`${grep} ${prog} ${shasum_file}`";
z=0;
for i in ${list1};
do
if `${echo} ${i} | ${grep} -q "${prog}\.\(tar\|tzg\|zip\|xz\|lzma\).*"`; then
list2="${list2} ${i}";
else
continue;
fi;
z=$(( ++z ));
done;
if [ ${z} -gt 1 ]; then
height=20;
width=120;
calculate_dimensions;
make_title "Choose A Tarball For Installation";
command="${dialog} --backtitle \"${main_title}\" --menu \"Select the tarball to use\" ${height} ${width} ${height}";
z=1;
for i in ${list};
do
command="${command} \"${z}. ${i}\" \"\"";
z=$(( ++z ));
done;
eval ${command} 2> ${global_temp_file1};
tarball_name="`${cat} ${global_temp_file1} | ${cut} -d\" \" -f2`";
else
tarball_name="${list2}";
fi;
unset z;
if [ ! -z "${tarball_name}" ]; then
[ ! -f "${data_dir}/${prog}/tb_name" ] && ${touch} "${data_dir}/${prog}/tb_name";
${echo} "${tarball_name}" > "${data_dir}/${prog}/tb_name";
fi;
fi;
if [ -z "${tarball_name}" ]; then
message "Unable to set tarball name for ${prog}." "Unable To Set Tarball Name";
return 1;
fi;
tarball_name="`trim_spaces ${tarball_name}`";
if find_file ${tarball_name} ${prog_src_dir}; then
path="${file_name_path}";
[ ! -z "${path}" ] && found=0;
fi;
if [ ${found} -eq 1 ]; then
if ! file_empty "${profile}/mstr_urls"; then
scs=1;
height=20;
width=120;
list1="";
calculate_dimensions;
check_connection || return 1;
${echo} "Searching for ${tarball_name}..." > ${global_temp_file1};
make_title "Tarball Search For ${tarball_name}";
${dialog} --backtitle "${main_title}" --title "Tarball Search For ${tarball_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;\(^.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
for line in ${list1};
do
`${echo} ${line} | ${grep} -iq -e "^#.*$" -e "^$" -` && continue;
url="`${echo} ${line}/${tarball_name}`";
if verify_tarball_url "${url}"; then
${echo} "Searching at ${line}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Found at ${url}..." >> ${global_temp_file1};
${sleep} 2;
found=0;
${echo} "${line}" > "${data_dir}/${prog}/purl";
break 1;
fi;
fi;
done;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
fi;
else
scs=0;
fi;
if [ ${scs} -eq 1 ] && [ ${found} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${line}/${tarball_name}" /tmp; then
message "Unable to download ${name} from ${line}" "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
while :; do
prompt_for_value "Program URL" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${tarball_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
return 1;
fi;
fi;
break 1;
done;
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
if check_remote_file_exists "${prompt_value}"; then
located=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
tarball_name=`${basename} ${prompt_value}`;
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && ${echo} "${url_dir}" >> ${profile}/mstr_urls;
${echo} "${url_dir}" > "${data_dir}/${prog}/purl";
fi;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
if [ ${located} -eq 0 ]; then
check_connection || return 1;
if ! retrieve_pkg "${prompt_value}" /tmp; then
message "Unable to download ${tarball_name} from ${url_dir}." "File Download Failed";
return 1;
fi;
if [ ! -f "/tmp/${tarball_name}" ]; then
message "Tarball file not found in /tmp directory." "Tarball Not Found";
return 1;
fi;
if ! move "/tmp/${tarball_name}" "${prog_src_dir}"; then
message "Unable to move file ${tarball_name} to source directory." "Tarball File Move Error";
return 1;
fi;
scs=0;
fi;
fi;
done;
return 0
}
_ENV["log_viewer"] => () { if [ $# -ne 2 ]; then
message "Usage: log_viewer <tarball base name> <run level>" "log_viewer";
return 1;
fi;
local scs=0;
while :; do
[ ! -d "${data_dir}/${1}/${2}/log" ] && message "Unable to find log directory for ${1}." "No Log Directory" && return 1;
local list1="`ls ${data_dir}/${1}/${2}/log`";
if [ -z "${list1}" ]; then
message "There are no log files to view for ${1} (run level ${2})." "No Log Files";
break 1;
fi;
local command="";
make_title "Log File Viewer";
command="${dialog} --colors --backtitle \"${main_title}\" --title \"${1} - run level: ${run}\" --cancel-label \"Prev\" --radiolist \"Log files for ${1}\" 20 90 20";
for i in ${list1};
do
command="${command} \"${i}\" \"\" \"off\"";
done;
eval ${command} 2> ${global_temp_file2};
return_val=$?;
if [ ${return_val} -ne 0 ] || file_empty ${global_temp_file2}; then
break 1;
else
local file="`${cat} ${global_temp_file2}`";
local file2="";
[ -z "${file}" ] && return 1;
if ! check_for_file "${data_dir}/${1}/${2}/log/${file}"; then
message "Unable to find log file '${file}'." "Log File Not Found";
scs=1;
break 1;
fi;
if `${echo} $file | ${grep} -q ".*bz2$"`; then
file2="`${echo} $file | ${sed} -e 's;\.tar\.bz2;;g' -e 's;\.old;;g'`";
${tar} -C /tmp -xjf "${data_dir}/${1}/${2}/log/${file}";
else
message "Unknown extension; unable to extract log data for ${1}." "Extraction Error";
scs=1;
break 1;
fi;
if [ ! -f "/tmp/${file2}" ]; then
message "Failed to locate the uncompressed log file in the tmp directory." "Log File Not Found";
scs=1;
break 1;
else
if ! edit_file "/tmp/${file2}" "1"; then
message "There was an error editing the file, '${file}', for ${1}." "File Edit Error";
fi;
fi;
remove_file "/tmp/${file2}";
fi;
done;
return ${scs}
}
_ENV["file_empty"] => () { if [ $# -ne 1 ]; then
message "Usage: file_empty <path to file>" "file_empty";
return 1;
fi;
local var1;
[ ! -e "${1}" ] && return 0;
var1=`${cat} ${1}`;
[ -z "${var1}" ] && return 0;
unset var1;
return 1
}
_ENV["update_time"] => () { if [ $# -ne 3 ]; then
message "Usage: update_time <tarball base name or script name> <run level (or - for script)> <new_time>" "update_time";
return 1;
fi;
local sec=${3};
[ ! -f "${times_file}" ] && ${touch} ${times_file};
sec=$(( sec + 0 ));
if [ "${2}" == "-" ]; then
if `${grep} -q ${1}:-:* ${times_file}`; then
${sed} -i -e "s;^${1}:-:.*$;${1}:-:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:-:${sec}" >> ${times_file} || return 1;
fi;
else
if `${grep} -q ${1}:${2}:* ${times_file}`; then
${sed} -i -e "s;^${1}:${2}:.*$;${1}:${2}:${sec};g" ${times_file} || return 1;
else
${echo} "${1}:${2}:${sec}" >> ${times_file} || return 1;
fi;
fi;
return 0
}
_ENV["get_run_level"] => () { if [ $# -ne 1 ]; then
message "Usage: get_run_level <program name>" "get_run_level";
return 1;
fi;
local var1_grl=${1};
local list1_grl="";
local list2_grl="";
local command="";
local count=0;
local desc="";
list1_grl=`ls ${data_dir}/${var1_grl}`;
for i in ${list1_grl};
do
[ "${i}" == "list1_grl" ] && continue;
! are_digits "${i}" && continue;
list2_grl="${list2_grl} ${i}" && count=$(( ++count ));
done;
[ -z "${list2_grl}" ] && return 1;
if [ ${count} -le 1 ]; then
run=1;
return 0;
else
while :; do
height=20;
width=120;
calculate_dimensions;
command="${dialog} --backtitle \"${gen_title}\" --no-cancel --ok-label \"Submit\" --title \"Multiple run levels found for ${var1_grl}\" --radiolist \"Select a run level\" ${height} ${width} 20 ";
for i in ${list2_grl};
do
desc="`${grep} '^#Desc:.*$' ${data_dir}/${var1_grl}/${i}/conf`";
if [ ! -z "${desc}" ]; then
desc="`${echo} ${desc} | ${sed} -e 's;^#Desc:\ *\(.*$\);\1;g'`";
else
desc="No Description Found";
fi;
desc="${desc:0:255}";
command="${command} \"${i}\" \"${desc}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
[ ${return_val} -eq 0 ] && file_empty ${global_temp_file1} && break 1;
if ! file_empty ${global_temp_file1}; then
run=`${cat} ${global_temp_file1}`;
break 1;
fi;
done;
[ -z "${run}" ] && run=1;
return 0;
fi
}
_ENV["add_addl_run_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: add_addl_run_dir <program base name>" "add_addl_run_dir";
fi;
yesno_inquiry "Add Run Directory" "You chose to add an additional run-level. Is this correct?" || return 1;
local success=1;
local make_copy=0;
local next=0;
current=0 && export current;
highest_run_level ${1} || return 1;
next=$((current+1));
if yesno_inquiry "Copy Directory" "Would you like to copy the most recent run level (${current}) to the new run level (${next})?"; then
make_copy=0;
else
make_copy=1;
fi;
height=20;
width=120;
calculate_dimensions;
case ${make_copy} in
"0")
${echo} "Copying file structure for ${tarball_base_name}..." > ${global_temp_file1}
;;
"1")
${echo} "Creating file structure for ${tarball_base_name}, run-level ${next}..." > ${global_temp_file1}
;;
esac;
${echo} "" >> ${global_temp_file1};
make_title "Additional Run Level";
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
case ${make_copy} in
"0")
if ! copy "${prog_dir}/${current}" "${prog_dir}/${next}"; then
${echo} "An error occurred copying data to the new run level!" >> ${global_temp_file1};
else
${echo} "Copied run level ${current} to new run level ${next} for ${1}..." >> ${global_temp_file1};
success=0;
fi
;;
"1")
while :; do
for dir in "${prog_dir}/${next}" "${prog_dir}/${next}/ef" "${prog_dir}/${next}/log";
do
if ! check_for_directory "${dir}"; then
make_dir "${dir}" || break 2;
fi;
done;
for file in "cf" "pre-cf" "post-cf" "ip" "mf" "mi" "make_check_test" "pf" "rpkg" "patch_list" "conf";
do
make_file "${prog_dir}/${next}/${file}" || break 2;
done;
success=0;
break 1;
done;
if [ ${success} -eq 0 ]; then
${echo} "Creation of run-level ${next} for ${tarball_base_name} successful..." >> ${global_temp_file1};
else
if [ ${success} -eq 1 ]; then
${echo} "An error occurred in the creation of run-level ${next} for ${tarball_base_name}!" >> ${global_temp_file1};
fi;
fi
;;
esac;
${sleep} 3;
kill_proc `${cat} ${global_temp_file2}` || exit 1;
export -n current;
return ${success}
}
_ENV["check_for_file"] => () { if [ $# -ne 1 ]; then
message "Usage: check_for_file <file path>" "check_for_file";
return 1;
fi;
[ ! -f "${1}" ] && return 1;
return 0
}
_ENV["create_directory_listing"] => () { if [ $# -ne 1 ]; then
message "Usage: create_program_list <directory>" "create_program_list";
return 1;
else
if [ ! -d "${1}" ]; then
message "Argument ${1} is not a directory." "create_program_list";
return 1;
fi;
fi;
prog_list="";
for i in `ls ${1}`;
do
[ -z "${i}" ] && break 1;
[ ! -d "${1}/${i}" ] && continue;
prog_list="${prog_list} ${i}";
done;
if [ -z "${prog_list}" ]; then
message "Empty program listing!" "Directory Listing Creation";
return 1;
else
return 0;
fi
}
_ENV["trim_spaces"] => () { if [ $# -lt 1 ]; then
message "Usage: trim_spaces <string(s)>" "trim_space";
return 1;
fi;
${echo} ${1} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"
}
_ENV["make_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: make_dir <path>" "make_dir";
return 1;
fi;
[ -d "${1}" ] && return 0;
if ! ${mkdir} -p ${1} &>/dev/null; then
message "Unable to make directory ${1}" "Make directory";
return 1;
fi;
if ! eval ${chmod} 775 ${1} || ! eval ${chmod} ug+s ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
return 0
}
_ENV["download_patch"] => () { if [ $# -lt 1 ]; then
message "Usage: download_patch <program list>" "download_patch";
return 1;
fi;
clear_global_files;
local prog;
local run;
local list1="";
local list2="";
local found;
local patch_name;
for line in $@;
do
`${echo} ${line} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
error=0;
prog="`${echo} ${line} | cut -d: -f1`";
run="`${echo} ${line} | cut -d: -f2`";
file_empty "${data_dir}/${prog}/${run}/patch_list" && continue;
height=20;
width=120;
calculate_dimensions;
make_title "Patch Search For ${prog}";
IFS=$(${echo} -e "\n\r");
for patch_name in `${cat} ${data_dir}/${prog}/${run}/patch_list`;
do
`${echo} ${patch_name} | ${grep} -iq -e '^#.*' -e '^$' -e '^script:.*' -` && continue;
found=1;
scs=1;
unset IFS;
find_file ${patch_name} ${patch_src_dir} && continue;
IFS=$(${echo} -e "\n\r");
${dialog} --backtitle "${main_title}" --title "Patch Search - ${prog}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
${echo} "Searching for patch, ${patch_name}..." > ${global_temp_file1};
${echo} "" >> ${global_temp_file1};
! file_empty "${data_dir}/${prog}/purl" && list1="`head -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
for h in `${cat} "${profile}/mstr_urls"`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
`${echo} ${url} | ${grep} -iq -e '^#.*' -e '^$' -` && continue;
${echo} "Searching at ${url}..." >> ${global_temp_file1};
url="${url}/${patch_name}";
url="${url:0:255}";
! verify_url ${url} && continue;
if ! check_connection; then
${echo} "Network connection failed...please check." >> ${global_temp_file1};
error=1;
break 1;
fi;
check_remote_file_exists ${url};
rt=$?;
if [ ${rt} -eq 0 ]; then
${echo} "" >> ${global_temp_file1};
${echo} "Patch ${patch_name} found at ${url}." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
[ ${error} -eq 1 ] && break 1;
clear_global_files;
if [ ${found} -ne 0 ]; then
while :; do
if ! prompt_for_value "Patch URL" "Enter URL for patch '${patch_name}'" "URL"; then
return 1;
fi;
if [ -z "${prompt_value}" ]; then
if yesno_inquiry "Try Again?" "No URL was entered. Would you like to try again?"; then
continue;
else
error=1;
break 3;
fi;
fi;
break 1;
done;
if ! verify_url ${prompt_value}; then
message "Unable to verify URL for patch, ${patch_name}." "Failed URL Verification";
error=1;
break 2;
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=0;
break 2;
fi;
clear_global_files;
if ! check_remote_file_exists ${prompt_value}; then
message "Patch, ${patch_name}, does not exist at the supplied URL, ${url}...exiting." "Remote File Non-Existent";
error=1;
break 2;
fi;
url="${prompt_value:0:255}";
fi;
if ! ${grep} -iq "`${dirname} ${url}`" "${profile}/mstr_urls"; then
${echo} "`${dirname} ${url}`" >> "${profile}/mstr_urls";
fi;
if ! check_connection; then
message "Network connection failed...please check." "Remote File Non-Existent";
error=1;
break 2;
fi;
clear_global_files;
if ! retrieve_pkg ${url} /tmp; then
message "Unable to retrieve required tarball, ${patch_name}." "Patch Tarball Retrieval Error";
error=1;
break 2;
fi;
if [ ! -f "/tmp/${patch_name}" ]; then
message "Unable to find the patch, ${patch_name}, in the /tmp directory.";
error=1;
break 1;
fi;
if ! move "/tmp/${patch_name}" "${patch_src_dir}"; then
message "There was an error moving patch ${patch_name} to the source directory." "File Move Error";
error=1;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 1 ] && break 1;
done;
return ${error}
}
_ENV["make_file"] => () { if [ $# -ne 1 ]; then
message "Usage: make_file <file path>" "make_file";
return 1;
fi;
check_for_file "${1}" && return 0;
err=1;
while :; do
if ! ${touch} ${1}; then
err=0;
break 1;
fi;
${chmod} 775 ${1} || err=0;
break 1;
done;
if [ ${err} -eq 0 ]; then
message "Error creating file ${1}." "File Creation" && return 1;
return 1;
fi;
return 0
}
_ENV["chroot_mounted"] => () { `${mount} -l | cut -d' ' -f3 | ${grep} -q "${chroot_dir}"` || return 1;
return 0
}
_ENV["execute_script_root"] => () { if [ $# -ne 1 ]; then
message "Usage: execute_script_root <path to script>" "execute_script_root";
return 1;
fi;
local script_esr="${1}";
export script_esr;
local return_val=0;
if ! root; then
while :; do
${clear};
${echo} -e "*** Enter root password to proceed ***\n";
${su} -c '(
execute_script ${script_esr} || exit 5
chg_tmp_file_owner ${init_user} || exit 5
exit 0
)';
return_val=$?;
if [ ${return_val} -eq 5 ]; then
return_val=1;
break 1;
else
if [ ${return_val} -eq 1 ]; then
if yesno_inquiry "Incorrect Password" "The incorrect password was entered. Try again?"; then
continue;
else
break 1;
fi;
fi;
fi;
break 1;
done;
else
execute_script ${script_esr} || return_val=1;
fi;
unset script_esr;
return ${return_val}
}
_ENV["tarball_in_string"] => () { if [ $# -ne 1 ]; then
message "Usage: tarball_in_string <string>" "tarball_in_string";
return 1;
fi;
if ${echo} ${1} | ${grep} -iq -e ".*tgz$" -e ".*gz$" -e ".*bz2$" -e ".*zip$" -e ".*xz$" -e ".*lzma$"; then
return 0;
else
return 1;
fi
}
_ENV["new_dir_name"] => () { prompt_for_value "Script Directory Name" "Enter new directory name" "Name" || return 1;
return 0
}
_ENV["edit_file"] => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: edit_file <path to file> [save flag]" "edit_file";
return 1;
fi;
local scs=1;
local save_flag="${2:-0}";
EDITOR="vi";
if [ ! -f "${1}" ]; then
make_file ${1} || return 1;
fi;
find_file "`${basename} ${EDITOR}`";
if [ ! -z "${file_name_path}" ] && [ -f "${file_name_path}" ]; then
${cat} ${1} > ${global_temp_file3};
${file_name_path} ${global_temp_file3};
if [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
else
return_val=0;
fi;
fi;
scs=0;
fi;
if [ ${scs} -eq 1 ]; then
local command="";
height=35;
width=150;
calculate_dimensions;
make_title "File Edit";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Save\" --cancel-label \"Do Not Save\" --cr-wrap --editbox \"${1}\" ${height} ${width}";
eval ${command} 2> ${global_temp_file3};
return_val=$?;
if [ ${return_val} -eq 0 ] && [ ${save_flag} -eq 0 ]; then
if ! save_file ${1} ${global_temp_file3}; then
return_val=1;
fi;
fi;
fi;
return ${return_val}
}
_ENV["new_batch_name"] => () { prompt_for_value "Batch File Name" "Enter new batch file name" "Name" || return 1;
return 0
}
_ENV["clear_global_files"] => () { for i in ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4};
do
clear_file "${i}" || return 1;
${touch} ${i} || return 1;
done;
return 0
}
_ENV["move"] => () { if [ $# -ne 2 ]; then
message "Usage: move <source> <dest>" "Move";
fi;
${mv} -f "${1}" "${2}";
if [ $? -eq 1 ]; then
message "There was an error moving file ${1} --> ${2}." "File Move";
return 1;
fi;
return 0
}
_ENV["save_file"] => () { if [ $# -ne 2 ]; then
message "Usage: save_file <file name> <file to copy>" "save_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
make_file ${1} || return 1;
else
if [ ! -e "${2}" ]; then
message "File to copy is missing or empty. No save will be done." "Missing Save-From File";
return 0;
fi;
fi;
if ! copy "${2}" "${1}"; then
message "Error saving file." "File Save";
return 1;
fi;
if [ -O ${1} ]; then
if ! ${chmod} 775 ${1}; then
message "An error occurred while modifying the permissions of the file, '${1}'." "File Permissions Error";
return 1;
fi;
fi;
return 0
}
_ENV["check_for_directory"] => () { if [ -d "${1}" ]; then
return 0;
else
return 1;
fi
}
_ENV["prompt_for_value"] => () { if [ $# -ne 3 ]; then
message "Usage: prompt_for_value <title> <tag> <prompt>" "prompt_for_value";
return 1;
fi;
height=20;
width=120;
p_lgth=${#3};
local command;
calculate_dimensions;
make_title "Prompt";
command="${dialog} --backtitle \"${main_title}\" --title \"${1}\" --ok-label \"Submit\" --form \"${2}\" ${height} ${width} 1 \"${3}:\" 1 1 \"\" 1 $(( p_lgth + 2 )) ${width} 200";
eval ${command} 2> ${global_temp_file1};
return_val=$?;
prompt_value=`${cat} ${global_temp_file1}`;
if [ ${#prompt_value} -gt 200 ]; then
prompt_value=${prompt_value:0:255};
fi;
if [ ${return_val} -ne 0 ] || [ -z "${prompt_value}" ]; then
prompt_value="";
return 1;
else
prompt_value="`${echo} ${prompt_value} | tr ' ' '_'`";
return 0;
fi
}
_ENV["execute_script"] => () { if [ $# -ne 1 ]; then
message "Usage: execute_script <path to script file>" "execute_script";
return 1;
fi;
if [ ! -f "${1}" ]; then
message "No script found!" "Script Find Error";
return 1;
fi;
if `${grep} -m 1 -q "^#chroot_flag" ${1}` && ! check_for_directory ${chroot_dir}/tmp; then
if ! make_dir ${chroot_dir}/tmp; then
message "Unable to make chroot temporary directory." "Chroot Tmp Directory Creation Error";
return 1;
fi;
fi;
if [ ${global_no_dialog} -eq 1 ]; then
`${grep} -m 1 -q "^#no_dialog" "${1}"` && no_dialog=0;
fi;
base_script_name="`${basename} ${1}`";
make_executable_file "${global_temp_file3}";
${cat} ${1} > ${global_temp_file3};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
if ! copy ${global_temp_file3} "${chroot_dir}/tmp/"; then
message "There was an error copying the script, '${1}', to the chroot temporary directory." "Script Copy Error";
return 1;
fi;
fi;
get_time ${base_script_name} "-";
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} $calc > ${global_time_file} && ${sleep} 1;
done & sub_pid2=$!;
if `${grep} -m 1 -q "^#pre_lfs" ${global_temp_file3}`; then
if [ -f "/tools/bin/env" ]; then
env_cmd="/tools/bin/env";
else
message "Unable to find the 'env' executable in the chroot directory." "No 'env' Executable Found";
return 1;
fi;
else
if [ -f "/usr/bin/env" ]; then
env_cmd="/usr/bin/env";
else
message "Unable to find the 'env' executable on the host directory." "No 'env' Executable Found";
return 1;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
${clear};
${echo} "Running script...";
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} | tee ${global_temp_file4};
else
${global_temp_file3} | tee ${global_temp_file4};
fi;
return_val=$?;
${sleep} 5;
else
height=35;
width=150;
calculate_dimensions;
local sub_pid1;
if [ ${batch_flag} -eq 0 ]; then
make_title "Running script ${base_script_name} (Batch Comp. Time: ${batch_hour}h ${batch_min}m ${batch_sec}s / ${start_time})";
else
make_title "Running script ${base_script_name} (${start_time})";
fi;
${echo} "Running script..." > ${global_temp_file4};
if `${grep} -m 1 -q "^#chroot_flag" ${1}`; then
chroot "${chroot_dir}" ${env_cmd} -i HOME=/root TERM="${TERM}" PS1="\u:\w\$ " PATH=/bin:/usr/bin:/sbin:/usr/sbin:/tools/bin /tools/bin/bash --login +h ${global_temp_file3} &>>${global_temp_file4} &
else
${global_temp_file3} &>>${global_temp_file4} &
fi;
sub_pid1=$!;
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Running Script: ${base_script_name} (Est. Completion Time: ${hour}h ${min}m ${sec}s)" --no-kill --tailboxbg ${global_temp_file4} ${height} ${width} 2> ${global_temp_file5};
while file_empty ${global_temp_file5}; do
${sleep} .5;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 5;
kill_proc `${cat} ${global_temp_file5}`;
fi;
disown ${sub_pid2};
kill ${sub_pid2};
${rm} -f ${chroot_dir}/tmp/lfs_script* &>/dev/null;
if ! update_time ${base_script_name} "-" `${cat} ${global_time_file}`; then
message "Warning: There was an error updating the time file for (script) ${base_script_name}...continuing." "Update Time File Error";
fi;
if [ ${return_val} -eq 1 ]; then
${echo} "Script error: ${base_script_name} @ `date`" >> ${install_log};
message "Script error: ${base_script_name}." "Script Error";
else
if [ ${return_val} -eq 0 ]; then
${echo} "Script finish: ${base_script_name} @ `date`" >> ${install_log};
fi;
fi;
return ${return_val}
}
_ENV["remove_file"] => () { if [ $# -lt 1 ]; then
message "Usage: remove_file <file path> ..." "remove_file";
return 1;
fi;
for z in $@;
do
[ ! -e "${z}" ] && continue;
${rm} -rf ${z} &>/dev/null;
if [ $? -eq 1 ]; then
message "There was an error removing file ${z}." "File Removal Error";
return 1;
fi;
done;
return 0
}
_ENV["abort_message"] => () { if [ $# -lt 1 ] || [ -z "${1}" ]; then
message "Usage: abort_message <text> [title]" && return 1;
fi;
local message_title;
message_title="${2}";
if [ -z "${message_title}" ]; then
${dialog} --sleep 2 --title "Installation Abort" --infobox "${1}" 10 30;
else
${dialog} --sleep 2 --title "Aborting Installation: ${message_title}." --infobox "${1}" 10 30;
fi;
exit 1
}
_ENV["make_executable_file"] => () { if [ $# -ne 1 ]; then
message "Usage: make_executable_file <file name>" "make_executable_file";
return 1;
fi;
if [ ! -e "${1}" ]; then
if ! make_file "${1}" || ! ${chmod} u+x ${1}; then
message "Unable to create file: ${1}." "Executable File Error";
return 1;
fi;
else
if [ ! -x "${1}" ]; then
if ! ${chmod} u+x ${1}; then
message "Unable to make file '${1}' executable." "Executable File Error";
return 1;
fi;
fi;
fi;
return 0
}
_ENV["kill_proc"] => () { if [ $# -lt 1 ] || [ $# -gt 2 ]; then
message "Usage: kill_proc <proc1> [proc2]" "kill_proc";
return 1;
fi;
[ -z "${1}" ] && return 0;
if [ $# -eq 1 ]; then
${ps} -p ${1} &>/dev/null || return 0;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
else
if [ $# -eq 2 ]; then
while ${ps} -p ${1} &>/dev/null 2>&1; do
${sleep} 1;
done;
${kill} -1 ${1} &>/dev/null || ${kill} -2 ${1} &>/dev/null || ${kill} -15 ${1} &>/dev/null || ${kill} -9 ${1} &>/dev/null || return 1;
fi;
fi;
return 0
}
_ENV["verify_signature"] => () { if [ $# -ne 2 ]; then
message "Usage: verify_signature <sig1> <sig2>" "verify_signature";
return 1;
fi;
if [ "${1}" != "${2}" ]; then
return 1;
else
return 0;
fi
}
_ENV["single_program_configuration"] => () { program_selection "Select a program to check and configure" "single" "Select" $@ || return 1
}
_ENV["chg_tmp_file_owner"] => () { if [ $# -ne 1 ]; then
message "Usage: chg_tmp_file_owner <file>" "chg_tmp_file_owner";
return 1;
fi;
local owner="${1}";
for i in ${batch_file} ${return_val_file} ${global_temp_file1} ${global_temp_file2} ${global_temp_file3} ${global_temp_file4} ${global_time_file} ${global_temp_file5};
do
[ ! -f "${i}" ] && continue;
chg_file_owner ${owner} ${i} || return 1;
done;
return 0
}
_ENV["root"] => () { if [ `id -u` -eq 0 ]; then
return 0;
else
return 1;
fi
}
_ENV["remove_dir"] => () { if [ $# -ne 1 ]; then
message "Usage: remove_dir <dir>" "remove_dir";
return 1;
fi;
[ ! -d "${1}" ] && return 0;
local sub_pid1;
height=10;
width=80;
calculate_dimensions;
${echo} "Please wait while removing directory `${basename} ${1}`..." > ${global_temp_file1};
${rm} -rf ${1} &>/dev/null & sub_pid1=$!;
make_title "Directory Removal";
if debug; then
:;
else
${dialog} --backtitle "${main_title}" --title "Removing Directory" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
return_val=$?;
${sleep} 1;
kill_proc `${cat} ${global_temp_file2}`;
return ${return_val}
}
_ENV["verify_url"] => () { if [ $# -ne 1 ]; then
message "Usage: verify_signature <string>" "verify_url";
return 1;
fi;
if ${echo} "${1}" | ${grep} -qi -e "^\(ftp\|http\)://.*$"; then
return 0;
else
return 1;
fi
}
_ENV["message"] => () { if [ $# -lt 1 ]; then
message="Usage: message <text> [title]" "message";
fi;
local message;
local message_title;
message="${1}";
message_title="${2}";
if [ -z "${message_title}" ]; then
message_title="Message";
fi;
${dialog} --colors --backtitle "${gen_title}" --title "${message_title}" --msgbox "${message}" 15 100;
return $?
}
_ENV["please_wait"] => () { height=10;
width=60;
kill_please_wait;
calculate_dimensions;
make_title "Processing";
${echo} "Please wait..." > ${global_temp_file5};
${dialog} --backtitle "${main_title}" --title "Processing" --no-kill --tailboxbg ${global_temp_file5} ${height} ${width} 2> ${global_temp_file6};
while file_empty ${global_temp_file6}; do
sleep .5;
done;
please_wait_pid="`cat ${global_temp_file6}`";
return 0
}
_ENV["new_script_name"] => () { prompt_for_value "New Script Name" "Enter Script Name (NOTE: empty files will still save)" "Name" || return 1;
return 0
}
_ENV["confirm_selection"] => () { if [ $# -lt 1 ]; then
message "Usage: confirm_selection <list>" "confirm_selection";
return 1;
fi;
local list1="$@";
local prog;
local rn;
local return_val;
local command="";
local i;
local kill_wait_pid_cs="";
declare -i i=1;
if [ -z "${list1}" ]; then
message "No programs were selected for confirmation." "Installation Selection Confirmation";
return 1;
fi;
please_wait;
height=25;
width=60;
for j in $@;
do
[ ${#j} -gt ${width} ] && width=${#j};
done;
width=$(( width + 15 ));
calculate_dimensions;
make_title "Selection Confirmation";
command="${dialog} --backtitle \"${main_title}\" --title \"Selected programs\" ";
command="${command} --ok-label \"Yes\" --cancel-label \"No\" --menu \"Is the selection correct?\" ${height} ${width} ${height} ";
command="${command} \"PROGRAM\" \"RUN-LEVEL\"";
command="${command} \"=================\" \"=========\"";
for j in ${list1};
do
if `${echo} ${j} | ${grep} -q "^script:.*$"`; then
prog="`${echo} ${j} | cut -d: -f2`";
prog="script - `basename ${prog}`";
rn="N/A";
else
prog="`${echo} ${j} | cut -d: -f1`";
rn="`${echo} ${j} | cut -d: -f2`";
fi;
command="${command} \"${i}. ${prog}\" \"${rn}\"";
i=$(( ++i ));
done;
eval ${command} 2> /dev/null;
return_val=$?;
kill_please_wait;
return $return_val
}
_ENV["edit_configuration"] => () { if [ $# -ne 1 ]; then
message "Usage: edit_configuration <program name>" "edit_configuration";
return 1;
fi;
local var1_ec;
local scs=0;
prog_dir="${data_dir}/${1}";
run_dir="${prog_dir}/${run}";
get_time ${tarball_base_name} ${run} || return 1;
make_title "Configuration Edit";
while :; do
${dialog} --colors --backtitle "${main_title}" --title "${1} - run level: ${run} - \Z1Est. Build Time: ${hour}h ${min}m ${sec}s\Zn" --no-cancel --extra-button --extra-label "New Run Level" --radiolist "Configuration/Installation files for ${1}" 20 90 20 "Configuration" "View/edit configuration commands" "off" "Make Flags" "View/edit list of make flags" "off" "Make (Check/Test) Flags" "View/edit list of make (check/test) commands" "off" "Make (Install) Flags" "View/edit list of make (install) commands" "off" "Master Base URL's" "View/edit base URL's for downloading packages" "off" "Master Conf File" "View/edit master configuration file (in parent directory)" "off" "Patch List" "View/edit patch list file" "off" "Post-configuration" "View/edit post-configuration commands" "off" "Pre-configuration" "View/edit pre-configuration commands" "off" "Preferred URL" "View/edit this program's preferred URL" "off" "Program Description" "View/edit program description" "off" "Required Packages" "View/edit packages to be present in source directory" "off" "Run Level Conf File" "View/edit run level configuration file" "off" "View Logs" "View logs for this run-level" "off" "Remove Run-Level" "Delete this run-level" "off" 2> ${global_temp_file1};
return_val=$?;
if [ ${return_val} -eq 3 ]; then
return 3;
else
if file_empty ${global_temp_file1}; then
return 1;
fi;
fi;
case `${cat} ${global_temp_file1}` in
"Configuration")
var1_ec="${run_dir}/cf"
;;
"Pre-configuration")
var1_ec="${run_dir}/pre-cf"
;;
"Post-configuration")
var1_ec="${run_dir}/post-cf"
;;
"Program Description")
var1_ec="${prog_dir}/df"
;;
"Installed Programs")
var1_ec="${run_dir}/ip"
;;
"Make Flags")
var1_ec="${run_dir}/mf"
;;
"Make (Install) Flags")
var1_ec="${run_dir}/mi"
;;
"Make (Check/Test) Flags")
var1_ec="${run_dir}/make_check_test"
;;
"Patch List")
var1_ec="${run_dir}/patch_list"
;;
"Preferred URL")
var1_ec="${prog_dir}/purl"
;;
"Required Packages")
var1_ec="${run_dir}/rpkg"
;;
"Master Conf File")
var1_ec="${prog_dir}/mstr_conf"
;;
"Run Level Conf File")
var1_ec="${run_dir}/conf"
;;
"Master Base URL's")
var1_ec="${profile}/mstr_urls"
;;
"View Logs")
log_viewer ${tarball_base_name} ${run};
continue
;;
"Remove Run-Level")
if remove_run_level "${tarball_base_name}" "${run}"; then
return 0;
else
continue;
fi
;;
*)
continue
;;
esac;
! check_for_file ${var1_ec} && ${touch} ${var1_ec};
edit_file ${var1_ec};
done;
return ${scs}
}
_ENV["clear_file"] => () { if [ $# -ne 1 ]; then
message "Usage: clear_file <file>" "clear_file";
return 1;
fi;
[ ! -f "${1}" ] && return 0;
scs_cgf=0;
${rm} ${1} &>/dev/null || scs_cgf=1;
${touch} ${1} &>/dev/null || scs_cgf=1;
if [ ${scs_cgf} -eq 1 ]; then
message "An error occurred while attempting to clear a file: ${1}." "File-Clear Error";
return 1;
fi;
return 0
}
_ENV["highest_run_level"] => () { if [ $# -ne 1 ]; then
message "Usage: highest_run_level <tarball base directory>" "highest_run_level";
return 1;
fi;
[ ! -d "${data_dir}/${1}" ] && return 1;
local list_hrl=`ls ${data_dir}/${1}`;
for i in ${list_hrl};
do
[ "${i}" == "list_hrl" ] && continue;
if are_digits ${i}; then
[ ${current} -lt ${i} ] && current=${i};
fi;
done;
return 0
}
_ENV["download_rpkg"] => () { if [ $# -lt 1 ]; then
message "Usage: download_rpkg <program list>" "download_rpkg ";
fi;
clear_global_files;
local prog="";
local run="";
local rp_name="";
local list1="";
local list2="";
local error=1;
local found;
height=20;
width=120;
calculate_dimensions;
for z in $@;
do
`${echo} ${z} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
prog="`${echo} ${z} | ${cut} -d: -f1`";
run="`${echo} ${z} | ${cut} -d: -f2`";
file_empty ${data_dir}/${prog}/${run}/rpkg && continue;
IFS=$(${echo} -e "\n\r");
for rp_name in `${cat} ${data_dir}/${prog}/${run}/rpkg`;
do
`${echo} ${rp_name} | ${grep} -q -e "^#.*$" -e "^$" -e "^script:.*" -` && continue;
found=1;
rp_name="`${echo} ${rp_name} | ${cut} -d: -f1`";
find_file ${rp_name} ${prog_src_dir} && continue;
if ! file_empty ${profile}/mstr_urls; then
${echo} "Searching for ${rp_name}..." > ${global_temp_file1};
make_title "Required Tarball Search For ${rp_name}";
${dialog} --backtitle "${main_title}" --title "Required Tarball Search For ${rp_name}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
! file_empty "${data_dir}/${prog}/purl" && list1="`${head} -n1 ${data_dir}/${prog}/purl`";
list1="`${echo} ${list1} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
list2="";
for h in `${cat} ${profile}/mstr_urls`;
do
h="`${echo} ${h} | ${sed} -e 's;^\(.*\)/$;\1;g'`";
[ "${h}" == "${list1}" ] && continue;
list2="${list2} ${h}";
done;
list1="${list1} ${list2}";
unset IFS;
for url in ${list1};
do
url="`${echo} ${url}/${rp_name}`";
! verify_tarball_url "${url}" && continue;
if ! check_connection; then
${echo} "Your internet connection is down. Aborting the installation." >> ${global_temp_file1};
error=0;
break 1;
fi;
${echo} "Searching for ${rp_name} at ${url}..." >> ${global_temp_file1};
check_remote_file_exists "${url}";
if [ $? -eq 0 ]; then
${echo} "Required tarball, ${rp_name}, found at ${url}..." >> ${global_temp_file1};
found=0;
break 1;
fi;
done;
IFS=$(${echo} -e "\n\r");
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
clear_global_files;
if [ ${found} -eq 1 ]; then
while :; do
prompt_for_value "Required Program URL (${rp_name})" "Enter program URL (FTP/HTTP)" "URL" || return 1;
if ! verify_tarball_url ${prompt_value} || ! `${echo} ${prompt_value} | ${grep} -q ${rp_name}`; then
if yesno_inquiry "Invalid URL" "You didn't enter a valid url. Would you like to try again?"; then
continue;
else
error=0;
break 1;
fi;
fi;
break 1;
done;
while :; do
height=20;
width=120;
calculate_dimensions;
${echo} "Searching for `${basename} ${prompt_value}` at `${dirname} ${prompt_value}`..." > ${global_temp_file1};
make_title "Required Tarball Search For `${basename} ${prompt_value}`";
if ! check_connection; then
error=0;
break 1;
fi;
${dialog} --backtitle "${main_title}" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
check_remote_file_exists "${prompt_value}";
if [ $? -eq 0 ]; then
found=0;
${echo} "Found at ${prompt_value}..." >> ${global_temp_file1};
url_dir=`${dirname} ${prompt_value}`;
! ${grep} -iq "${url_dir}" ${profile}/mstr_urls && echo "${url_dir}" >> ${profile}/mstr_urls;
url="${prompt_value}";
break 1;
fi;
done;
${sleep} 2;
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || exit;
[ ${error} -eq 0 ] && return 1;
fi;
if [ ${found} -eq 1 ]; then
message "Unable to find required tarball, ${rp_name}. Aborting installation..." "File Find Failed";
error=0;
break 1;
fi;
if ! check_connection; then
error=0;
break 1;
fi;
if ! retrieve_pkg "${url}" /tmp; then
message "Unable to download ${rp_name} from `${dirname} ${url}`." "File Download Failed";
error=0;
break 1;
fi;
if [ ! -f "/tmp/${rp_name}" ]; then
message "Required tarball file not found in /tmp directory." "Tarball Not Found";
error=0;
break 1;
fi;
if ! move "/tmp/${rp_name}" "${prog_src_dir}"; then
message "Unable to move file ${rp_name} to source directory." "Tarball File Move Error";
error=0;
break 1;
fi;
done;
unset IFS;
[ ${error} -eq 0 ] && return 1;
done;
[ ${error} -eq 0 ] && return 1;
return 0
}
_ENV["script_options_m1"] => () { if [ $# -ne 1 ]; then
message "Usage: script_options_m1 <file>" "script_options_m1";
return 1;
fi;
local command;
height=20;
width=60;
calculate_dimensions;
make_title "Options";
command="${dialog} --backtitle \"${main_title}\" --title \"File '`${basename} ${1}`' Options\" --cancel-label \"Cancel\" --ok-label \"Select\" --radiolist \"Select an operation to perform on the file.\" ${height} ${width} ${height}";
command="${command} \"Modify\" \"\" off";
command="${command} \"Copy\" \"\" off";
command="${command} \"Rename\" \"\" off";
command="${command} \"Delete\" \"\" off";
command="${command} \"View Completion Time(s)\" \"\" off";
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
[ ${return_val} -eq 1 ] && return 1;
selection=`${cat} ${global_temp_file1}`;
return 0
}
_ENV["install_one"] => () { if [ $# -ne 1 ]; then
message "Usage: install_one <program name>" "install_one";
return 1;
fi;
local path;
local located=1;
local success=1;
local runtime_error=1;
no_dialog=1;
tarball_name="";
prog_dir="${data_dir}/${tarball_base_name}";
run_dir="${prog_dir}/${run}";
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf` && ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
install_dir="${in_chroot_install_dir}";
release_dir="${chroot_dir}${in_chroot_install_dir}";
check_for_directory ${chroot_dir}/tmp || make_dir ${chroot_dir}/tmp;
if ! directory_writable "${chroot_dir}/${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
else
install_dir="$out_chroot_install_dir";
release_dir="$out_chroot_install_dir";
if ! directory_writable "${install_dir}" || ! directory_writable "${release_dir}"; then
return 1;
fi;
fi;
if ! `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
if `${echo} "${install_dir}" | ${grep} -q "${chroot_dir}"` || `${echo} "${release_dir}" | ${grep} -q "${chroot_dir}"`; then
if ! chroot_mounted; then
message "Please mount the chroot directory (${chroot_dir}) before continuing." "Chroot Unmounted";
return 1;
fi;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
check_for_directory "${chroot_dir}${install_dir}";
else
check_for_directory "${install_dir}";
fi;
if [ $? -ne 0 ]; then
if ! make_dir "${install_dir}"; then
message "Unable to create install directory (${install_dir})." "Installation Directory Creation Error";
break 1;
fi;
fi;
if `grep -m 1 -q "^#chroot_flag" ${run_dir}/conf`; then
directory_writable ${chroot_dir}${install_dir} || return 1;
else
directory_writable ${install_dir} || return 1;
fi;
if ! check_structure ${run_dir}; then
message "Program directory for ${1} not set up properly." "Improper Directory Structure";
return 1;
fi;
get_time ${tarball_base_name} ${run};
declare -i calc=0;
while true; do
calc=$(( ++calc )) && ${echo} ${calc} > ${global_time_file} && sleep 1;
done & sub_pid2=$!;
! file_empty ${prog_dir}/tb_name && tarball_name="`${cat} ${prog_dir}/tb_name`";
[ -z "${tarball_name}" ] && return 1;
if find_file "${tarball_name}" "${prog_src_dir}"; then
release_tarball "${file_name_path}" "${release_dir}" 0 || return 1;
else
message "Unable to find file, ${tarball_name}." "File Not Found";
return 1;
fi;
parent_tb_base_name=${tarball_base_name};
release_isp ${run_dir}/rpkg || return 1;
tarball_base_name=${parent_tb_base_name};
no_dialog=1;
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/patch_list";
fi;
IFS=$(${echo} -e "\n\r");
for item in `${cat} ${run_dir}/patch_list`;
do
`${echo} ${item} | ${grep} -q -e "^#.*$" -e "^$" -` && continue;
if ! run_patch ${item}; then
message "An error occurred running the patch (${item}) for ${tarball_base_name}." "Patch-Run Error";
return 1;
fi;
done;
unset IFS;
j="`ls ${run_dir}/log | grep -v ^.*old`";
for k in ${j};
do
h="`echo ${k} | sed -e 's;\.tar\.bz2$;;g'`";
move "${run_dir}/log/${k}" "${run_dir}/log/${h}.old.tar.bz2" || return 1;
done;
unset j k;
while true; do
if file_empty "${run_dir}/pre-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/pre-cf";
fi;
if ${grep} -q "^#run_as_root" ${run_dir}/pre-cf && ! root; then
if ! global_script_run_root "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/pre-cf" "Pre-Configuration"; then
message "The Pre-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Pre-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "pre_conf" ${global_temp_file1};
compress_log "${run_dir}/log/pre_conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/cf";
fi;
if ! global_script_run "${run_dir}/cf" "Configuration"; then
message "The configuration script for ${tarball_base_name}, run level ${run}, failed." "Configuration Failure";
runtime_error=0;
fi;
save_log "conf" ${global_temp_file1};
compress_log "${run_dir}/log/conf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mf";
fi;
if ! global_script_run "${run_dir}/mf" "Make"; then
message "The Make script for ${tarball_base_name}, run level ${run}, failed." "Make Failure";
runtime_error=0;
fi;
save_log "make" ${global_temp_file1};
compress_log "${run_dir}/log/make" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/make_check_test"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/make_check_test";
fi;
if ! global_script_run "${run_dir}/make_check_test" "Make Check/Test"; then
if ! `grep -q -m1 "#ignore_check_errors" "${run_dir}/conf"`; then
message "The Make-Check script for ${tarball_base_name}, run level ${run}, failed." "Make-Check Failed";
runtime_error=0;
else
${echo} "Warning: Make/Check error for ${tarball_base_name} @ `date`" >> ${install_log};
fi;
fi;
save_log "make_check_test" ${global_temp_file1};
compress_log "${run_dir}/log/make_check_test" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/mi"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/mi";
fi;
if ${grep} -q "^#no_root_install" ${run_dir}/mi; then
if ! global_script_run "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
else
if ! global_script_run_root "${run_dir}/mi" "Make-Install"; then
message "The Make-Install script for ${tarball_base_name}, run level ${run}, failed." "Make-Install Failed";
runtime_error=0;
fi;
fi;
save_log "make_install" ${global_temp_file1};
compress_log "${run_dir}/log/make_install" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
if file_empty "${run_dir}/post-cf"; then
:;
else
if [ ${global_no_dialog} -eq 0 ]; then
no_dialog=0;
else
get_dialog "${run_dir}/post-cf";
fi;
if ${grep} -q "#run_as_root" ${run_dir}/post-cf; then
if ! global_script_run_root "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
else
if ! global_script_run "${run_dir}/post-cf" "Post-Configuration"; then
message "The Post-Configuration script for ${tarball_base_name}, run level ${run}, failed." "Post-Configuration Failed";
runtime_error=0;
fi;
fi;
save_log "post_cf" ${global_temp_file1};
compress_log "${run_dir}/log/post_cf" & [ ${runtime_error} -eq 0 ] && break 1;
fi;
break 1;
done;
disown ${sub_pid2};
${kill} ${sub_pid2};
if [ ${runtime_error} -ne 0 ]; then
if ! update_time ${tarball_base_name} ${run} `${cat} ${global_time_file}`; then
message "Warning: A failure occurred while updating the time file for ${tarball_base_name}...continuing." "Update Time File Error";
fi;
fi;
remove_ext_tb=1;
if [ ${global_remove_ext_tb} -eq 0 ]; then
remove_ext_tb=0;
else
if `${grep} -q "^#remove_ext_tb" ${run_dir}/conf`; then
remove_ext_tb=0;
fi;
fi;
if [ ${remove_ext_tb} -eq 0 ] && [ -d "${release_dir}/${tarball_base_name}" ]; then
if ! remove_dir "${release_dir}/${tarball_base_name}"; then
message "A failure occurred during the removal of directory, ${release_dir}/${tarball_base_name}." "Directory Removal Error";
return 1;
fi;
fi;
if [ ${runtime_error} -eq 1 ]; then
${echo} "Installed: ${tarball_base_name} @ `date`" >> ${install_log};
return 0;
else
if [ ${runtime_error} -eq 0 ]; then
${echo} "Install Failure: ${tarball_base_name} @ `date` (check log files)" >> ${install_log};
message "Install Failure: ${tarball_base_name} @ `date` (check log files)" "Install Failure";
return 1;
fi;
fi
}
_ENV["check_sig_prog"] => () { if [ $# -lt 1 ]; then
message "Usage: check_sig_prog <file list>" "check_sig_prog";
return 1;
fi;
clear_global_files;
local line;
local base_name;
local tb_name;
local run;
local sig1;
local sig2;
local listing;
local flag=0;
local error=1;
remove_dups $@ || return 1;
for line in ${global_list};
do
`${echo} ${line} | ${grep} -q -e "^#.*$" -e "^$" -e "^script.*" -` && continue;
base_name="`${echo} ${line} | ${cut} -d: -f1`";
if [ ${flag} -eq 0 ]; then
flag=$(( ++flag ));
height=20;
width=120;
calculate_dimensions;
make_title "Signature Check";
${dialog} --backtitle "${main_title}" --title "Main Program" --no-kill --tailboxbg ${global_temp_file1} ${height} ${width} 2> ${global_temp_file2};
fi;
${echo} "Checking ${base_name}..." >> ${global_temp_file1};
if file_empty "${data_dir}/${base_name}/tb_name"; then
${echo} "${base_name}: Unable to find the name of the tarball to check!" >> ${global_temp_file1};
error=0;
break 1;
else
tb_name="`${head} -n1 ${data_dir}/${base_name}/tb_name`";
if [ -z "${tb_name}" ]; then
${echo} "${base_name}: Unable to find the name of the tarball being used for installation!" >> ${global_temp_file1};
error=0;
break 1;
fi;
fi;
if ! find_file ${tb_name} ${prog_src_dir}; then
${echo} "Unable to find program, ${tb_name}, in the source directory." >> ${global_temp_file1};
error=0;
break 1;
fi;
while :; do
verify_sha_alg;
shasum_actual="`${shasum} -a ${sha_alg} ${file_name_path} | ${cut} -d\" \" -f1`";
shasum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f3`";
if [ -z "${shasum_file}" ] || [ -z "${shasum_actual}" ]; then
${echo} "SHA: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
else
if ! verify_signature ${shasum_actual} ${shasum_file}; then
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check failed for ${tb_name}! @ `date`" >> ${install_log};
if [ ${fail_on_shasum} -eq 0 ]; then
error=0;
break 2;
fi;
else
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "SHA (algorithm ${sha_alg}): signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
md5sum_actual="`${md5sum} ${file_name_path} | ${cut} -d\" \" -f1`";
md5sum_file="`${cat} ${data_dir}/${base_name}/checksum | ${grep} ${tb_name} | ${cut} -d: -f2`";
if [ -z "${md5sum_file}" ] || [ -z "${md5sum_actual}" ]; then
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: Unable to obtain one or more signatures for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
if ! verify_signature ${md5sum_actual} ${md5sum_file}; then
${echo} "MD5: signature check failed for ${tb_name}!" >> ${global_temp_file1};
${echo} "MD5: signature check failed for ${tb_name}! @ `date`" >> ${install_log};
error=0;
break 2;
else
${echo} "MD5: signature check passed for ${tb_name}." >> ${global_temp_file1};
${echo} "MD5: signature check passed for ${tb_name} @ `date`" >> ${install_log};
break 1;
fi;
fi;
break 1;
done;
done;
${sleep} 3;
if [ ${flag} -eq 1 ]; then
while file_empty ${global_temp_file2}; do
${sleep} 1;
done;
kill_proc `${cat} ${global_temp_file2}` || return 1;
fi;
[ ${error} -eq 0 ] && return 1;
return 0
}
_ENV["release_isp"] => () { if [ $# -ne 1 ]; then
message "Usage: release_isp <run directory>" "release_isp";
return 1;
fi;
file_empty "${1}" && return 0;
local signature;
local full_path;
local found;
local url;
IFS=$(${echo} -e "\n\r");
for pkg in `${cat} ${1}`;
do
${echo} ${pkg} | ${grep} -iq -e '^#.*' -e '^$' && continue;
found=1;
scs=1;
name=`${echo} ${pkg} | ${cut} -d: -f1`;
if [ -z "${name}" ]; then
message "Unable to find the name of a required package!" "Required Package Name Missing";
return 1;
fi;
if ! find_file ${name} ${prog_src_dir}; then
message "Unable to find required tarball, ${name}, in source directory." "Required Package Missing";
return 1;
fi;
rename=`${echo} ${pkg} | ${cut} -d: -f2`;
append_cmds=`${echo} ${pkg} | ${cut} -d: -f3`;
get_tarball_base_from_tb ${file_name_path} || return 1;
if [ -f "${release_dir}/${parent_tb_base_name}/${tarball_base_name}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${tarball_base_name};
fi;
if release_tarball ${file_name_path} ${release_dir}/${parent_tb_base_name} 1 "${append_cmds}"; then
if [ ! -z "${rename}" ]; then
if [ -d "${release_dir}/${parent_tb_base_name}/${rename}" ]; then
remove_file ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
move ${release_dir}/${parent_tb_base_name}/${tarball_base_name} ${release_dir}/${parent_tb_base_name}/${rename} || return 1;
fi;
else
message "There was an error releasing the tarball, ${name}, into its parent directory (${parent_tb_base_name})!" "Tarball Release Error";
return 1;
fi;
done;
unset IFS;
return 0
}
_ENV["rename_script_name"] => () { prompt_for_value "Script Rename" "Script Rename" "Name" || return 1;
return 0
}
_ENV["program_selection"] => () { if [ $# -lt 4 ]; then
message "Usage: output_dialog_selection_batch <title> <type> <ok label> <list>" "output_dialog_selection_batch";
return 1;
fi;
local command;
local description_ps;
local file1_ps;
local file3_ps;
local batch_prog_temp_ps="";
local batch_progs_ps="";
local orig_list_ps;
local batch_run_level_ps="";
local type_ps;
local title_ps;
local ok_label_ps;
local cancel_label_ps;
return_val="";
title_ps="${1}";
type_ps="${2}";
ok_label_ps="${3}";
shift 3;
orig_list_ps=$@;
prog_list="";
while :; do
kill_please_wait;
please_wait;
height=50;
width=160;
calculate_dimensions;
make_title "Batch Listing";
command="${dialog} --backtitle \"${main_title}\" --ok-label \"${ok_label_ps}\" --no-cancel --radiolist \"${title_ps}\" ${height} ${width} ${height} ";
for i in ${orig_list_ps};
do
file1_ps="${data_dir}/${i}/df";
if ! file_empty ${file1_ps}; then
description_ps=`${cat} ${file1_ps}`;
else
description_ps="No description";
fi;
description_ps="${description_ps:0:255}";
command="${command} \"${i}\" \"${description_ps}\" \"off\" ";
done;
eval ${command} 2> ${global_temp_file1};
return_val=$?;
{
[ ${return_val} -eq 1 ] || file_empty ${global_temp_file1}
} && return 1;
batch_prog_temp_ps="`${cat} ${global_temp_file1} | ${sed} -e 's;";;g'`";
if [ "${type_ps}" == "single" ] || [ "${type_ps}" == "checksum" ]; then
prog_list=${batch_prog_temp_ps};
break 1;
else
if [ "${type_ps}" == "batch" ]; then
get_run_level ${batch_prog_temp_ps};
${echo} "${batch_prog_temp_ps}:${run}" >> ${batch_file};
prog_list="${prog_list} ${batch_prog_temp_ps}";
fi;
fi;
done;
return ${return_val}
}
_ENV["verify_sha_alg"] => () { case ${sha_alg} in
"1" | "224" | "256" | "384" | "512" | "512224" | "512256")
:
;;
*)
sha_alg=1
;;
esac;
return 0
}
_ENV["run_patch"] => () { if [ $# -ne 1 ]; then
message "Usage: run_patch <patch file>" "run_patch";
return 1;
fi;
clear_global_files;
local pfile_raw="${1}";
local pfile_uncomp="${1}";
local list;
local sub_pid1;
local scs=0;
chg_dir "${release_dir}/${tarball_base_name}" || return 1;
if `${echo} ${pfile_raw} | ${grep} -q ".*\.gz"`; then
pfile_uncomp="`${echo} ${pfile_raw} | ${sed} -e 's;\(^.*\)\.gz;\1;g'`";
if [ ! -f "${patch_src_dir}/${pfile_uncomp}" ]; then
if ! ${gunzip} ${patch_src_dir}/${pfile_raw}; then
message "There was a problem uncompressing '${pfile_raw}'." "Patch Un-Compression";
return 1;
fi;
fi;
fi;
if [ ${no_dialog} -eq 0 ]; then
clear;
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp};
scs=$?;
else
${patch} -Np1 -i ${patch_src_dir}/${pfile_uncomp} &>${global_temp_file2} & sub_pid1=$!;
if debug; then
:;
else
${dialog} --title "Patching ${tarball_base_name} (${pfile_raw})" --no-kill --tailboxbg ${global_temp_file2} 40 130 2> ${global_temp_file1};
while file_empty ${global_temp_file1}; do
${sleep} 1;
done;
fi;
wait ${sub_pid1};
scs=$?;
${sleep} 2;
kill_proc `${cat} ${global_temp_file1}`;
fi;
${sleep} 1;
return ${scs}
}
_ENV["make_temp_file"] => () { local tmp_file;
local scs=0;
tmp_file=`${mktemp} -p /tmp lfs_script.XXXXXXXX`;
trap "remove_file ${tmp_file}" SIGINT;
if [ ! -z "${tmp_file}" ] && [ -f "${tmp_file}" ]; then
${echo} ${tmp_file};
else
scs=1;
fi;
trap - SIGINT;
if [ ${scs} -eq 1 ]; then
exit 1;
else
return ${scs};
fi
}
_ENV["check_owner"] => () { local var1;
local var2;
local var3;
if [ $# -ne 2 ]; then
message "Usage: check_owner <user> <file/directory>" "check_owner";
return 1;
fi;
var1=`${dirname} ${2}`;
var2=`${echo} ${1} | ${sed} -e 's;${var1};;g'`;
var3=`ls -n ${var1} | ${grep} ${var2} | ${sed} -e 's;^[a-zA-Z0-9-]\+\s\+[a-zA-Z0-9]\+\s\+\(.*$\);\1;g'`;
if [ "${1}" == "${var3}" ]; then
return 0;
else
return 1;
fi
}
_ENV["batch_program_listing"] => () { program_selection "Select programs to install (batch mode)" "batch" "Add" $@ || return 1
}
_ENV["make_title"] => () { if [ $# -lt 1 ]; then
message "Usage: make_title <type title>..." "make_title";
return 1;
fi;
local c;
local mt_length=${#gen_title};
local ty_length=${#1};
local var1=$(( mt_length + ty_length ));
local max_wd=`stty size | cut -d" " -f2`;
main_title="";
if [ ${var1} -gt ${max_wd} ]; then
main_title="${gen_title}";
return 0;
fi;
var1=$(( max_wd - mt_length - ty_length - 2 ));
local spaces="`${echo} ${var1} | bc`";
main_title="${gen_title}";
for ((c=1; c<=${spaces}; c++ ))
do
main_title="${main_title}+";
done;
main_title="${main_title}${1}";
return 0
}
_ENV["checksum_program_listing"] => () { program_selection "Select a program to view/edit checksum" "checksum" "Select" $@ || return 1
}
_ENV["check_profile_struc"] => () { if [ $# -ne 1 ]; then
message "Usage: check_profile_structure <profile dir>" "check_profile_struc";
return 1;
fi;
[ ! -d "${1}" ] && return 1;
for h in "batch" "data" "scripts" "doc";
do
[ -d "${1}/${h}" ] || return 1;
done;
return 0
}
_ENV["select_from_list"] => () { if [ $# -lt 2 ]; then
message "Usage: select_from_list <title> <list>" "select_from_list";
return 1;
fi;
local command="";
local title_sfl=${1};
height=20;
width=120;
local list_height_sfl=20;
calculate_dimensions;
shift 1;
make_title "List Selection";
command="${dialog} --colors --backtitle \"${main_title}\" --ok-label \"Select\" --no-cancel --radiolist \"${title_sfl}\" ${height} ${width} ${list_height_sfl}";
for z in $@;
do
command="${command} \"${z}\" \"\" off";
done;
eval ${command} 2> ${global_temp_file1} 1>&0;
return_val=$?;
selection=`${cat} ${global_temp_file1}`;
if [ ${return_val} -eq 1 ] || {
[ ${return_val} -eq 0 ] && [ -z "${selection}" ]
}; then
return 1;
else
return 0;
fi
}
_ENV["find_file"] => () { if [ $# -lt 1 ]; then
message "Usage: find_file <file name> [path]" "find_file";
return 1;
fi;
local local_path;
local real_paths="";
if [ -z "${2}" ]; then
local_path=`${echo} ${PATH} | tr ":" " "`;
else
local_path="${2}";
fi;
for i in ${local_path};
do
[ -d "${i}" ] && real_paths="${real_paths} ${i}";
done;
real_paths=`${echo} ${real_paths} | ${sed} -e "s;^\s*\(.*\)\s*;\1;g"`;
file_name_path=`${find} ${real_paths} -name "${1}"`;
file_name_path="`${echo} ${file_name_path} | cut -d" " -f1`";
if [ -z "${file_name_path}" ]; then
return 1;
else
return 0;
fi
}
_ENV["get_dialog"] => () { if [ $# -ne 1 ]; then
message "Usage: get_dialog <file>" "get_dialog";
return 1;
fi;
if ! check_for_file "${1}"; then
message "Unable to find file used to set the dialog variable." "No-Dialog File Error";
return 1;
fi;
if ${grep} -q "no_dialog" ${1}; then
no_dialog=0;
else
no_dialog=1;
fi;
return 0
}
_ENV["move_dir"] => () { if [ $# -ne 2 ]; then
message "Usage: move_dir <dir> <path to new name>" "move_dir";
return 1;
fi;
if [ -d "${1}" ]; then
local dest_dir;
dest_dir="`${echo} ${2} | ${tr} ' ' '_'`";
if ! ${mv} ${1} ${dest_dir} &>/dev/null; then
:;
else
message "Directory renamed to ${dest_dir}." "Move Directory";
fi;
fi;
return 0
}
_ENV["kill_please_wait"] => () { `${ps} -p ${please_wait_pid} &> /dev/null` && kill -SIGINT ${please_wait_pid};
return 0
}
PHP License
This program is free software; you can redistribute it and/or modify
it under the terms of the PHP License as published by the PHP Group
and included in the distribution in the file: LICENSE
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
If you did not receive a copy of the PHP license, or have any
questions about PHP licensing, please contact license@php.net.
Build environment
OS: Linux - Linux tw0001 3.2.6 #1 SMP Tue Apr 24 12:56:11 MDT 2012 i686 Autoconf: autoconf (GNU Autoconf) 2.68 Copyright (C) 2010 Free Software Foundation, Inc. License GPLv3+/Autoconf: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>, <http://gnu.org/licenses/exceptions.html> This is free software: you are free to change and redistribute it. There is NO WARRANTY, to the extent permitted by law. Written by David J. MacKenzie and Akim Demaille. Bundled Libtool: ltmain.sh (GNU libtool) 1.5.26 (1.1220.2.492 2008/01/30 06:40:56) Copyright (C) 2008 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. System Libtool: libtool (GNU libtool) 2.4.2 Written by Gordon Matzigkeit <gord@gnu.ai.mit.edu>, 1996 Copyright (C) 2011 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Compiler: Using built-in specs. COLLECT_GCC=cc COLLECT_LTO_WRAPPER=/usr/lib/gcc/i686-pc-linux-gnu/4.6.2/lto-wrapper Target: i686-pc-linux-gnu Configured with: ../configure --prefix=/usr --libexecdir=/usr/lib --enable-shared --enable-threads=posix --enable-__cxa_atexit --enable-clocale=gnu --enable-languages=c,c++ --disable-multilib --disable-bootstrap --with-system-zlib Thread model: posix gcc version 4.6.2 (GCC) Bison: bison (GNU Bison) 2.5 Written by Robert Corbett and Richard Stallman. Copyright (C) 2011 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. Libraries: linux-gate.so.1 => (0xb77c1000) libcrypt.so.1 => /lib/libcrypt.so.1 (0xb778a000) libresolv.so.2 => /lib/libresolv.so.2 (0xb776f000) librt.so.1 => /lib/librt.so.1 (0xb7765000) libgdbm.so.4 => /usr/lib/libgdbm.so.4 (0xb775c000) libz.so.1 => /lib/libz.so.1 (0xb7744000) libm.so.6 => /lib/libm.so.6 (0xb7719000) libnsl.so.1 => /lib/libnsl.so.1 (0xb76fe000) libssl.so.1.0.0 => /usr/lib/libssl.so.1.0.0 (0xb769e000) libcrypto.so.1.0.0 => /usr/lib/libcrypto.so.1.0.0 (0xb74e2000) libxml2.so.2 => /usr/lib/libxml2.so.2 (0xb7397000) libdl.so.2 => /lib/libdl.so.2 (0xb7391000) libc.so.6 => /lib/libc.so.6 (0xb71fa000) libpthread.so.0 => /lib/libpthread.so.0 (0xb71df000) /lib/ld-linux.so.2 (0xb77c2000) User's E-mail: