<?php
error_reporting(- 1 );
ini_set("display_errors", true);
$input = "config.txt";
$output_right = array(
    "id" => "www",
    "session" => array(
        "timeout" => "120",
        "server" => array(
             0  => array(
                "host" => "127.0.0.1",
                "port" => "1111",
                "id" => "session1"
            ),
             1  => array(
                "host" => "127.0.0.1",
                "port" => "1111",
                "id" => "session2"
            )
        )
    ),
    "image" => array(
        "width" => "640",
        "height" => "480",
        "watermark" => array(
            "small" => "wsmall.png",
            "normal" => "wnormal.png"
        )
    )
);

$implementations["an0nym"] = function ($filename) {
    $result = array();
    foreach (file($filename, FILE_IGNORE_NEW_LINES | FILE_SKIP_EMPTY_LINES) as $line) {
        $route_value = explode("=", $line);
        $last = strtok($route_value[ 0 ], ".");
        $reference = &$result[$last];
        while (($last = strtok(".")) !== false)
            $reference = &$reference[$last];
        $reference = $route_value[ 1 ];
    }
    return $result;
};

$implementations["Ackrite@habr"] = function ($filename) {
    $str = file($filename);
    $result = array();
    foreach ($str as $line) {
        $line = trim($line);
        if ($line == '') {
            continue;
        }
        list($k, $v) = explode("=", $line,  2 ) + array("", "");
        $k = explode('.', $k);
        $cc = &$result;
        for ($i =  0 ; $i < count($k); $i++) {
            if (!isset($c[$k[$i]]))
                $c[$k[$i]] =  0 ;
            $cc = &$cc[$k[$i]];
        }
        $cc = $v;
        unset($cc);
    }
    return $result;
};

function array_merge_recursive_distinct() {
    $arrays = func_get_args();
    $base = array_shift($arrays);
    if (!is_array($base))
        $base = empty($base) ? array() : array($base);
    foreach ($arrays as $append) {
        if (!is_array($append))
            $append = array($append);
        foreach ($append as $key => $value) {
            if (!array_key_exists($key, $base) and !is_numeric($key)) {
                $base[$key] = $append[$key];
                continue;
            }
            if (is_array($value) or is_array($base[$key])) {
                $base[$key] = array_merge_recursive_distinct(isset($base[$key]) ? $base[$key] : null, $append[$key]);
            } else if (is_numeric($key)) {
                if (!in_array($value, $base))
                    $base[] = $value;
            } else {
                $base[$key] = $value;
            }
        }
    }
    return $base;
}
$implementations["Ference@habr"] = function ($path) {
    $output = array();
    $file = fopen($path, 'r');
    while ($row = fgets($file)) {
        $row = rtrim($row, "\n");
        list($key, $value) = explode('=', $row);
        $path = explode('.', $key);
        $path = array_reverse($path);
        $tmp = $value;
        foreach ($path as $v) {
            $tmp = array($v => $tmp);
        }
        $output = array_merge_recursive_distinct($output, $tmp);
    }
    fclose($file);
    return $output;
};

function parseline($conf, $line) {
    list($key, $val) = explode('=', $line,  2 );
    $keypath = explode('.', $key);
    $cconf = &$conf;
    foreach ($keypath as $k)
        $cconf = &$cconf[$k];
    $cconf = $val;
}
$implementations["0lympian@habr"] = function ($filename) {
    $conf = array();
    $configtext = file_get_contents($filename);
    foreach (explode("\n", $configtext) as $l) {
        $l = trim($l);
        if ($l)
            parseline(&$conf, $l);
    }
    return $conf;
};

$implementations["iSage@habr"] = function ($fname) {
    $data = file($fname, FILE_IGNORE_NEW_LINES);
    $conf = array();
    foreach ($data as $line) {
        $value = explode('=', $line,  2 );
        $name = $value[ 0 ];
        $value = $value[ 1 ];
        $path = array_reverse(explode('.', $name));
        $end = $value;
        foreach ($path as $path_part) {
            $tmp = array();
            $tmp[$path_part] = $end;
            $end = $tmp;
        }
        $conf = array_merge_recursive($end, $conf);
    }
    return $conf;
};

