cliptic 0.1.0

data/lib/cliptic/menus.rb

@@ -0,0 +1,135 @@
+module Cliptic
+  module Menus
+    class Main < Interface::Menu
+      def opts
+        {
+          "Play Today" => ->{Cliptic::Main::Player::Game.new.play},
+          "Select Date"=> ->{Select_Date.new.choose_opt},
+          "This Week"  => ->{This_Week.new.choose_opt},
+          "Recent Puzzles" => ->{Recent_Puzzles.new.choose_opt},
+          "High Scores"=> ->{High_Scores.new.choose_opt},
+          "Quit"       => ->{exit}
+        }
+      end
+      def title
+        "Main Menu"
+      end
+    end
+    class Select_Date < Interface::Menu_With_Stats
+      attr_reader :opts
+      def initialize
+        set_date(date:Date.today)
+        super(height:7, sel:Interface::Date_Selector)
+      end
+      def title
+        "Select Date"
+      end
+      def ctrls
+        super.merge({
+          ?h  => ->{selector.cursor -= 1},
+          ?l  => ->{selector.cursor += 1},
+          ?j  => ->{inc_date(1)},
+          ?k  => ->{inc_date(-1)},
+          258 => ->{inc_date(1)},
+          259 => ->{inc_date(-1)},
+          260 => ->{selector.cursor -= 1},
+          261 => ->{selector.cursor += 1}
+        })
+      end
+      def stat_date
+        Date.new(*@opts.reverse)
+      end
+      private
+      def set_date(date:)
+        @opts = [] unless @opts
+        @opts[0] = date.day
+        @opts[1] = date.month
+        @opts[2] = date.year
+      end
+      def next_date(n)
+        @opts.dup.tap{|d| d[selector.cursor] += n }
+      end
+      def inc_date(n)
+        case selector.cursor
+        when 0 then inc_day(n)
+        when 1 then inc_month(n)
+        when 2 then @opts[2] += n
+        end
+        check_in_range
+      end
+      def inc_day(n)
+        next_date(n).tap do |date|
+          if valid?(date)
+            @opts[0]+= n
+          elsif date[0] == 0
+            set_date(date:stat_date-1)
+          elsif date[0] > 28
+            set_date(date:stat_date+1)
+          end
+        end
+      end
+      def inc_month(n)
+        next_date(n).tap do |date|
+          if valid?(date)
+            @opts[1] += n
+          elsif date[1] == 0
+            set_date(date:stat_date << 1)
+          elsif date[1] == 13
+            set_date(date:stat_date >> 1)
+          elsif date[0] > 28
+            set_date(date:last_day_of_month(date:date))
+          end
+        end
+      end
+      def valid?(date)
+        Date.valid_date?(*date.reverse)
+      end
+      def last_day_of_month(date:)
+        Date.new(date[2], date[1]+1, 1)-1
+      end
+      def check_in_range
+        set_date(date:Date.today) if date_late?
+        set_date(date:Date.today << 9) if date_early?
+      end
+      def date_late?
+        stat_date > Date.today
+      end
+      def date_early?
+        stat_date < Date.today<<9
+      end
+    end
+    class This_Week < Interface::Menu_With_Stats
+      def days
+        @days || 7.times.map{|i| Date.today - i}
+      end
+      def stat_date
+        days[selector.cursor]
+      end
+      def opts
+        @opts || days.map{|d| d.strftime("%A").ljust(9).center(12) + tickbox(d)}
+      end
+      def title
+        "This Week"
+      end
+      def tickbox(date)
+        "[#{Database::State.new(date:date).done ? Chars::Tick : " "}]"
+      end
+    end
+    class Recent_Puzzles < Interface::SQL_Menu_With_Stats
+      def initialize
+        super(table:Database::Recents)
+      end
+      def title
+        "Recently Played"
+      end
+    end
+    class High_Scores < Interface::SQL_Menu_With_Stats
+      def initialize
+        super(table:Database::Scores)
+      end
+      def title
+        "High Scores"
+      end
+    end
+  end
+end

data/lib/cliptic/terminal.rb

