bumbleworks-gui 0.0.3

data/lib/bumbleworks/gui/views/processes/index.html.erb

@@ -0,0 +1,3 @@
+<div>
+  <%= render 'shared/processes', :locals => { :processes => processes } %>
+</div>

data/lib/bumbleworks/gui/views/processes/show.html.erb

@@ -0,0 +1,46 @@
+<h2><%= process.id %></h2>
+
+<div id="fluo"></div>
+<dl>
+  <dt>Definition Name</dt>
+  <dd><%= process.definition_name %></dd>
+
+  <dt>Tasks</dt>
+  <dd>
+    <%= render 'shared/tasks', :locals => { :tasks => process.tasks } %>
+  </dd>
+
+  <% if process.has_entity? && entity = process.entity %>
+    <dt>Entity</dt>
+    <dd>
+      <a href="<%= path_to 'entities_show', :type => entity.class.entity_type, :id => entity.identifier %>"><%= process.entity_name %></a>
+    </dd>
+  <% end %>
+
+  <dt>Trackers</dt>
+  <dd>
+    <%= render 'shared/trackers', :locals => { :trackers => process.trackers } %>
+  </dd>
+
+  <dt>Leaves</dt>
+  <dd>
+    <%= render 'shared/expressions', :locals => { :expressions => process.leaves } %>
+  </dd>
+
+  <script>
+    var Fluos = {
+      'fluo': {
+        'tree': <%= Rufus::Json.encode(process.original_tree) %>,
+        'pins': [
+        <% process.leaves.each do |l| %>
+          <% if l.error %>
+            { 'expid': '<%= l.expid %>', 'type': 'error', 'label': 'er' },
+          <% else %>
+            { 'expid': '<%= l.expid %>', 'type': 'workitem' },
+          <% end %>
+        <% end %>
+        ]
+      }
+    }
+  </script>
+</dl>

data/lib/bumbleworks/gui/views/shared/entity_types.html.erb

@@ -0,0 +1,23 @@
+<div id="classes">
+  <table class="pure-table pure-table-bordered">
+    <thead>
+      <tr>
+        <th class="sort" data-sort="class">Class</th>
+        <th class="sort" data-sort="count">Count</th>
+      </tr>
+    </thead>
+    <tbody class="list">
+    <% entity_classes.each do |entity_class| %>
+      <tr>
+        <td class="class"><a href="<%= path_to 'entities_index', :type => entity_class.entity_type %>"><%= Bumbleworks::Support.titleize(entity_class.entity_type) %></a></td>
+        <td class="count"><%= entity_class.count %></td>
+      </tr>
+    <% end %>
+    </tbody>
+  </table>
+</div>
+
+<%= render 'shared/list_js_script', :locals => {
+  :list_id => 'classes',
+  :rows => entity_classes.count
+} %>

data/lib/bumbleworks/gui/views/shared/expressions.html.erb

@@ -0,0 +1,27 @@
+<div id="expressions">
+  <table class="pure-table pure-table-bordered">
+    <thead>
+      <tr>
+        <th class="sort" data-sort="id">ID</th>
+        <th class="sort" data-sort="tree">Expression</th>
+        <th class="sort" data-sort="error">Error</th>
+        <th></th>
+      </tr>
+    </thead>
+    <tbody class="list">
+      <% expressions.each do |exp| %>
+        <tr>
+          <td class="id"><a href="<%= path_to 'expressions_show', :pid => exp.process.id, :id => exp.expid %>"><%= exp.expid %></a></td>
+          <td class="tree"><%= exp.tree %></td>
+          <td class="error"><%= exp.error.message if exp.error %></td>
+          <td><%= render 'expressions/actions', :locals => { :expression => exp } %></td>
+        </tr>
+      <% end %>
+    </tbody>
+  </table>
+</div>
+
+<%= render 'shared/list_js_script', :locals => {
+  :list_id => 'expressions',
+  :rows => expressions.count
+} %>

data/lib/bumbleworks/gui/views/shared/list_js_script.html.erb