function addToDictionary(&$array, $keyArray, $value) {
    if (count($keyArray) >  1 ) {
        /*if (!isset($array[$keyArray[0]])) {
            $array[$keyArray[0]] = array();
        }*/
        $partOfKey = array_shift($keyArray);
        addToDictionary($array[$partOfKey], $keyArray, $value);
    } else {
        $array[$keyArray[ 0 ]] = $value;
    }
}
$implementations["MaxHero@habr"] = function ($filename) {
    $result = array();
    $fp = fopen($filename, "r");
    while (!feof($fp)) {
        $line = fgets($fp); //Считываем новую строку конфига
        $line = rtrim($line, "\n");
        if ($line) {
            $keyValueArray = explode("=", $line); //Отделяем ключ от значения
            $keyArray = explode(".", $keyValueArray[ 0 ]); //Отделяем части ключа
            addToDictionary($result, $keyArray, $keyValueArray[ 1 ]); //Добавляем в массив
        }
    }
    fclose($fp);
    return $result;
};

$implementations["yadeveloper@habr"] = function ($filename) {
    foreach (parse_ini_file($filename) as $key => $value) {
        $key = vsprintf('$result["%s"] = "%s";', array(str_replace('.', '"]["', $key), $value,));
        eval($key);
    }
    return $result;
};

$implementations["alexxz@habr"] = function ($f) {
    $lines = file($f);
    $result = array();
    foreach ($lines as $line) {
        $line = trim($line);
        $eqpos = strpos($line, '=');
        if ($eqpos === false || $eqpos ===  0 )
            continue;
        list($key, $value) = explode('=', $line);
        $key = trim($key);
        $value = trim($value);
        $parts = explode('.', $key);
        $iterator = &$result;
        foreach ($parts as $part) {
            if (!isset($iterator[$part])) {
                $iterator[$part] = array();
            }
            $iterator = &$iterator[$part];
        }
        $iterator = $value;
    }
    return $result;
};

$implementations["panandy@habr"] = function ($filename) {
    $lines = file($filename, FILE_IGNORE_NEW_LINES);
    $result = array();
    foreach ($lines as $line) {
        $parts = explode('=', $line,  2 );
        $path = explode('.', $parts[ 0 ]);
        $r = &$result;
        foreach ($path as $q) {
            $r = &$r[$q];
        }
        $r = $parts[ 1 ];
    }
    return $result;
};

$implementations["bogus92@habr"] = function ($fn) {
    $file = file($fn);
    $config = array();
    foreach ($file as $line) {
        $line = explode("=", $line);
        $key = $line[ 0 ];
        unset($line[ 0 ]);
        $value = trim(implode("=", $line));
        $key = explode(".", $key);
        $str = '$config';
        foreach ($key as $l) {
            $str .= "['$l']";
        }
        $str .= " = '$value';";
        eval($str);
    }
    return $config;
};

$implementations["Zayaz@habr"] = function ($file_name) {
    parse_str(implode("&", array_map(function($line) {
        return preg_replace('/\.([^\.=]+)/i', '[\\1]', substr($line,  0 , strpos($line, '='))) . substr($line, strpos($line, '='));
    }, file($file_name, FILE_IGNORE_NEW_LINES))), $data);
    return $data;
};

$implementations["sectronix@habr"] = function ($file_name) {
    return eval(preg_replace_callback('/(.+?)=(.+)/', function($m) {
        return '$r["' . str_replace('.', '"]["', $m[ 1 ]) . '"]="' . $m[ 2 ] . '";';
    }, file_get_contents($file_name)) . 'return $r;');
};

$implementations["Azilot@habr"] = function ($fname) {
    $result = array();
    $fp = fopen($fname, "r");
    while ($line = fgets($fp)) {
        if (trim($line) == '')
            continue;
        list($keys, $value) = explode("=", trim($line));
        $akeys = explode(".", $keys);
        $temp = $value;
        for ($i = count($akeys) -  1 ; $i >=  0 ; $i--)
            $temp = array($akeys[$i] => $temp);
        $result = array_merge_recursive($result, $temp);
    }
    return $result;
};

$implementations["mcdb@habr"] = function ($confFile) {
    $content = file($confFile, FILE_SKIP_EMPTY_LINES | FILE_IGNORE_NEW_LINES);
    array_walk($content, function(&$item) {
        $item = sprintf("\$ar['%s'] = '%s';" . PHP_EOL, str_replace('.', "']['", substr($item,  0 , $pos = strpos($item, '='))), substr($item, $pos +  1 ));
    });
    $content = implode(null, $content);
    $fnc = create_function(null, "{$content}; return \$ar;");
    return $fnc ();
};

