#!/bin/sh

cat vmailadmin.forward.txt | perl -n -e '
chomp($_);
if (!@field_name) {
	@field_name=split(/\t/, $_);
} else {
	%data = {};
	$i = 0;
	for (split(/\t/, $_)) {
		$data{$field_name[$i]} = $_;
		$i++;
	}
	($data{"local_part"}, $data{"domain"}) = split("\@", $data{"pobox"});
	if ($data{"forward_save"}) {
		printf(
			"UPDATE \`alias\` SET \`goto\` = CONCAT(\`goto\`, \",%s\") WHERE \`address\` = \"%s\";\n",
			$data{"forward_dest"}, $data{"pobox"}
		);
	} else {
		printf(
			"REPLACE INTO \`alias\` (\`address\`, \`goto\`, \`domain\`, \`created\`, \`modified\`, \`active\`)".
			" VALUES(\"%s\", \"%s\", \"%s\", FROM_UNIXTIME(%d), FROM_UNIXTIME(%d), %d);\n",
			$data{"pobox"}, $data{"forward_dest"}, $data{"domain"}, $data{"created"}, $data{"modified"}, $data{"active"}
		);
	}
}
' > postfixadmin.forward.sql