<?php
// File name:	mkdtemp.inc.php
// Description:	PHP subroutine to create a temporarily working directory
// Date:	2002-04-16
// Author:	imacat <imacat@pristine.com.tw>
// Copyright:	Copyright (C) 2002-2007 Pristine Communications

// mkdtemp: create a temporarily working directory
function mkdtemp()
{
    // Find out our context
    $trace = debug_backtrace();
    $func = (count($trace) > 1? $trace[1]["function"]: "_GLOBAL");
    $file = preg_replace("/\..*$/", "", basename($trace[0]["file"]));
    $pkg = (defined("PACKAGE")? PACKAGE: "unknown");
    $prefix = sprintf("monica-%s-%s-%s-", $pkg, $file, $func);
    $dir = session_save_path();
    if ($dir == "") {
        $dir = "/tmp";
    }
    $result = tempnam($dir, $prefix);
    unlink($result);
    mkdir($result);
    chmod($result, 0700);
    return $result;
}

?>