Extract pages into lib/page/ modules; thin down bbs.rb
Each page is now a self-contained module with a configure(tui) class method. Shared helpers live in TUIHelpers. bbs.rb is reduced to constants, chrome, and wiring. Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
343
bbs.rb
343
bbs.rb
@@ -6,6 +6,15 @@ require_relative 'lib/repository/online_users_repository'
|
|||||||
require_relative 'lib/repository/message_board_repository'
|
require_relative 'lib/repository/message_board_repository'
|
||||||
require_relative 'lib/repository/wiki_repository'
|
require_relative 'lib/repository/wiki_repository'
|
||||||
require_relative 'lib/repository/catalog_repository'
|
require_relative 'lib/repository/catalog_repository'
|
||||||
|
require_relative 'lib/page/helpers'
|
||||||
|
require_relative 'lib/page/idle_page'
|
||||||
|
require_relative 'lib/page/messages_page'
|
||||||
|
require_relative 'lib/page/new_msg_page'
|
||||||
|
require_relative 'lib/page/wiki_list_page'
|
||||||
|
require_relative 'lib/page/page_view_page'
|
||||||
|
require_relative 'lib/page/games_page'
|
||||||
|
require_relative 'lib/page/online_page'
|
||||||
|
require_relative 'lib/page/sysinfo_page'
|
||||||
|
|
||||||
ONLINE = OnlineUsersRepository.new
|
ONLINE = OnlineUsersRepository.new
|
||||||
MESSAGES = MessageBoardRepository.new(ENV.fetch('MESSAGES_PATH', 'data/messages.dat'))
|
MESSAGES = MessageBoardRepository.new(ENV.fetch('MESSAGES_PATH', 'data/messages.dat'))
|
||||||
@@ -18,115 +27,39 @@ MENU_ITEMS = [
|
|||||||
'System Info', 'Exit'
|
'System Info', 'Exit'
|
||||||
].freeze
|
].freeze
|
||||||
|
|
||||||
# ── Layout ──────────────────────────────────────────────────────────────────
|
LEFT_W = 21
|
||||||
|
CONT_X = 23
|
||||||
LEFT_W = 21 # left panel outer width
|
CONT_Y = 2
|
||||||
CONT_X = 23 # content start x inside right panel (LEFT_W + 2)
|
|
||||||
CONT_Y = 2 # content start y inside panels (top border + 1)
|
|
||||||
|
|
||||||
# ── DOS Navigator color theme ────────────────────────────────────────────────
|
|
||||||
|
|
||||||
THEME = {
|
THEME = {
|
||||||
bg: "\e[0;40m", # black background
|
bg: "\e[0;40m",
|
||||||
normal: "\e[0;37m", # white
|
normal: "\e[0;37m",
|
||||||
bright: "\e[1;37m", # bright white
|
bright: "\e[1;37m",
|
||||||
border: "\e[0;36m", # cyan
|
border: "\e[0;36m",
|
||||||
selected: "\e[0;30;46m", # black on cyan (highlighted menu item)
|
selected: "\e[0;30;46m",
|
||||||
header: "\e[1;36m", # bright cyan (section titles)
|
header: "\e[1;36m",
|
||||||
label: "\e[0;33m", # yellow (timestamps, labels)
|
label: "\e[0;33m",
|
||||||
status: "\e[0;30;46m", # black on cyan (bottom status bar)
|
status: "\e[0;30;46m",
|
||||||
input: "\e[0;33m", # yellow (text input)
|
input: "\e[0;33m",
|
||||||
success: "\e[1;32m", # green
|
success: "\e[1;32m",
|
||||||
error: "\e[1;31m", # red
|
error: "\e[1;31m",
|
||||||
reset: "\e[0m",
|
reset: "\e[0m",
|
||||||
}.freeze
|
}.freeze
|
||||||
|
|
||||||
# ── TUI definition ───────────────────────────────────────────────────────────
|
|
||||||
|
|
||||||
MAIN_TUI = BBS::TUI.define do
|
MAIN_TUI = BBS::TUI.define do
|
||||||
helpers do
|
helpers { include TUIHelpers }
|
||||||
def tc(style, str) = "#{THEME.fetch(style, THEME[:normal])}#{str}#{THEME[:reset]}"
|
|
||||||
|
|
||||||
def cont_w = term_cols - CONT_X - 1
|
|
||||||
def cont_h = term_rows - 4
|
|
||||||
|
|
||||||
def fmt_date(iso)
|
|
||||||
Time.parse(iso.to_s).strftime('%Y-%m-%d')
|
|
||||||
rescue
|
|
||||||
iso.to_s
|
|
||||||
end
|
|
||||||
|
|
||||||
def wordwrap(text, width)
|
|
||||||
words = text.to_s
|
|
||||||
.gsub(/\[([^\]]+)\]\([^)]+\)/, '\1')
|
|
||||||
.gsub(/[#*_`~>|\\]/, '')
|
|
||||||
.gsub(/\r?\n+/, ' ')
|
|
||||||
.strip
|
|
||||||
.split
|
|
||||||
lines, line = [], +''
|
|
||||||
words.each do |w|
|
|
||||||
if line.empty? then line << w
|
|
||||||
elsif line.length + 1 + w.length <= width then line << ' ' << w
|
|
||||||
else lines << line.dup; line = +w
|
|
||||||
end
|
|
||||||
end
|
|
||||||
lines << line unless line.empty?
|
|
||||||
lines
|
|
||||||
end
|
|
||||||
|
|
||||||
def wiki_list_render
|
|
||||||
list_h = cont_h - 3
|
|
||||||
visible = @items[@scroll, list_h] || []
|
|
||||||
if visible.empty?
|
|
||||||
text 'No items found.', x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
|
||||||
else
|
|
||||||
list visible.map { |p| p.title[0, cont_w - 2] },
|
|
||||||
x: CONT_X, y: CONT_Y,
|
|
||||||
selected: @item_sel - @scroll,
|
|
||||||
style: THEME[:normal], highlight: THEME[:selected]
|
|
||||||
if (page = @items[@item_sel])
|
|
||||||
hint = page.description.to_s.strip[0, cont_w]
|
|
||||||
text hint, x: CONT_X, y: CONT_Y + cont_h - 2, style: THEME[:normal] unless hint.empty?
|
|
||||||
end
|
|
||||||
end
|
|
||||||
text '↑↓ navigate Enter read q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
def scroll_list_up
|
|
||||||
return if @item_sel <= 0
|
|
||||||
@item_sel -= 1
|
|
||||||
@scroll = @item_sel if @item_sel < @scroll
|
|
||||||
end
|
|
||||||
|
|
||||||
def scroll_list_down
|
|
||||||
return if @item_sel >= @items.size - 1
|
|
||||||
@item_sel += 1
|
|
||||||
list_h = cont_h - 3
|
|
||||||
@scroll = @item_sel - list_h + 1 if @item_sel >= @scroll + list_h
|
|
||||||
end
|
|
||||||
|
|
||||||
def open_wiki_page(back:)
|
|
||||||
return unless (page = @items[@item_sel])
|
|
||||||
@detail = wordwrap(WIKI.content(page.id), cont_w)
|
|
||||||
@page_title = page.title
|
|
||||||
@page_meta = "#{fmt_date(page.created_at)} #{WIKI.page_url(page.locale, page.path)}"
|
|
||||||
@prev_page = back
|
|
||||||
@scroll = 0
|
|
||||||
go :page_view
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
init do
|
init do
|
||||||
@menu_sel = 0
|
@menu_sel = 0
|
||||||
@page_title = 'TELETYPE BBS'
|
@page_title = 'TELETYPE BBS'
|
||||||
@items = []
|
@items = []
|
||||||
@item_sel = 0
|
@item_sel = 0
|
||||||
@scroll = 0
|
@scroll = 0
|
||||||
@detail = []
|
@detail = []
|
||||||
@page_meta = +''
|
@page_meta = +''
|
||||||
@input = +''
|
@input = +''
|
||||||
@status = +''
|
@status = +''
|
||||||
@prev_page = nil
|
@prev_page = nil
|
||||||
end
|
end
|
||||||
|
|
||||||
chrome do
|
chrome do
|
||||||
@@ -136,7 +69,6 @@ MAIN_TUI = BBS::TUI.define do
|
|||||||
|
|
||||||
box x: 1, y: 1, w: LEFT_W, h: panel_h,
|
box x: 1, y: 1, w: LEFT_W, h: panel_h,
|
||||||
style: THEME[:border], bg: :black
|
style: THEME[:border], bg: :black
|
||||||
|
|
||||||
box x: LEFT_W + 1, y: 1, w: term_cols - LEFT_W, h: panel_h,
|
box x: LEFT_W + 1, y: 1, w: term_cols - LEFT_W, h: panel_h,
|
||||||
title: " #{@page_title} │ #{@username} │ #{ONLINE.count} online ",
|
title: " #{@page_title} │ #{@username} │ #{ONLINE.count} online ",
|
||||||
style: THEME[:border], bg: :black
|
style: THEME[:border], bg: :black
|
||||||
@@ -152,217 +84,28 @@ MAIN_TUI = BBS::TUI.define do
|
|||||||
style: THEME[:status]
|
style: THEME[:status]
|
||||||
end
|
end
|
||||||
|
|
||||||
# ── Pages ───────────────────────────────────────────────────────────────────
|
IdlePage.configure(self)
|
||||||
|
MessagesPage.configure(self)
|
||||||
page :idle do
|
NewMsgPage.configure(self)
|
||||||
enter { @page_title = 'TELETYPE BBS' }
|
WikiListPage.configure(self, :blog, category: 'blog', title: 'BLOG')
|
||||||
|
WikiListPage.configure(self, :howto, category: 'howto', title: 'HOWTO GUIDES')
|
||||||
render do
|
PageViewPage.configure(self)
|
||||||
text 'Navigate the menu with ↑↓, select with Enter.',
|
GamesPage.configure(self)
|
||||||
x: CONT_X, y: CONT_Y + cont_h / 2, style: THEME[:normal]
|
OnlinePage.configure(self)
|
||||||
end
|
SysinfoPage.configure(self)
|
||||||
|
|
||||||
key(:up) { @menu_sel = (@menu_sel - 1) % MENU_ITEMS.size }
|
|
||||||
key(:down) { @menu_sel = (@menu_sel + 1) % MENU_ITEMS.size }
|
|
||||||
key(:enter) do
|
|
||||||
case MENU_ITEMS[@menu_sel]
|
|
||||||
when 'Messages' then go :messages
|
|
||||||
when 'Post Message' then go :new_msg
|
|
||||||
when 'Blog Posts' then go :blog
|
|
||||||
when 'HowTo Guides' then go :howto
|
|
||||||
when 'Game Catalog' then go :games
|
|
||||||
when 'Online Users' then go :online
|
|
||||||
when 'System Info' then go :sysinfo
|
|
||||||
when 'Exit' then :halt
|
|
||||||
end
|
|
||||||
end
|
|
||||||
key('q') { :halt }
|
|
||||||
key(:escape) { :halt }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :messages do
|
|
||||||
enter do
|
|
||||||
@page_title = 'MESSAGES'
|
|
||||||
@items = MESSAGES.last(30).map { |m| "#{tc(:label, m.timestamp)} #{tc(:bright, m.username)}: #{m.text}" }
|
|
||||||
@scroll = 0
|
|
||||||
end
|
|
||||||
|
|
||||||
render do
|
|
||||||
(@items[@scroll, cont_h] || []).each_with_index do |line, i|
|
|
||||||
text line[0, cont_w], x: CONT_X, y: CONT_Y + i
|
|
||||||
end
|
|
||||||
text "#{@items.size} msg(s) ↑↓ scroll q back",
|
|
||||||
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
key(:up) { @scroll = [@scroll - 1, 0].max }
|
|
||||||
key(:down) { @scroll = [@scroll + 1, [@items.size - cont_h, 0].max].min }
|
|
||||||
key('r') { reload }
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :new_msg do
|
|
||||||
enter { @page_title = 'POST MESSAGE'; @input = +''; @status = +'' }
|
|
||||||
|
|
||||||
render do
|
|
||||||
text 'Type your message and press Enter. Esc cancels.',
|
|
||||||
x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
|
||||||
text "#{tc(:bright, @username)}: #{tc(:input, @input)}_",
|
|
||||||
x: CONT_X, y: CONT_Y + 2
|
|
||||||
unless @status.empty?
|
|
||||||
text @status, x: CONT_X, y: CONT_Y + 4,
|
|
||||||
style: @status.start_with?('Sent') ? THEME[:success] : THEME[:error]
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
key(:enter) do
|
|
||||||
if @input.strip.empty?
|
|
||||||
@status = 'Message cannot be empty.'
|
|
||||||
else
|
|
||||||
MESSAGES.append(@username, @input.strip[0...200])
|
|
||||||
go :idle
|
|
||||||
end
|
|
||||||
end
|
|
||||||
key(:backspace) { @input.chop! unless @input.empty? }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
printable { |ch| @input << ch if @input.length < 200 }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :blog do
|
|
||||||
enter { @page_title = 'BLOG'; @items = WIKI.list('blog'); @item_sel = 0; @scroll = 0 }
|
|
||||||
render { wiki_list_render }
|
|
||||||
key(:up) { scroll_list_up }
|
|
||||||
key(:down) { scroll_list_down }
|
|
||||||
key(:enter) { open_wiki_page(back: :blog) }
|
|
||||||
key('r') { reload }
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :howto do
|
|
||||||
enter { @page_title = 'HOWTO'; @items = WIKI.list('howto'); @item_sel = 0; @scroll = 0 }
|
|
||||||
render { wiki_list_render }
|
|
||||||
key(:up) { scroll_list_up }
|
|
||||||
key(:down) { scroll_list_down }
|
|
||||||
key(:enter) { open_wiki_page(back: :howto) }
|
|
||||||
key('r') { reload }
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :page_view do
|
|
||||||
render do
|
|
||||||
text @page_meta[0, cont_w], x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
|
||||||
(@detail[@scroll, cont_h - 2] || []).each_with_index do |l, i|
|
|
||||||
text l[0, cont_w], x: CONT_X, y: CONT_Y + 2 + i, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
text "#{@scroll + 1}/#{@detail.size} ↑↓ scroll q back",
|
|
||||||
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
key(:up) { @scroll = [@scroll - 1, 0].max }
|
|
||||||
key(:down) { @scroll = [@scroll + 1, [@detail.size - (cont_h - 2), 0].max].min }
|
|
||||||
key('q') { @scroll = 0; go(@prev_page || :idle) }
|
|
||||||
key(:escape) { @scroll = 0; go(@prev_page || :idle) }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :games do
|
|
||||||
enter { @page_title = 'GAME CATALOG'; @items = CATALOG.fetch; @item_sel = 0 }
|
|
||||||
|
|
||||||
render do
|
|
||||||
if @items.empty?
|
|
||||||
text 'No games found.', x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
|
||||||
else
|
|
||||||
game = @items[@item_sel]
|
|
||||||
links = game.external_links
|
|
||||||
|
|
||||||
text "#{@item_sel + 1}/#{@items.size} #{game.title}"[0, cont_w],
|
|
||||||
x: CONT_X, y: CONT_Y, style: THEME[:bright]
|
|
||||||
text "#{game.platform} · #{game.author}"[0, cont_w],
|
|
||||||
x: CONT_X, y: CONT_Y + 1, style: THEME[:normal]
|
|
||||||
|
|
||||||
story_rows = cont_h - 4 - links.size
|
|
||||||
wordwrap(game.story, cont_w).first(story_rows).each_with_index do |l, i|
|
|
||||||
text l, x: CONT_X, y: CONT_Y + 3 + i, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
link_y = CONT_Y + cont_h - links.size
|
|
||||||
links.each_with_index do |lnk, i|
|
|
||||||
text "#{tc(:label, lnk[:label])} #{lnk[:url]}"[0, cont_w],
|
|
||||||
x: CONT_X, y: link_y + i
|
|
||||||
end
|
|
||||||
|
|
||||||
text '↑↓ navigate q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
key(:up) { @item_sel = (@item_sel - 1) % @items.size if @items.any? }
|
|
||||||
key(:down) { @item_sel = (@item_sel + 1) % @items.size if @items.any? }
|
|
||||||
key('r') { reload }
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :online do
|
|
||||||
enter { @page_title = 'ONLINE USERS'; @items = ONLINE.snapshot.sort.map { |_, name| name } }
|
|
||||||
|
|
||||||
render do
|
|
||||||
@items.each_with_index do |uname, i|
|
|
||||||
you = uname == @username ? tc(:normal, ' ← you') : ''
|
|
||||||
text tc(:bright, uname) + you, x: CONT_X, y: CONT_Y + i
|
|
||||||
end
|
|
||||||
text "#{@items.size} user(s) online q back",
|
|
||||||
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
key('r') { reload }
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
page :sysinfo do
|
|
||||||
enter do
|
|
||||||
@page_title = 'SYSTEM INFO'
|
|
||||||
@items = [
|
|
||||||
"Online users #{ONLINE.count}",
|
|
||||||
"Messages #{MESSAGES.count}",
|
|
||||||
"Wiki https://wiki.teletypegames.org",
|
|
||||||
"Games API https://teletypegames.org",
|
|
||||||
"Platform #{RUBY_PLATFORM}",
|
|
||||||
"Ruby #{RUBY_VERSION}"
|
|
||||||
]
|
|
||||||
end
|
|
||||||
|
|
||||||
render do
|
|
||||||
@items.each_with_index do |row, i|
|
|
||||||
text row[0, cont_w], x: CONT_X, y: CONT_Y + i, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
text 'q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
|
||||||
end
|
|
||||||
|
|
||||||
key('q') { go :idle }
|
|
||||||
key(:escape) { go :idle }
|
|
||||||
end
|
|
||||||
|
|
||||||
start :idle
|
start :idle
|
||||||
end
|
end
|
||||||
|
|
||||||
# ── App config ───────────────────────────────────────────────────────────────
|
|
||||||
|
|
||||||
BBS.configure do |c|
|
BBS.configure do |c|
|
||||||
c.on_session_end = ->(session) { ONLINE.remove(session.session_id) }
|
c.on_session_end = ->(session) { ONLINE.remove(session.session_id) }
|
||||||
|
|
||||||
c.flow = BBS::Flow.define do
|
c.flow = BBS::Flow.define do
|
||||||
big_banner 'TELETYPE BBS', style: :success
|
big_banner 'TELETYPE BBS', style: :success
|
||||||
|
|
||||||
ask :username, prompt: 'Name (blank for Anonymous)',
|
ask :username, prompt: 'Name (blank for Anonymous)',
|
||||||
transform: ->(v) { v.strip.empty? ? 'Anonymous' : v.strip[0...20] }
|
transform: ->(v) { v.strip.empty? ? 'Anonymous' : v.strip[0...20] }
|
||||||
|
|
||||||
call { |ctx| ONLINE.add(ctx[:session_id], ctx[:username]) }
|
call { |ctx| ONLINE.add(ctx[:session_id], ctx[:username]) }
|
||||||
|
|
||||||
tui MAIN_TUI
|
tui MAIN_TUI
|
||||||
|
|
||||||
say 'Goodbye!', style: :muted
|
say 'Goodbye!', style: :muted
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|||||||
41
lib/page/games_page.rb
Normal file
41
lib/page/games_page.rb
Normal file
@@ -0,0 +1,41 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module GamesPage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :games do
|
||||||
|
enter { @page_title = 'GAME CATALOG'; @items = CATALOG.fetch; @item_sel = 0 }
|
||||||
|
|
||||||
|
render do
|
||||||
|
if @items.empty?
|
||||||
|
text 'No games found.', x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
||||||
|
else
|
||||||
|
game = @items[@item_sel]
|
||||||
|
links = game.external_links
|
||||||
|
|
||||||
|
text "#{@item_sel + 1}/#{@items.size} #{game.title}"[0, cont_w],
|
||||||
|
x: CONT_X, y: CONT_Y, style: THEME[:bright]
|
||||||
|
text "#{game.platform} · #{game.author}"[0, cont_w],
|
||||||
|
x: CONT_X, y: CONT_Y + 1, style: THEME[:normal]
|
||||||
|
|
||||||
|
story_rows = cont_h - 4 - links.size
|
||||||
|
wordwrap(game.story, cont_w).first(story_rows).each_with_index do |l, i|
|
||||||
|
text l, x: CONT_X, y: CONT_Y + 3 + i, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
link_y = CONT_Y + cont_h - links.size
|
||||||
|
links.each_with_index do |lnk, i|
|
||||||
|
text "#{tc(:label, lnk[:label])} #{lnk[:url]}"[0, cont_w],
|
||||||
|
x: CONT_X, y: link_y + i
|
||||||
|
end
|
||||||
|
|
||||||
|
text '↑↓ navigate q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
nav :cycle
|
||||||
|
key('r') { reload }
|
||||||
|
key('q') { go :idle }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
59
lib/page/helpers.rb
Normal file
59
lib/page/helpers.rb
Normal file
@@ -0,0 +1,59 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module TUIHelpers
|
||||||
|
def tc(style, str) = "#{THEME.fetch(style, THEME[:normal])}#{str}#{THEME[:reset]}"
|
||||||
|
def cont_w = term_cols - CONT_X - 1
|
||||||
|
def cont_h = term_rows - 4
|
||||||
|
|
||||||
|
def fmt_date(iso)
|
||||||
|
Time.parse(iso.to_s).strftime('%Y-%m-%d')
|
||||||
|
rescue
|
||||||
|
iso.to_s
|
||||||
|
end
|
||||||
|
|
||||||
|
def wordwrap(text, width)
|
||||||
|
words = text.to_s
|
||||||
|
.gsub(/\[([^\]]+)\]\([^)]+\)/, '\1')
|
||||||
|
.gsub(/[#*_`~>|\\]/, '')
|
||||||
|
.gsub(/\r?\n+/, ' ')
|
||||||
|
.strip
|
||||||
|
.split
|
||||||
|
lines, line = [], +''
|
||||||
|
words.each do |w|
|
||||||
|
if line.empty? then line << w
|
||||||
|
elsif line.length + 1 + w.length <= width then line << ' ' << w
|
||||||
|
else lines << line.dup; line = +w
|
||||||
|
end
|
||||||
|
end
|
||||||
|
lines << line unless line.empty?
|
||||||
|
lines
|
||||||
|
end
|
||||||
|
|
||||||
|
def wiki_list_render
|
||||||
|
list_h = cont_h - 3
|
||||||
|
visible = @items[@scroll, list_h] || []
|
||||||
|
if visible.empty?
|
||||||
|
text 'No items found.', x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
||||||
|
else
|
||||||
|
list visible.map { |p| p.title[0, cont_w - 2] },
|
||||||
|
x: CONT_X, y: CONT_Y,
|
||||||
|
selected: @item_sel - @scroll,
|
||||||
|
style: THEME[:normal], highlight: THEME[:selected]
|
||||||
|
if (page = @items[@item_sel])
|
||||||
|
hint = page.description.to_s.strip[0, cont_w]
|
||||||
|
text hint, x: CONT_X, y: CONT_Y + cont_h - 2, style: THEME[:normal] unless hint.empty?
|
||||||
|
end
|
||||||
|
end
|
||||||
|
text '↑↓ navigate Enter read q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
def open_wiki_page(back:)
|
||||||
|
return unless (page = @items[@item_sel])
|
||||||
|
@detail = wordwrap(WIKI.content(page.id), cont_w)
|
||||||
|
@page_title = page.title
|
||||||
|
@page_meta = "#{fmt_date(page.created_at)} #{WIKI.page_url(page.locale, page.path)}"
|
||||||
|
@prev_page = back
|
||||||
|
@scroll = 0
|
||||||
|
go :page_view
|
||||||
|
end
|
||||||
|
end
|
||||||
30
lib/page/idle_page.rb
Normal file
30
lib/page/idle_page.rb
Normal file
@@ -0,0 +1,30 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module IdlePage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :idle do
|
||||||
|
enter { @page_title = 'TELETYPE BBS' }
|
||||||
|
|
||||||
|
render do
|
||||||
|
text 'Navigate the menu with ↑↓, select with Enter.',
|
||||||
|
x: CONT_X, y: CONT_Y + cont_h / 2, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
nav :menu, size: MENU_ITEMS.size
|
||||||
|
key(:enter) do
|
||||||
|
case MENU_ITEMS[@menu_sel]
|
||||||
|
when 'Messages' then go :messages
|
||||||
|
when 'Post Message' then go :new_msg
|
||||||
|
when 'Blog Posts' then go :blog
|
||||||
|
when 'HowTo Guides' then go :howto
|
||||||
|
when 'Game Catalog' then go :games
|
||||||
|
when 'Online Users' then go :online
|
||||||
|
when 'System Info' then go :sysinfo
|
||||||
|
when 'Exit' then :halt
|
||||||
|
end
|
||||||
|
end
|
||||||
|
key('q') { :halt }
|
||||||
|
key(:escape) { :halt }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
26
lib/page/messages_page.rb
Normal file
26
lib/page/messages_page.rb
Normal file
@@ -0,0 +1,26 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module MessagesPage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :messages do
|
||||||
|
enter do
|
||||||
|
@page_title = 'MESSAGES'
|
||||||
|
@items = MESSAGES.last(30).map { |m| "#{tc(:label, m.timestamp)} #{tc(:bright, m.username)}: #{m.text}" }
|
||||||
|
@scroll = 0
|
||||||
|
end
|
||||||
|
|
||||||
|
render do
|
||||||
|
(@items[@scroll, cont_h] || []).each_with_index do |line, i|
|
||||||
|
text line[0, cont_w], x: CONT_X, y: CONT_Y + i
|
||||||
|
end
|
||||||
|
text "#{@items.size} msg(s) ↑↓ scroll q back",
|
||||||
|
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
nav :scroll, content: -> { @items }, window: -> { cont_h }
|
||||||
|
key('r') { reload }
|
||||||
|
key('q') { go :idle }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
31
lib/page/new_msg_page.rb
Normal file
31
lib/page/new_msg_page.rb
Normal file
@@ -0,0 +1,31 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module NewMsgPage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :new_msg do
|
||||||
|
enter { @page_title = 'POST MESSAGE'; @input = +''; @status = +'' }
|
||||||
|
|
||||||
|
render do
|
||||||
|
text 'Type your message and press Enter. Esc cancels.',
|
||||||
|
x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
||||||
|
text "#{tc(:bright, @username)}: #{tc(:input, @input)}_",
|
||||||
|
x: CONT_X, y: CONT_Y + 2
|
||||||
|
unless @status.empty?
|
||||||
|
text @status, x: CONT_X, y: CONT_Y + 4, style: THEME[:error]
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
key(:enter) do
|
||||||
|
if @input.strip.empty?
|
||||||
|
@status = 'Message cannot be empty.'
|
||||||
|
else
|
||||||
|
MESSAGES.append(@username, @input.strip[0...200])
|
||||||
|
go :idle
|
||||||
|
end
|
||||||
|
end
|
||||||
|
key(:backspace) { @input.chop! unless @input.empty? }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
printable { |ch| @input << ch if @input.length < 200 }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
22
lib/page/online_page.rb
Normal file
22
lib/page/online_page.rb
Normal file
@@ -0,0 +1,22 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module OnlinePage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :online do
|
||||||
|
enter { @page_title = 'ONLINE USERS'; @items = ONLINE.snapshot.sort.map { |_, name| name } }
|
||||||
|
|
||||||
|
render do
|
||||||
|
@items.each_with_index do |uname, i|
|
||||||
|
you = uname == @username ? tc(:normal, ' ← you') : ''
|
||||||
|
text tc(:bright, uname) + you, x: CONT_X, y: CONT_Y + i
|
||||||
|
end
|
||||||
|
text "#{@items.size} user(s) online q back",
|
||||||
|
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
key('r') { reload }
|
||||||
|
key('q') { go :idle }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
20
lib/page/page_view_page.rb
Normal file
20
lib/page/page_view_page.rb
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module PageViewPage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :page_view do
|
||||||
|
render do
|
||||||
|
text @page_meta[0, cont_w], x: CONT_X, y: CONT_Y, style: THEME[:normal]
|
||||||
|
(@detail[@scroll, cont_h - 2] || []).each_with_index do |l, i|
|
||||||
|
text l[0, cont_w], x: CONT_X, y: CONT_Y + 2 + i, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
text "#{@scroll + 1}/#{@detail.size} ↑↓ scroll q back",
|
||||||
|
x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
nav :scroll, content: -> { @detail }, window: -> { cont_h - 2 }
|
||||||
|
key('q') { @scroll = 0; go(@prev_page || :idle) }
|
||||||
|
key(:escape) { @scroll = 0; go(@prev_page || :idle) }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
29
lib/page/sysinfo_page.rb
Normal file
29
lib/page/sysinfo_page.rb
Normal file
@@ -0,0 +1,29 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module SysinfoPage
|
||||||
|
def self.configure(tui)
|
||||||
|
tui.page :sysinfo do
|
||||||
|
enter do
|
||||||
|
@page_title = 'SYSTEM INFO'
|
||||||
|
@items = [
|
||||||
|
"Online users #{ONLINE.count}",
|
||||||
|
"Messages #{MESSAGES.count}",
|
||||||
|
"Wiki https://wiki.teletypegames.org",
|
||||||
|
"Games API https://teletypegames.org",
|
||||||
|
"Platform #{RUBY_PLATFORM}",
|
||||||
|
"Ruby #{RUBY_VERSION}"
|
||||||
|
]
|
||||||
|
end
|
||||||
|
|
||||||
|
render do
|
||||||
|
@items.each_with_index do |row, i|
|
||||||
|
text row[0, cont_w], x: CONT_X, y: CONT_Y + i, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
text 'q back', x: CONT_X, y: CONT_Y + cont_h, style: THEME[:normal]
|
||||||
|
end
|
||||||
|
|
||||||
|
key('q') { go :idle }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
22
lib/page/wiki_list_page.rb
Normal file
22
lib/page/wiki_list_page.rb
Normal file
@@ -0,0 +1,22 @@
|
|||||||
|
# frozen_string_literal: true
|
||||||
|
|
||||||
|
module WikiListPage
|
||||||
|
def self.configure(tui, name, category:, title:)
|
||||||
|
tui.page name do
|
||||||
|
enter do
|
||||||
|
@page_title = title
|
||||||
|
@items = WIKI.list(category)
|
||||||
|
@item_sel = 0
|
||||||
|
@scroll = 0
|
||||||
|
end
|
||||||
|
|
||||||
|
render { wiki_list_render }
|
||||||
|
|
||||||
|
nav :list, window: -> { cont_h - 3 }
|
||||||
|
key(:enter) { open_wiki_page(back: name) }
|
||||||
|
key('r') { reload }
|
||||||
|
key('q') { go :idle }
|
||||||
|
key(:escape) { go :idle }
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
Reference in New Issue
Block a user