$implementations["mcdb@habr:2"] = function ($confFile) {
    eval('$f = function () {' . PHP_EOL . implode(null, array_map(function(&$x) {
        return sprintf("\$ar['%s'] = '%s';" . PHP_EOL, str_replace('.', "']['", substr($x,  0 , $o = strpos($x, '='))), substr($x, $o +  1 ));
    }, file($confFile, FILE_SKIP_EMPTY_LINES | FILE_IGNORE_NEW_LINES))) . 'return $ar;' . PHP_EOL . "};");
    return $f();
};

$implementations["tzlom@habr"] = function ($filename) {
    $data = file_get_contents($filename);
    $rows = explode("\n", $data);
    $dict = array();
    foreach ($rows as $row) {
        if ($row == '')
            continue;
        list($key, $value) = explode('=', $row,  2 );
        $key = explode('.', $key);
        $addTo = &$dict;
        while (count($key) >  1 ) {
            $addTo = &$addTo[array_shift($key)];
        }
        $addTo[$key[ 0 ]] = $value;
    }
    return $dict;
};

$implementations["nik1550@habr"] = function ($filename) {
    $config = file_get_contents($filename);
    $config_array = explode("\n", $config);
    sort($config_array);
    $result = array();
    foreach ($config_array as $config_item) {
        if ($config_item != NULL) {
            $value = substr($config_item, strpos($config_item, "=") +  1 , strlen($config_item));
            $key = substr($config_item,  0 , strpos($config_item, "="));
            $key_arr = explode(".", $key);
            $tmp = &$result;
            for ($i =  0 ; $i < count($key_arr); $i++) {
                if (!isset($tmp[$key_arr[$i]]))
                    $tmp[$key_arr[$i]] = "";
                $tmp = &$tmp[$key_arr[$i]];
            }
            $tmp = $value;
        }
    }
    return $result;
};

$implementations["BVadim@habr"] = function ($file) {
    $lines = file($file);
    $result = array();
    foreach ($lines as &$line) {
        $line = trim($line);
        if (empty($line))
            continue;
        $lineParts = explode("=", $line);
        $path = explode(".", $lineParts[ 0 ]);
        $current = &$result;
        $pathSize = sizeof($path) -  1 ;
        for ($i =  0 ; $i <= $pathSize; $i++) {
            if ($i == $pathSize) {
                $current[$path[$i]] = $lineParts[ 1 ];
            } else {
                if (!isset($current[$path[$i]]))
                    $current[$path[$i]] = array();
                $current = &$current[$path[$i]];
            }
        }
        unset($current);
    }
    return $result;
};

$implementations["Edd.Dragon"] = function ($file_name) {
    $matches = null;
    if (($size = preg_match_all('/^([^=]+)=(.*)$/m', file_get_contents($file_name), $matches)) === false)
        return array();
    $result = array();
    $var = null;
    for ($i =  0 ; $i < $size; ++$i) {
        eval('$var = &$result[\'' . preg_replace('/\./', '\'][\'', $matches[1][$i]) . '\'];');
        $var = $matches[ 2 ][$i];
    }
    return $result;
};

$implementations["Edd.Dragon:2"] = function ($file_name) {
    $matches = null;
    if (($size = preg_match_all('/^([^=]+)=(.*)$/m', file_get_contents($file_name), $matches)) === false)
        return array();
    $result = array();
    for ($i =  0 ; $i < $size; ++$i) {
        $path = explode('.', $matches[ 1 ][$i]);
        $r = &$result;
        foreach ($path as $key) {
            $r = &$r[$key];
        }
        $r = $matches[ 2 ][$i];
    }
    return $result;
};

foreach ($implementations as $implementator => $implementation) {
    $output = $implementation($input);
    if ($output == $output_right) {
        list($memory_peak_real_before, $memory_peak_before, $memory_real_before, $memory_before)
            = array(memory_get_peak_usage(true), memory_get_peak_usage(), memory_get_usage(true), memory_get_usage());
        $start = microtime(true);
        for ($i =  0 , $n = $argv[ 1 ]; $i < $n; ++$i)
            $output = $implementation($input);
        $end = microtime(true);
        list($memory_peak_real_after, $memory_peak_after, $memory_real_after, $memory_after)
            = array(memory_get_peak_usage(true), memory_get_peak_usage(), memory_get_usage(true), memory_get_usage());

        echo $implementator, "'s implementation returns right result: ",
            $memory_peak_real_after - $memory_peak_real_before, " ",
            $memory_peak_after - $memory_peak_before, " ",
            $memory_real_after - $memory_real_before, " ",
            $memory_after - $memory_before, " ",
            round($end - $start, 2), "\r\n";
    } else
        echo $implementator, "'s implementation does not return right result\r\n";
}