/*
 * Copyright (C) 2012 Open Source Robotics Foundation
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
*/
#ifndef _ODEJOINT_HH_
#define _ODEJOINT_HH_

#include <boost/any.hpp>
#include <string>

#include "gazebo/physics/ode/ODEPhysics.hh"
#include "gazebo/physics/Joint.hh"
#include "gazebo/util/system.hh"

namespace gazebo
{
  namespace physics
  {
    /// \addtogroup gazebo_physics_ode
    /// \{

    /// \brief ODE joint interface
    class GZ_PHYSICS_VISIBLE ODEJoint : public Joint
    {
      /// \brief internal variables used for implicit damping
      public:  enum CFMMode
      {
        /// \brief implicit damping not active
        NONE           = 0x00000000,
        /// \brief implicit damping active, joints within limits
        DAMPING_ACTIVE = 0x00000001,
        /// \brief implicit damping not active, enforcing joints limits
        JOINT_LIMIT    = 0x00000002
      };

      /// \brief Constructor.
      /// \param[in] _parent Parent of the Joint.
      public: explicit ODEJoint(BasePtr _parent);

      /// \brief Destructor.
      public: virtual ~ODEJoint();

      // Documentation inherited.
      public: virtual void Load(sdf::ElementPtr _sdf) override;

      // Documentation inherited.
      public: virtual void Fini() override;

      // Documentation inherited.
      public: virtual void Reset() override;

      // Documentation inherited.
      public: virtual LinkPtr GetJointLink(unsigned int _index) const override;

      // Documentation inherited.
      public: virtual bool AreConnected(LinkPtr _one, LinkPtr _two) const
            override;

      // Documentation inherited.
      public: virtual void CacheForceTorque() override;

      /// \brief Get an ODE joint parameter.
      ///
      /// The default function does nothing. This should be
      /// overriden in the child classes where appropriate.
      /// \param[in] _parameter ID of the parameter to get.
      /// \return Value of the parameter.
      public: virtual double GetParam(unsigned int _parameter) const;

      /// \brief Set an ODE joint paramter.
      ///
      /// By default this does nothing. It should be overridden in child
      /// classes where appropriate
      /// \param[in] _parameter ID of the parameter to set.
      /// \param[in] _value Value to set.
      public: virtual void SetParam(unsigned int _parameter, double _value);

      // Documentation inherited
      public: virtual void SetDamping(unsigned int _index, double _damping)
            override;

      // Documentation inherited.
      public: virtual bool SetPosition(
                              const unsigned int _index,
                              const double _position,
                              const bool _preserveWorldVelocity = false)
            override;

      // Documentation inherited.
      public: virtual void SetStiffness(unsigned int _index,
                                        const double _stiffness) override;

      // Documentation inherited.
      public: virtual void SetStiffnessDamping(unsigned int _index,
        double _stiffness, double _damping, double _reference = 0) override;

      // Documentation inherited.
      public: virtual void Attach(LinkPtr _parent, LinkPtr _child) override;

      // Documentation inherited.
      public: virtual void Detach() override;

      /// \brief Set the ERP of this joint.
      /// \param[in] _erp Error Reduction Parameter value.
      public: void SetERP(double _erp);

      /// \brief Get the ERP of this joint.
      /// \return The Error Reduction Parameter of this joint
      public: double GetERP();

      /// \brief Set the CFM of this joint.
      /// \param[in] _cfm The Constraint Force Mixing value
      public: void SetCFM(double _cfm);

      /// \brief Get the CFM of this joint
      /// \return The Constraint Force Mixing value
      public: double GetCFM();

      /// \brief Get the feedback data structure for this joint, if set
      /// \return Pointer to the joint feedback.
      public: dJointFeedback *GetFeedback();

      /// \brief Get flag indicating whether implicit spring damper is enabled.
      /// \return True if implicit spring damper is used.
      public: bool UsesImplicitSpringDamper();

      /// \brief Set flag indicating whether implicit spring damper is enabled.
      /// \param[in] _implicit True if implicit spring damper is used.
      public: void UseImplicitSpringDamper(const bool _implicit);

      /// \brief simulate implicit spring and damper with CFM/ERP
      /// and meddling with Joint limits.
      public: void ApplyImplicitStiffnessDamping();

      /// \brief simulating a joint spring and damper explicitly.
      public: void ApplyExplicitStiffnessDamping();

      /// \brief Get access to stopCFM
      /// \return Returns joint's cfm for end stops
      public: double GetStopCFM()
      {
        return this->stopCFM;
      }

      /// \brief Get access to stopERP
      /// \return Returns joint's erp for end stops
      public: double GetStopERP()
      {
        return this->stopERP;
      }

