//
// Cforall Version 1.0.0 Copyright (C) 2015 University of Waterloo
//
// The contents of this file are covered under the licence agreement in the
// file "LICENCE" distributed with Cforall.
//
// Mangler.h --
//
// Author           : Richard C. Bilson
// Created On       : Sun May 17 21:44:03 2015
// Last Modified By : Peter A. Buhr
// Last Modified On : Mon Jan 11 21:23:10 2021
// Update Count     : 29
//

#include "Mangler.h"
#include "SynTree/Type.h"
#include "SynTree/Declaration.h"

namespace SymTab {
	namespace Mangler {
		namespace Encoding {
			const std::string manglePrefix = "_X";

			// GENERATED START, DO NOT EDIT
			// GENERATED BY BasicTypes-gen.cc
			// NOTES ON MANGLING:
			// * Itanium spec says that Float80 encodes to "e" (like LongDouble), but the distinct lengths cause resolution problems.
			// * Float128 is supposed to encode to "g", but I wanted it to mangle equal to LongDouble.
			// * Mangling for non-standard complex types is by best guess
			// * _FloatN is supposed to encode as "DF"N"_"; modified for same reason as above.
			// * unused mangling identifiers:
			//   - "z" ellipsis
			//   - "Dd" IEEE 754r 64-bit decimal floating point (borrowed for _Float32x)
			//   - "De" IEEE 754r 128-bit decimal floating point
			//   - "Df" IEEE 754r 32-bit decimal floating point
			//   - "Dh" IEEE 754r 16-bit decimal floating point (borrowed for _Float16)
			//   - "DF"N"_" ISO/IEC TS 18661 N-bit binary floating point (_FloatN)
			//   - "Di" char32_t
			//   - "Ds" char16_t
			const std::string basicTypes[BasicType::NUMBER_OF_BASIC_TYPES] = {
				"b",        // _Bool
				"c",        // char
				"a",        // signed char
				"h",        // unsigned char
				"s",        // signed short int
				"t",        // unsigned short int
				"i",        // signed int
				"j",        // unsigned int
				"l",        // signed long int
				"m",        // unsigned long int
				"x",        // signed long long int
				"y",        // unsigned long long int
				"n",        // __int128
				"o",        // unsigned __int128
				"DF16_",    // _Float16
				"CDF16_",   // _Float16 _Complex
				"DF32_",    // _Float32
				"CDF32_",   // _Float32 _Complex
				"f",        // float
				"Cf",       // float _Complex
				"DF32x_",   // _Float32x
				"CDF32x_",  // _Float32x _Complex
				"DF64_",    // _Float64
				"CDF64_",   // _Float64 _Complex
				"d",        // double
				"Cd",       // double _Complex
				"DF64x_",   // _Float64x
				"CDF64x_",  // _Float64x _Complex
				"Dq",       // __float80
				"DF128_",   // _Float128
				"CDF128_",  // _Float128 _Complex
				"g",        // __float128
				"e",        // long double
				"Ce",       // long double _Complex
				"DF128x_",  // _Float128x
				"CDF128x_", // _Float128x _Complex
			}; // basicTypes
			// GENERATED END
			static_assert(
				sizeof(basicTypes)/sizeof(basicTypes[0]) == BasicType::NUMBER_OF_BASIC_TYPES,
				"Each basic type kind should have a corresponding mangler letter"
			);

			const std::map<int, std::string> qualifiers = {
				{ Type::Const, "K" },
				{ Type::Volatile, "V" },
				{ Type::Atomic, "DA" }, // A is array, so need something unique for atmoic. For now, go with multiletter DA
				{ Type::Mutex, "X" },
			};

			const std::string void_t = "v";
			const std::string zero = "Z";
			const std::string one = "O";

			const std::string function = "F";
			const std::string tuple = "T";
			const std::string pointer = "P";
			const std::string array = "A";
			const std::string qualifiedTypeStart = "N";
			const std::string qualifiedTypeEnd = "E";

			const std::string forall = "Q";
			const std::string typeVariables[] = {
				"BD", // dtype
				"BDS", // dtype + sized
				"BO", // otype
				"BF", // ftype
				"BT", // ttype
				"BAL", // array length type
			};
			static_assert(
				sizeof(typeVariables) / sizeof(typeVariables[0]) == TypeDecl::NUMBER_OF_KINDS,
				"Each type variable kind should have a corresponding mangler prefix"
			);

			const std::string struct_t = "S";
			const std::string union_t = "U";
			const std::string enum_t = "M";
			const std::string type = "Y";

			const std::string autogen = "autogen__";
			const std::string intrinsic = "intrinsic__";
		} // namespace Encoding
	} // namespace Mangler
} // namespace SymTab