@@ -0,0 +1,72 @@
+module Cliptic
+  module Terminal
+    class Command
+      def self.run
+        ARGV.size > 0 ?
+          parse_args : main_menu
+        rescue StandardError => e
+          Curses.close_screen
+          abort(e.message)
+      end
+      private
+      def self.setup
+        Config::Setter.new.set
+        Screen.setup
+        at_exit{close}
+      end
+      def self.main_menu
+        setup
+        Cliptic::Menus::Main.new.choose_opt
+      end
+      def self.parse_args
+        case arg = ARGV.shift
+        when "reset", "-r" then Reset_Stats.route.call
+        when "today", "-t" then play(ARGV.shift.to_i)
+        end
+      end
+      def self.play(offset)
+        setup
+        Cliptic::Main::Player::
+          Game.new(date:Date.today+offset).play
+      end
+      def self.close
+        Curses.close_screen
+        puts "Thanks for playing!"
+      end
+    end
+    class Reset_Stats
+      def self.route
+        if valid_options.include?(c = ARGV.shift)
+          ->{confirm_reset(c)}
+        else 
+          ->{puts "Unknown option #{c}"}
+        end
+      end
+      private
+      def self.valid_options
+        ["scores", "all", "states", "recents"]
+      end
+      def self.confirm_reset(table)
+        puts prompt(table)
+        user_confirmed? ?
+          reset(table) : 
+          puts("Wise choice")
+      end
+      def self.prompt(table)
+        <<~prompt
+        cliptic: Reset #{table}
+        Are you sure? This cannot be undone! [Y/n]
+        prompt
+      end
+      def self.user_confirmed?
+        gets.chomp === "Y"
+      end
+      def self.reset(table)
+        table == "all" ?
+          Database::Delete.all :
+          Database::Delete.table(table)
+      end
+    end
+  end
+end
+

data/lib/cliptic/version.rb

@@ -0,0 +1,5 @@
+# frozen_string_literal: true
+
+module Cliptic
+  VERSION = "0.1.0"
+end

data/lib/cliptic/windows.rb

