3 files changed, 83 insertions, 5 deletions
diff --git a/src/helsinki.at/rhimportd/ctrlWeb.go b/src/helsinki.at/rhimportd/ctrlWeb.go
new file mode 100644
index 0000000..04180ae
--- /dev/null
+++ b/src/helsinki.at/rhimportd/ctrlWeb.go
@@ -0,0 +1,44 @@
+//
+//  rhimportd
+//
+//  The Radio Helsinki Rivendell Import Daemon
+//
+//
+//  Copyright (C) 2015 Christian Pointner <equinox@helsinki.at>
+//
+//  This file is part of rhimportd.
+//
+//  rhimportd is free software: you can redistribute it and/or modify
+//  it under the terms of the GNU General Public License as published by
+//  the Free Software Foundation, either version 3 of the License, or
+//  any later version.
+//
+//  rhimportd is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//  GNU General Public License for more details.
+//
+//  You should have received a copy of the GNU General Public License
+//  along with rhimportd. If not, see <http://www.gnu.org/licenses/>.
+//
+
+package main
+
+import (
+	"fmt"
+	"helsinki.at/rhimport"
+	"html"
+	"net/http"
+	_ "net/http/pprof"
+)
+
+func StartControlWeb(addr_s string) {
+	http.HandleFunc("/", func(w http.ResponseWriter, r *http.Request) {
+		fmt.Fprintf(w, "Hello, %q", html.EscapeString(r.URL.Path))
+		ctx := new(rhimport.ImportContext)
+		rhimport.ImportFile(ctx)
+	})
+
+	rhl.Println("listening on", addr_s)
+	http.ListenAndServe(addr_s, nil)
+}
diff --git a/src/helsinki.at/rhimportd/log.go b/src/helsinki.at/rhimportd/log.go
new file mode 100644
index 0000000..5ff3e6d
--- /dev/null
+++ b/src/helsinki.at/rhimportd/log.go
@@ -0,0 +1,38 @@
+//
+//  rhimportd
+//
+//  The Radio Helsinki Rivendell Import Daemon
+//
+//
+//  Copyright (C) 2015 Christian Pointner <equinox@helsinki.at>
+//
+//  This file is part of rhimportd.
+//
+//  rhimportd is free software: you can redistribute it and/or modify
+//  it under the terms of the GNU General Public License as published by
+//  the Free Software Foundation, either version 3 of the License, or
+//  any later version.
+//
+//  rhimportd is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//  GNU General Public License for more details.
+//
+//  You should have received a copy of the GNU General Public License
+//  along with rhimportd. If not, see <http://www.gnu.org/licenses/>.
+//
+
+package main
+
+import (
+	"io/ioutil"
+	"log"
+	"os"
+)
+
+var (
+	rhl = log.New(os.Stderr, "[rhimport]\t", log.LstdFlags)
+	// use ioutil.Discard to switch that thing off
+	// rhtl = log.New(os.Stderr, "[rhdbg]\t", log.LstdFlags)
+	rhtl = log.New(ioutil.Discard, "[rhimport-dbg]\t", log.LstdFlags)
+)
diff --git a/src/helsinki.at/rhimportd/rhimportd.go b/src/helsinki.at/rhimportd/rhimportd.go
index a2bce7b..b73df95 100644
--- a/src/helsinki.at/rhimportd/rhimportd.go
+++ b/src/helsinki.at/rhimportd/rhimportd.go
@@ -26,15 +26,11 @@ package main
 
 import (
 	"flag"
-	"helsinki.at/rhimport"
-	"log"
 	"os"
 	"os/signal"
 	"sync"
 )
 
-var rhl = log.New(os.Stderr, "[rhimportd]\t", log.LstdFlags)
-
 func main() {
 	addr_s := flag.String("addr", ":4000", "addr:port to listen on, default: ':4000'")
 	help := flag.Bool("help", false, "show usage")
@@ -51,7 +47,7 @@ func main() {
 	go func() {
 		defer wg.Done()
 		rhl.Println("start web-srv")
-		rhimport.ServeWeb(*addr_s)
+		StartControlWeb(*addr_s)
 		rhl.Println("web finished")
 	}()