func (r *Message) UnmarshalBinary(data []byte) error {
	b := bytes.NewBuffer(data)

	mUUID := make([]byte, 0, 16)
	sUUID := make([]byte, 0, 16)

	_, err := fmt.Fscanln(b, &r.MessageType, &sUUID, &mUUID, &r.Length, &r.Data)

	r.SysUUID, _ = uuid.ParseBytes(sUUID)
	r.MessageUUID, _ = uuid.ParseBytes(mUUID)

	return err
}