Add server_test

A VERY simple server implementation

server_test.go

@@ -0,0 +1,28 @@
+package dns
+
+import (
+	"testing"
+	"time"
+)
+
+func HelloServer(w ResponseWriter, req *Msg) {
+	m := new(Msg)
+	m.SetReply(req)
+
+	m.Extra = make([]RR, 1)
+	m.Extra[0] = &RR_TXT{Hdr: RR_Header{Name: m.Question[0].Name, Rrtype: TypeTXT, Class: ClassINET, Ttl: 0}, Txt: "Hello world"}
+	buf, _ := m.Pack()
+	w.Write(buf)
+}
+
+func TestServing(t *testing.T) {
+	HandleFunc("miek.nl.", HelloServer)
+	go func() {
+		err := ListenAndServe(":8053", "udp", nil)
+		if err != nil {
+			t.Log("ListenAndServe: ", err.String())
+			t.Fail()
+		}
+	}()
+	time.Sleep(1e9)
+}