Initial commit.
This commit is contained in:
28
lib/php/monica/mkdtemp.inc.php
Normal file
28
lib/php/monica/mkdtemp.inc.php
Normal file
@@ -0,0 +1,28 @@
|
||||
<?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;
|
||||
}
|
||||
|
||||
?>
|
||||
Reference in New Issue
Block a user