#!/bin/sh
# Ρ̾(ܾ)ƱΤԤˤޤȤ
# usage: ./mkdepword [-z] in_file > out_file
# z    ʸͭˤ

LANG=ja_JP.eucJP; export LANG

ENABLE_Sz="false"

if test x"$1" = x"-z" ; then
   ENABLE_Sz="true"
   shift
fi

if test "${ENABLE_Sz}" = "true"; then
   grep '^@' "$1"
else
   grep '^@' "$1" | sed 's/Sz/Se/'
fi |\

# ޤ֥Ρ̾פȡΡɡפƱǡܾפ㤦Τ
# ԤˤޤȤ롣
# : Ρ̾1 ܾ1[/ܾ2/ܾ3/] Ρ1
sort -t\  -k1,1 -k3,3 -k2,2 |\
awk 'BEGIN{ node=""; next_node=""; hold_trans=""; }
{
   if (NR == 1){
      node=$1; next_node=$3; hold_trans=$2
   } else {
      if (($1 == node) && ($3 == next_node)){
         hold_trans=hold_trans"/"$2
      } else {
         print node,hold_trans,next_node
         node=$1; next_node=$3; hold_trans=$2
      }
   }
}
END{ print node,hold_trans,next_node }' |\

# ˡ֥Ρ̾פȡܾפƱǡΡɡפ㤦Τ
# ԤˤޤȤ
# : Ρ̾1 ܾ1[/ܾ2/ܾ3/] Ρ1[ Ρ2 Ρ3]
sort -t\  -k1,1 -k2,2 -k3,3 |\
awk 'BEGIN{ node=""; trans=""; hold=""; }
{
   if (NR == 1){
      node=$1; trans=$2; hold=$0
   } else {
      if (($1 == node) && ($2 == trans)){
         hold=hold" "$3
      } else {
         print hold
         node=$1; trans=$2; hold=$0
      }
   }
}
END{ print hold }' |\


# 1ԤĹȥ餷Τ2ʬ
awk 'BEGIN{ node=""; trans=""; max=42; }
{
    if ( NF >= max){
        node=$1; trans=$2
        zenhan=""; kouhan="";
        for (i=3; i < max; i++){ zenhan=zenhan" "$i }
        for (i=max; i <= NF; i++){ kouhan=kouhan" "$i }
        print node,trans zenhan
        print node,trans kouhan
    } else {
        print $0
    }
}' |\

# ܾζڤ˻Ȥä/פ
sed 's:"/":" ":g'

# [ End of File ]

