#!/bin/sh
#
# Copyright (C) 2007  Fredrik Åslund <fredrik@darkeye.net>
#
# This script is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
# 
# This script 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.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this script; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
#

#
# sv_tab format:
# <sv_km><tab><sv_kmUP><tab><sv_kmALT>
#
# sv_km sv_kmUP sv_kmALT -> sv_tab
#

km=$1
tkm=$2

[ -n "$1" ] || { echo "Usage: `basename $0` <keymap> <tabbed keymap>" ; exit 1 ; }

km1=$km
km2=${km}UP
km3=${km}ALT

for i in $km1 $km2 $km3 ; do
	cat $i | sed 's/\\/\\\\/g' > $i-
done

exec 3<$km1-
exec 4<$km2-
exec 5<$km3-

while read none <&3 ; do
	read shift <&4
	read alt <&5

	echo "$none	$shift	$alt"
done > $tkm

for i in $km1 $km2 $km3 ; do
	rm -f $i-
done