@@ -0,0 +1,197 @@
+module Cliptic
+  module Windows
+    class Window < Curses::Window
+      include Chars
+      attr_reader :y, :x, :line, :col
+      attr_reader :centered_y, :centered_x
+      def initialize(y:0, x:0, line:nil, col:nil)
+        @y, @x = wrap_dims(y:y, x:x)
+        @line,@col= center_pos(y:y,x:x,line:line,col:col)
+        @centered_y, @centered_x = [line, col]
+          .map{|pos| pos.nil?}
+        super(@y, @x, @line, @col)
+        keypad(true)
+      end
+      def draw(cp:$colors[:box]||0, clr:false)
+        erase if clr
+        setpos.color(cp)
+        1.upto(y) do |i|
+          line = case i
+          when 1 then top_border
+          when y then bottom_border
+          else side_border
+          end
+          self << line
+        end; setpos.color.noutrefresh
+        self
+      end
+      def color(cp=0)
+        color_set(cp); self
+      end
+      def bold(on=true)
+        on ?
+          attron(Curses::A_BOLD)  : 
+          attroff(Curses::A_BOLD)
+        self
+      end
+      def wrap_str(str:, line:)
+        split_str(str).each_with_index do |l, i|
+          setpos(line+i, 2)
+          self << l
+        end; self
+      end
+      def setpos(y=0, x=0)
+        super(y,x); self
+      end
+      def add_str(str:,y:line,x:(@x-str.length)/2, cp:nil, bold:false)
+        color(cp) if cp 
+        setpos(*wrap_str_dims(y:y, x:x, str:str))
+        bold(bold)
+        self << str
+        noutrefresh
+        reset_attrs
+      end
+      def clear
+        erase
+        noutrefresh
+        self
+      end
+      def time_str(str:, y:, x:(@x-str.length)/2, t:5, cp:nil, bold:false)
+        Thread.new{
+          add_str(str:str, y:y, x:x, cp:cp, bold:bold)
+          sleep(t)
+          add_str(str:" "*str.length, y:y, x:x, cp:cp, bold:bold)
+        }
+        self
+      end
+      def reset_attrs
+        color(0).bold(false)
+        self
+      end
+      def refresh
+        super; self
+      end
+      def reset_pos
+        move(
+          *[centered_y, centered_x]
+          .zip(total_dims, [y, x], [line, col])
+          .map{|cent, tot, dim, pos| cent ? (tot-dim)/2 : pos}
+        )
+        refresh
+      end
+      def move(line:nil, col:nil)
+        super(*center_pos(y:y, x:x, line:line, col:col))
+      end
+      private
+      def wrap_dims(y:, x:)
+        [y, x].zip(total_dims)
+          .map{|dim, tot| dim <= 0 ? dim+tot : dim}
+      end
+      def wrap_str_dims(y:, x:, str:)
+        [y, x].zip(total_dims)
+          .map{|pos,tot|pos<0 ? tot-str.length+pos : pos}
+      end
+      def total_dims
+        [Curses.lines, Curses.cols]
+      end
+      def center_pos(y:, x:, line:, col:)
+        [line, col].zip(total_dims, [y, x])
+          .map{|pos, tot, dim| pos || ((tot-dim)/2)}
+      end
+      def split_str(str)
+        str.gsub(/(.{1,#{x-4}})(\s+|$\n?)|(.{1,#{x-4}})/, "\\1\\3\n").split("\n")
+      end
+      def top_border
+        LU+(HL*(x-2))+RU
+      end
+      def bottom_border
+        LL+(HL*(x-2))+RL
+      end
+      def side_border
+        VL+(' '*(x-2))+VL
+      end
+    end
+    class Grid < Window
+      attr_reader :sq, :cells
+      def initialize(y:, x:, line:nil, col:nil)
+        @sq    = Pos.mk(y,x)
+        @y, @x = sq_to_dims(y:y, x:x)
+        super(y:@y, x:@x, line:line, col:col)
+        @cells = make_cells(**sq)
+      end
+      def draw(cp:$colors[:grid]||0)
+        setpos.color(cp)
+        1.upto(y) do |i|
+          line = case i
+          when 1 then top_border
+          when y then bottom_border
+          else i.even? ? side_border : inner_border
+          end
+          self << line
+        end; setpos.color
+        self
+      end
+      def add_str(str:, y:0, x:0)
+        str.chars.each_with_index do |char, i|
+          cell(y:y, x:x+i).write(char)
+        end
+      end
+      def cell(y:, x:)
+        cells[y][x]
+      end
+      private
+      def sq_to_dims(y:, x:)
+        [ (2*y)+1, (4*x)+1 ]
+      end
+      def make_cells(y:, x:)
+        y.times.map{|iy| x.times.map{|ix|
+          Cell.new(sq:Pos.mk(iy,ix), grid:self)}}
+      end
+      def top_border
+        LU+(HL*3+TD)*(sq[:x]-1)+HL*3+RU
+      end
+      def bottom_border
+        LL+(HL*3+TU)*(sq[:x]-1)+HL*3+RL
+      end
+      def side_border
+        (VL+" "*3)*sq[:x]+VL
+      end
+      def inner_border
+        TR+(HL*3+XX)*(sq[:x]-1)+HL*3+TL
+      end
+    end
+    class Cell
+      attr_reader :sq, :grid, :pos
+      def initialize(sq:, grid:)
+        @sq, @grid, @pos = sq, grid, calc_abs_pos(**sq)
+      end
+      def focus(y:0, x:0)
+        grid.setpos(*[y,x].zip(pos.values).map(&:sum))
+        self
+      end
+      def write(char)
+        focus.grid << char; self
+      end
+      protected
+      def calc_abs_pos(y:, x:)
+        { y:(2*y)+1, x:(4*x)+2 }
+      end
+    end
+    class Bar < Window
+      attr_reader :bg_col
+      def initialize(line:, bg_col:$colors[:bar])
+        super(y:1, x:0, line:line, col:0)
+        @bg_col = bg_col
+      end
+      def add_str(y:0, x:, str:, bold:false, cp:bg_col)
+        super(y:0, x:x, str:str, bold:bold, cp:cp)
+      end
+      def time_str(x:, str:, t:5, cp:bg_col, bold:false)
+        super(y:0, x:x, str:str, t:5, cp:cp, bold:bold)
+      end
+      def draw
+        bkgd(Curses.color_pair(bg_col)); self
+      end
+    end
+  end
+end

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification
+name: cliptic
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Christian Welham
+autorequire:
+bindir: bin
+cert_chain: []
+date: 2021-07-10 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: curses
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 1.4.0
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 1.4.0
+- !ruby/object:Gem::Dependency
+  name: curb
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.9.11
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 0.9.11
+- !ruby/object:Gem::Dependency
+  name: sqlite3
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 1.4.2
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 1.4.2
+description: A terminal user interface to fetch and play cryptic crosswords
+email:
+- welhamm@gmail.com
+executables:
+- cliptic
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- CHANGELOG.md
+- Gemfile
+- Gemfile.lock
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/cliptic
+- bin/console
+- bin/setup
+- cliptic.gemspec
+- lib/cliptic.rb
+- lib/cliptic/config.rb
+- lib/cliptic/database.rb
+- lib/cliptic/interface.rb
+- lib/cliptic/lib.rb
+- lib/cliptic/main.rb
+- lib/cliptic/menus.rb
+- lib/cliptic/terminal.rb
+- lib/cliptic/version.rb
+- lib/cliptic/windows.rb
+homepage: https://github.com/apexatoll/cliptic
+licenses:
+- MIT
+metadata:
+  homepage_uri: https://github.com/apexatoll/cliptic
+  source_code_uri: https://github.com/apexatoll/cliptic
+  changelog_uri: https://github.com/apexatoll/cliptic/CHANGELOG.md
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.4.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.2.15
+signing_key:
+specification_version: 4
+summary: Terminal-based cryptic crossword player
+test_files: []