// TR1 type_traits -*- C++ -*-

// Copyright (C) 2004 Free Software Foundation, Inc.
//
// This file is part of the GNU ISO C++ Library.  This library is free
// software; you can redistribute it and/or modify it under the
// terms of the GNU General Public License as published by the
// Free Software Foundation; either version 2, or (at your option)
// any later version.

// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.

// You should have received a copy of the GNU General Public License along
// with this library; see the file COPYING.  If not, write to the Free
// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
// USA.

/** @file 
 *  This is a TR1 C++ Library header. 
 */

#ifndef _TYPE_TRAITS
#define _TYPE_TRAITS 1

#include <bits/c++config.h>
#include <tr1/type_traits_fwd.h>

// namespace std::tr1
namespace std
{
namespace tr1
{
  // For use in is_enum, is_function, and elsewhere.
  struct __sfinae_types
  {
    typedef char __one;
    typedef struct { char __arr[2]; } __two;
  };

#define _DEFINE_SPEC_0_HELPER(_Spec)                            \
  template<>                                                    \
    struct _Spec                                                \
    : public true_type { };

#define _DEFINE_SPEC_1_HELPER(_Spec)                            \
  template<typename _Tp>                                        \
    struct _Spec                                                \
    _DEFINE_SPEC_1_VAR
      
#define _DEFINE_SPEC_2_HELPER(_Spec)                            \
  template<typename _Tp, typename _Cp>                          \
    struct _Spec                                                \
    _DEFINE_SPEC_2_VAR

#define _DEFINE_SPEC(_Order, _Trait, _Type)                     \
  _DEFINE_SPEC_##_Order##_HELPER(_Trait<_Type>)                 \
  _DEFINE_SPEC_##_Order##_HELPER(_Trait<_Type const>)           \
  _DEFINE_SPEC_##_Order##_HELPER(_Trait<_Type volatile>)        \
  _DEFINE_SPEC_##_Order##_HELPER(_Trait<_Type const volatile>)

  /// @brief  helper classes [4.3].
  template<typename _Tp, _Tp __v>
    struct integral_constant
    {
      static const _Tp                      value = __v;
      typedef _Tp                           value_type;
      typedef integral_constant<_Tp, __v>   type;
    };
  typedef integral_constant<bool, true>     true_type;
  typedef integral_constant<bool, false>    false_type;

  /// @brief  primary type categories [4.5.1].
  template<typename>
    struct is_void
    : public false_type { };
  _DEFINE_SPEC(0, is_void, void)

  template<typename>
    struct is_integral
    : public false_type { };
  _DEFINE_SPEC(0, is_integral, bool)
  _DEFINE_SPEC(0, is_integral, char)
  _DEFINE_SPEC(0, is_integral, signed char)
  _DEFINE_SPEC(0, is_integral, unsigned char)
#ifdef _GLIBCXX_USE_WCHAR_T
  _DEFINE_SPEC(0, is_integral, wchar_t)
#endif
  _DEFINE_SPEC(0, is_integral, short)
  _DEFINE_SPEC(0, is_integral, unsigned short)
  _DEFINE_SPEC(0, is_integral, int)
  _DEFINE_SPEC(0, is_integral, unsigned int)
  _DEFINE_SPEC(0, is_integral, long)
  _DEFINE_SPEC(0, is_integral, unsigned long)
  _DEFINE_SPEC(0, is_integral, long long)
  _DEFINE_SPEC(0, is_integral, unsigned long long)

  template<typename>
    struct is_floating_point
    : public false_type { };
  _DEFINE_SPEC(0, is_floating_point, float)
  _DEFINE_SPEC(0, is_floating_point, double)
  _DEFINE_SPEC(0, is_floating_point, long double)

  template<typename>
    struct is_array
    : public false_type { };

  template<typename _Tp, std::size_t _Size>
    struct is_array<_Tp[_Size]>
    : public true_type { };

  template<typename _Tp>
    struct is_array<_Tp[]>
    : public true_type { };

#define _DEFINE_SPEC_1_VAR        \
    : public true_type { };
  
  template<typename>
    struct is_pointer
    : public false_type { };
  _DEFINE_SPEC(1, is_pointer, _Tp*)
 
  template<typename>
    struct is_reference
    : public false_type { };

