#!/usr/bin/env python
# Software License Agreement (BSD License)
#
# Copyright (c) 2008, Willow Garage, Inc.
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
#
#  * Redistributions of source code must retain the above copyright
#    notice, this list of conditions and the following disclaimer.
#  * Redistributions in binary form must reproduce the above
#    copyright notice, this list of conditions and the following
#    disclaimer in the documentation and/or other materials provided
#    with the distribution.
#  * Neither the name of Willow Garage, Inc. nor the names of its
#    contributors may be used to endorse or promote products derived
#    from this software without specific prior written permission.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
# FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
# COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
# BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
#

import unittest
import rospy
import rostest
import sys
try:
    from cStringIO import StringIO
except ImportError:
    from io import StringIO
import time
from random_messages import RandomMsgGen
import subprocess
import os

import genpy

DELAY = 0.5

class RandomPlay(unittest.TestCase):

  def msg_cb_topic(self, topic):
    def msg_cb(msg):
      nowtime = rospy.Time.now()

      if self.start is None:
        self.start = nowtime

      nowtime -= self.start

      self.input.append((topic, msg, nowtime.to_sec()))

    return msg_cb


  def test_random_play(self):
    rospy.init_node('random_sub', anonymous=True)

    self.start = None
    self.input = []

    self.assertTrue(len(sys.argv[1]) > 3)

    seed    = int(sys.argv[1])
    topics  = int(sys.argv[2])
    length  = float(sys.argv[3])
    scale   = float(sys.argv[4])
    self.use_clock = bool(int(sys.argv[5]))

    rmg = RandomMsgGen(int(seed), topics, length)

    subscribers = {}
    for (topic, msg_class) in rmg.topics():
      subscribers[topic] = rospy.Subscriber(topic, msg_class, self.msg_cb_topic(topic))

    bagpath = os.path.join('/tmp', 'test_rosbag_random_record_%d.bag'%seed)
    cmd = ['rosbag', 'play', '-d', str(DELAY), '-r', str(scale)]
    
    rospy.loginfo(str(cmd))

    if (self.use_clock):
      cmd += ['--clock', '--hz', '100']

    cmd += [bagpath]

    try:
      f1 = subprocess.Popen(cmd)

      last_input_count = 0
      while (len(self.input) < rmg.message_count()):
#        print "\n%d/%d\n"%(len(self.input), rmg.message_count())
        time.sleep(1.0)
        # abort loop if no input is coming in anymore and process has finished
        if len(self.input) == last_input_count:
          rc = f1.poll()
          if rc is not None:
            self.assertEqual(rc, 0)
            break
        last_input_count = len(self.input)

      self.assertEqual(len(self.input), rmg.message_count())

      max_late = 0
      max_early = 0
      avg_off = 0
      power = 0

      for (expect_topic, expect_msg, expect_time) in rmg.messages():

        if (not self.use_clock):
          expect_time /= scale

        buff = StringIO()
        expect_msg.serialize(buff)
        expect_msg.deserialize(buff.getvalue())

        msg_match = False

        for ind in range(0,100):
          (input_topic, input_msg, input_time) = self.input[ind]

          if (genpy.message.strify_message(expect_msg) == genpy.message.strify_message(input_msg)):
            msg_match = True
            del self.input[ind]

            # stats
            diff = input_time - expect_time

            if (diff < max_early):
              max_early = diff

            if (diff > max_late):
              max_late = diff

            avg_off += diff / rmg.message_count()

            power += (diff**2) / rmg.message_count()

            # Messages can arrive late, but never very early Both of
            # these bounds are much larger than they ought to be, but
            # you never know with a heavily loaded system.
            self.assertTrue(input_time - expect_time > -.5)
            self.assertTrue(abs(input_time - expect_time) < 5.0)
            break

        if not msg_match:
          print("No match at time: %f" % expect_time)

        self.assertTrue(msg_match)

      print("%f %f %f %f"%(max_early, max_late, avg_off, power))

    finally:
      f1.communicate()

    self.assertEqual(f1.returncode, 0)

if __name__ == '__main__':
  rostest.rosrun('test_rosbag', 'random_record_play', RandomPlay, sys.argv)
