with Ada.Strings.Fixed;
with Ada.Strings.Unbounded;
with Config;

package Html_Processor is

   package String_U renames Ada.Strings.Unbounded;
   package String_F renames Ada.Strings.Fixed;


   type Parser_State  is (Init, Html_Tag_Start,Html_Tag_End,Html_Tag,Script_Tag_Start,Script_Tag_End,Script_Tag);

   procedure Process_Request (S : String);
   procedure Process_Request (S : String_U.Unbounded_String);

   procedure Process_Request (C : Config.Config_Maps.Map; S : String);
   procedure Process_Request (C : Config.Config_Maps.Map; S : String_U.Unbounded_String);

end Html_Processor;