  template<typename _Tp>
    struct is_reference<_Tp&>
    : public true_type { };

#define _DEFINE_SPEC_2_VAR        \
    : public integral_constant<bool, !is_function<_Tp>::value> { };

  template<typename>
    struct is_member_object_pointer
    : public false_type { };
  _DEFINE_SPEC(2, is_member_object_pointer, _Tp _Cp::*)

#undef _DEFINE_SPEC_2_VAR
#define _DEFINE_SPEC_2_VAR        \
    : public integral_constant<bool, is_function<_Tp>::value> { };

  template<typename>
    struct is_member_function_pointer
    : public false_type { };
  _DEFINE_SPEC(2, is_member_function_pointer, _Tp _Cp::*)

  template<typename _Tp, bool = (is_fundamental<_Tp>::value
				 || is_array<_Tp>::value
				 || is_pointer<_Tp>::value
				 || is_reference<_Tp>::value
				 || is_member_pointer<_Tp>::value
				 || is_function<_Tp>::value)>
    struct __is_enum_helper
    : public __sfinae_types
    {
    private:
      static __one __test(bool);
      static __one __test(char);
      static __one __test(signed char);
      static __one __test(unsigned char);
#ifdef _GLIBCXX_USE_WCHAR_T
      static __one __test(wchar_t);
#endif
      static __one __test(short);
      static __one __test(unsigned short);
      static __one __test(int);
      static __one __test(unsigned int);
      static __one __test(long);
      static __one __test(unsigned long);
      static __one __test(long long);
      static __one __test(unsigned long long);
      static __two __test(...);

      template<typename _Up>
        struct __convert
	{ operator _Up() const; };

    public:
      static const bool __value = sizeof(__test(__convert<_Tp>())) == 1;
    };

  template<typename _Tp>
    struct __is_enum_helper<_Tp, true>
    { static const bool __value = false; };

  template<typename _Tp>
    struct is_enum
    : public integral_constant<bool, __is_enum_helper<_Tp>::__value> { };

  template<typename _Tp, bool = (is_reference<_Tp>::value
				 || is_void<_Tp>::value)>
    struct __is_function_helper
    : public __sfinae_types
    {
    private:
      template<typename>
        static __one __test(...);
      template<typename _Up>
        static __two __test(_Up(*)[1]);
    
    public:
      static const bool __value = sizeof(__test<_Tp>(0)) == 1;
    };
  
  template<typename _Tp>
    struct __is_function_helper<_Tp, true>
    { static const bool __value = false; };

  template<typename _Tp>
    struct is_function
    : public integral_constant<bool, __is_function_helper<_Tp>::__value> { };

  /// @brief  composite type traits [4.5.2].
  template<typename _Tp>
    struct is_arithmetic
    : public integral_constant<bool, (is_integral<_Tp>::value
				      || is_floating_point<_Tp>::value)>
    { };

  template<typename _Tp>
    struct is_fundamental
    : public integral_constant<bool, (is_arithmetic<_Tp>::value
				      || is_void<_Tp>::value)>
    { };

  template<typename _Tp>
    struct is_object
    : public integral_constant<bool, !(is_function<_Tp>::value
				       || is_reference<_Tp>::value
				       || is_void<_Tp>::value)>
    { };

  template<typename _Tp>
    struct is_scalar
    : public integral_constant<bool, (is_arithmetic<_Tp>::value
				      || is_enum<_Tp>::value
				      || is_pointer<_Tp>::value
				      || is_member_pointer<_Tp>::value)>
    { };

  template<typename _Tp>
    struct is_compound
    : public integral_constant<bool, !is_fundamental<_Tp>::value> { };

  template<typename _Tp>
    struct is_member_pointer
    : public integral_constant<bool,
			       (is_member_object_pointer<_Tp>::value
				|| is_member_function_pointer<_Tp>::value)>
    { };
  
  /// @brief  type properties [4.5.3].
  template<typename>
    struct is_const
    : public false_type { };

  template<typename _Tp>
    struct is_const<_Tp const>
    : public true_type { };
  
  template<typename>
    struct is_volatile
    : public false_type { };

  template<typename _Tp>
    struct is_volatile<_Tp volatile>
    : public true_type { };

  template<typename _Tp>
    struct is_pod
    : public integral_constant<bool, (is_void<_Tp>::value
				      || is_scalar<typename
				      remove_all_extents<_Tp>::type>::value)>
    { };

