#!/usr/bin/env ruby1.8
#
#= dcmodel thumbnail generate ruby script
#
#  Editor :: seiya
#  Version:: 2005/11/11 17:27:08
#
#== Overview
#
#This file is generate by following ruby script automatically.
#
#      /home/seiya/dcmodel-tools/dcmodel-thum.rb
#      version "$Revision: 1.21 $ : $Date: 2005/11/09 10:43:15 $"
#
#Please edit this file according to your purpose.
#
#== Usage
#
#Please check following sample page and reference manual.
#
#  http://www.gfd-dennou.org/arch/dcmodel/doc/dcmodel-tools/dcmodel-thum-sample
#  http://www.gfd-dennou.org/arch/dcmodel/doc/dcmodel-tools/dcmodel-thum-rdoc
#
##################################################

require "/home/seiya/dcmodel-tools/dcmodel-thum.rb"

var = ARGV.shift

var1 = %w(u-xm ucos-xm xm)
name1 = {"u-xm"=>"東西平均 u","ucos-xm"=>"東西平均 ucosφ","xm"=>"Zonal-mean variables"}
var2 = %w(vor potvor hsfc strfunc)
name2 = {"vor"=>"渦度","potvor"=>"渦位","hsfc"=>"表面変位","strfunc"=>"流線関数"}

if var
  if ARGV.length==0
    var_name = name1[var]
    var_name.nil? && raise("invalid var_name")
  elsif ARGV.length==1
    var_name = name2[var]
    var_name.nil? && raise("invalid var_name")
    map = ARGV.shift
    map_name = {"c"=>"cylindrical", "o"=>"orthographic", "p"=>"orthographic-polar"}[map]
#  map_name = {"c"=>"cylindrical", "m"=>"mollweide", "a"=>"azimuthal-eq-area"}[map]
    map_name.nil? && raise("invalid map_name")
  end
end

######################################################
# DCModelThumbnail のインスタンスを作成 (必須)
thumb = DCModelThumbnail.new

# サムネイル実行コマンド (必須)。最後に実行すること
END{
  thumb.create
}
# コピーライト
#thumb.copyright = "GFD Dennou Club"

# 作成されるサムネイルのファイル名 (拡張子除く)
if var
  if map
    thumb.index     = "../index_#{var}_#{map_name}"
  else
    thumb.index     = "../index_#{var}"
  end
else
  thumb.index     = "../index-nojavascript"
end

# 作成されるサムネイルの拡張子名
#thumb.index_ext = ".htm"

# 「情報ファイル (infofile)」のファイル名
thumb.infofile  = "txt/#{File.basename(thumb.index)}.txt"

# 画像ファイルとして認識させたい拡張子の追加。
# デフォルトでは gif, png, jpg, jpeg, GIF, PNG, JPG, JPEG が認識される。
#thumb.ext_list.push("bmp")

# headlimit に当てはまらないものは画像としては無視され、
# 当てはまるものは「情報ファイル」において、接頭部分 headlimit が
# 省略可能になる。
#thumb.headlimit = "headlimit_"

# 絵のあるディレクトリの名前。必ず存在していなければならない。
thumb.figdir    = "../gallery"

# サムネイル画像を置くディレクトリの名前
#thumb.thumbnaildir    = "../thumbdir"

# サムネイル画像の拡張子名
#thumb.thumbnailtail    = "_thumb.png"

# サムネイル画像化する元画像のページ番号
#thumb.thumbnailpage = "1"

# convert コマンドおよびオプション。この後ろに画像サイズが 200x150
# のような形式で指定される。
#thumb.convert_cmd = "convert -depth 8 -geometry"

# スタイルシートファイル
#thumb.css       = "/GFD_Dennou_Club/ftp/arch/dcmodel/htmltools/dcmodel.css"

# rd2 コマンドへのパス
#thumb.rd2_path  = "/usr/bin/rd2"

# rd2-ext-lib へのライブラリへのパス
#thumb.rd2htmlextlib = "/GFD_Dennou_Club/ftp/arch/dcmodel/lib/ruby/1.8"

# SIGEN ファイルを作らない場合は false にセットする
#thumb.mksigen = false

# HTML のロボット検索を禁止する場合には true にセットする
#thumb.norobots = true

# 画像ファイルサイズ (幅)
#thumb.img_width  = 200

# 画像ファイルサイズ (高さ)
#thumb.img_height = 150

# 横にならべるファイル数
thumb.figtable_num = 25

# スタイルシートを直接設定するためのもの
# (css ファイルに書き込む情報を直接指定できる)
#thumb.style = <<-STYLE
#  a:link { color:#269900; }
#  a:visited { color:#269900; }
#  a:hover { color:#99FF33; }
#STYLE

# html の作成者情報  (デフォルトはユーザアカウント名が自動取得される)
#thumb.html_author  = "seiya"

# html ヘッダのタイトル
if var
  thumb.title     = "球面浅水系減衰乱流 (#{var_name})"
else
  thumb.title     = "球面浅水系減衰乱流"
end

# 本体に書き出すメッセージ。サムネイルの部分よりも上に出力される。
# この変数自体は Array オブジェクトで、その内部に String オブジェクトが
# 格納される。
thumb.message   = Array.new

# "=" ではなく、"<<" で代入することに注意！！
thumb.message   << <<-Message
=begin
[((<地球流体電脳倶楽部|URL:http://www.gfd-dennou.org>))]
[((<dcmodel|URL:http://www.gfd-dennou.org/arch/dcmodel>)) |
((<dcmodel-tools|URL:http://www.gfd-dennou.org/arch/dcmodel/doc/dcmodel-tools/SIGEN.htm>))]
[((<spmodel|URL:http://www.gfd-dennou.org/arch/spmodel/>))]
=end

Message

if var
  thumb.message   << <<-Message
=begin
= 球面浅水系減衰性乱流実験 (#{var_name})
((<結果に戻る|URL:index-nojavascript.htm>))

=end
  Message
else
  str =<<-Message
=begin
= 球面浅水系減衰乱流実験
== 実験設定
    * 水平分解能: T170
    * 時間積分: 4次ルンゲクッタ+クランクニコルソンスキーム
    * 積分時間: 1.0e-3(sec) × 1.0e4ステップ
    * 固定パラメター: a=1, H=1
    * スイープパラメター: Ω(=4000,1000,400,200,100,50,25,0), Random seed(=101-125)

== 結果

  Message

  var1.each do |v|
    str +=<<-Message
    * ((<#{name1[v]}|URL:index_#{v}.htm>))
Message
  end
  var2.each do |v|
    str +=<<-Message
    * #{name2[v]}
       * ((<Cylindrical|URL:index_#{v}_cylindrical.htm>))
       * ((<Orthographic|URL:index_#{v}_orthographic.htm>))
       * ((<Orthographic Polar|URL:index_#{v}_orthographic-polar.htm>))
Message
  end
  str +=<<-Message
== 初期値

=end
  Message
  thumb.message   << str
end