wafer 0.2.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: e9cb6796089693c43f953cb1dc6eeb0fc99d48c075b8daea41b5c1250ea444ee
+  data.tar.gz: be04a552608b968a700d1b4cdc99a40daa007095b16b9e104401159a31a415c6
+SHA512:
+  metadata.gz: 736936212f74796b5003380eb17534bc4f08cc0b6537c7b99eae7abee42984c57713413300d7c3cce0d2390a97ca651ec3754956a6236896f0e445bce368d7ee
+  data.tar.gz: e4f83ce60cb7fdaebe8f609211ea346952b7c1d097115f6daa61ea4c7f5eb4a54a0858be5111bf62c5e9e302a500cb1f926e638c2cd615fb38bd6fa8a9946317

data/.gitignore

@@ -0,0 +1,11 @@
+/.bundle/
+/.yardoc
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+wafer-*.gem
+**/wafer-users.json
+Gemfile.lock

data/.travis.yml

@@ -0,0 +1,6 @@
+---
+language: ruby
+cache: bundler
+rvm:
+  - 2.7.0
+before_install: gem install bundler -v 2.1.2

data/CODE_OF_CONDUCT.md

@@ -0,0 +1,74 @@
+# Contributor Covenant Code of Conduct
+
+## Our Pledge
+
+In the interest of fostering an open and welcoming environment, we as
+contributors and maintainers pledge to making participation in our project and
+our community a harassment-free experience for everyone, regardless of age, body
+size, disability, ethnicity, gender identity and expression, level of experience,
+nationality, personal appearance, race, religion, or sexual identity and
+orientation.
+
+## Our Standards
+
+Examples of behavior that contributes to creating a positive environment
+include:
+
+* Using welcoming and inclusive language
+* Being respectful of differing viewpoints and experiences
+* Gracefully accepting constructive criticism
+* Focusing on what is best for the community
+* Showing empathy towards other community members
+
+Examples of unacceptable behavior by participants include:
+
+* The use of sexualized language or imagery and unwelcome sexual attention or
+advances
+* Trolling, insulting/derogatory comments, and personal or political attacks
+* Public or private harassment
+* Publishing others' private information, such as a physical or electronic
+  address, without explicit permission
+* Other conduct which could reasonably be considered inappropriate in a
+  professional setting
+
+## Our Responsibilities
+
+Project maintainers are responsible for clarifying the standards of acceptable
+behavior and are expected to take appropriate and fair corrective action in
+response to any instances of unacceptable behavior.
+
+Project maintainers have the right and responsibility to remove, edit, or
+reject comments, commits, code, wiki edits, issues, and other contributions
+that are not aligned to this Code of Conduct, or to ban temporarily or
+permanently any contributor for other behaviors that they deem inappropriate,
+threatening, offensive, or harmful.
+
+## Scope
+
+This Code of Conduct applies both within project spaces and in public spaces
+when an individual is representing the project or its community. Examples of
+representing a project or community include using an official project e-mail
+address, posting via an official social media account, or acting as an appointed
+representative at an online or offline event. Representation of a project may be
+further defined and clarified by project maintainers.
+
+## Enforcement
+
+Instances of abusive, harassing, or otherwise unacceptable behavior may be
+reported by contacting the project team at the.codefolio.guy@gmail.com. All
+complaints will be reviewed and investigated and will result in a response that
+is deemed necessary and appropriate to the circumstances. The project team is
+obligated to maintain confidentiality with regard to the reporter of an incident.
+Further details of specific enforcement policies may be posted separately.
+
+Project maintainers who do not follow or enforce the Code of Conduct in good
+faith may face temporary or permanent repercussions as determined by other
+members of the project's leadership.
+
+## Attribution
+
+This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
+available at [https://contributor-covenant.org/version/1/4][version]
+
+[homepage]: https://contributor-covenant.org
+[version]: https://contributor-covenant.org/version/1/4/

data/Gemfile

@@ -0,0 +1,7 @@
+source "https://rubygems.org"
+
+# Specify your gem's dependencies in wafer.gemspec
+gemspec
+
+gem "rake", "~> 12.0"
+gem "minitest", "~> 5.0"

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2021 Noah Gibbs
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,115 @@
+# Wafer
+
+If you want a simple, production-quality, fairly thin auth system for your [ChatTheatre/SkotOS game](https://github.com/ChatTheatre/SkotOS), you want [thin-auth](https://github.com/ChatTheatre/thin-auth). Thin-auth is a perfectly reasonable PHP server app. It likes being installed at a server-like path. It needs Apache and MariaDB configured in specific ways. But it does a reasonable job of a lot of things, using a fairly small amount of code. Billing? Check. Verifying for your app that billing happened? Check. Web interface for changing settings? Check. Reasonable security? Check.
+
+**This is not that application.**
+
+Wafer-thin-auth is an ultra-thin dev-mode-only server, designed to impersonate SkotOS's authentication system with a minimum of ceremony in a non-production-quality way.
+
+For now you can run it in dev and it will cheerfully believe that all your users are paid up, and always right about their passwords. It is an eternal and negligent optimist. You should never, never use it production — even once we fix that problem. There are large swaths of important functionality that it doesn't even begin to attempt. Thin-auth has good password checking, backup scripts, support for staff to manage accounts and many other things that would be worse than useless for wafer-thin-auth. Want something reasonable for production? No problem - use thin-auth.
+
+Also, its code is far smaller and its dependencies far fewer than anything that would actually work for a real production app. 'Good' negligent optimism can be had for cheap!
+
+But wafer-thin-auth will replace thin-auth, including its web and server components, and even the userdb-authctl shim to make an outgoing connection to the DGD server. The hope is that you can run a much less elaborate setup in development, while we get rid of an un-securable development mode of the SkotOS server.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'wafer'
+```
+
+And then execute:
+
+    $ bundle install
+
+Or install it yourself as:
+
+    $ gem install wafer
+
+## Usage
+
+By default Wafer will run its AuthD and CtlD on ports 2070 and 2071, equivalent to a SkotOS portbase of 2000. You can set up your SkotOS server's UserDB file for that easily:
+
+~~~
+# root/usr/System/data/userdb
+userdb-hostname 127.0.0.1
+userdb-portbase 2000
+~~~
+
+If you'd like to change Wafer's settings - what ports it opens, and where it looks for your SkotOS server (see UserDB-Authctl below,) you can pass a settings file on the command line:
+
+~~~
+wafer -s my_settings.json
+~~~
+
+You can also create a new settings file with defaults:
+
+~~~
+wafer --default-settings > new_settings_file.json
+~~~
+
+### UserDB-Authctl
+
+For weird historical reasons, neither DGD nor its AuthD/CtlD want to make an outgoing network connection. Userdb-authctl is a shim between them to fix that. Wafer handles it by making outgoing network connections.
+
+If you're not already running the userdb-authctl shim server, you'll probably want Wafer to do that for you -- or you can run userdb-authctl, but then it's one more piece to keep up and running.
+
+In production you'll need to run userdb-authctl -- SkotOS StackScripts set this up by default. That's because you should never, never run Wafer in production. It's ***only*** for development.
+
+## Development
+
+Want to do development on Wafer? It can certainly use the help!
+
+Your go-to incantation for running the command line program:
+
+~~~
+ruby -Ilib ./exe/wafer
+~~~
+
+This runs Wafer while telling it where to find the latest local code (which you're modifying, right?) and letting you add flags to Ruby (e.g. -w for warnings.)
+
+### Normal Setup
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake test` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/[USERNAME]/wafer. This project is intended to be a safe, welcoming space for collaboration, and contributors are expected to adhere to the [code of conduct](https://github.com/[USERNAME]/wafer/blob/master/CODE_OF_CONDUCT.md).
+
+
+## Wire Protocol
+
+Wafer exists primarily to speak SkotOS AuthD and CtlD wire protocol to an outside-world server, just as thin-auth does. You're often best advised to look at wild-captured examples of that wire protocol.
+
+~~~
+AUTHD: sending [keycodeauth 2726 noah 1036249917]
+receive_message: 2726 OK PAID 0 (developer;terms-of-service gables)
+AUTHD: sending [keycodeauth 2727 noah 1036249917]
+receive_message: 2727 OK PAID 0 (developer;terms-of-service gables)
+AUTHD: sending [keycodeauth 2728 noah 1036249917]
+receive_message: 2728 OK PAID 0 (developer;terms-of-service gables)
+AUTHD: sending [md5login 2729 noah 7355169ed8cf08d5c46bf4cd8e4c02f9]
+receive_message: 2729 OK 1036249917
+AUTHD: sending [keycodeauth 2730 noah 1036249917]
+receive_message: 2730 OK PAID 0 (developer;terms-of-service gables)
+~~~
+
+The easiest way, as a rule, to capture correct AuthD/CtlD exchanges is to log into your SkotOS DGD server on the telnet port and execute the following code snippet:
+
+~~~
+code "/usr/System/sys/syslogd"->set_debug_level("/usr/UserAPI/sys/authd", 2)
+~~~
+
+This will log all AuthD exchanges, and so it's probably too verbose to be kept on consistently - right now, any web request served on port 10080 will check with AuthD, which means a lot of exchanges.
+
+## License
+
+The gem is available as open source under the terms of the GNU Affero General Public License (AGPL.)
+
+## Code of Conduct
+
+Everyone interacting in the Wafer project's codebases, issue trackers, chat rooms and mailing lists is expected to follow the [code of conduct](https://github.com/[USERNAME]/wafer/blob/master/CODE_OF_CONDUCT.md).

data/Rakefile

@@ -0,0 +1,10 @@
+require "bundler/gem_tasks"
+require "rake/testtask"
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << "test"
+  t.libs << "lib"
+  t.test_files = FileList["test/**/*_test.rb"]
+end
+
+task :default => :test

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "wafer"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start(__FILE__)

data/bin/setup

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+set -euo pipefail
+IFS=$'\n\t'
+set -vx
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/config.ru

@@ -0,0 +1,56 @@
+
+require_relative "lib/wafer.rb"
+require "erubis"
+require "json"
+
+repo = JSONRepo.new ENV["WAFER_USER_REPO_FILE"]
+
+settings = {}
+if ENV["WAFER_SETTINGS_FILE"] && !ENV["WAFER_SETTINGS_FILE"].empty?
+  settings = JSON.load File.read(ENV["WAFER_SETTINGS_FILE"])
+end
+wafer = Wafer::Server.new(repo: repo, settings: settings)
+
+# This runs the CtlD and AuthD servers in a background thread.
+# If the settings say so then it also connects to the DGD incoming port to
+# replace userdb-authctl.
+BACKGROUND_THREAD = Thread.new do
+  begin
+    puts "Entered the thread..."
+    wafer.event_loop
+  rescue Exception
+        puts "Got exception in thread! Dying! #{$!.message}"
+        puts $!.backtrace.join("\n")
+        raise
+  end
+end
+
+RACK_404 = [404, {}, ["File not found!"]]
+RET_VARS = {}
+
+run (proc do |env|
+  path = env['PATH_INFO']
+  path = "/index.html" if path == "" || path == "/"
+
+  template_path = File.join(__dir__, "www", path) + ".erb"
+  if File.exist?(template_path)
+    erb_text = File.read(template_path)
+    eruby = Erubis::Eruby.new(erb_text)
+    RET_VARS.clear
+    html_text = eruby.result env: env, vars: RET_VARS,
+      users: repo.user_names,
+      play_port: wafer.settings["dgd"]["portbase"] + 80
+
+    # Should be possible to set the user and password cookies from Erb.
+    resp = Rack::Response.new html_text, 200, { 'Content' => 'text/html' }
+    if RET_VARS["user"]
+        resp.set_cookie "user", { value: RET_VARS["user"], path: "/", expires: Time.now+30*24*60*60 }
+        # "pass" is used for the keycode, not an actual password
+        resp.set_cookie "pass", { value: "17", path: "/", expires: Time.now+30*24*60*60 }
+    end
+    resp.finish
+  else
+    [404, {}, [ "File not found: #{template_path}" ]]
+  end
+
+end)

data/exe/wafer

@@ -0,0 +1,38 @@
+#!/usr/bin/env ruby -w
+
+require "wafer"
+require "wafer/version"
+
+require "json"
+
+require "optimist"
+
+OPTS = Optimist::options do
+    version "Wafer version #{Wafer::VERSION}"
+    banner <<BANNER
+Wafer runs SkotOS authentication servers for developing your ChatTheatre/SkotOS app.
+
+Available options:
+BANNER
+    opt :default_settings, "Dump default settings as JSON to console and exit"
+    opt :settings_file, "Reading settings from JSON settings file", type: String, short: "-s"
+    opt :repo_file, "JSON file containing user info", :default => "wafer-users.json"
+end
+
+if OPTS[:default_settings]
+  puts JSON.pretty_generate(Wafer::DEFAULT_SETTINGS)
+  exit
+end
+
+puts "Try to instantiate Wafer server - verifying that settings are legal..."
+repo = JSONRepo.new OPTS[:repo_file]
+settings = {}
+settings = JSON.load File.read(OPTS[:settings_file]) if OPTS[:settings_file]
+wafer_server = Wafer::Server.new(repo: repo, settings: settings)
+puts "No problems found."
+
+# This won't return. It will run the server until interrupted.
+system({
+    "WAFER_USER_REPO_FILE" => OPTS[:repo_file],
+    "WAFER_SETTINGS_FILE" => OPTS[:settings_file],
+  }, "rackup", "-p", wafer_server.settings["http"]["port"].to_s)

data/lib/wafer.rb

@@ -0,0 +1,149 @@
+#require "wafer/version"
+
+require 'socket'
+require 'cgi'
+
+module Wafer
+  class Error < StandardError; end
+
+  DEFAULT_SETTINGS = {
+      "http" => {
+        "port" => 2072,
+      }.freeze,
+      "authServer" => {
+        "selectTimeout" => 5.0,
+      }.freeze,
+      "dgd" => {
+        "portbase" => 10_000,
+        "serverIP" => "127.0.0.1",
+      }.freeze,
+  }.freeze
+
+  class Server
+    attr_reader :repo
+    attr_reader :settings
+
+    def initialize(repo:, settings: {})
+      @repo = repo
+
+      # Make a copy of default settings to allow modification
+      @settings = copy_of_default_settings
+      @settings.merge! settings
+
+      @read_sockets = []
+      @err_sockets = []
+      @socket_types = {}
+      @seq_numbers = {}
+      @socket_buffer = {}
+    end
+
+    def copy_of_default_settings
+      Hash[DEFAULT_SETTINGS.map { |key, value| [key, value.dup] }]
+    end
+
+    def log(message)
+      pre = "[#{Time.now}] "
+      puts pre + message
+    end
+
+    def conn_connect(conn_type)
+      port = @settings["dgd"]["portbase"] + (conn_type == :auth ? 70 : 71)
+      sock = TCPSocket.open @settings["dgd"]["serverIP"], port
+      @socket_types[sock] = conn_type
+      @read_sockets.push sock
+      @err_sockets.push sock
+      @socket_buffer[sock] = ""
+
+      return sock
+    end
+
+    def conn_reconnect(conn)
+      @read_sockets -= [ conn ]
+      @err_sockets -= [ conn ]
+      socket_type = @socket_types[conn]
+      @socket_types.delete(conn)
+      @seq_numbers.delete(conn)
+      @socket_buffer.delete(conn)
+      begin
+        log("Closing connection of type #{socket_type.inspect}...")
+        conn.close
+      rescue
+        STDERR.puts $!.inspect
+        log("Closing connection of type #{socket_type.inspect}... (But got an error, failing - this is common.)")
+      end
+
+      STDERR.puts "Reconnecting outgoing connection of type #{socket_type.inspect}..."
+      conn_connect(socket_type)
+    end
+
+    def send_error(conn, message)
+      seq = @seq_numbers[conn]
+      log("Error on conn (#{seq}): #{message}")
+      conn.write "#{seq} ERR #{message}\n"
+    end
+
+    def send_ok(conn, message)
+      ok_message = "#{@seq_numbers[conn]} OK #{message}\n"
+      STDERR.puts "Sending OK message: #{ok_message.inspect}"
+      conn.write ok_message
+    end
+
+    def event_loop
+      puts "Settings:"
+      puts JSON.pretty_generate(@settings)
+
+      conn_connect(:auth)
+      conn_connect(:ctl)
+
+      loop do
+        sleep 0.1
+        readable, _, errorable, = IO.select @read_sockets, [], @err_sockets, @settings["authServer"]["selectTimeout"]
+
+        readable ||= []
+        errorable ||= []
+
+        puts "Selected... R: #{readable.size} / #{@read_sockets.size} E: #{errorable.size} / #{@err_sockets.size}"
+
+        # Close connections on error
+        errorable.each { |errant_conn| conn_reconnect(errant_conn) }
+
+        (readable - errorable).each do |conn|
+          STDERR.puts "Preparing for read..."
+          data = conn.recv_nonblock(2048)
+          if !data || data == ""
+            STDERR.puts "No data - need to reconnect?"
+            sleep 0.5
+            #conn_reconnect(conn)
+            next
+          end
+          STDERR.puts "Successful read: #{data.inspect}"
+          @socket_buffer[conn] += data
+
+          while @socket_buffer[conn]["\r\n"]
+            line, remainder = @socket_buffer[conn].split("\r\n", 2)
+            @socket_buffer[conn] = remainder
+
+            parts = line.chomp.strip.split(" ").map { |part| CGI::unescape(part) }
+            next if parts == []  # No-op
+
+            STDERR.puts "Successful parse: #{parts.inspect}"
+
+            case @socket_types[conn]
+            when :ctl
+              ctl_respond(conn, parts)
+            when :auth
+              auth_respond(conn, parts)
+            else
+              log("Wrong socket type #{@socket_types[conn].inspect} for connection!")
+              conn_disconnect(conn)
+            end
+          end
+        end
+      end
+    end
+  end
+end
+
+require_relative "wafer/json_repo"
+require_relative "wafer/auth_server"
+require_relative "wafer/ctl_server"

data/lib/wafer/auth_server.rb

@@ -0,0 +1,173 @@
+class Wafer::Server
+    NO_LOG_CMDS = ["passlogin", "passwordauth"]
+    NO_USER_VERIFY_CMDS = ["emailused", "emaillookup"]
+    KEYCODE_VERIFY_CMDS = ["checkaccess", "convertaccount", "getping", "getprop", "pinguser"]
+    HASH_VERIFY_CMDS = ["md5login", "md5auth"]
+    PASSWORD_VERIFY_CMDS = ["passwordlogin", "passwordauth"]
+
+    def auth_respond(conn, first_message)
+        if first_message[0][0] == ":"
+            secure_auth = true
+            user_name = first_message[0][1..-1]
+            code = first_message[1]
+            command = first_message[2]
+            @seq_numbers[conn] = first_message[3]
+            message = first_message[4..-1]
+        else
+            secure_auth = false
+            command = first_message[0]
+            @seq_numbers[conn] = first_message[1]
+            user_name = first_message[2]
+            code = false
+            message = first_message[3..-1]
+        end
+
+        if command == "" || user_name == ""
+            send_error(conn, "BAD INPUT")
+        end
+
+        uid = @repo.uid_by_name(user_name)
+
+        if NO_LOG_CMDS.include?(command)
+            # Don't log passwords
+            log("Recorded command #{command.inspect} for user #{user_name.inspect}")
+        else
+            log("Auth server: #{first_message.inspect}")
+        end
+
+        # All commands but two require verifying the user isn't deleted, banned, etc.
+        unless NO_USER_VERIFY_CMDS.include?(command)
+            allowed, err = @repo.is_user_ok(uid)
+            return send_error(conn, err) unless allowed
+        end
+
+        # Some commands need the keycode to be valid if supplied
+        if KEYCODE_VERIFY_CMDS.include?(command) && code
+            allowed, err = @repo.is_keycode_ok(uid, code)
+            return send_error(conn, err) unless allowed
+        end
+
+        if HASH_VERIFY_CMDS.include?(command)
+            allowed, err = @repo.is_hash_ok(uid, message[0])
+            return send_error(conn, err) unless allowed
+        end
+
+        if PASSWORD_VERIFY_CMDS.include?(command)
+            allowed, err = @repo.is_password_ok(uid, message[0])
+            return send_error(conn, err) unless allowed
+        end
+
+        case command
+
+        when "checkaccess"
+            if @repo.user_has_access?(uid, message[0])
+                return send_ok(conn, "ACCESS")
+            else
+                return send_error(conn, "NOAUTH")
+            end
+
+        when "convertaccount"
+            if message[0] == "premium"
+                @repo.user_set_flag(uid, "premium")
+                return send_ok(conn, "premium")
+            elsif message[0] == "basic"
+                @repo.user_unset_flag(uid, "premium")
+                return send_ok(conn, "basic")
+            else
+                return send_error(conn, "Unknown conversion (#{message[0]})")
+            end
+
+        when "emaillookup"
+            user = @repo.user_by_field("email", user_name)
+            if user
+                return send_ok(conn, user["name"])
+            else
+                return send_error(conn, "no such email")
+            end
+
+        when "emailused"
+            user = @repo.user_by_field("email", user_name)
+            if user
+                return send_ok(conn, "YES")
+            else
+                return send_error(conn, "no such email")
+            end
+
+        when "getping"
+            # We don't do real email pings with this server
+            user = @repo.user_by_id(uid)
+            if user
+                return send_ok(conn, "#{uid} #{user["email"]} 17171717171717171717")
+            else
+                return send_error(conn, "NO PING")
+            end
+
+        when "getprop"
+            if secure_auth
+                prop = message[1]
+            else
+                prop = message[0]
+            end
+
+            user = @repo.user_by_id(uid)
+            return send_ok(conn, user[prop])
+
+        when "keycodeauth"
+            code = message[0] unless code
+
+            allowed, err = @repo.is_keycode_ok(uid, code)
+            STDERR.puts "keycodeauth(#{uid.inspect}, #{code.inspect}) = [#{allowed.inspect}, #{err.inspect}]"
+            return send_error(conn, err) unless allowed
+
+            return send_error(conn, "TOS") unless @repo.user_has_tos?(uid)
+            return send_error(conn, "USER HAS NO EMAIL") unless @repo.user_has_verified_email?(uid)
+
+            return send_auth_status(conn, uid)
+
+        when "md5login"
+            return send_ok(conn, @repo.user_keycode(uid))
+
+        when "md5auth"
+            return send_auth_status(conn, uid)
+
+        when "passwordlogin"
+            return send_ok(conn, @repo.user_keycode(uid))
+
+        when "passwordauth"
+            return send_auth_status(conn, uid)
+
+        when "pinguser"
+            return send_ok(conn, "OK")
+
+        when "setemail"
+            @repo.user_set_email(uid, message[0])
+            return send_ok(conn, "YES")
+
+        when "tempkeycode"
+            return send_ok(conn, @repo.user_keycode(uid))
+
+        when "tempguarantee"
+            return send_error(conn, "DOES NOT SUPPORT")
+        end
+
+        return send_error(conn, "BAD COMMAND(#{command.inspect})")
+    end
+
+    def send_auth_status(conn, uid)
+        user_type = @repo.user_account_type(uid)
+        user_status = @repo.user_account_status(uid)
+        user_string = "(#{user_type};#{user_status})"
+
+        if @repo.user_is_paid?(uid)
+            if user_type == "trial"
+                return send_ok(conn, "TRIAL #{@repo.user_next_stamp(uid)} #{user_string}")
+            elsif ["developer", "staff", "free"].include?(user_type)
+                return send_ok(conn, "PAID 0 #{user_string}")
+            else
+                return send_ok(conn, "PAID #{@repo.user_next_stamp(uid)} #{user_string}")
+            end
+        else
+            return send_ok(conn, "UNPAID #{user_string}")
+        end
+    end
+end

data/lib/wafer/ctl_server.rb

@@ -0,0 +1,14 @@
+class Wafer::Server
+    def ctl_respond(conn, parts)
+        return send_error(conn, "BAD INPUT") if parts.size < 3 || parts.size > 9
+
+        @seq_numbers[conn] = parts[1]
+        command = parts[0]
+
+        if command == "announce"
+            return send_ok(conn, "OK")
+        end
+
+        return send_error(conn, "UNIMPLEMENTED")
+    end
+end

data/lib/wafer/json_repo.rb

@@ -0,0 +1,210 @@
+require 'json'
+require 'digest'
+require 'digest/md5'
+
+class JSONRepo
+    EMPTY_REPO = {
+        "users" => [
+            {
+                "id" => 1,
+                "name" => "admin",
+                "email" => "admin@example.com",
+                "creation_time" => Time.now,
+                "password" => "ABCDEFG",
+                "pay_day" => 0,
+                "next_month" => 0,
+                "next_year" => 0,
+                "next_stamp" => 0,
+                "account_credit" => 0.0,
+                "account_type" => "staff",  # regular, trial, free, developer, staff
+
+                "flags" => ["terms-of-service"],  # no-email, premium, deleted, terms-of-service, banned
+
+                "access" => [ "gables" ],  # What game names the user has access to
+
+                "keycode" => {
+                    "keycode" => "17",
+                    "keycode_stamp" => Time.now,
+                },
+            },
+            {
+                "id" => 1,
+                "name" => "bobo",
+                "email" => "bobo@example.com",
+                "creation_time" => Time.now,
+                "password" => "ABCDEFG",
+                "pay_day" => 0,
+                "next_month" => 0,
+                "next_year" => 0,
+                "next_stamp" => 0,
+                "account_credit" => 0.0,
+                "account_type" => "staff",  # regular, trial, free, developer, staff
+
+                "flags" => ["terms-of-service"],  # no-email, premium, deleted, terms-of-service, banned
+
+                "access" => [ "gables" ],  # What game names the user has access to
+
+                "keycode" => {
+                    "keycode" => "17",
+                    "keycode_stamp" => Time.now,
+                },
+            },
+        ],
+    }
+
+    def initialize(json_filename)
+        unless File.exist?(json_filename)
+            File.open(json_filename, "w") { |f| f.print(JSON.pretty_generate EMPTY_REPO) }
+        end
+        @contents = JSON.load(File.read json_filename)
+    end
+
+    def user_names
+        @contents["users"].map { |u| u["name"] }
+    end
+
+    def uid_by_name(name)
+        user = user_by_name(name)
+        user && user["id"]
+    end
+
+    def user_by_name(name)
+        user_by_field("name", name)
+    end
+
+    def user_by_id(id)
+        user_by_field("id", id)
+    end
+
+    def user_by_field(field, value)
+        @contents["users"].detect { |u| u[field] == value }
+    end
+
+    def user_has_access?(uid, game)
+        user = user_by_id(uid)
+        user && user["access"].include?(game)
+    end
+
+    def user_has_tos?(uid)
+        user = user_by_id(uid)
+        user && user["flags"].include?("terms-of-service")
+    end
+
+    # We don't do email pings
+    def user_has_verified_email?(uid)
+        user = user_by_id(uid)
+        !!user
+    end
+
+    def user_set_email(uid, email)
+        user = user_by_id(uid)
+        user && user["email"] = email
+    end
+
+    def user_account_type(uid)
+        user = user_by_id(uid)
+        user ? user["account_type"] : nil
+    end
+
+    # Note: we ignore "freebie" users. We don't have that.
+    def user_account_status(uid)
+        user = user_by_id(uid)
+        return nil unless user
+
+        (user["flags"] + user["access"]).join(" ")
+    end
+
+    def user_set_flag(uid, flag)
+        user = user_by_id(uid)
+        user && user["flags"] |= [flag]
+    end
+
+    def user_unset_flag(uid, flag)
+        user = user_by_id(uid)
+        user && user["flags"] -= [flag]
+    end
+
+    private
+
+    def new_random_keycode
+        rand(1 << 27)
+    end
+
+    public
+
+    def user_keycode(uid)
+        user = user_by_id(uid)
+        user && new_random_keycode
+    end
+
+    def user_set_keycode(uid)
+        user = user_by_id(uid)
+        raise "No such user!" unless user
+        user["keycode"] = { "keycode" => new_random_keycode, "stamp" => Time.now }
+    end
+
+    # Miraculously, every user's next stamp is awhile in the future.
+    def user_next_stamp(uid)
+        Time.now.to_i + 3600 * 24 * 20
+    end
+
+    def user_is_paid?(uid)
+        user = user_by_id(uid)
+        user && true
+    end
+
+    def is_user_ok(uid)
+        user = user_by_id(uid)
+
+        if !user
+            return [false, "NO SUCH USER"]
+        elsif user["flags"].include?("deleted")
+            return [false, "NO SUCH USER"]
+        elsif user["flags"].include?("banned")
+            return [false, "ACCOUNT BLOCKED"]
+        end
+
+        return [true, ""]
+    end
+
+    def is_keycode_ok(uid, code)
+        return [false, "BAD KEYCODE"] unless code
+
+        # Keycode handling here is insultingly trivial and intentionally insecure.
+
+        return [true, ""]
+    end
+
+    # In thin-auth, this uses PHP's built-in password hashing.
+    def is_password_ok(uid, pass)
+        user = user_by_id(uid)
+
+        return [false, "NO SUCH USER"] unless user
+
+        if user["password"] == pass
+            [true, ""]
+        else
+            [false, "BAD PASSWORD"]
+        end
+    end
+
+    def is_hash_ok(uid, hash)
+        user = user_by_id(uid)
+        return [false, "NO SUCH USER"] unless user
+
+        STDERR.puts "Checking md5 hash: #{hash.inspect}"
+
+        keycode = user["keycode"]["keycode"]
+        real_hash = Digest::MD5.hexdigest(user["name"] + keycode + "NONE")
+
+        STDERR.puts "  Real hash: #{real_hash.inspect}"
+
+        # Skip the check and just always say it's fine.
+        #if real_hash == hash
+            return [true, ""]
+        #else
+        #    return [false, "BAD HASH"]
+        #end
+    end
+
+end

data/lib/wafer/version.rb

@@ -0,0 +1,3 @@
+module Wafer
+  VERSION = "0.2.0"
+end

data/wafer.gemspec

@@ -0,0 +1,32 @@
+require_relative 'lib/wafer/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "wafer"
+  spec.version       = Wafer::VERSION
+  spec.authors       = ["Noah Gibbs"]
+  spec.email         = ["the.codefolio.guy@gmail.com"]
+
+  spec.summary       = %q{Wafer is a development-only auth server for SkotOS games.}
+  spec.description   = %q{Wafer is a development-only AuthD/CtlD and web server for developing your SkotOS-based games. For a production-quality auth server, please use thin-auth instead.}
+  spec.homepage      = "http://github.com/noahgibbs/wafer"
+  spec.license       = "AGPL"
+  spec.required_ruby_version = Gem::Requirement.new(">= 2.3.0")
+
+  spec.metadata["allowed_push_host"] = "https://rubygems.org"
+
+  spec.metadata["homepage_uri"] = spec.homepage
+
+  # Specify which files should be added to the gem when it is released.
+  # The `git ls-files -z` loads the files in the RubyGem that have been added into git.
+  spec.files         = Dir.chdir(File.expand_path('..', __FILE__)) do
+    `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  end
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_runtime_dependency "optimist", "~>3.0.1"
+  spec.add_runtime_dependency "erubis"
+  spec.add_runtime_dependency "rack"
+  spec.add_runtime_dependency "json"
+end

data/www/index.html.erb

@@ -0,0 +1,47 @@
+<html>
+<head>
+  <script>
+
+    //document.querySelector(".button").addEventListener("click", (e) => { /* ... */ });
+
+    // Define a convenience method and use it
+    var ready = (callback) => {
+      if (document.readyState != "loading") callback();
+      else document.addEventListener("DOMContentLoaded", callback);
+    }
+
+    ready(() => {
+      /* After DOM has fully loaded... */
+      document.querySelector("#user-select").addEventListener("change", (e) => {
+        let user = document.querySelector("#user-select").value;
+        let playUrl = "http://localhost:<%= play_port %>/gables/gables.htm?charName=" + user;
+        document.querySelector("#play-url").href = playUrl;
+        document.cookie = "user=" + user + ";path=/";
+        console.log("Setting user to be " + user + ".");
+        console.log("Setting Play URL to be " + playUrl + ".");
+      });
+    });
+  </script>
+</head>
+<body>
+
+<%
+  first_user = (users - ["admin"]).first  # Set cookie for first non-admin user
+  vars["user"] = first_user
+%>
+
+<h1>Wafer DGD Login</h1>
+
+<ul>
+  <li><a id="play-url" href="http://localhost:<%= play_port %>/gables/gables.htm?charName=<%= first_user %>">Play</a></li>
+  <li><a href="http://localhost:<%= play_port %>/gables/TreeOfWOE.html">Tree of WOE</a></li>
+</ul>
+
+<select id="user-select">
+  <% users.each do |user| %>
+    <option value="<%= user %>"><%= user %></option>
+  <% end %>
+</select>
+
+</body>
+</html>

metadata

@@ -0,0 +1,122 @@
+--- !ruby/object:Gem::Specification
+name: wafer
+version: !ruby/object:Gem::Version
+  version: 0.2.0
+platform: ruby
+authors:
+- Noah Gibbs
+autorequire:
+bindir: exe
+cert_chain: []
+date: 2021-03-24 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: optimist
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 3.0.1
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: 3.0.1
+- !ruby/object:Gem::Dependency
+  name: erubis
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rack
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: json
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: Wafer is a development-only AuthD/CtlD and web server for developing
+  your SkotOS-based games. For a production-quality auth server, please use thin-auth
+  instead.
+email:
+- the.codefolio.guy@gmail.com
+executables:
+- wafer
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".travis.yml"
+- CODE_OF_CONDUCT.md
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- config.ru
+- exe/wafer
+- lib/wafer.rb
+- lib/wafer/auth_server.rb
+- lib/wafer/ctl_server.rb
+- lib/wafer/json_repo.rb
+- lib/wafer/version.rb
+- wafer.gemspec
+- www/index.html.erb
+homepage: http://github.com/noahgibbs/wafer
+licenses:
+- AGPL
+metadata:
+  allowed_push_host: https://rubygems.org
+  homepage_uri: http://github.com/noahgibbs/wafer
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.3.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.1.2
+signing_key:
+specification_version: 4
+summary: Wafer is a development-only auth server for SkotOS games.
+test_files: []