  template<typename _Tp>
    struct has_trivial_constructor
    : public integral_constant<bool, is_pod<_Tp>::value> { };

  template<typename _Tp>
    struct has_trivial_destructor
    : public integral_constant<bool, is_pod<_Tp>::value> { };

  template<typename>
    struct has_virtual_destructor
    : public false_type { };
  
  template<typename>
    struct rank
    : public integral_constant<std::size_t, 0> { };
   
  template<typename _Tp, std::size_t _Size>
    struct rank<_Tp[_Size]>
    : public integral_constant<std::size_t, 1 + rank<_Tp>::value> { };

  template<typename _Tp>
    struct rank<_Tp[]>
    : public integral_constant<std::size_t, 1 + rank<_Tp>::value> { };
   
  template<typename, unsigned>
    struct extent
    : public integral_constant<std::size_t, 0> { };
  
  template<typename _Tp, unsigned _Uint, std::size_t _Size>
    struct extent<_Tp[_Size], _Uint>
    : public integral_constant<std::size_t,
			       _Uint == 0 ? _Size : extent<_Tp,
							   _Uint - 1>::value>
    { };

  template<typename _Tp, unsigned _Uint>
    struct extent<_Tp[], _Uint>
    : public integral_constant<std::size_t,
			       _Uint == 0 ? 0 : extent<_Tp,
						       _Uint - 1>::value>
    { };
  
  /// @brief  relationships between types [4.6].
  template<typename, typename>
    struct is_same
    : public false_type { };

  template<typename _Tp>
    struct is_same<_Tp, _Tp>
    : public true_type { };

  /// @brief  const-volatile modifications [4.7.1].
  template<typename _Tp>
    struct remove_const
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_const<_Tp const>
    { typedef _Tp     type; };
  
  template<typename _Tp>
    struct remove_volatile
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_volatile<_Tp volatile>
    { typedef _Tp     type; };
  
  template<typename _Tp>
    struct remove_cv
    {
      typedef typename
      remove_const<typename remove_volatile<_Tp>::type>::type     type;
    };
  
  template<typename _Tp>
    struct add_const
    { typedef _Tp const     type; };
   
  template<typename _Tp>
    struct add_volatile
    { typedef _Tp volatile     type; };
  
  template<typename _Tp>
    struct add_cv
    {
      typedef typename
      add_const<typename add_volatile<_Tp>::type>::type     type;
    };

  /// @brief  reference modifications [4.7.2].
  template<typename _Tp>
    struct remove_reference
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_reference<_Tp&>
    { typedef _Tp     type; };
  
  template<typename _Tp>
    struct add_reference
    { typedef _Tp&    type; };

  template<typename _Tp>
    struct add_reference<_Tp&>
    { typedef _Tp&    type; };

  /// @brief  array modififications [4.7.3].
  template<typename _Tp>
    struct remove_extent
    { typedef _Tp     type; };

  template<typename _Tp, std::size_t _Size>
    struct remove_extent<_Tp[_Size]>
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_extent<_Tp[]>
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_all_extents
    { typedef _Tp     type; };

  template<typename _Tp, std::size_t _Size>
    struct remove_all_extents<_Tp[_Size]>
    { typedef typename remove_all_extents<_Tp>::type     type; };

  template<typename _Tp>
    struct remove_all_extents<_Tp[]>
    { typedef typename remove_all_extents<_Tp>::type     type; };

  /// @brief  pointer modifications [4.7.4].
#undef _DEFINE_SPEC_1_VAR
#define _DEFINE_SPEC_1_VAR        \
    { typedef _Tp     type; };

  template<typename _Tp>
    struct remove_pointer
    { typedef _Tp     type; };
  _DEFINE_SPEC(1, remove_pointer, _Tp*)
  
  template<typename _Tp>
    struct add_pointer
    { typedef typename remove_reference<_Tp>::type*     type; };

  /// @brief  other transformations [4.8].

#undef _DEFINE_SPEC_0_HELPER
#undef _DEFINE_SPEC_1_HELPER
#undef _DEFINE_SPEC_2_HELPER
#undef _DEFINE_SPEC
#undef _DEFINE_SPEC_1_VAR
#undef _DEFINE_SPEC_2_VAR

}
}

#endif