      /// \brief EXPERIMENTAL: If specified damping coefficient is negative,
      /// apply adaptive damping.  What this means is that
      /// if resulting acceleration is outside of stability region,
      /// then increase damping using a limiter based on (f, v).
      /// This approach safeguards dynamics against unstable joint behavior
      /// at low speed (|v| < vThreshold) and
      /// high force (|f| > fThreshold) scenarios.
      /// Stability region is determined by:
      ///   max_damping_coefficient = f / ( sign(v) * max( |v|, vThreshold ) )
      private: double ApplyAdaptiveDamping(unsigned int _index,
                   const double _damping);

      /// \brief Helper funciton to convert Kp and Kd to CFM and ERP
      /// \param[in] _dt time step size
      /// \param[in] _kp spring stiffness
      /// \param[in] _kd spring damping
      /// \param[out] _cfm equivalent constraint force mixing
      /// \param[out] _erp equivalent error reduction parameter
      private: void KpKdToCFMERP(const double _dt,
                                 const double _kp, const double _kd,
                                 double &_cfm, double &_erp);

      /// \brief Helper funciton to convert CFM and ERP to Kp and Kd
      /// \param[in] _dt time step size
      /// \param[in] _cfm constraint force mixing
      /// \param[in] _erp error reduction parameter
      /// \param[out] _kp equivalent spring stiffness
      /// \param[out] _kd equivalent spring damping
      private: void CFMERPToKpKd(const double _dt,
                                 const double _cfm, const double _erp,
                                 double &_kp, double &_kd);

      /// \brief internal variable to keep track of implicit damping internals
      private: int implicitDampingState[MAX_JOINT_AXIS];

      /// \brief save current implicit damping coefficient
      private: double currentKd[MAX_JOINT_AXIS];

      /// \brief save current implicit stiffness coefficient
      private: double currentKp[MAX_JOINT_AXIS];

      /// \brief internal variable to keep track if ConnectJointUpdate
      /// has been called on a damping method
      private: bool stiffnessDampingInitialized;

      /// \brief flag to use implicit joint stiffness damping if true.
      private: bool useImplicitSpringDamper;

      // Documentation inherited.
      public: virtual void SetUpperLimit(const unsigned int _index,
                                         const double _limit) override;

      // Documentation inherited.
      public: virtual void SetLowerLimit(const unsigned int _index,
                                         const double _limit) override;

      // Documentation inherited.
      public: virtual ignition::math::Vector3d LinkForce(
          const unsigned int _index) const override;

      // Documentation inherited.
      public: virtual ignition::math::Vector3d LinkTorque(
          const unsigned int _index) const override;

      // Documentation inherited.
      public: virtual void SetAxis(const unsigned int _index,
                  const ignition::math::Vector3d &_axis) override;

      // Documentation inherited.
      public: virtual bool SetParam(const std::string &_key,
                                        unsigned int _index,
                                        const boost::any &_value) override;

      // Documentation inherited.
      public: virtual double GetParam(const std::string &_key,
                                                unsigned int _index) override;

      // Documentation inherited.
      public: virtual void SetProvideFeedback(bool _enable) override;

      // Documentation inherited.
      public: virtual JointWrench GetForceTorque(unsigned int _index) override;

      // Documentation inherited.
      public: virtual void SetForce(unsigned int _index, double _force)
            override;

      // Documentation inherited.
      public: virtual double GetForce(unsigned int _index) override;

      // Documentation inherited.
      public: virtual void ApplyStiffnessDamping() override;

      // Documentation inherited.
      /// \brief Set the force applied to this physics::Joint.
      /// Note that the unit of force should be consistent with the rest
      /// of the simulation scales.
      /// Force is additive (multiple calls
      /// to SetForceImpl to the same joint in the same time
      /// step will accumulate forces on that Joint).
      /// \param[in] _index Index of the axis.
      /// \param[in] _force Force value.
      protected: virtual void SetForceImpl(
                     unsigned int _index, double _force) = 0;

      /// \brief Save external forces applied to this Joint.
      /// \param[in] _index Index of the axis.
      /// \param[in] _force Force value.
      private: void SaveForce(unsigned int _index, double _force);

      /// \brief This is our ODE ID
      protected: dJointID jointId;

      /// \brief Feedback data for this joint
      private: dJointFeedback *feedback;

      /// \brief CFM for joint's limit constraint
      private: double stopCFM;

      /// \brief ERP for joint's limit constraint
      private: double stopERP;

      /// \brief Save force applied by user
      /// This plus the joint feedback (joint contstraint forces) is the
      /// equivalent of simulated force torque sensor reading
      /// Allocate a 2 vector in case hinge2 joint is used.
      /// This is used by ODE to store external force applied by the user.
      private: double forceApplied[MAX_JOINT_AXIS];

      /// \brief Save time at which force is applied by user
      /// This will let us know if it's time to clean up forceApplied.
      private: common::Time forceAppliedTime;
    };
    /// \}
  }
}
#endif
