corteza/sam/websocket/session.go

package websocket

import (
	"context"
	"log"
	"time"

	"github.com/crusttech/crust/internal/auth"
	"github.com/crusttech/crust/internal/payload"
	"github.com/crusttech/crust/internal/payload/outgoing"
	"github.com/crusttech/crust/sam/types"
	"github.com/gorilla/websocket"
	"github.com/pkg/errors"

	authService "github.com/crusttech/crust/auth/service"
	"github.com/crusttech/crust/sam/repository"
	samService "github.com/crusttech/crust/sam/service"
)

type (
	// Session
	Session struct {
		id   uint64
		conn *websocket.Conn
		ctx  context.Context

		subs *Subscriptions

		send chan []byte
		stop chan []byte

		remoteAddr string

		config *repository.Flags

		user auth.Identifiable

		svc struct {
			user authService.UserService
			ch   samService.ChannelService
			msg  samService.MessageService
		}
	}
)

func (Session) New(ctx context.Context, config *repository.Flags, conn *websocket.Conn) *Session {
	s := &Session{
		conn:   conn,
		ctx:    ctx,
		config: config,
		subs:   NewSubscriptions(),
		send:   make(chan []byte, 512),
		stop:   make(chan []byte, 1),
	}

	s.svc.user = authService.DefaultUser
	s.svc.ch = samService.DefaultChannel
	s.svc.msg = samService.DefaultMessage

	return s
}

func (sess *Session) Context() context.Context {
	return sess.ctx
}

func (sess *Session) connected() {
	// Push user info about all users we know...
	if users, err := sess.svc.user.With(sess.ctx).Find(nil); err != nil {
		log.Printf("Error: %v", err)
	} else {
		sess.sendReply(payload.Users(users))
	}

	// Push user info about all channels he has access to...
	if cc, err := sess.svc.ch.With(sess.ctx).Find(&types.ChannelFilter{IncludeMembers: true}); err != nil {
		log.Printf("Error: %v", err)
	} else {
		sess.sendReply(payload.Channels(cc))

		log.Printf("Subscribing %d to %d channels", sess.user.Identity(), len(cc))

		cc.Walk(func(c *types.Channel) error {
			// Subscribe this user/session to all channels
			sess.subs.Add(payload.Uint64toa(c.ID))
			return nil
		})
	}

	sess.sendReply(payload.Commands(types.Preset))

	// Tell everyone that user has connected
	sess.sendToAll(&outgoing.Connected{UserID: payload.Uint64toa(sess.user.Identity())})
}

func (sess *Session) disconnected() {
	// Tell everyone that user has disconnected
	sess.sendToAll(&outgoing.Disconnected{UserID: payload.Uint64toa(sess.user.Identity())})
}

func (sess *Session) Handle() error {
	sess.connected()
	go sess.readLoop()
	return sess.writeLoop()
}

func (sess *Session) Close() {
	// @todo fix "writeLoop send: websocket: close sent" caused by sending disconnect here
	sess.disconnected()
	sess.conn.Close()
	store.Delete(sess.id)
}

func (sess *Session) readLoop() error {
	defer func() {
		log.Println("serveWebsocket - stop")
		sess.Close()
	}()

	sess.conn.SetReadDeadline(time.Now().Add(sess.config.Websocket.PingTimeout))
	sess.conn.SetPongHandler(func(string) error {
		sess.conn.SetReadDeadline(time.Now().Add(sess.config.Websocket.PingTimeout))
		return nil
	})
	sess.remoteAddr = sess.conn.RemoteAddr().String()

	for {
		_, raw, err := sess.conn.ReadMessage()
		if err != nil {
			return errors.Wrap(err, "sess.readLoop")
		}

		if err := sess.dispatch(raw); err != nil {
			log.Printf("Error: %v", err)
			sess.sendReply(outgoing.NewError(err))
		}
	}
}

func (sess *Session) writeLoop() error {
	ticker := time.NewTicker(sess.config.Websocket.PingPeriod)

	defer func() {
		ticker.Stop()
		sess.Close() // break readLoop
	}()

	write := func(msg []byte) error {
		sess.conn.SetWriteDeadline(time.Now().Add(sess.config.Websocket.Timeout))
		if msg != nil {
			return sess.conn.WriteMessage(websocket.TextMessage, msg)
		}
		return nil
	}

	ping := func() error {
		sess.conn.SetWriteDeadline(time.Now().Add(sess.config.Websocket.Timeout))
		return sess.conn.WriteMessage(websocket.PingMessage, nil)
	}

	for {
		select {
		case msg, ok := <-sess.send:
			if !ok {
				// channel closed
				return nil
			}

			if err := write(msg); err != nil {
				return errors.Wrap(err, "writeLoop send")
			}

		case msg := <-sess.stop:
			// Shutdown requested, don't care if the message is delivered
			write(msg)
			return nil

		case <-ticker.C:
			if err := ping(); err != nil {
				return errors.Wrap(err, "writeLoop ping")
			}
		}
	}
}