go-xmpp/src/xmpp/stream.go

package xmpp

import (
	"bytes"
	"crypto/tls"
	"encoding/xml"
	"fmt"
	"io"
	"log"
	"net"
)

const (
	nsStream = "http://etherx.jabber.org/streams"
	nsTLS = "urn:ietf:params:xml:ns:xmpp-tls"
)

type Stream struct {
	conn net.Conn
	dec *xml.Decoder
	stanzaBuf string
	incomingNamespace nsMap
}

// Create a XML stream connection. A Steam is used by an XMPP instance to
// handle sending and receiving XML data over the net connection.
func NewStream(addr string) (*Stream, error) {

	log.Println("Connecting to", addr)

	conn, err := net.Dial("tcp", addr)
	if err != nil {
		return nil, err
	}

	stream := &Stream{conn: conn, dec: xml.NewDecoder(conn)}

	if err := stream.send([]byte("<?xml version='1.0' encoding='utf-8'?>")); err != nil {
		return nil, err
	}

	return stream, nil
}

// Upgrade the stream's underlying net connection to TLS.
func (stream *Stream) UpgradeTLS(config *tls.Config) error {

	conn := tls.Client(stream.conn, config)
	if err := conn.Handshake(); err != nil {
		return err
	}

	stream.conn = conn
	stream.dec = xml.NewDecoder(stream.conn)

	return nil
}

// Send the element's start tag. Typically used to open the stream's document.
func (stream *Stream) SendStart(start *xml.StartElement) (*xml.StartElement, error) {

	// Write start of outgoing doc.
	buf := new(bytes.Buffer)
	if err := writeXMLStartElement(buf, start); err != nil {
		return nil, err
	}
	if err := stream.send(buf.Bytes()); err != nil {
		return nil, err
	}

	// Read and return start of incoming doc.
	rstart, err := nextStartElement(stream.dec)
	if err != nil {
		return nil, err
	}

	// Collect top-level namespaces.
	stream.incomingNamespace = make(nsMap)
	for _, attr := range rstart.Attr {
		if attr.Name.Space == "xmlns" {
			stream.incomingNamespace[attr.Value] = attr.Name.Local
		} else if attr.Name.Space == "" && attr.Name.Local == "xmlns" {
			stream.incomingNamespace[attr.Value] = ""
		}
	}

	return rstart, nil
}

// Send a stanza. Used to write a complete, top-level element.
func (stream *Stream) Send(v interface{}) error {
	bytes, err := xml.Marshal(v)
	if err != nil {
		return err
	}
	return stream.send(bytes)
}

func (stream *Stream) send(b []byte) error {
	log.Println("send:", string(b))
	if _, err := stream.conn.Write(b); err != nil {
		return err
	}
	return nil
}

// Find start of next stanza. If match is not nil the stanza's XML name
// is compared and must be equal.
// Bad things are very likely to happen if a call to Next() is successful but
// you don't actually decode or skip the element.
func (stream *Stream) Next(match *xml.Name) (*xml.StartElement, error) {

	start, err := nextStartElement(stream.dec)
	if err != nil {
		return nil, err
	}

	if xml, err := collectElement(stream.dec, start, stream.incomingNamespace); err != nil {
		return nil, err
	} else {
		stream.stanzaBuf = xml
	}
	log.Println("recv:", stream.stanzaBuf)

	if match != nil && start.Name != *match {
		return nil, fmt.Errorf("Expected %s, got %s", *match, start.Name)
	}

	return start, nil
}

func nextStartElement(dec *xml.Decoder) (*xml.StartElement, error) {
	for {
		t, err := dec.Token()
		if err != nil {
			if err == io.EOF {
				err = io.ErrUnexpectedEOF
			}
			return nil, err
		}
		switch e := t.(type) {
		case xml.StartElement:
			return &e, nil
		case xml.EndElement:
			log.Printf("EOF due to %s\n", e.Name)
			return nil, io.EOF
		}
	}
	panic("Unreachable")
}

// Skip reads tokens until it reaches the end element of the most recent start
// element that has already been read.
func (stream *Stream) Skip() error {
	return nil
//	return stream.dec.Skip()
}

// Decode the next stanza. Works like xml.Unmarshal but reads from the stream's
// connection.
func (stream *Stream) Decode(v interface{}) error {
	return stream.DecodeElement(v, nil)
}

// Decode the stanza with the given start element. Works like
// xml.Decoder.DecodeElement.
func (stream *Stream) DecodeElement(v interface{}, start *xml.StartElement) error {

	// Explicity lookup next start element to ensure stream is validated,
	// stanza is logged, etc.
	if start == nil {
		if se, err := stream.Next(nil); err != nil {
			return err
		} else {
			start = se
		}
	}

	return xml.Unmarshal([]byte(stream.stanzaBuf), v)
//	return stream.dec.DecodeElement(v, start)
}

// Collect the element with the start that's already been consumed into a
// buffer. Namespaces are munged so the buffer can be correctly parsed outside
// the context of the stream. This is used for logging the received data.
func collectElement(dec *xml.Decoder, start *xml.StartElement, nsmap nsMap) (string, error) {

	var collector struct {
		XML []byte `xml:",innerxml"`
	}

	if err := dec.DecodeElement(&collector, start); err != nil {
		return "", err
	}

	name := start.Name
	attrs := start.Attr

	// Map the element's namespace.
	if ns, ok := nsmap[name.Space]; ok {
		// Element's namespace is one of the stream namespaces. Update the
		// element's namespace and add the namespace to the element's attrs.
		attrs = append(attrs, xml.Attr{xml.Name{"xmlns", ns}, name.Space})
		name = xml.Name{ns, name.Local}
	} else {
		// Check that Go's xml package hasn't duplicated the default ns as the
		// element name's space. If so, clear it.
		for _, attr := range attrs {
			if attr.Name == (xml.Name{"", "xmlns"}) {
				if name.Space == attr.Value {
					name = xml.Name{"", start.Name.Local}
				}
				break
			}
		}
	}

	start = &xml.StartElement{name, attrs}

	buf := new(bytes.Buffer)
	if err := writeXMLStartElement(buf, start); err != nil {
		return "", err
	}
	if _, err := buf.Write(collector.XML); err != nil {
		return "", err
	}
	if err := writeXMLEndElement(buf, &xml.EndElement{start.Name}); err != nil {
		return "", err
	}

	return buf.String(), nil
}