#! /bin/tcsh -f
####################################################################
#	動物の森プレイヤーの顔のテクスチャーデータファイルをとってくる
#	$Id: rcp.sh,v 1.3 2000-12-01 18:12:15+09 komatu Exp $
####################################################################

############# 使用するファイル名文字列
set decl_file_name="convert.decl"
set decl_new_file_name="convert.decl_new"
@ new_file = 1			###新規のファイルを検出するためのフラグ
@ new_file_status = 0		###新規のファイルが最終的にあったことを示すフラグ


############# テクスチャーデータデータのコピー
\rm -rf *.out
\cp -f /auto/ikuiku/home/forest/FOREST/texture/face/boy_tex/*.out .
\cp -f /auto/ikuiku/home/forest/FOREST/texture/face/grl_tex/*.out .


#############ファイルの初期化
\rm -f $decl_new_file_name
\touch $decl_new_file_name


#############新規のデータファイルの検出
@ new_file = 1
@ new_file_status = 0

foreach ls_label (`\ls -1 *.out`)
    @ new_file = 1
    foreach tex_label (`echo $ls_label | sed 's/.out//g'`)
	foreach decl_label (`\cat $decl_file_name`)
	    switch($decl_label)
		case $tex_label:
		    @ new_file = 0
		    breaksw
	    endsw
	end
	if ($new_file != 0) then
	    echo $tex_label >>$decl_new_file_name
	    @ new_file_status = 1
	endif
    end
end

if ($new_file_status != 0) then
    echo "新たなテクスチャファイルの発見！！！！！！！！！！！！！！！"
endif


#############足りないデータファイルの検出

foreach decl_label (`\cat $decl_file_name`)
    @ new_file = 1
    foreach ls_label (`\ls -1 *.out`)
	foreach tex_label (`echo $ls_label | sed 's/.out//g'`)
	    switch($decl_label)
		case $tex_label:
		    @ new_file = 0
		    breaksw
	    endsw
	end
    end
    if ($new_file != 0) then
	echo "足りないテクスチャファイルの発見 = $decl_label.out！！！！！！！！！！！！！！！"
    endif
end


################rcp.sh end