include/Smarty/internals/core.create_dir_structure.php

   1 <?php
   2
   3 /*
   4
   5 Modification information for LGPL compliance
   6
   7 r56990 - 2010-06-16 13:05:36 -0700 (Wed, 16 Jun 2010) - kjing - snapshot "Mango" svn branch to a new one for GitHub sync
   8
   9 r56989 - 2010-06-16 13:01:33 -0700 (Wed, 16 Jun 2010) - kjing - defunt "Mango" svn dev branch before github cutover
  10
  11 r55980 - 2010-04-19 13:31:28 -0700 (Mon, 19 Apr 2010) - kjing - create Mango (6.1) based on windex
  12
  13 r51719 - 2009-10-22 10:18:00 -0700 (Thu, 22 Oct 2009) - mitani - Converted to Build 3  tags and updated the build system
  14
  15 r51634 - 2009-10-19 13:32:22 -0700 (Mon, 19 Oct 2009) - mitani - Windex is the branch for Sugar Sales 1.0 development
  16
  17 r50375 - 2009-08-24 18:07:43 -0700 (Mon, 24 Aug 2009) - dwong - branch kobe2 from tokyo r50372
  18
  19 r42807 - 2008-12-29 11:16:59 -0800 (Mon, 29 Dec 2008) - dwong - Branch from trunk/sugarcrm r42806 to branches/tokyo/sugarcrm
  20
  21 r10971 - 2006-01-12 14:58:30 -0800 (Thu, 12 Jan 2006) - chris - Bug 4128: updating Smarty templates to 2.6.11, a version supposedly that plays better with PHP 5.1
  22
  23 r8230 - 2005-10-03 17:47:19 -0700 (Mon, 03 Oct 2005) - majed - Added Sugar_Smarty to the code tree.
  24
  25
  26 */
  27
  28
  29 /**
  30  * Smarty plugin
  31  * @package Smarty
  32  * @subpackage plugins
  33  */
  34
  35 /**
  36  * create full directory structure
  37  *
  38  * @param string $dir
  39  */
  40
  41 // $dir
  42
  43 function smarty_core_create_dir_structure($params, &$smarty)
  44 {
  45     if (!file_exists($params['dir'])) {
  46         $_open_basedir_ini = ini_get('open_basedir');
  47
  48         if (DIRECTORY_SEPARATOR=='/') {
  49             /* unix-style paths */
  50             $_dir = $params['dir'];
  51             $_dir_parts = preg_split('!/+!', $_dir, -1, PREG_SPLIT_NO_EMPTY);
  52             $_new_dir = (substr($_dir, 0, 1)=='/') ? '/' : getcwd().'/';
  53             if($_use_open_basedir = !empty($_open_basedir_ini)) {
  54                 $_open_basedirs = explode(':', $_open_basedir_ini);
  55             }
  56
  57         } else {
  58             /* other-style paths */
  59             $_dir = str_replace('\\','/', $params['dir']);
  60             $_dir_parts = preg_split('!/+!', $_dir, -1, PREG_SPLIT_NO_EMPTY);
  61             if (preg_match('!^((//)|([a-zA-Z]:/))!', $_dir, $_root_dir)) {
  62                 /* leading "//" for network volume, or "[letter]:/" for full path */
  63                 $_new_dir = $_root_dir[1];
  64                 /* remove drive-letter from _dir_parts */
  65                 if (isset($_root_dir[3])) array_shift($_dir_parts);
  66
  67             } else {
  68                 $_new_dir = str_replace('\\', '/', getcwd()).'/';
  69
  70             }
  71
  72             if($_use_open_basedir = !empty($_open_basedir_ini)) {
  73                 $_open_basedirs = explode(';', str_replace('\\', '/', $_open_basedir_ini));
  74             }
  75
  76         }
  77
  78         /* all paths use "/" only from here */
  79         foreach ($_dir_parts as $_dir_part) {
  80             $_new_dir .= $_dir_part;
  81
  82             if ($_use_open_basedir) {
  83                 // do not attempt to test or make directories outside of open_basedir
  84                 $_make_new_dir = false;
  85                 foreach ($_open_basedirs as $_open_basedir) {
  86                     if (substr($_new_dir, 0, strlen($_open_basedir)) == $_open_basedir) {
  87                         $_make_new_dir = true;
  88                         break;
  89                     }
  90                 }
  91             } else {
  92                 $_make_new_dir = true;
  93             }
  94
  95             if ($_make_new_dir && !file_exists($_new_dir) && !@mkdir($_new_dir, $smarty->_dir_perms) && !is_dir($_new_dir)) {
  96                 $smarty->trigger_error("problem creating directory '" . $_new_dir . "'");
  97                 return false;
  98             }
  99             $_new_dir .= '/';
 100         }
 101     }
 102 }
 103
 104 /* vim: set expandtab: */
 105
 106 ?>