[Ra][NEST]perl requires

[Tomasz Wittner]

Dnia pon 1. września 2003 00:39, Paweł Gołaszewski napisał:
> > checking for admin's email address... webmaster w asus.domek.dom
> >
> > i ten adres bedzie potem w formularzu www namazu-cgi.
>
> Do się to jakoś narzucić?
zgwałcić configure.in ?
> Na jakiej zasadzie on ustala ten adres? webmaster w domena ?
webmaster@`hostname` ???. Nie, tak prosto być nie może - cytata z 
configure(.in):
#v+
#
#   determine hostname and domainname
#
hostname="`uname -n 2>/dev/null |\
           awk '{ printf("%s", $1); }'`"
if test "x$hostname" = "x"; then
    hostname="`hostname 2>/dev/null |\
               awk '{ printf("%s", $1); }'`"
    if test "x$hostname" = "x"; then
        hostname='unknown'
    fi
fi
case $hostname in
    *.* )
        domainname=".`echo $hostname | cut -d. -f2-`"
        hostname="`echo $hostname | cut -d. -f1`"
        ;;
esac
if test "x$domainname" = "x"; then
    if test -f /etc/resolv.conf; then
        domainname="`egrep '^[  ]*domain' /etc/resolv.conf | head -1 |\
                     sed -e 's/.*domain//' \
                         -e 's/^[   ]*//' -e 's/^ *//' -e 's/^  *//' \
                         -e 's/^\.//' -e 's/^/./' |\
                     awk '{ printf("%s", $1); }'`"
        if test "x$domainname" = "x"; then
            domainname="`egrep '^[  ]*search' /etc/resolv.conf | head -1 |\
                         sed -e 's/.*search//' \
                             -e 's/^[   ]*//' -e 's/^ *//' -e 's/^  *//' \
                             -e 's/ .*//' -e 's/    .*//' \
                             -e 's/^\.//' -e 's/^/./' |\
                         awk '{ printf("%s", $1); }'`"
        fi
    fi
fi


admin="webmaster@${hostname}${domainname}"
echo $ac_n "checking for admin's email address""... $ac_c" 1>&6
echo "configure:8956: checking for admin's email address" >&5
echo "$ac_t""$admin" 1>&6
OPT_ADMIN_EMAIL=$admin
#v-
Podoba się? ;-) . Bo mnie bardzo ;-).
1. Uważam, że nie trzeba wszystkiego robić dla użytkownika - niech sobie sam 
zmieni adres - to jest w ledwie 2 plikach w template per język. perl -pi -e 
..., sed + /dev/brain w łapę, albo vi - nikt nie powiedział, że ma być lekko.
2. Uważam, że zacytowana wyżej funkcja, mimo swojej złożoności, nie gwarantuje 
wstawienia działającego adresu (jak ktoś się uprze, albo źle skonfigurej MX 
/me).
Zmianę tego np: w %post ... eee ... brakuje jeszcze 2 pakietów do 
(Build)Requires, zrobienia branchy na Ra - to ważniejsze (i nie znaczy, że 
zrobię).
PS moje etc/sysconfig/network
#v+
# Set hostname here (only hostname) - ja to only olałem
HOSTNAME="asus.domek.dom"
# Set NIS domain name here
NISDOMAIN=""
#v-

pzdr., Tomek
-- 
Tomasz Wittner