/*
	On veut trouver la façon la plus rapide pour remplacer une série de comparaison de chaines comme
	on build-protocol génére


	On voit qu'en utilisant map, on obtient environ 8 fois la performance. Avec unordered_map, on obtient 13 fois.
	Ce test a été fait pour le pire cas, soit le dernier de la liste.

	Pour celui du milieu, c'est 7 fois plus rapide avec le ordered_map. Pour le premier, la performance des maps
	est à peut près la même, mais évidemment, le cas référence devient extrêmement rapide (100 fois plus rapide).

	Une solution simple pour optimiser serait de placer les functions les plus populaires au début du fichier. Cela
	serait assez facile à trouver avec l'instrumentation (même si c'est assez évident)
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <tlmplib.h>
#include <string>
#include <vector>
#include <map>

using namespace std;


<mod>
int main (int argc, char *argv[])
{
	glocal int ret = -1;
	glocal const char *gen = nullptr;

	glocal.ret = <call tlmpprogram>(argc,argv);
	<f init>
		setproginfo ("","0.0","...");
		setarg (' ',"gen","Genere les fonctions de tests à partir d'un fichier proto",glocal.gen,false);
	</f>
	<f main_noarg>
		if (glocal.gen != nullptr){
			glocal vector<string> words;
			<call loadfile>(glocal.gen,false);
			<f oneline>
				if (line[0] != '\0' && line[0] != '#' && line[0] != '&'){
					vector<string> tb;
					if (str_splitline(line,' ',tb)>0){
						glocal.words.push_back(tb[0]);
					}
				}
				return 0;
			</f>
			</call>
			// Reference
			{
				printf ("unsigned test_ref(const char *func, unsigned nbrep)\n");
				printf ("{\n");
				printf ("\tunsigned count = 0;\n");
				printf ("\tfor (unsigned i=0; i<nbrep; i++){\n");
				const char *prefix = "";
				unsigned pos = 1;
				for (auto const &w:glocal.words){
					printf ("\t\t%sif (strcmp(func,\"%s\")==0){\n",prefix,w.c_str());
					printf ("\t\t\tcount += %u;\n",pos);
					pos++;
					prefix = "}else ";
				}
				printf ("\t\t}\n");
				printf ("\t}\n");
				printf ("\treturn count;\n");
				printf ("}\n");
			}
			// map and map_unordered
			for (auto s:{"map","unordered_map"}){
			{
				printf ("unsigned test_%s(const char *func, unsigned nbrep)\n",s);
				printf ("{\n");
				printf ("\tenum class enumfunc{\n");
				for (auto const &w:glocal.words){
					printf ("\t\tfunc_%s,\n",w.c_str());
				}
				printf ("\t};\n");
				printf ("\tstatic %s<string,enumfunc> mp;\n",s);
				printf ("\tstatic bool is_init=false;\n");
				printf ("\tif(!is_init){\n");
				printf ("\t\tis_init = true;\n");
				for (auto const &w:glocal.words){
					printf ("\t\tmp[\"%s\"] = enumfunc::func_%s;\n",w.c_str(),w.c_str());
				}
				printf ("\t}\n");
				printf ("\tunsigned count = 0;\n");
				printf ("\tfor (unsigned i=0; i<nbrep; i++){\n");
				printf ("\t\tauto it = mp.find(func);\n");
				printf ("\t\tif (it != mp.end()){\n");
				printf ("\t\t\tswitch(it->second){\n");
				unsigned pos = 1;
				for (auto const &w:glocal.words){
					printf ("\t\t\tcase enumfunc::func_%s:\n",w.c_str());
					printf ("\t\t\t\tcount += %u;\n",pos);
					printf ("\t\t\t\tbreak;\n");
					pos++;
				}
				printf ("\t\t\t}\n");
				printf ("\t\t}\n");
				printf ("\t}\n");
				printf ("\treturn count;\n");
				printf ("}\n");
			}
			}
		}
		return 0;
	</f>
	</call>
	return glocal.ret;
}
</mod>