sqlpp11/include/sqlpp11/boolean.h

/*
 * Copyright (c) 2013-2014, Roland Bock
 * 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.
 *
 * 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 HOLDER 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.
 */

#ifndef SQLPP_BOOLEAN_H
#define SQLPP_BOOLEAN_H

#include <cstdlib>
#include <cassert>
#include <ostream>
#include <sqlpp11/basic_expression_operators.h>
#include <sqlpp11/type_traits.h>
#include <sqlpp11/exception.h>

namespace sqlpp
{
	// boolean operators
	namespace detail
	{
		// boolean value type
		struct boolean
		{
			using _value_type = boolean;
			using _base_value_type = boolean;
			using _is_boolean = std::true_type;
			using _is_value = std::true_type;
			using _is_expression = std::true_type;
			using _cpp_value_type = bool;

			struct _parameter_t
			{
				using _value_type = boolean;

				_parameter_t():
					_value(false),
					_is_null(true)
					{}

				_parameter_t(const _cpp_value_type& value):
					_value(value),
					_is_null(false)
					{}

				_parameter_t& operator=(const _cpp_value_type& value)
				{
					_value = value;
					_is_null = (false);
					return *this;
				}

				_parameter_t& operator=(const std::nullptr_t&)
				{
					_value = false;
					_is_null = true;
					return *this;
				}

				bool is_null() const
			 	{ 
					return _is_null; 
				}

				_cpp_value_type value() const
				{
					return _value;
				}

				operator _cpp_value_type() const { return value(); }

				template<typename Target>
					void _bind(Target& target, size_t index) const
					{
						target._bind_boolean_parameter(index, &_value, _is_null);
					}

			private:
				signed char _value;
				bool _is_null;
			};

			template<typename Db, bool NullIsTrivial = false>
			struct _result_entry_t
			{
				_result_entry_t():
					_is_valid(false),
					_is_null(true),
					_value(false)
					{}

				_result_entry_t(const char* data, size_t):
					_is_valid(true),
					_is_null(data == nullptr),
					_value(_is_null ? false : (data[0] == 't' or data[0] == '1'))
					{}

				void assign(const char* data, size_t)
				{
					_is_valid = true;
					_is_null = data == nullptr;
					_value = _is_null ? false : (data[0] == 't' or data[0] == '1');
				}

				void validate()
				{
					_is_valid = true;
				}

				void invalidate()
				{
					_is_valid = false;
					_is_null = true;
					_value = 0;
				}

				bool is_null() const
			 	{ 
					if (connector_assert_result_validity_t<Db>::value)
						assert(_is_valid);
					else if (not _is_valid)
						throw exception("accessing is_null in non-existing row");
					return _is_null; 
				}

				_cpp_value_type value() const
				{
					const bool null_value = _is_null and not NullIsTrivial and not connector_null_result_is_trivial_value_t<Db>::value;
					if (connector_assert_result_validity_t<Db>::value)
					{
						assert(_is_valid);
						assert(not null_value);
					}
					else
					{
						if (not _is_valid)
							throw exception("accessing value in non-existing row");
						if (null_value)
							throw exception("accessing value of NULL field");
					}
					return _value;
				}

				operator _cpp_value_type() const { return value(); }

				template<typename Target>
					void _bind(Target& target, size_t i)
					{
						target._bind_boolean_result(i, &_value, &_is_null);
					}

			private:
				bool _is_valid;
				bool _is_null;
				signed char _value;
			};

			template<typename T>
				struct _is_valid_operand
			{
				static constexpr bool value = 
					is_expression_t<T>::value // expressions are OK
					and is_boolean_t<T>::value // the correct value type is required, of course
					;
			};

			template<typename Base>
				struct expression_operators: public basic_expression_operators<Base, is_boolean_t>
			{
				template<typename T>
					vendor::logical_and_t<Base, vendor::wrap_operand_t<T>> operator and(T t) const
					{
						using rhs = vendor::wrap_operand_t<T>;
						static_assert(_is_valid_operand<rhs>::value, "invalid rhs operand");

						return { *static_cast<const Base*>(this), rhs{t} };
					}

				template<typename T>
					vendor::logical_or_t<Base, vendor::wrap_operand_t<T>> operator or(T t) const
					{
						using rhs = vendor::wrap_operand_t<T>;
						static_assert(_is_valid_operand<rhs>::value, "invalid rhs operand");

						return { *static_cast<const Base*>(this), rhs{t} };
					}

				vendor::logical_not_t<Base> operator not() const
				{
					return { *static_cast<const Base*>(this) };
				}
			};

			template<typename Base>
				struct column_operators
			{
			};
		};

		template<typename Db, bool TrivialIsNull>
		inline std::ostream& operator<<(std::ostream& os, const boolean::_result_entry_t<Db, TrivialIsNull>& e)
		{
			return os << e.value();
		}
	}

	using boolean = detail::boolean;

}
#endif