#!/bin/sh
echo Content-type: text/html
echo
PATH=`echo $PATH":."`
Apellido=`echo $QUERY_STRING | cut -d"&" -f1 | cut -d"=" -f2 | sed -e 's/\+\+/\+/g' | sed -e 's/^\+//g'| sed -e 's/\+$//g'`
########################################################################
## FUNCIONES
########################################################################
enlaces ()
{
echo "
"
}
./fprincipio "15" "Apellidos vascos / Euskal Abizenak"
enlaces
echo ""
grep -i "^$Apellido:" apellidos.dat | awk -F:: ' BEGIN { FS="::" }
{
if ( $2 == "111" || $2 == "121" || $2 == "131" || $2 == "141" || $2 == "112" || $2 == "122" || $2 == "132" || $2 == "142")
{
if ( $2 == "111" && EXPLI != "ok" )
{
print ""$1"
";
print "Explicación de los componentes / Osagaien azalpena:
"; EXPLI="ok" ;
}
print $3"
";
if ( $2 == "112" || $2 == "122" || $2 == "132" || $2 == "142")
{ print "
"}
}
if ( $2 == "210" || $2 == "220" )
{
if ( $2 == "210" && SIGNI != "ok" )
{
print "
Significado del apellido / Abizenaren esanahia:
"; SIGNI="ok";
}
print $3"
";
}
if ( $2 == "410" )
{
if ( $2 == "410" && PROCE != "ok" )
{
print "
Procedencia del apellido / Abizenaren jatorria:
"; PROCE="ok";
}
print $3"
";
}
if ( $2 == "420" )
{
if ( $2 == "420" && LOCALIZA != "ok" )
{
print "
Localización del apellido / Abizenaren kokapena:
"; LOCALIZA="ok";
}
print $3"
";
}
if ( $2 == "430" )
{
if ( $2 == "430" && EXTEN != "ok" )
{
print "
Extensión del apellido / Abizenaren hedapena:
"; EXTEN="ok";
}
print $3"
";
}
if ( $2 == "910" )
{
print "Mirar / Begiratu:
";
print "
";
}
} '
grep -i "^$Apellido:" apellidos.dat > /dev/null
if [ $? -eq 1 ]
then
echo ""$Apellido"
No se ha encontrado el apellido en nuestra base de datos
Gure Databasean abizena ez da aurkitu
"
echo "
"
else
echo ""
fi
echo ""
./ffinal