#!/bin/sh
cat /dev/null > /tmp/SeTnewtag
dialog --title "Virtualization(Virtualization related packages)シリーズの選択" \
  --checklist "Virtualization シリーズの中からインストールしたいパッケージを \
選んでください．カーソルの上下キーで \
対象を選択し，space キーでマーク(X)します． \
Enter キーでインストールを開始します．" 24 72 15 \
"augeas" "コンフィグレーション設定ツール" "on" \
"extlib" "OCaml の拡張ライブラリ" "on" \
"libcgroup" "Control Group 設定ライブラリ" "on" \
"libguestfs" "ゲストファイルシステムシェルライブラリ" "on" \
"libosinfo" "OS 情報データベース" "on" \
"libvirt" "仮想マシン制御ライブラリ" "on" \
"libvirt_glib" "libvirt-glib ラッパー" "on" \
"lxc" "Linux コンテナツール" "on" \
"lxcf" "LXC Facility" "on" \
"ocaml_curses" "ncurses 用の OCaml バインディング" "on" \
"ocaml_libvirt" "libvirt 用の OCaml バインディング" "on" \
"supermin" "supermin アプライアンス構築ツール" "on" \
"uml_utilities" "User-mode Linux(ユーティリティプログラム)" "on" \
"virt_manager" "仮想マシンの GUI 管理ツール" "on" \
"virt_top" "仮想化されたドメイン群の統計情報を表示" "on" \
"virt_v2v" "他所由来の仮想マシンを KVM 用に変換するツール" "on" \
"virt_viewer" "仮想マシンのグラフィカルコンソールを表示" "on" \
"virt_what" "仮想マシンにおいて実行中であるかどうかを検知" "on" \
"virt_who" "ゲスト UUID を問い合わせるホストのエージェント" "on" \
2> /tmp/SeTpkgs
if [ $? = 1 -o $? = 255 ]; then
  rm -f /tmp/SeTpkgs
  > /tmp/SeTnewtag
  for pkg in augeas extlib libcgroup libguestfs libosinfo libvirt libvirt_glib lxc lxcf ocaml_curses ocaml_libvirt supermin uml_utilities virt_manager virt_top virt_v2v virt_viewer virt_what virt_who  ; do 
  echo "$pkg: SKP" >> /tmp/SeTnewtag
  done
  exit
fi
cat /dev/null > /tmp/SeTnewtag
for PACKAGE in augeas extlib libcgroup libguestfs libosinfo libvirt libvirt_glib lxc lxcf ocaml_curses ocaml_libvirt supermin uml_utilities virt_manager virt_top virt_v2v virt_viewer virt_what virt_who  ; do
    if grep "$PACKAGE" /tmp/SeTpkgs 1> /dev/null 2> /dev/null ; then
        echo "$PACKAGE: ADD" >> /tmp/SeTnewtag
    else echo "$PACKAGE: SKP" >> /tmp/SeTnewtag
    fi
done
rm -f /tmp/SeTpkgs