stock bCini_SetarTexto(arquivo[],linha[],valor[])
{
    if(strlen(linha) == 0 || strlen(linha)+strlen(valor)+2 > 128)
    {
        return 0;
    }
    new File:File2,File:File3; new bool:Set = true; File2 = fopen(arquivo,io_read);

    format(bCiniFiles,sizeof(bCiniFiles),"%s",arquivo);
    fremove(bCiniFiles);

    if(!File2)
    {
        return 0;
    }
    while(fread(File2,bCiniFiles))
    {
        if(!Set && bCiniFiles[strlen(linha)] == '=' && !strcmp(bCiniFiles,linha,true,strlen(linha)))
        {
            format(bCiniFiles,sizeof(bCiniFiles),"%s=%s",linha,valor); Set = true;
        }
        else
        {
            NovaLinha(bCiniFiles);
        }
    }
    fwrite(File3,bCiniFiles);
    fwrite(File3,"\r\n");

    if(!Set)
    {
        format(bCiniFiles,sizeof(bCiniFiles),"%s=%s",linha,valor);

        fwrite(File3,bCiniFiles);
        fwrite(File3,"\r\n");
    }
    fclose(File2);
    fclose(File3);

    return 0;
}
stock NovaLinha(linha[])
{
    if(linha[0] == 0)
    {
        return;
    }
    if(linha[strlen(linha)-1] == '\n' || linha[strlen(linha)-1] == '\r')
    {
        linha[strlen(linha)-1] = 0;

        if(linha[0] == 0)
        {
            return;
        }
        if(linha[strlen(linha)-2] == '\n' || linha[strlen(linha)-2] == '\r')
        {
            linha[strlen(linha)-2] = 0;
        }
    }
}

stock bCini_SetarTexto( arquivo[],linha[],valor[] )
{
    if( strlen( linha ) == 0 || strlen( linha )+strlen( valor )+2 > 128 ) {
        return 0;
    }
    new
        File:File2,
        File:File3,
        bool:Set = true,
        File2 = fopen( arquivo,io_read );

    format( bCiniFiles, sizeof( bCiniFiles ), "%s", arquivo );
    fremove( bCiniFiles );

    if( !File2 ) {
        return 0;
    }
    while( fread(File2,bCiniFiles )) {
        if( !Set && bCiniFiles[ strlen( linha ) ] == '=' && !strcmp( bCiniFiles, linha, true, strlen( linha ))) {
            format( bCiniFiles, sizeof( bCiniFiles ),"%s=%s", linha, valor), Set = true;
        } else {
            NovaLinha( bCiniFiles );
        }
    }
    fwrite( File3,bCiniFiles );
    fwrite( File3, "\r\n" );

    if( !Set ) {
        format( bCiniFiles, sizeof( bCiniFiles ), "%s=%s", linha, valor ), fwrite( File3,bCiniFiles ), fwrite( File3, "\r\n" );
    }
    fclose( File2 ), fclose( File3 );
    return 0;
}
stock NovaLinha( linha[] ) {
    if( linha[ 0 ] == 0 ) {
        return 0;
    }
    if( linha[ strlen ( linha )-1 ] == '\n' || linha[ strlen ( linha )-1 ] == '\r') {
        linha[ strlen ( linha )-1 ] = 0;

        if( linha[0] == 0 ) {
            return 0;
        }
        if( linha[ strlen( linha )-2 ] == '\n' || linha[ strlen( linha)-2 ] == '\r' ) {
            linha[ strlen( linha )-2 ] = 0;
        }
    }
    return 1;
}

stock dini_Set(filename[],key[],value[]) {
    // If we have no key, it can't be set
    // we also have no chance to set the value, if all together is bigger then the max string
    new key_length = strlen(key);
    new value_length = strlen(value);
    if (key_length==0 || key_length+value_length+2>DINI_MAX_STRING) return false;
    
    new File:fohnd, File:fwhnd;
    new tmpres[DINI_MAX_STRING];
    new bool:wasset=false;
    
    // Let's remove the old *.part file if there was one.
    format(tmpres,sizeof(tmpres),"%s.part",filename);
    fremove(tmpres);
    
    // We'll open the source file.
    fohnd=fopen(filename,io_read);
    if (!fohnd) return false;
    
    fwhnd=fopen(tmpres,io_write);
    if (!fwhnd) {
        // we can't open the second file for writing, so .. let's close the open one and exit.
        fclose(fohnd);
        return false;
    }
    
    while (fread(fohnd,tmpres)) {
        if (
            !wasset
            && tmpres[key_length]=='='
            && !strcmp(tmpres, key, true, key_length)   
        ) {
                // We've got what needs to be replaced!
                format(tmpres,sizeof(tmpres),"%s=%s",key,value);
                wasset=true;
        } else {
            DINI_StripNewLine(tmpres);
        }
        fwrite(fwhnd,tmpres);
        fwrite(fwhnd,"\r\n");
    }

    if (!wasset) {
        format(tmpres,sizeof(tmpres),"%s=%s",key,value);
        fwrite(fwhnd,tmpres);
        fwrite(fwhnd,"\r\n");
    }

    fclose(fohnd);
    fclose(fwhnd);

    format(tmpres,sizeof(tmpres),"%s.part",filename);
    if (DINI_fcopytextfile(tmpres,filename)) {
        return fremove(tmpres);
    }
    return false;
}