Initial.

Author: psuter

.gitignore

@@ -0,0 +1 @@
+*.swp

.travis.yml

@@ -0,0 +1,7 @@
+sudo: required
+
+services:
+  - docker
+
+script:
+- ./test.sh

Dockerfile

@@ -0,0 +1,43 @@
+FROM ubuntu:latest
+
+ENV DEBIAN_FRONTEND noninteractive
+
+RUN apt-get -y update
+
+RUN apt-get -y install dosbox
+
+RUN apt-get -y install curl
+RUN apt-get -y install zip unzip
+
+RUN apt-get -y install python python-flask
+
+ENV SDL_VIDEODRIVER dummy
+
+# Install OLDDOS.EXE utils.
+RUN mkdir -p /root/dos
+
+WORKDIR /root/dos
+
+RUN curl \
+    -L -s \
+    -o "./olddos.exe" \
+    "https://web.archive.org/web/20120215074213/http://download.microsoft.com/download/win95upg/tool_s/1.0/w95/en-us/olddos.exe"
+
+RUN zip -J "./olddos.exe"
+RUN yes | unzip "./olddos.exe"
+RUN rm "./olddos.exe"
+
+# DosBox config file
+RUN mkdir -p /root/.dosbox
+COPY dosbox.conf "/root/.dosbox/dosbox-0.74.conf"
+
+# Program itself
+COPY MORSE.BAS "/root/dos/MORSE.BAS"
+
+# The proxy
+RUN mkdir -p /root/proxy
+COPY proxy.py /root/proxy/proxy.py
+
+WORKDIR /root/proxy
+
+CMD [ "python", "proxy.py" ]

MORSE.BAS

@@ -0,0 +1,81 @@
+DECLARE FUNCTION MORSEC$ (CHAR$)
+
+DIM MESSAGE AS STRING
+
+OPEN "INPUT.STR" FOR INPUT AS 1
+  LINE INPUT #1, MESSAGE$
+
+LET RESULT$ = ""
+
+FOR I = 1 TO LEN(MESSAGE$)
+  LET C$ = UCASE$(MID$(MESSAGE$, I, 1))
+
+  IF I <> 1 THEN RESULT$ = RESULT$ + " "
+  RESULT$ = RESULT$ + MORSEC$(C$)
+  NEXT I
+
+PRINT RESULT$
+
+SYSTEM
+
+FUNCTION MORSEC$ (CHAR$)
+ SELECT CASE CHAR$
+    CASE "A"
+      MORSEC$ = ".-"
+    CASE "B"
+      MORSEC$ = "-..."
+    CASE "C"
+      MORSEC$ = "-.-."
+    CASE "D"
+      MORSEC$ = "-.."
+    CASE "E"
+      MORSEC$ = "."
+    CASE "F"
+      MORSEC$ = "..-."
+    CASE "G"
+      MORSEC$ = "--."
+    CASE "H"
+      MORSEC$ = "...."
+    CASE "I"
+      MORSEC$ = ".."
+    CASE "J"
+      MORSEC$ = ".---"
+    CASE "K"
+      MORSEC$ = "-.-"
+    CASE "L"
+      MORSEC$ = ".-.."
+    CASE "M"
+      MORSEC$ = "--"
+    CASE "N"
+      MORSEC$ = "-."
+    CASE "O"
+      MORSEC$ = "---"
+    CASE "P"
+      MORSEC$ = ".--."
+    CASE "Q"
+      MORSEC$ = "--.-"
+    CASE "R"
+      MORSEC$ = ".-."
+    CASE "S"
+      MORSEC$ = "..."
+    CASE "T"
+      MORSEC$ = "-"
+    CASE "U"
+      MORSEC$ = "..-"
+    CASE "V"
+      MORSEC$ = "...-"
+    CASE "W"
+      MORSEC$ = ".--"
+    CASE "X"
+      MORSEC$ = "-..-"
+    CASE "Y"
+      MORSEC$ = "-.--"
+    CASE "Z"
+      MORSEC$ = "--.."
+    CASE " "
+      MORSEC$ = "/"
+    CASE ELSE
+      MORSEC$ = ""
+  END SELECT
+END FUNCTION
+

README.md

@@ -0,0 +1,12 @@
+# Serverless QBasic
+
+This repository contains all code required to run a QBasic program as an [OpenWhisk](https://github.com/openwhisk/openwhisk) action.
+
+## Building and deploying
+
+1. Build the Docker image.
+2. Publish it to DockerHub, e.g. as `yourid/morse`.
+3. Create an OpenWhisk action: `wsk action create morse --docker "yourid/morse"
+4. Run it: `wsk action invoke -br morse -p input "les sanglots longs des violons de l'automne"`
+
+[![Build Status](https://travis-ci.org/psuter/serverless-qbasic.svg?branch=master)](https://travis-ci.org/psuter/serverless-qbasic)

dosbox.conf

@@ -0,0 +1,18 @@
+[mixer]
+nosound=true
+
+[midi]
+mididevice=none
+
+[sblaster]
+sbtype=none
+
+[speaker]
+pcspeaker=false
+
+[joystick]
+joysticktype=none
+
+[autoexec]
+mount C /root/dos
+C:

proxy.py

@@ -0,0 +1,39 @@
+import flask
+import subprocess
+
+proxy = flask.Flask(__name__)
+
+@proxy.route("/init", methods=[ "POST" ])
+def init():
+    return flask.jsonify(ok=True)
+
+@proxy.route("/run", methods=[ "POST" ])
+def run():
+    msg = flask.request.get_json(force=True, silent=True)
+
+    if not msg or not isinstance(msg, dict):
+        r = flask.jsonify({ "error": "Invalid payload." })
+        r.status_code = 400
+        return r
+    else:
+        input_string = msg.get("value", {}).get("input", {})
+
+        with open("/root/dos/INPUT.STR", "w") as fp:
+            fp.write("\"%s\"\n" % input_string)
+
+        subprocess.call([
+            "dosbox", "./PRINT.EXE", "-c", "C:\\QBASIC.EXE /run C:\\MORSE.BAS > C:\\LOG.TXT", "-exit"
+        ], cwd="/root/dos")
+
+        output = "???"
+
+        try:
+            with open("/root/dos/LOG.TXT", "r") as fp:
+                output = fp.read().strip()
+        except e:
+            pass
+
+        return flask.jsonify(input=input_string, output=output)
+
+if __name__ == "__main__":
+    proxy.run(host='0.0.0.0', port=8080)

test.sh

@@ -0,0 +1,32 @@
+#!/usr/bin/env bash
+
+set -e
+
+# Build the image.
+docker build . -t serverless-qbasic
+
+# Start the container.
+CONTAINER_ID=$(docker run -d -p 8080:8080 serverless-qbasic)
+echo $CONTAINER_ID
+
+# Wait a little, give the container some time to come to life.
+sleep 10
+
+# Send a test payload.
+RESULT=$(curl -s -X POST -H 'Content-Type: application/json' 'http://localhost:8080/run' -d '{ "value": { "input": "Hello world" } }')
+
+echo $RESULT
+echo ""
+
+# Clean up.
+docker stop ${CONTAINER_ID}
+docker rm -f ${CONTAINER_ID}
+
+# Return proper status code.
+if [[ "$RESULT" == *".--"* ]]; then
+    echo "Morse code found in answer. All good."
+    exit 0
+else
+    echo "Unexpected answer?"
+    exit 1
+fi