tools/bbs-server
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Extract pages into lib/page/ modules; thin down bbs.rb

Browse Source 
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:
Zsolt Tasnadi
2026-05-11 22:23:10 +02:00
parent 1cd1eceb1c
commit 1e2b8321fd
10 changed files with 323 additions and 300 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
lib/page/games_page.rb Normal file
View 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
View 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
View 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
View 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
View 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
View 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
View 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
View 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
View 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