@@ -0,0 +1,29 @@
+<%
+  per_page ||= 10
+  pagination = rows > per_page
+%>
+
+<script>
+  $(document).ready(function() {
+
+    <% if pagination %>
+      var pagDiv = '<div class="pagination pure-menu pure-menu-open pure-menu-horizontal"></div>'
+      $('#<%= list_id %>').prepend(pagDiv);
+      $('#<%= list_id %>').append(pagDiv);
+      $('.pagination').first().prepend('<ul class="paginationTop"></ul>');
+      $('.pagination').last().prepend('<ul class="paginationBottom"></ul>');
+    <% end %>
+
+    var <%= list_id %>ListOptions = {
+      valueNames: $('#<%= list_id %> th').map(function() { return $(this).data('sort') }),
+      page: <%= per_page %>,
+      <% if pagination %>
+        plugins: [
+          ListPagination({name: "paginationTop", paginationClass: 'paginationTop', outerWindow: 1}),
+          ListPagination({name: "paginationBottom", paginationClass: 'paginationBottom', outerWindow: 1}),
+        ]
+      <% end %>
+    };
+    var <%= list_id %>List = new List('<%= list_id %>', <%= list_id %>ListOptions);
+  });
+</script>

data/lib/bumbleworks/gui/views/shared/processes.html.erb

@@ -0,0 +1,45 @@
+<% existing_wfids = Bumbleworks.dashboard.process_wfids %>
+<div id="processes">
+  <table class="pure-table pure-table-bordered">
+    <thead>
+      <tr>
+        <th class="sort" data-sort="id">ID</th>
+        <th class="sort" data-sort="entity">Entity</th>
+        <th class="sort" data-sort="definition">Type</th>
+        <% if false # see below %>
+          <th class="sort" data-sort="subscribed-events">Subscribed Events</th>
+          <th class="sort" data-sort="task-count">Tasks</th>
+          <th class="sort" data-sort="error-count">Errors</th>
+          <th class="sort" data-sort="tracker-count">Trackers</th>
+        <% end %>
+      </tr>
+    </thead>
+    <tbody class="list">
+    <% processes.each do |process| %>
+      <% if existing_wfids.include?(process.id) %>
+        <tr>
+          <td class="id"><a href="<%= path_to 'processes_show', :id => process.id %>"><%= process.id %></a></td>
+          <td class="entity"><%= process.entity_name %></td>
+          <td class="definition"><%= process.definition_name %></td>
+          <% if false # need optimization before these will work %>
+            <td class="subscribed-events"><%= process.subscribed_events %></td>
+            <td class="task-count"><%= process.tasks.count %></td>
+            <td class="error-count"><%= process.errors.count %></td>
+            <td class="tracker-count"><%= process.trackers.count %></td>
+          <% end %>
+        </tr>
+      <% else %>
+        <tr>
+          <td colspan="3"><em>Process <%= process.id %> no longer exists.</em></td>
+        </tr>
+      <% end %>
+    <% end %>
+    </tbody>
+  </table>
+</div>
+
+<%= render 'shared/list_js_script', :locals => {
+  :list_id => 'processes',
+  :rows => processes.count
+} %>
+

data/lib/bumbleworks/gui/views/shared/tasks.html.erb

@@ -0,0 +1,28 @@
+<div id="tasks">
+  <table class="pure-table pure-table-bordered">
+    <thead>
+      <tr>
+        <th class="sort" data-sort="id">ID</th>
+        <th class="sort" data-sort="name">Name</th>
+        <th class="sort" data-sort="role">Role</th>
+        <th class="sort" data-sort="claimant">Claimant</th>
+      </tr>
+    </thead>
+    <tbody class="list">
+    <% tasks.each do |task| %>
+      <tr>
+        <td class="id"><a href="<%= path_to 'tasks_show', :id => task.id %>"><%= task.id %></a></td>
+        <td class="name"><%= task.to_s %></td>
+        <td class="role"><%= task.role %></td>
+        <td class="claimant"><%= task.claimant %></td>
+      </tr>
+    <% end %>
+    </tbody>
+  </table>
+</div>
+
+
+<%= render 'shared/list_js_script', :locals => {
+  :list_id => 'tasks',
+  :rows => tasks.count
+} %>

data/lib/bumbleworks/gui/views/shared/trackers.html.erb

@@ -0,0 +1,25 @@
+<div id="trackers">
+  <table class="pure-table pure-table-bordered">
+    <thead>
+      <tr>
+        <th class="sort" data-sort="id">ID</th>
+        <th class="sort" data-sort="action">Action</th>
+        <th class="sort" data-sort="conditions">Conditions</th>
+      </tr>
+    </thead>
+    <tbody class="list">
+    <% trackers.each do |tracker| %>
+      <tr>
+        <td class="id"><a href="<%= path_to 'trackers_show', :id => tracker.id %>"><%= tracker.id %></a></td>
+        <td class="action"><%= tracker.action %></td>
+        <td class="conditions"><%= tracker.conditions %></td>
+      </tr>
+    <% end %>
+    </tbody>
+  </table>
+</div>
+
+<%= render 'shared/list_js_script', :locals => {
+  :list_id => 'trackers',
+  :rows => trackers.count
+} %>

data/lib/bumbleworks/gui/views/tasks/index.html.erb

@@ -0,0 +1,3 @@
+<div>
+  <%= render 'shared/tasks', :locals => { :tasks => tasks } %>
+</div>

data/lib/bumbleworks/gui/views/tasks/show.html.erb

@@ -0,0 +1,13 @@
+<dl>
+  <dt>ID</dt>
+  <dd><%= task.id %></dd>
+
+  <dt>Process</dt>
+  <dd><a href="<%= path_to 'processes_show', :id => task.wfid %>"><%= task.wfid %></a></dd>
+
+  <dt>Role</dt>
+  <dd><%= task.role %></dd>
+
+  <dt>Claimant</dt>
+  <dd><%= task.claimant || '<em>unclaimed</em>' %></dd>
+</dl>

data/lib/bumbleworks/gui/views/trackers/index.html.erb

@@ -0,0 +1,3 @@
+<div>
+  <%= render 'shared/trackers', :locals => { :trackers => trackers} %>
+</div>

data/lib/bumbleworks/gui/views/trackers/show.html.erb

@@ -0,0 +1,13 @@
+<dl>
+  <dt>ID</dt>
+  <dd><%= tracker.id %></dd>
+
+  <dt>Process</dt>
+  <dd><a href="<%= path_to 'processes_show', :id => tracker.wfid %>"><%= tracker.wfid %></a></dd>
+
+  <dt>Expressions</dt>
+  <dd><%= tracker.waiting_expression %></dd>
+
+  <dt>Original Hash</dt>
+  <dd><%= tracker.original_hash %></dd>
+</dl>

data/spec/features/dashboard_display_spec.rb

@@ -0,0 +1,18 @@
+feature "Dashboard display" do
+  let(:dashboard_detail) { DashboardDetail.new(Capybara) }
+
+  scenario "Admin views dashboard" do
+    process1 = Bumbleworks.launch!('task_process')
+    process2 = Bumbleworks.launch!('waiting_process')
+    wait_until {
+      process1.tasks.count == 2 &&
+        process2.reload.trackers.count == 4
+    }
+
+    visit_scoped '/'
+
+    expect(dashboard_detail).to have_count_of(Bumbleworks::Process.all)
+    expect(dashboard_detail).to have_count_of(Bumbleworks::Task.all)
+    expect(dashboard_detail).to have_count_of(Bumbleworks::Tracker.all)
+  end
+end

data/spec/features/entity_administration_spec.rb

@@ -0,0 +1,38 @@
+feature "Entity management" do
+  let(:entity_index) { EntityIndex.new(Capybara) }
+  let(:entity_detail) { EntityDetail.new(Capybara) }
+  let(:entity_type_index) { EntityTypeIndex.new(Capybara) }
+
+  before(:each) do
+    Widget.truncate!
+    WidgetyFidget.truncate!
+    @widgets = [Widget.new(12), Widget.new(38), Widget.new(5)]
+    @widgety_fidgets = [WidgetyFidget.new(5), WidgetyFidget.new(3)]
+  end
+
+  scenario "Admin views entity index" do
+    visit_scoped '/entities'
+
+    expect(entity_index.entity_count('Widget')).to eq 3
+    expect(entity_index.entity_count('Widgety Fidget')).to eq 2
+  end
+
+  scenario "Admin views index for entity type" do
+    visit_scoped '/entities/widget'
+
+    expect(entity_type_index).to have_entities(@widgets)
+    expect(entity_type_index).not_to have_entities(@widgety_fidgets)
+    expect(entity_type_index).to have_registered_process('task_process')
+  end
+
+  scenario "Admin views entity detail" do
+    widget = @widgets.first
+    process = widget.launch_process('task_process')
+    wait_until { process.tasks.count == 2 }
+
+    visit_scoped "/entities/widget/#{widget.identifier}"
+
+    expect(entity_detail).to have_entity(widget)
+    expect(entity_detail).to have_process(process)
+  end
+end

data/spec/features/expression_administration_spec.rb

@@ -0,0 +1,48 @@
+feature "Expression administration" do
+  let(:expression_detail) { ExpressionDetail.new(Capybara) }
+  let(:process_detail) { ProcessDetail.new(Capybara) }
+  let(:process) {
+    process = Bumbleworks.launch!('task_process')
+    wait_until { process.reload.tasks.count == 2 }
+    process
+  }
+  let(:error_expression) {
+    process.tasks.each { |t| t.complete }
+    wait_until { process.reload.leaves.first.error }
+    process.leaves.first
+  }
+
+  scenario "Admin views expression" do
+    expression = process.leaves.first
+
+    visit_scoped "/processes/#{process.id}/expressions/#{expression.expid}"
+
+    expect(expression_detail).to have_expression(expression)
+  end
+
+  scenario "Admin cancels expression" do
+    expression = process.leaves.first
+
+    visit_scoped "/processes/#{process.id}/expressions/#{expression.expid}"
+    click_button 'Cancel'
+
+    wait_until { process.reload.tasks.count == 1 }
+    visit_scoped "/processes/#{process.id}"
+    expect(process_detail).not_to have_expression(expression)
+  end
+
+  scenario "Admin kills expression" do
+    visit_scoped "/processes/#{process.id}/expressions/#{error_expression.expid}"
+    click_button 'Kill'
+
+    wait_until { process.reload.errors.empty? }
+    visit_scoped "/processes/#{process.id}"
+    expect(process_detail).not_to have_error(NaughtyParticipant::StupidError.new("Oh crumb."))
+  end
+
+  scenario "Admin views expression errors" do
+    visit_scoped "/processes/#{process.id}/expressions/#{error_expression.expid}"
+
+    expect(expression_detail).to have_error(NaughtyParticipant::StupidError.new("Oh crumb."))
+  end
+end

data/spec/features/process_administration_spec.rb

@@ -0,0 +1,24 @@
+feature "Process management" do
+  let(:process_index) { ProcessIndex.new(Capybara) }
+  let(:process_detail) { ProcessDetail.new(Capybara) }
+
+  scenario "Admin views process index" do
+    process1 = Bumbleworks.launch!('task_process', :entity => Widget.new(41))
+    process2 = Bumbleworks.launch!('task_process')
+    wait_until { process1.tasks.count == 2 && process2.tasks.count == 2 }
+
+    visit_scoped '/processes'
+
+    expect(process_index).to have_processes([process1, process2])
+  end
+
+  scenario "Admin views process detail" do
+    process = Bumbleworks.launch!('task_process', :entity => Widget.new(56))
+    wait_until { process.tasks.count == 2 }
+
+    visit_scoped "/processes/#{process.id}"
+
+    expect(process_detail).to have_process(process)
+    expect(process_detail).to have_entity(Widget.new(56))
+  end
+end

data/spec/features/task_administration_spec.rb

@@ -0,0 +1,22 @@
+feature "Task management" do
+  let(:task_index) { TaskIndex.new(Capybara) }
+  let(:task_detail) { TaskDetail.new(Capybara) }
+
+  scenario "Admin views task index" do
+    process = Bumbleworks.launch!('task_process')
+    wait_until { process.tasks.count == 2 }
+
+    visit_scoped '/tasks'
+
+    expect(task_index).to have_tasks(process.tasks.all)
+  end
+
+  scenario "Admin views task detail" do
+    process = Bumbleworks.launch!('task_process')
+    task = process.tasks.next_available
+
+    visit_scoped "/tasks/#{task.id}"
+
+    expect(task_detail).to have_task(task)
+  end
+end

data/spec/features/tracker_administration_spec.rb

@@ -0,0 +1,23 @@
+feature "Tracker management" do
+  let(:tracker_index) { TrackerIndex.new(Capybara) }
+  let(:tracker_detail) { TrackerDetail.new(Capybara) }
+
+  scenario "Admin views tracker index" do
+    process1 = Bumbleworks.launch!('waiting_process')
+    process2 = Bumbleworks.launch!('waiting_process')
+    wait_until { process1.reload.trackers.count == 4 && process2.reload.trackers.count == 4 }
+    visit_scoped '/trackers'
+
+    expect(tracker_index).to have_trackers(process1.trackers + process2.trackers)
+  end
+
+  scenario "Admin views tracker detail" do
+    process = Bumbleworks.launch!('waiting_process')
+    wait_until { process.reload.trackers.count == 4 }
+    tracker = process.trackers.first
+
+    visit_scoped "/trackers/#{tracker.id}"
+
+    expect(tracker_detail).to have_tracker(tracker)
+  end
+end