#!/bin/sh
# Lekerdezi a molekulakat a kemiai infoboxot tartalmazo szocikkekbol az angol Wikipediarol. Kimenet stdout-on, wget log stderr-en.
# Parameterek:
#	kezi.kepl. Hozzairja a listahoz a le nem kerdezett szocikkeket (melyekben nincs infobox), es torli az abban kijelolteket.
#	nyelv: hu (default) vagy en

if [ ! -r "$1" ]
then	echo Nincs ilyen file: "$1" >&2
	exit 1
fi
NYELV=${2:-hu}
if [ $NYELV != hu -a $NYELV != en ]
then	echo Hibas nyelv: $NYELV >&2
	exit 1
fi

WIKIDEF="https://$NYELV.wikipedia.org/w"
if [ $NYELV = en ]
then	INFBOX="Chembox|Drugbox|Infobox_drug|Drug"
else	INFBOX="Chembox|Chembox_new|Chembox_új|Drugbox|Gyógyszeresdoboz|Vegyület_infobox"
fi

IFS='|'
for f in $INFBOX
do	sabldhiv "$f" "$WIKIDEF"
done | tr ' ' _ | kemmol.lua $1 | while read CIKK DATUM
do      echo $CIKK'|'`date -d $DATUM +%F.%T`
done
