階層リストをWeb表示する

ひさびさのQiita投稿ですが、福岡および私の周りのElixir環境は、Qiitaを書き始めた5ヶ月前と比べ、激変しており、自社・他者両方のプロダクト開発や、業務改善ツールにElixirを選択される機会が、相当増えました:relaxed:

私自身も、公私共に、Elixirを書かない日が無くなったレベルで、大きく動きはじめています:headphones:

さて、そんな中で、「Elixirを使って、ジョブ管理ツールを作る」という、なかなか興味深いプロダクト開発が始まりそうです:ocean:

ということで、ジョブ管理ツールのデータ構造やUIの原型のようなものを、少しコード化してみたいと思います:gem:

---

:stars::stars: 【お知らせ】 [明日10/27（金）19時開催の「fukuoka.ex #3」プログラミング入門＆もくもく会は、残席2名、福岡でElixirプログラミングを始めてみたい方はぜひ遊びに来てください（Elixir経験者向けのコーチ枠も引き続き受け付けています）](https://techjin.connpass.com/event/63493/) 

[![image.png](https://connpass-tokyo.s3.amazonaws.com/thumbs/cb/13/cb130a03343bc310b07244c308b940db.png)](https://techjin.connpass.com/event/68525/)

---

# ビジュアライズされたジョブ管理ツール

ジョブ管理ツール、といえば、Hinemosのような、ジョブを一覧して、ジョブの実行状況を表示したり、リランをかけたりと、割と地味な操作画面というのが定番だと思います

一方で、商用ツールの中には、ビジュアルなジョブツリーやジョブネットワークを表示し、ジョブ同士の先行関係やブロック状況を一目で分かるような操作画面を備えるものもあります（私の前職がそういうものを使ったり、販売していました）

そういうビジュアライズされたジョブ管理ツールを自作してみようと思い立ちました:stuck_out_tongue_winking_eye:

# 先行関係のあるジョブを表現するデータ構造

まずジョブを、どのようなデータ構造で表現するか、から始めます

実際にジョブを管理するのに充分な情報を一気に作り込むと大変なので、まずは「ジョブ名」だけのリストを考え、追々、その中身を充実させていく方針でいきます

シンプルに、先行関係のあるジョブのリストは、こんな感じにします

```ex
[ 
	"買い物に行く", 
	"カップ麺を買う", 
	"帰る", 
	"カップ麺のフタを空ける", 
	"カップ麺にお湯を注ぐ", 
	"箸を持ってくる", 
	"カップ麺を食べる" 
]
```

カップ麺は、シーケンシャルに食すジョブです:ramen:

ここに、健康も考え、サラダも一緒に食べるとしましょう

```ex
[
	"買い物に行く", 
	[ "カップ麺を買う", "サラダを買う" ], 
	"帰る", 
	"カップ麺のフタを空ける", 
	"カップ麺にお湯を注ぐ", 
	[ "箸を持ってくる", "サラダのフタを空ける", "サラダを食べる" ], 
	"カップ麺を食べる" 
]
```

サラダを食べ切らないと、カップ麺が食べれない、なんとも言えない構造だが、まぁ、これで良しとしよう:sweat_smile:

さて、この階層リストのままだと、ネットワーク構造を作ることはできないけど、途中に相乗りする構造は、後々作るとして、まずはこのデータをビジュアライズしてみます

# Phoenix 1.3でWebアプリの雛形を構築する

Node.js等のインストールは済ませていて、Phoenix 1.3が使える状態から開始します

```
# mix phx.new jobber --no-ecto
```

Phoenix 1.3を使える状態までの構築は、[SlideShareに作り方をアップしている](https://www.slideshare.net/piacere_ex/elixir3phoenix-13web-rest-api-81219622)ので、ご参照ください

[![image.png](https://qiita-image-store.s3.amazonaws.com/0/155423/442cc88e-e441-397e-0342-99fae1afa729.png)](https://www.slideshare.net/piacere_ex/elixir3phoenix-13web-rest-api-81219622)

# ジョブリストをWebページにリスト表示する

ジョブリストを、HTMLのリスト（&lt;ul&gt;～&lt;li&gt;～&lt;/ul&gt;）に変換します（いったん、10階層以上は、エラーで落とすようにします）

```ex:lib/view/listing.ex
	def html_list( items \\ "", start \\ "<ul>\n", stop \\ "</ul>\n", pre \\ "<li>", post \\ "\n" ) do
		items |> probe( start, stop, pre, post )
	end
	def probe( items, start, stop, pre, post, count \\ 0 ) when count < 10 do
		case is_list( items ) do
			true  -> start <> List.to_string( Enum.map( items, &( probe( &1, start, stop, pre, post, count + 1 ) ) ) ) <> stop
			false -> pre <> items <> post
		end
	end

```

HTMLから、上記を呼んでみます

```ex:lib/jobber_web/templates/page/index.html.eex
<%= raw( Listing.html_list( 
	[ 
		"買い物に行く", 
		[ "カップ麺を買う", "サラダを買う" ], 
		"帰る", 
		"カップ麺のフタを空ける", 
		"カップ麺にお湯を注ぐ", 
		[ "箸を持ってくる", "サラダのフタを空ける", "サラダを食べる" ], 
		"カップ麺を食べる" 
	] 
) ) %>
```

Phoenixを起動します

```
# iex -S mix phx.server
```

ブラウザで「http://localhost:4000 」にアクセスすると、以下のような画面が表示されます

![image.png](https://qiita-image-store.s3.amazonaws.com/0/155423/26a40340-7af5-d38f-c14f-fe72109e7c27.png)

うむ、なんとなく良い感じ

# ジョブリストをWebページにテーブル表示する

リスト表示と同じ構造で、HTMLテーブル表示もカンタンに作れます

```ex:lib/view/listing.ex
　…
	def html_table( items \\ "", start \\ "<tr>\n", stop \\ "</tr>\n", pre \\ "<td>", post \\ "</td>\n" ) do
		"<table border='1'>" <> ( items |> probe( start, stop, pre, post ) ) <> "</table>"
	end
　…
```

呼び出し側も修正します

```ex:lib/jobber_web/templates/page/index.html.eex
<%= raw( Listing.html_table( 
	[ 
		"買い物に行く", 
		[ "カップ麺を買う", "サラダを買う" ], 
		"帰る", 
		"カップ麺のフタを空ける", 
		"カップ麺にお湯を注ぐ", 
		[ "箸を持ってくる", "サラダのフタを空ける", "サラダを食べる" ], 
		"カップ麺を食べる" 
	] 
) ) %>
```

地味に、Elixir 1.5から、カッコを書かなくてもエラーが出なくなった、recompileを実施します

```
iex> recompile
```

ブラウザで確認すると、以下のように、テーブル化されて表示されます

![image.png](https://qiita-image-store.s3.amazonaws.com/0/155423/282e26ad-4c2d-94a4-2d0d-e2b6f6c0033f.png)

ほんのちょっとだけ、それっぽい表示になったかな:rolling_eyes: