pcelka 1.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 5308b1ba45b7cde58d91393fcd8fc53d33c96da155d3390517aa0ad023566b05
+  data.tar.gz: 10a0e41949e6969a919194e9ee6987a6ce12aa7b9cbae031570eea53244af1d8
+SHA512:
+  metadata.gz: 41f7faf44501726cbd0c34dc9ef0066d04f72121f420c6192fb331585d03178b891d593790c8c149e8d4cd5be0a7f0a89af1c555556262f71d8d843f13440bd0
+  data.tar.gz: 430900b2828d4f3e7903d407323be6ee817d5400fbc9834c7d732ef6dfa447a9f9251fc35fbea2a28fac8d2f6ac36c669ffa88969b8ed88eb0d2b7f3de694f9d

data/app.rb

@@ -0,0 +1,95 @@
+# frozen_string_literal: true
+require "roda"
+require "datastar"
+
+class App < Roda
+  plugin :render, escape: true, assume_fixed_locals: true,
+    template_opts: {
+      scope_class: self,
+      freeze: true,
+      extract_fixed_locals: true,
+      default_fixed_locals: "()",
+      chain_appends: true,
+      skip_compiled_encoding_detection: true,
+    }
+  plugin :assets, css: "styles.css", js: %w"app.js hotkey.js"
+  plugin :symbol_views
+  plugin :public
+  plugin :part
+  plugin :head
+  plugin :i18n, locale: %w"en ru"
+
+  R18n.set("ru")
+
+  route do |r|
+    r.public
+    r.assets
+
+    ds = Datastar.from_rack_env(env)
+
+    r.root do
+      @report = PCELKA << :report
+      if ds.sse?
+        ds.stream do |sse|
+          sse.patch_elements part("home/report", report: @report)
+          while PCELKA.programs_status_changed?
+            report = PCELKA << :report
+            sse.patch_elements part("home/report", report:)
+          end
+        end
+      else
+        :home
+      end
+    end
+
+    r.get "logs" do
+      last_id = ds.signals["log_last_id"] || 0
+      ds.stream do |sse|
+        LOGS_COLLECTOR.retrieve_new_logs(last_id) do |log|
+          sse.patch_elements \
+            part("logs/log_line", log:),
+            mode: "append",
+            selector: "#logs-area"
+          sse.patch_signals log_last_id: log[:id]
+        end
+      end
+    end
+
+    r.on "programs" do
+      program_action_response = lambda do
+        if ds.sse?
+          ""
+        else
+          r.redirect "/"
+        end
+      end
+
+      r.post "start_all" do
+        PCELKA << :start_all
+        program_action_response.call
+      end
+
+      r.post "stop_all" do
+        PCELKA << :stop_all
+        program_action_response.call
+      end
+
+      r.on String do |program_id|
+        r.post "start" do
+          PCELKA << [:start, program_id]
+          program_action_response.call
+        end
+
+        r.post "stop" do
+          PCELKA << [:stop, program_id]
+          program_action_response.call
+        end
+
+        r.post "restart" do
+          PCELKA << [:restart, program_id]
+          program_action_response.call
+        end
+      end
+    end
+  end
+end

data/assets/css/styles.css

@@ -0,0 +1,209 @@
+@layer base, main, component, utility;
+
+@layer base {
+  body {
+    margin: 0;
+  }
+}
+
+@layer main {
+  :root {
+    --s1: .25rem;
+    --s2: .5rem;
+    --s3: 1rem;
+    --s4: 2rem;
+    --s5: 4rem;
+
+    --lch-brown: 10% 0.4 65;
+    --lch-yellow: 100% 0.2 55;
+    --lch-yellow-light: 100% 0.02 55;
+    --lch-orange: 100% 0.4 65;
+    --lch-orange-dark: 93% 0.4 65;
+
+    --color-bg: oklch(var(--lch-yellow));
+    --color-text: oklch(var(--lch-brown));
+    --color-logs-bg: oklch(var(--lch-yellow-light));
+    --color-button-bg: oklch(var(--lch-orange));
+    --color-border: oklch(var(--lch-brown));
+    --color-scrollbar-thumb: oklch(var(--lch-orange-dark));
+    --color-input-bg: oklch(var(--lch-yellow-light));
+    --color-input-text: oklch(var(--lch-brown));
+    --color-outline: oklch(var(--lch-orange-dark));
+
+    /* svg.gsub(%("), "'").gsub("<", "%3C").gsub(">", "%3E").gsub(/\n/, "") */
+    --icon-checkbox: url("data:image/svg+xml,%3Csvg xmlns='http://www.w3.org/2000/svg' viewBox='-24 5 48 57' fill='white'%3E%3Cellipse cx='0' cy='38' rx='9' ry='14' /%3E%3Cellipse cx='0' cy='20' rx='5' ry='6' /%3E%3Cellipse cx='-14' cy='26' rx='10' ry='4' /%3E%3Cellipse cx='14' cy='26' rx='10' ry='4' /%3E%3Cpolyline points='-2,15 -4,12 -6,12' fill='none' stroke='white' stroke-linecap='round' stroke-linejoin='round' stroke-width='3' /%3E%3Cpolyline points='2,15 4,12 6,12' fill='none' stroke='white' stroke-linecap='round' stroke-linejoin='round' stroke-width='3' /%3E%3C/svg%3E");
+
+    scroll-behavior: smooth;
+    scrollbar-color: var(--color-scrollbar-thumb) var(--color-bg);
+    scrollbar-gutter: stable;
+  }
+
+  body {
+    background-color: var(--color-bg);
+    color: var(--color-text);
+  }
+
+  main {
+    margin: 0 0 1rem 1rem;
+    width: calc(100% - 6rem);
+  }
+
+  #pcelka-h1 {
+    display: inline-block;
+    cursor: pointer;
+  }
+
+  #logs {
+    --controls-height: min(2rem, 10vh);
+
+    #logs-controls {
+      padding-top: 1rem;
+      padding-bottom: .5rem;
+      height: var(--controls-height);
+      display: flex;
+      align-items: center;
+    }
+    #logs-area {
+      height: calc(100vh - var(--controls-height) - 2.5rem);
+      overflow-y: scroll;
+      width: 100%;
+      border: 1px solid var(--color-border);
+      font-family: monospace;
+      background-color: var(--color-logs-bg);
+      scrollbar-color: var(--color-scrollbar-thumb) var(--color-logs-bg);
+    }
+  }
+
+  #report {
+    .actions {
+      display: flex;
+      gap: var(--s2);
+    }
+
+    .status-column {
+      min-width: 20ch;
+    }
+  }
+
+  nav#aside-nav {
+    position: fixed;
+    right: 1rem;
+    top: 0;
+    height: 100%;
+    display: flex;
+    flex-direction: column;
+    justify-content: space-around;
+
+    .nav-arrow {
+      width: 3rem;
+      cursor: pointer;
+
+      svg {
+        height: 100%;
+        width: 100%;
+        --color-brown: oklch(var(--lch-brown));
+        --color-orange: oklch(var(--lch-orange-dark));
+      }
+    }
+  }
+
+  *:focus-visible {
+    outline: 2px solid var(--color-outline);
+  }
+}
+
+@layer component {
+  input[type=submit], input[type=button], button {
+    padding: var(--s2) var(--s3);
+    border-radius: 0;
+    border: none;
+    cursor: pointer;
+    font-size: 1em;
+    background-color: var(--color-button-bg);
+    color: var(--color-text);
+
+    &:hover {
+      background-color: oklch(from var(--color-button-bg) calc(l - 0.07) c h);
+      color: oklch(from var(--color-text) calc(l - 0.02) c h);
+    }
+
+    &:active {
+      background-color: oklch(from var(--color-button-bg) calc(l - 0.03) c h);
+      color: var(--color-text);
+    }
+
+    &:disabled {
+      cursor: unset;
+      background-color: oklch(from var(--color-button-bg) l c h / 0.5);
+      color: oklch(from var(--color-text) l c h / 0.65);
+    }
+
+    &:focus-visible {
+      --color-outline: oklch(var(--lch-brown));
+    }
+  }
+
+  input[type=text], input[type=search] {
+    width: 100%;
+    padding: .25rem .5rem;
+    border-radius: none;
+    border: 1px solid var(--color-border);
+    background-color: var(--color-input-bg);
+    color: var(--color-input-text);
+  }
+
+  label:has([type=checkbox], [type=radio]) {
+    cursor: pointer;
+  }
+  [type=checkbox],
+  [type=radio] {
+    appearance: none;
+    width: 1.5em;
+    height: 1.5em;
+    vertical-align: middle;
+    cursor: pointer;
+    background-color: var(--color-input-bg);
+    border: 1px solid var(--color-border);
+  }
+  [type=checkbox]:checked, [type=checkbox]:checked:active, [type=checkbox]:checked:focus,
+  [type=radio]:checked,
+  [type=radio]:checked:active,
+  [type=radio]:checked:focus {
+    background-image: var(--icon-checkbox);
+    background-color: oklch(var(--lch-orange));
+    background-position: center .15em;
+    background-size: 1em auto;
+    background-repeat: no-repeat;
+  }
+
+  table {
+    border-collapse: collapse;
+
+    td, th {
+      padding: var(--s2);
+      border-bottom: 1px solid var(--color-border);
+    }
+  }
+}
+
+@layer utility {
+  .ms1 { margin-inline-start: var(--s1); }
+  .ms2 { margin-inline-start: var(--s2); }
+  .ms3 { margin-inline-start: var(--s3); }
+  .ms4 { margin-inline-start: var(--s4); }
+  .me1 { margin-inline-end: var(--s1); }
+  .me2 { margin-inline-end: var(--s2); }
+  .me3 { margin-inline-end: var(--s3); }
+  .me4 { margin-inline-end: var(--s4); }
+  .mt1 { margin-block-start: var(--s1); }
+  .mt2 { margin-block-start: var(--s2); }
+  .mt3 { margin-block-start: var(--s3); }
+  .mt4 { margin-block-start: var(--s4); }
+  .mb1 { margin-block-end: var(--s1); }
+  .mb2 { margin-block-end: var(--s2); }
+  .mb3 { margin-block-end: var(--s3); }
+  .mb4 { margin-block-end: var(--s4); }
+  .ms-auto { margin-inline-start: auto; }
+  .me-auto { margin-inline-end: auto; }
+  .grow1 { flex-grow: 1; }
+}

data/assets/js/app.js

@@ -0,0 +1,16 @@
+import { addHotkeyListener } from "./hotkey.js";
+
+window.$ = (s) => document.querySelector(s);
+
+function clickIdIfPresent(id) {
+  const elem = document.getElementById(id);
+  if (!elem) return;
+  elem.click();
+}
+
+addHotkeyListener(
+  ["s", "ы"],
+  () => clickIdIfPresent("scroll-to-bottom-checkbox"),
+);
+addHotkeyListener(["u", "г"], () => clickIdIfPresent("nav-up"));
+addHotkeyListener(["d", "в"], () => clickIdIfPresent("nav-down"));

data/assets/js/hotkey.js

@@ -0,0 +1,27 @@
+function isEventFiredOnInput(event) {
+  const target = event.target;
+  const { tagName } = target;
+  const isInput = tagName === "INPUT" &&
+    ![
+      "checkbox",
+      "radio",
+      "range",
+      "button",
+      "file",
+      "reset",
+      "submit",
+      "color",
+    ].includes(target.type);
+
+  return target.isContentEditable ||
+    ((isInput || tagName === "TEXTAREA" || tagName === "SELECT") &&
+      !target.readOnly);
+}
+
+export function addHotkeyListener(keys, fn) {
+  if (!Array.isArray(keys)) keys = [keys];
+  document.addEventListener("keydown", (e) => {
+    if (isEventFiredOnInput(e)) return;
+    if (keys.includes(e.key)) fn(e);
+  });
+}

data/bin/dev

@@ -0,0 +1,9 @@
+#!/usr/bin/env ruby
+
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../Gemfile", __dir__)
+require "bundler/setup"
+
+Dir.chdir(File.expand_path("..", __dir__)) do
+  Process.exec "fd . -E assets/ | entr -rz env RACK_ENV=development PCELKA_PROCFILE=examples/procfile/Procfile bundle exec falcon serve --bind http://localhost:9292 -n 1"
+end
+

data/bin/dev-puma

@@ -0,0 +1,8 @@
+#!/usr/bin/env ruby
+
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../Gemfile", __dir__)
+require "bundler/setup"
+
+Dir.chdir(File.expand_path("..", __dir__)) do
+  Process.exec "env RACK_ENV=development PCELKA_PROCFILE=examples/procfile/Procfile bundle exec puma"
+end

data/bin/pcelka

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+
+$LOAD_PATH.unshift File.expand_path("../lib", __dir__)
+
+if ARGV[0]
+  ENV["PCELKA_PROCFILE"] = ARGV[0]
+end
+ENV["PCELKA_PROCFILE"] ||= "Procfile" if File.exist?("Procfile")
+
+if ENV["PCELKA_PROCFILE"]
+  ENV["PCELKA_PROCFILE"] = File.expand_path(ENV["PCELKA_PROCFILE"], Dir.pwd)
+end
+
+Dir.chdir(File.expand_path("..", __dir__)) do
+  Process.exec "falcon serve --bind http://localhost:9292 -n 1"
+end

data/bin/pcelka-console

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+
+ENV["BUNDLE_GEMFILE"] ||= File.expand_path("../Gemfile", __dir__)
+require "bundler/setup"
+
+$LOAD_PATH.unshift(File.expand_path("../lib", __dir__))
+require "pcelka/async_client"
+
+procfile = ENV.fetch("PCELKA_PROCFILE",
+  File.expand_path("../examples/procfile/Procfile", __dir__))
+pcelka = Pcelka::AsyncClient.from_procfile procfile
+pcelka.server.writer.add_console_writer
+
+th = Thread.new { pcelka.server.run }
+pcelka << :start_all
+th.join

data/config/datastar.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+require "datastar"
+require "datastar/async_executor"
+
+# Do not silence logs!
+Datastar::AsyncExecutor.prepend(Module.new do
+  def initialize; end
+end)
+
+Datastar.configure do |config|
+  config.finalize = lambda do |_view_context, response|
+    throw :halt, response.finish
+  end
+  config.executor = Datastar::AsyncExecutor.new
+  config.logger = Console
+end

data/config/falcon_init.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+if defined? Falcon
+  # https://github.com/socketry/falcon/issues/333
+  class Falcon::Server
+    alias __original_accept accept
+
+    def accept(...)
+      __original_accept(...)
+    rescue Errno::EPIPE, Errno::ECONNRESET
+      # Client disconnected mid-response — expected.
+    end
+  end
+end

data/config.ru

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+dev = ENV["RACK_ENV"] == "development"
+
+require "console"
+Console.logger.debug!
+
+require_relative "config/falcon_init"
+require_relative "config/datastar"
+
+$LOAD_PATH.unshift(File.expand_path("lib", __dir__))
+require_relative "pcelka"
+require_relative "models"
+require_relative "app"
+run App.freeze.app
+
+unless dev
+  Tilt.finalize!
+  RubyVM::YJIT.enable if defined?(RubyVM::YJIT.enable)
+end
+
+freeze_core = !dev
+if freeze_core
+  begin
+    require "refrigerator"
+  rescue LoadError
+  else
+    require "nio" if defined?(Puma)
+    Refrigerator.freeze_core
+  end
+end

data/db/migrations/001_create_logs.rb

@@ -0,0 +1,11 @@
+Sequel.migration do
+  change do
+    create_table :logs do
+      primary_key :id
+      String :app, null: false
+      String :message, null: false, text: true
+      TrueClass :is_error, null: false, default: false
+      DateTime :created_at, null: false, default: Sequel.lit('unixepoch()')
+    end
+  end
+end

data/db.rb

@@ -0,0 +1,3 @@
+# frozen_string_literal: true
+require "sequel/core"
+DB = Sequel.sqlite

data/examples/procfile/Procfile

@@ -0,0 +1,7 @@
+# ticker:  ruby ./ticker $PORT
+myerror:   ruby ./error
+# utf8:    ruby ./utf8
+# single_call:    ruby ./single_call
+spawner: ./spawner
+# oneshot: ONESHOT=uno ./oneshot
+# non-exist: non-exist

data/examples/procfile/Procfile.without_colon

@@ -0,0 +1,2 @@
+ticker ./ticker $PORT
+error  ./error

data/examples/procfile/error

@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby
+
+$stdout.sync = true
+
+puts "will error in 2s"
+sleep 1
+raise "Dying"

data/examples/procfile/log/neverdie.log

@@ -0,0 +1,4 @@
+tick
+tick
+./never_die:6:in `sleep': Interrupt
+	from ./never_die:6

data/examples/procfile/oneshot

@@ -0,0 +1,3 @@
+#!/bin/bash
+
+echo oneshot: "$ONESHOT"

data/examples/procfile/single_call

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+
+$stdout.sync = true
+
+puts "STARTED single_call"
+
+while true
+  puts "first\nsecond\nthird"
+  sleep 1
+end

data/examples/procfile/spawnee

@@ -0,0 +1,14 @@
+#!/bin/sh
+
+NAME="$1"
+
+sigterm() {
+  echo "$NAME: got sigterm"
+}
+
+#trap sigterm SIGTERM
+
+while true; do
+  echo "$NAME: ping $$"
+  sleep 1
+done

data/examples/procfile/spawner

@@ -0,0 +1,7 @@
+#!/bin/sh
+
+./spawnee A &
+./spawnee B &
+./spawnee C &
+
+wait

data/examples/procfile/ticker

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+$stdout.sync = true
+
+%w( SIGINT SIGTERM ).each do |signal|
+  trap(signal) do
+    puts "received #{signal} but i'm ignoring it!"
+  end
+end
+
+while true
+  puts "tick: #{ARGV.inspect} -- FOO:#{ENV["FOO"]}"
+  sleep 1
+end

data/examples/procfile/utf8

@@ -0,0 +1,11 @@
+#!/usr/bin/env ruby
+# encoding: BINARY
+
+$stdout.sync = true
+
+while true
+  puts "\u65e5\u672c\u8a9e\u6587\u5b57\u5217"
+  puts "\u0915\u0932\u094d\u0907\u0928\u0643\u0637\u0628\u041a\u0430\u043b\u0438\u043d\u0430"
+  puts "\xff\x03"
+  sleep 1
+end

data/i18n/en.yml

@@ -0,0 +1,32 @@
+report:
+  action:
+    start_all: Start all
+    stop_all: Stop all
+    start: Start
+    restart: Restart
+    stop: Stop
+  col:
+    app: Application
+    status: Status
+    actions: Actions
+program:
+  status:
+    not_started: Not started
+    alive: Alive
+    dead: Dead
+    stopping: Stopping
+    unknown: Unknown
+logs:
+  scroll_to_bottom: Scroll to bottom (s)
+  message:
+    _starting_all: Starting all...
+    _stopping_all: Stopping all...
+    _starting: Starting...
+    _stopping: Stopping...
+    _restarting: Restarting...
+    _died: Died :(
+  app:
+    _all: All
+nav:
+  up: Up (u)
+  down: Down (d)

data/i18n/ru.yml

@@ -0,0 +1,32 @@
+report:
+  action:
+    start_all: Запустить все
+    stop_all: Остановить все
+    start: Запустить
+    restart: Перезапустить
+    stop: Остановить
+  col:
+    app: Приложение
+    status: Статус
+    actions: Действия
+program:
+  status:
+    not_started: Не запущено
+    alive: Живо
+    dead: Мертво
+    stopping: Останавливается
+    unknown: Неизвестно
+logs:
+  scroll_to_bottom: Прокрутить до конца (s)
+  message:
+    _starting_all: Запускаем все...
+    _stopping_all: Останавливаем все...
+    _starting: Запускаем...
+    _stopping: Останавливаем...
+    _restarting: Перезапускаем...
+    _died: Умер :(
+  app:
+    _all: Все
+nav:
+  up: Вверх (u)
+  down: Вниз (d)