/*
 * This file is a part of morm
 * and is distributed under the 2-Clause BSD licence.
 * Author: Tomasz Sowa <t.sowa@ttmath.org>
 */

/*
 * Copyright (c) 2018-2021, Tomasz Sowa
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright notice,
 * this list of conditions and the following disclaimer.
 *
 * 2. 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.
 *
 */

#include "jsonexpression.h"
#include "morm_types.h"



namespace morm
{


void JSONExpression::before_generate_from_model()
{
	BaseExpression::before_generate_from_model();

	if( work_mode == MORM_WORK_MODE_MODEL_FIELDS_VALUES )
	{
		(*out_stream) << "{";
	}
}


void JSONExpression::after_generate_from_model()
{
	BaseExpression::after_generate_from_model();

	if( work_mode == MORM_WORK_MODE_MODEL_FIELDS_VALUES )
	{
		(*out_stream) << "}";
	}
}



void JSONExpression::field_before()
{
	BaseExpression::field_before();

	if( !is_first_field )
	{
		(*out_stream) << ",";
	}
}



void JSONExpression::before_field_name()
{
	(*out_stream) << "\"";
}

void JSONExpression::after_field_name()
{
	(*out_stream) << "\"";
}



void JSONExpression::before_field_value_string(const FT & field_type)
{
	(*out_stream) << "\"";
}

void JSONExpression::after_field_value_string(const FT & field_type)
{
	(*out_stream) << "\"";
}


void JSONExpression::put_name_value_separator()
{
	(*out_stream) << ':';
}


void JSONExpression::before_field_value_list()
{
	(*out_stream) << "[";
}


void JSONExpression::after_field_value_list()
{
	(*out_stream) << "]";
}


void JSONExpression::esc(char val, pt::TextStream & stream, const FT & field_type)
{
	if( field_type.is_hexadecimal() || field_type.is_binary() )
	{
		char_to_hex(val, stream);
	}
	else
	{
		if( (unsigned char)val < 32 )
		{
			char buf[10];
			size_t len;
			pt::Toa((unsigned char)val, buf, sizeof(buf)/sizeof(char), 16, &len);

			stream << "\\u";

			if( len < 4 )
			{
				for(size_t i=0 ; i < (4-len) ; ++i)
				{
					stream << '0';
				}
			}

			stream << buf;
		}
		else
		{
			switch( val )
			{
			case 0:		stream << '\\';	stream << '0';		break;	// may to skip this character is better?
			case '\r':	stream << '\\';	stream << 'r';		break;
			case '\n':	stream << '\\';	stream << 'n';		break;
			case '\t':	stream << '\\';	stream << 't';		break;
			case 0x08:	stream << '\\';	stream << 'b';		break;
			case 0x0c:	stream << '\\';	stream << 'f';		break;
			case '\\':	stream << '\\';	stream << '\\';		break;
			case '"':	stream << '\\';	stream << '\"';		break;
			default:
				stream << val;
			}
		}
	}
}


}