/** @file /world/useful.cpp
    Užitečné jednoduché funkce, makra a definice bez společného
    zaměření.
    
    @author PW
*/

#include "useful.h"

#include <time.h>

using namespace std;

string strReplace(string s, string co, string cim)
{
    size_t pos = (size_t)-1;
    while ((pos = s.find(co, pos + 2)) != -1) {
        s = s.replace(pos,co.length(),cim);
    }

    return s;
}

string addSlashes(string s)
{
    s = strReplace(s,"\\","\\\\");
    s = strReplace(s,"\"","\\\"");
    return s;
}

/*
string TCL_tempVarName(TCL_Interp * interp)
{
    Tcl_Obj * tcl_obj;
    string name;
    string script;

    srand((unsigned)time(NULL)));
    for (int i = 0; i < TCL_TEMPVAR_ATTEMPTS; i++) {
        name = "tempvar_";
        name += rand();

        script = "set result [info exists ";
        script += name + "];";

        if (Tcl_Eval(interp, script.c_str()) == TCL_ERROR) {
            // chyba
            E_8K_TCL_Error("Unable to create temporary variable name");
        }
        else {
            // vyzvednuti promennych
            tcl_obj = Tcl_GetVar2Ex(interp,"result",NULL,flags & TCL_LEAVE_ERR_MSG);
 Tcl_GetIntFromObj(interp,tcl_obj,&_value);
            
            
            Tcl = TValue_Factory(interp, "result", 0);
            cout << i3->toString() << endl;
        }




    }

    if (i == TCL_TEMPVAR_ATTEMPTS)
        throw E_8K_TCL_Error("Unable to find temporary variable name");
    else
        return name;

    
    
    int result = Tcl_Eval(interp, skript.c_str());
       
    
    
    
    rand();
}
*/