#! /bin/sh

# extract keyboard layout IDs from list on Microsoft web page

wget -N https://learn.microsoft.com/windows-hardware/manufacture/desktop/windows-language-pack-default-values

cat windows-language-pack-default-values |
(
cat <<\/EOS
id () {
	echo "	{W(\"$1\"), W(\"$kb\")},"
}
/EOS

sed -e "1,/^<th>Keyboard/ d" -e "/^<\/table/,$ d" \
    -e "s,^<td><a href[^>]*>\([^<]*\).*,kb='\1'," \
    -e "s,^<td>\([^<]*\).*,id '\1'," -e t -e d
) | sh
