DocMaint.prg

<?php
$monLibrary= dirname(__FILE__) . "/../library";
require_once("$monLibrary/cu_top.i");
require_once("$monLibrary/ck_hticket.i");

  if (!CheckPerm($link, $Hu, basename($_SERVER['SCRIPT_NAME']), $_SERVER['REMOTE_ADDR'])) {
    // ** Permissions failed
    // ** redirect to new page
    header("Location: /hcuadm/hcu_noperm.prg");
    exit;
  }

$dms_ok=array('action'=>'string','MAX_FILE_SIZE'=>'string','csub'=>'string',
'upload_file'=>'string','Upload'=>'string','delete'=>'array',
'DFiles'=>'string','mdir'=>'string','newfolder'=>'string',
'ndir'=>'string','cpath'=>'string','view'=>'string','efile'=>'string','cdir'=>'string',
'script_doc'=>'string', 'act'=>'string');
dms_import($dms_ok);

  $msg = "";

$top_upload = false;                                    // Allow file upload for the top directory
$top_dir="/home/httpd/homecu/monitor/hcudocs";          // Top Most Directory
$HCUDocs_MaxPreviousVersion = 5;

// Create two arrays - for files and directories
// these are the viewable files in the top directory
$allowed_dir = array();
$allowed_files = array();
$allowed_subs=array();

// Settings for Subdirectory Control
$allow_subdir = true;                       // This will control if the user may make subdirectories under the main directories (ie. board employees)
$max_subdir = 50;                               // This is the maximum number of directories allowed in any one directory
$allow_multi_subdir = true;     // This is intended to control creation of subdirectories 2 directories and further below hcudocs

// Setup the directories allowed
// Add any directories here to include in the html list if they exist
$allowed_dir[] = "HomeCU";
$allowed_subs[]="";
$allowed_dir[] = "Core_Vendors";
$allowed_subs[]="select trim(vendor) from cuvendors order by vendor;";
$allowed_dir[] = "Image_Vendors";
$allowed_subs[]="select trim(img) from cuimagevendors order by img;";
$allowed_dir[] = "SSO_Partners";
$allowed_subs[]="select trim(ssovendor) from cussovendors order by ssovendor;";

if ((isset($ndir) == true && strlen($ndir) > 0) ) {
    if ($ndir == "..") {
        // Move up the directory -- Need to remove the last directory from the csub piece, this will also be the ndir variable
        if (strpos(strrev($csub), "/") !== false) {
            $cdir = substr($csub, 0, strlen($csub) - strpos(strrev($csub), "/") - 1);
            $cpath = $top_dir . ($cdir == '' ? "" : "/$cdir");
            $csub = substr($cpath, strpos($cpath,$top_dir) + 1 + strlen($top_dir));
        } else {
            $cdir = '';
            $csub = '';
            $cpath = $top_dir;
        }
    } else {
        $cdir = $ndir;
        $cpath = $top_dir . ($csub == '' ? "" : "/$csub") . "/$ndir";
        $csub = substr($cpath, strpos($cpath,$top_dir) + 1 + strlen($top_dir));
    }
} elseif (isset($csub) == true) {
    $cpath = $top_dir . ($csub == '' ? "" : "/$csub");
    if (strpos($csub,"/")) {
        $cdir = substr(strrchr($csub, "/"), 1);
    } else {
        $cdir=$csub;
    }
    #$msg="csub $csub : cpath $cpath : cdir $cdir";
} else {
// Place code here so if any of these variable are NOT set, then we start over on the rotation
    $cdir = "";
    $csub = "";
    $cpath = $top_dir;
}
if (!is_dir($cpath)) {
    $msg="Requested subdirectory $ndir not found.  Starting at the top!";
    $cdir = "";
    $csub = "";
    $cpath = $top_dir;
}


// Create the direcotry name that is on top of the top_dir
// So if the current directory is /home/xyz/public_html/employees/sample
// This should return employees/sample
if (strpos($cpath, $top_dir) !== false) {
    $dir_pos = strpos($cpath, $top_dir);
    $cspath = substr($cpath, $dir_pos + 1 + strlen($top_dir));              // This should be the just the path information past the top_dir
} else {
    $cspath = '';
}

//echo "cspath-$cspath<br>";


$self=$_SERVER['PHP_SELF'];

$action = (empty($action) ? "none" : $action);
$action = strtolower($action);

switch ($action) {
    case "view":
        view_form();
        break;
        case "upload":
                // Post all information on the form, then reload the print_status screen
                post_form();
                print_status();
                break;
        case "createsub":
                $msg = "";
                create_subdir();
                print_status();
                break;
        case "create":
                $msg = "";
                create_dir();
                print_status();
                break;
        case "edit":
                edit_form();
                break;
        case "restore":
                restore_file();
                print_status();
                break;
        case "saveedit":
                save_form();
                                print_status();
                break;
                            default:
        print_status();
        break;
    }


//echo "<table><tr><td><hr><br>";
//while (list ($key, $val) = each ($GLOBALS)) { echo ("Element $key equals $val<br>\n");  }
//echo "</td></tr></table>";
//exit;

/* ------------------------------------- */
    function create_dir() {
        global $msg, $mdir, $top_dir, $cpath, $csub, $cdir, $allowed_dir;

        $dir_to_create = "";
        // This will attempt to create the directory in the credit unions public_html directory
        $path_to_dir = "";

        $dir_to_create = trim($mdir);
        if (strlen($dir_to_create) == 0) {
            $msg = "Problem creating the directory.  Please select again.";
        } else {
            if (in_array($mdir, $allowed_dir)) {
                $path_to_dir = $top_dir . "/" . $dir_to_create;
            } else {
                $cdir = basename(rtrim($cpath, '/'));
                $path_to_dir = $cpath . "/" . $dir_to_create;
            }
            // Now look to see if the directory is created
            if (is_dir($path_to_dir)) {
                $msg = "The directory already exists.  It was not created.";
            } else {
                // here is where I try to create the directory
                if (@mkdir($path_to_dir, 0755) === false) {
                    // Problem creating the directory, it failed
                    $msg = "Unknown error creating the directory ($path_to_dir). ";
                } else {
                    // Operation a success -- tell the user
                    $msg = "SUCCESS -- a new folder named $dir_to_create was created.";
                }
            }
        }
    }

/* ------------------------------------- */
    function create_subdir() {
        global $msg, $allowed_dir, $top_dir, $allow_subdir, $allow_multi_subdir, $max_subdir, $csub, $newfolder, $cdir;

        // Values from url --
        // csub -- Current subdirectory the user was in, before trying to create a new folder
        // newfolder -- the name of the new folder the credit union wants to make

        // First start with the most basic of tests
        // 1. Are we allowing creation of subdirectories
        $cdir = basename(rtrim(($top_dir . ($csub == '' ? "" : "/$csub")),'/'));
        if ($allow_subdir == true) {
            $dir_to_create = "";
            // This will attempt to create the directory in the credit unions public_html directory
            $mdir = intval($mdir);
            $path_to_dir = "";

            // need to make sure csub and newfolder do not contain any weird characters
            $newfolder = preg_replace("/\W/", "", $newfolder);

            $dir_to_create = trim($csub) . "/" . $newfolder;
            if (strlen($dir_to_create) == 0) {
                $msg = "Problem creating the directory.  Please select again.";
            } else {
                // Okay so we are here --
                // Now need to be sure they are not creating a multi-subdirectory
                if ($allow_multi_subdir == true || ((array_search($csub, $allowed_dir) !== false))) {
                    // We are getting closer, but NOW we must be sure they have not
                    // exceeded the maximum number of subdirectories allowed

                    $dirpath = $top_dir . "/" . $csub;
                    $dirlist = array();

                    if ($fhandle = @opendir($dirpath)) {
                        while (false !== ($file = readdir($fhandle))) {
                            if (($file != ".") && ($file != "..") && (substr($file, 0, 1) != ".")) {
                                // Don't inlcude the current directory information
                                // Now check to see if this is a directory or file
                                if (is_dir($dirpath . "/" . $file)) {
                                    // Only add directory names
                                    $dirlist[count($dirlist)] = $file;
                                }
                            }
                        }
                    }

                    $dirlist_count = count($dirlist);

                    if ($dirlist_count < $max_subdir) {
                        $path_to_dir = $top_dir . "/" . $dir_to_create;
                        // Now look to see if the directory is created
                        if (is_dir($path_to_dir)) {
                            $msg = "The directory already exists.  It can not be created.";
                        } else {
                            // here is where I try to create the directory
                            if (@mkdir($path_to_dir, 0755) === false) {
                                // Problem creating the directory, it failed
                                $msg = "Unknown error creating the directory.  <br>
                                You may need to contact HomeCU for additional help .";
                            } else {
                                // Operation a success -- tell the user
                                $msg = "SUCCESS -- a new folder named $dir_to_create was created.";
                            }
                        }
                    } else {
                        // There are too many sub directories already, don't allow any more
                        $msg = "Maximum number of folders has been reached.  You will need to remove a folder before adding additional.";
                    }
                } else {
                    // We are NOT allowed subdirectories under subdirectories
                    $msg = "Unable to create the new folder.  Custom folders are only allowed in the top most folder.";
                }
            }
        } else {
            // We are not allowing creation of subdirectories
            // Possibly report that here
            $msg = "Creating subdirectories is NOT allowed.";
        }
    }
/* ------------------------------------- */
    function print_help($all=false) {
        // This will print the show_help function for javascript
        // if all == false, it will only print the function
        // if all == true, it will also print the javascript tags
        if ($all == true) {
            print ("<script language=\"javascript\">\n
                                <!--");
        }
        // Here print the show_help function
        print ("
            function show_help(marker) {
                var helpwin = null;
                var wind_options = \"\";
                wind_options = \"toolbar=1,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=0,width=500,height=340\";
                helpwin=window.open(\"DocHelp.html#\" + marker,\"_Help\", wind_options);
                helpwin.focus();
            }
        ");

        if ($all == true) {
            print ("    // -->\n
                            </script>");
        }
    }

/* ------------------------------------- */
    function img_help($mrk) {
        return "<a href=\"javascript:show_help('$mrk');\"><img src=\"/monitor/images/q1.gif\" border=0 alt=\"View Help\" valign=\"top\"></a>";
    }

/* ------------------------------------- */
    function print_status() {
        global $msg, $dir, $self, $cdir, $cpath, $top_dir, $cspath, $csub, $allowed_dir, $allowed_subs, $allowed_files, $allow_subdir, $allow_multi_subdir, $max_subdir, $HCUDocs_MaxPreviousVersion, $view;

        header("Expires: Sat 20 May 1995 03:32:38 GMT");
        header("Pragma: no-cache");
        header("Cache-Control: no-cache, must-revalidate");

        global $link;

        // ** Setup ViewAll -- if view is ALL then true, else false
        $viewAll = ($view == 'ALL' ? true : false);

    ?>
<?php
    print "<html><head><title>HCU_Docs</title>
  <LINK REL=stylesheet HREF='/monitor/css/monitor.css' TYPE='text/css'>
    </head>
  <body>";
?>
<script type="text/javascript"  language="javascript">
    <!--
    <?php print_help(); ?>

        function check_delete() {
            var idx = 0;
            var pt_del = false;

            // Need to check to see if any options are marked as deleted, if so then we need to
            // confirm before deleting
            if (document.forms[0].elements['delete[]'][idx] == null) {
                // The value is NOT an array -- so check for the existence of only one element
                if (document.forms[0].elements['delete[]'] != null) {
                    if (document.forms[0].elements['delete[]'].checked == true) {
                        pt_del = true;
                    }
                }
            } else {
                while (document.forms[0].elements['delete[]'][idx]) {
                    if (document.forms[0].elements['delete[]'][idx].checked == true)
                        pt_del = true;
                    idx++;
                }
            }
            if (pt_del == true) {
                if (confirm('Are you sure you want to delete the selected files or folders?'))
                    return true;
                else
                    return false;
            } else {
                return true;
            }
        }
        function check_upload() {
            var lastSlash // the position of the last slash in the path
            var fileName  // the name of the file
            var directory // The directory
            var fullPath = '';
            var idx = 0;
            var pt_ov = false;

            fullPath = document.forms[0].elements['upload_file'].value;
            lastSlash = fullPath.lastIndexOf("\\")
            fileName = fullPath.substring(lastSlash+1,fullPath.length)

            fileName = fileName.replace(/[ ;]{1}/g, "_");
            // Now if filename is != ''
            if (fileName == '') {
                return false;
            } else {
                if (document.forms[0].elements['delete[]']) {
                    while (document.forms[0].elements['delete[]'][idx]) {
                        if (document.forms[0].elements['delete[]'][idx].value == fileName)
                            pt_ov = true;
                        idx++;
                    }
                }

                if (pt_ov == true) {
                    if (confirm('You are about to overwrite the file "' + fileName + '".  Is this what you want to do.')) {
                        //document.forms[0].elements['ndir'].value = "<?php echo $cdir; ?>";
                        return true;
                    } else
                        return false;
                }
            }
        }
        function confirm_dir(sdir) {
            // This function will be used to confirm if they
            // want to create the desired directory
            var msg = "This will create the private directory '" + sdir + "'.  Are you sure you want to continue?";
            return confirm(msg);
        }
        function dir_create(sdir,csub) {

            // Send this form to itself
            // Along with the action and mdir to create
            var url = "";

            url = "<?php echo $self; ?>?action=create&csub=" + csub + "&mdir=" + sdir;
            document.location = url;
        }
        function new_folder(cur_sub) {
            var foldername = "";
            var url = "";
            foldername = window.prompt("Please enter a name for the new directory", "Folder1");

            if (foldername != null) {
                // I want to strip out ALL non alpha-numeric characters that may have been entered
                foldername = foldername.replace(/\W/g, "");
                if (foldername.length > 30) {
                    window.alert ("The new folder name is NOT allowed to be more than 30 characters.  Please enter a shorter name.");
                } else {
                    url = "<?php echo $self;?>?action=createsub&csub=" + escape(cur_sub) + "&newfolder=" + foldername;
                    document.location = url;
                }
            }
        }
        // -->
    </script>
    <form method="post" action="<?php echo $self ?>" enctype="multipart/form-data" >
        <input type="hidden" name="action" value="upload">
        <input type="hidden" name="MAX_FILE_SIZE" value="15000000">
        <input type="hidden" name="csub" value="<?php echo $cspath; ?>">
        <input type="hidden" name="cdir" value="<?php echo $cdir; ?>">
        <input type="hidden" name="cpath" value="<?php echo $cpath; ?>">
        <br><div align=center><table width=95% border=0 cellspacing=0 cellpadding=4>
        <tr><td colspan=4 class="bar" align=center>HomeCU Documents</td></tr>
        <tr>
            <td class="hdrl">&nbsp;</td>
            <td class="hdrl"><a href="<?php echo $infourl; ?>/hcuadm/cuilist" target="_parent">Credit Union List</a></td>
            <td colspan=2 class="hdrl"><?php echo ($cspath == "" ? "&nbsp;" : "Folder: &nbsp; $cspath"); ?></td>
</tr>
        <?php if (!(($top_dir == $cpath) && ($top_upload == false))): ?>
            <tr>
                <td colspan="4" class="dtl" align="center">
                Choose a File:
                <input  type="file" name="upload_file"  size=30><?php echo img_help("choose"); ?>
                &nbsp;&nbsp;&nbsp;<input type="submit" name="Upload" value="Upload File" onclick="return check_upload();">
                <?php echo img_help("upload"); ?>
                </td>
            </tr>
        <?php endif; ?>
        <?php if ($msg != ""): ?>
            <tr>
                <td class="msg" colspan=1 align=right><img alt="black" src='/monitor/images/alert.black.gif'></td>
                <td class="msg" colspan=3><?php echo $msg ?></td>
            </tr>
        <?php endif; ?>

        <?php
            // Print out the files in this directory
            // Also print the parent directory and any sub-directories
//echo "<br>READ DIRECTORY$cpath<br>";

            $dirlist = array();
            $filelist = array();
            if ($fhandle = @opendir($cpath)) {
                while (false !== ($file = readdir($fhandle))) {
                    if (($file == "..") ) {
                        // This is the parent directory
                        // Make sure we will let them see this, it must not meet the top most directory
                        // Only let them go as High as top_dir
                        // Only include if the top_dir is located in the current path
                        //echo "cp-$cpath<br>td-$top_dir<br>cd-$cdir<br>strpos-" . strpos($cpath, $top_dir) . "<br>";
                        // also do NOT show the parent if the current directory is the same as the top directory
                        if ((strpos($cpath, $top_dir) !== false) && ($cpath != $top_dir)) {
                        //if ($cpath != ($top_dir . "/" . $cdir)) {
                            $dirlist[count($dirlist)] = $file;
                            // ONLY include IF the current directory and topmost path do NOT equal the current path
                            // This is an attempt to NOT allow directory viewing further up the tree then allowed
                        }
                    } elseif (($cpath == $top_dir)) {
                        // If the current path equals the top directory then ONLY show the
                        if (is_file($cpath . "/" . $file)) {
                            // Now check to see if the file is a viewable file
                            if (in_array($file, $allowed_files))
                                $filelist[count($filelist)] = $file;
                        } else {
                            // Check to see if the directory is viewable
                            if (in_array($file, $allowed_dir))
                                $dirlist[count($dirlist)] = $file;
                        }
                        // WHile I don't want to SHOW any hidden files, I do need to load them into the array here, I will be excluding them
                            // from showing in the next loop
                        // Don't show any hidden files, which start with a "." (unless viewAll is true)
                //  elseif (($file != ".") && ($file != "..") && (substr($file, 0, 1) != "."))
                    } elseif ((($file != ".") || $viewAll) && ($file != "..") ) {
                        // Don't inlcude the current directory information
                        // Now check to see if this is a directory or file
                        if (is_file($cpath . "/" . $file)) {
                            $filelist[count($filelist)] = $file;
                                                } else {
                            if (substr($file, 0, 1) != ".") {
                                                                $dirlist[count($dirlist)] = $file;
                            }
                                                }
                    }
                }
            } else {
                //echo "Unable to Open";
            }
        ?>

        <?php
            // If this is the top directory then print the "Active Directories" header
            if ($cpath == $top_dir || in_array($cdir, $allowed_dir)) {
                $help_act = img_help("active");
                print <<< EOF
                    <tr>
                        <td class="hdr">&nbsp;</td>
                        <td class="hdr" colspan="3">
                            Active Directories $help_act
                        </td>
                    </tr>
EOF;
            }
            $dirlist_count = count($dirlist);
            if ($dirlist_count > 0) {
// -- Sort the directories before printing them
                array_multisort ($dirlist, SORT_ASC, SORT_STRING);
                reset($dirlist);
                $help_del = img_help("deletefolder");
                foreach ($dirlist as $shortname) {
                    $ftime=date("m/d/y g:i:s A",filemtime("$cpath/$shortname"));
                    $fenc = urlencode($ftime);

                    if ($shortname == "..") {
                        $dirname = "Parent Folder";
                        $dirgif = "pardir";
                        $helpdir = "&nbsp;" . img_help("parent");
                        $delurl = "";
                    } else {
                        $dirname = $shortname;
                        $dirgif = "folder";
                        $helpdir = "";
                        if ($cpath != $top_dir) {
                            $delurl = "<input type=\"checkbox\" name=\"delete[]\" value=\"$shortname\">Delete $help_del";
                        }
                    }
                    //$dirname = ($shortname == ".." ? "Parent Folder" : $shortname);

                    $new_file_link = "<a href='$self?action=edit&act=NEW&csub=" . urlencode($csub) . "&cdir=" . urlencode($cdir) . "&efile=$viewpath'><img src='/monitor/images/new.gif' border='0' alt='New HTML File'></a>";
                    $all_file_link = "<a href='$self?csub=" . urlencode($csub) . "&cdir=" . urlencode($cdir) . ($view != "ALL" ? "&view=ALL" : "") . "'><img src='/monitor/images/quill.gif' border='0' alt='Show All Files'></a>";
                    print <<<EOF
                    <tr>
                        <td class="dtll">
                            <a href="$self?ndir=$shortname&csub=$cspath">
                            <img src='/monitor/images/{$dirgif}.gif' border='0' alt='Change Folders'></a>
                        </td>
                        <td class="dtll"><a href="$self?ndir=$shortname&csub=$cspath">$dirname</a>$helpdir</td>
                        <td class="dtll" nowrap>$ftime</td>
                        <td class="dtll" colspan="1">
                            $delurl
                            &nbsp;
                        </td>
                    </tr>
EOF;
                    // For the check w/ the max_subdir -- use <= because the parent folder will be included in the dirlist variable
                    if ($allow_subdir == true
                            && (($allow_multi_subdir == true || (array_search($cspath, $allowed_dir) !== false)) && $dirgif == "pardir")
                            && ($dirlist_count <= $max_subdir)) {
                        $helpdir = "&nbsp;" . img_help("newfolder");
                        // For the parent folder print the new folder icon beneath it
                        print <<<EOF
                        <tr>
                            <td class="dtll">
                                <a href="javascript:new_folder('$cspath')">
                                <img src='/monitor/images/folderin.gif' border='0' alt='New Folder'></a>
                            </td>
                            <td class="dtll"><a href="javascript:new_folder('$cspath')">New Folder</a>$helpdir</td>
                            <td class="dtll" nowrap>$ftime</td>
                            <td class="dtll" colspan="1">
                                &nbsp;
                            </td>
                        </tr>
                        <tr>
                            <td class="dtll" colspan="4"><hr></td>
                        </tr>
                        <tr>
                        <td class="dtll" colspan="4">
                            $new_file_link
                        $all_file_link
                    </td>
            </tr>
EOF;
                    }
                }
            }
            $filecount = 0;

      if (count($filelist) > 0) {
                natsort($filelist);
                reset($filelist);
                foreach ($filelist as $shortname) {
                    $filecount++;
                    // ** HERE LIMIT the files being shown, do NOT show a file beginning with a "."

                    if ((substr($shortname, 0, 1) != ".") || $viewAll) {

                        // ** Build a possible list of versions for this file..
                        // * There is always a current
                        $ftime=date("m/d/y g:i:s A",filemtime("$cpath/$shortname"));
                        if ($viewAll) {
                            // ** VIEW ALL -- ONLY SHOW THE FILE version info
                            $file_version_list = "$ftime <input type='hidden' name='file_version_{$filecount}' value='$shortname'>";
                        } else {
                            $file_version_list="<option value='$shortname'>Current - $ftime</option>";
                            for ($idxFileVersion = 1; $idxFileVersion <= $HCUDocs_MaxPreviousVersion; $idxFileVersion++) {
                                $file_version_name = "$cpath/.{$shortname}.{$idxFileVersion}";

                                if (file_exists($file_version_name)) {
                                    $sel_file_val = ".$shortname.$idxFileVersion";
                                    $ftime=date("m/d/y g:i:s A",filemtime($file_version_name));
                                    $file_version_list .= "<option value='{$sel_file_val}'>{$ftime}</option>";
                                }
                            }
                            $file_version_list = "<select name=\"file_version_{$filecount}\" >$file_version_list </select>";
                        }

                        // $ftime=date("m/d/y g:i:s A",filemtime("$cpath/$shortname"));
                        $fenc = urlencode($ftime);
                        $viewpath = urlencode("$shortname");

                        $filepath = ($cspath == "" ? "/$viewpath" : "/$cspath/$viewpath");

                        $help_del = img_help("delete");
                        $help_file = "&nbsp;" . img_help("filelist");


                        $show_edit_link = "";
                        if ((strtolower(substr($shortname, (strrpos($shortname, ".") === false ? strlen($shortname) : strrpos($shortname, ".")))) == ".html") && !$viewAll) {
                            $show_edit_link = "<a href='$self?action=edit&csub=" . urlencode($csub) . "&cdir=" . urlencode($cdir) . "&efile=$viewpath'><img src='/monitor/images/a.gif' border='0' alt='Edit File'></a>";
                        } elseif ($viewAll && substr($shortname, 0,1) == ".") {
                            $show_edit_link = "<a href='$self?action=restore&csub=" . urlencode($csub) . "&cdir=" . urlencode($cdir) . "&efile=$viewpath'><img src='/monitor/images/transfer.gif' border='0' alt='Restore File'></a>";
                        }
                        print <<<EOF
                            <script language="javascript">
                            <!--
                                function Build_File_Link( view_file_idx ) {

                                        // * Build the file from the option that is selected in the drop down.
                                        // * they may really only VIEW the older files, EDIT is always the current
                                    var file_root = "/monitor/hcudocs/$cspath";
                                    var file_path = "";
                                    var sel_object = document.getElementById("file_version_" + view_file_idx);
                                    if (sel_object == null) {
                                        sel_object = document.forms[0].elements['file_version_' + view_file_idx];
                                    }

                                    if (sel_object == null) {
                                        window.alert ('Unable to find the file you selected');

                                    } else {

                                        if (sel_object.type == "hidden") {
                                            var sel_filename = sel_object.value;
                                            var file_url = "";

                                            file_url = "$infourl" + file_root + "/" + sel_filename;
                                        } else {
                                            var sel_idx = sel_object.selectedIndex;
                                            var sel_filename = sel_object.options[sel_idx].value;
                                            var file_url = "";

                                            file_url = "$infourl" + file_root + "/" + sel_filename;

                                        }
                                        // window.alert(file_url);
                                        var newwin = null
                                        newwin = window.open(file_url);
                                    }

                                }

                            // -->
                            </script>
                        <tr>
                            <td class="dtll">
                                <a href="javascript:void(0);" onClick="Build_File_Link('{$filecount}');" ><img src='/monitor/images/index.gif' border='0' alt='View File'></a>
                                $show_edit_link
                            </td>
                            <td class="dtll">$shortname $help_file</td>
                            <td class="dtll">$file_version_list</td>
                            <td class="dtll">
                                <input type="checkbox" name="delete[]" value="$shortname">Delete
                                $help_del
                            </td>
                        </tr>
EOF;
                            /// <td class="dtll"><a href="/monitor/hcudocs$filepath" target="_blank">$shortname</a>$help_file</td>
                    }
                }
            }
        ?>
        <?php

            if (count($filelist) == 0 && count($dirlist) == 0) {
                print <<< EOF
                    <tr>
                        <td class="dtll" colspan="4">
                            No active directories found.
                        </td>
                    </tr>

                    <tr><td colspan="4" class="dtll"><hr></td></tr>
EOF;
            } elseif ((($top_dir == $cpath) && ($top_upload == false))){
                print <<< EOF
                    <tr><td colspan="4" class="dtll"><hr></td></tr>
EOF;
            } else {
                $help_delsel = img_help("deleteselected");
                print <<< EOF
                    <tr><td colspan="4" class="dtll"><hr></td></tr>
                    <tr>
                        <td colspan="3" class="dtll"> &nbsp;</td>
                        <td class="dtll">
                            <input type="submit" name="DFiles" value="Delete Selected" onclick="return check_delete();">
                            $help_delsel
                        </td>
                    </tr>
EOF;
            }

            // Now print any directories that have NOT been created
            // then post to this script and allowing them to make the directories
            // This is the top dir, so use allowed_dir as list
            // If the allowed_dir and dirlist arrays do not have the same count then list the drop-down
            // Only allow viewing in the top directory
            if ((count($dirlist) < count($allowed_dir)) && ($cpath == $top_dir)) {
                $help_in = img_help("inactive");
                print <<< EOF
                    <tr>
                        <td class="hdr">&nbsp;</td>
                        <td class="hdr" colspan="3">
                            Inactive Directories $help_in
                        </td>
                    </tr>
                    <tr>
                        <td class="dtll" colspan="4">
                            To activate a private directory click on the folder or the directory name.
                        </td>
                    </tr>
EOF;
                reset($allowed_dir);
                foreach ($allowed_dir as $key => $value) {
                    if (!in_array($value, $dirlist)) {
                    print <<<EOF
                    <tr>
                        <td class="dtll">
                            <a href="javascript:dir_create('$value','$cdir')" onclick="return confirm_dir('$value');">
                            <img src='/monitor/images/folderin.gif' border='0' alt='Create Directory'></a>
                        </td>
                        <td class="dtll"><a href="javascript:dir_create('$value','$cdir')" onclick="return confirm_dir('$value');">$value</a></td>
                        <td class="dtll" colspan="2">&nbsp;</td>
                    </tr>
EOF;
                        // This option was not on the screen so we want to be able to create the directory
                        //print ("<option value=\"$key\">$value</option>\n");
                    }
                }
            } elseif ((count($dirlist) >= count($allowed_dir)) && ($cpath == $top_dir)) {
                print <<< EOF
                    <tr>
                        <td class="hdr">&nbsp;</td>
                        <td class="hdr" colspan="3">
                            Inactive Directories
                        </td>
                    </tr>
                    <tr>
                        <td class="dtll" colspan="4">
                            No inactive directories found.
                        </td>
                    </tr>

EOF;
            }
            // Now print any directories that have NOT been created
            // This is not the top level, so get the list of allowed sub-dirs
            // by using the allow_subs sql.
            if ($cpath != $top_dir && in_array($cdir, $allowed_dir)){
                $allowkey=array_search("$cdir",$allowed_dir);
                $allowsql=$allowed_subs[$allowkey];
                $rs = db_query($allowsql, $link);
                if(db_num_rows($rs) > 0) {
                    for ($row=0;list($allow) = db_fetch_array($rs,$row); $row++) {
                        $allowed[]="$allow";
                    }

                $help_in = img_help("inactive");
                print <<< EOF
                    <tr>
                        <td class="hdr">&nbsp;</td>
                        <td class="hdr" colspan="3">
                            Inactive Directories $help_in
                        </td>
                    </tr>
                    <tr>
                        <td class="dtll" colspan="4">
                            To activate a private directory click on the folder or the directory name.
                        </td>
                    </tr>
EOF;
                reset($allowed);
                foreach ($allowed as $key => $value) {
                    if (!in_array($value, $dirlist)) {
                    print <<<EOF
                    <tr>
                        <td class="dtll">
                            <a href="javascript:dir_create('$value','$cdir')" onclick="return confirm_dir('$value');">
                            <img src='/monitor/images/folderin.gif' border='0' alt='Create Directory'></a>
                        </td>
                        <td class="dtll"><a href="javascript:dir_create('$value','$cdir')" onclick="return confirm_dir('$value');">$value</a></td>
                        <td class="dtll" colspan="2">&nbsp;</td>
                    </tr>
EOF;
                        // This option was not on the screen so we want to be able to create the directory
                    }
                }
            } else {
                print <<< EOF
                    <tr>
                        <td class="hdr">&nbsp;</td>
                        <td class="hdr" colspan="3">
                            Inactive Directories
                        </td>
                    </tr>
                    <tr>
                        <td class="dtll" colspan="4">
                            No inactive directories found.
                        </td>
                    </tr>
EOF;
            }
        }

        if ($cpath == $top_dir || in_array($cdir, $allowed_dir)) {
            print "<tr><td colspan=\"4\" class=\"dtll\"><hr></td></tr>
    </table></div>
    </form>";
}
}

function view_form() {
    global $dir;
    global $cspath;
    global $file;
    global $self;
    global $top_dir;

    $file_path = "$top_dir/$cspath/$file";
    $form = file($file_path);
    if (is_array($form)){
        print implode("", $form);
    }else{
        print "Cannot open $file_path";
    }
}

function save_form() {
    global $script_doc, $efile, $msg, $replace, $csub, $delete, $top_dir, $Upload, $DFiles, $err_msg, $cdir, $cspath;

    // rotate_file ($top_dir . "/" . $efile, $cspath);
    rotate_file ($efile, $top_dir . "/" . $cspath);

    // ** Files are rotated thru,
    // ** NOW I need to open up the file and upload contents of the posted text area into the filename that is entered
    $filepath_name = $top_dir . "/" . $cspath . "/" . $efile;
    if ($fp = fopen($filepath_name, "w")) {
        if (!fwrite ($fp, $script_doc)) {
            // FAILED
        } else {
            // SUCCESS
        }
        fclose($fp);
    } else {
        // Unable to open file to save
    }


}
function post_form() {
    // Here we will post all the variables from the form and execute as needed
        global $msg, $upload_file, $upload_file_name, $upload_file_size, $upload_file_type, $replace, $csub, $delete, $top_dir, $Upload, $DFiles, $err_msg, $cdir, $cspath;

        $cdir = basename(rtrim(($top_dir . ($csub == '' ? "" : "/$csub")),'/'));
        if ((isset($Upload)) && ($Upload != '')) {
            // Don't allow a file size of 0 bytes
            if (!is_uploaded_file($_FILES['upload_file']['tmp_name']) || ($_FILES['upload_file']['size'] < 1)) {
                switch ($_FILES['upload_file']['error']) {
                    case 0:
                        $up_err = "0: No error, the file was uploaded successfully";
                        break;
                    case 1:
                        $up_err = "1: The upload is larger than the amount allowable by the upload_max_filesize directive in the php.ini";
                        $up_err = "1: The file you tried to upload is just too big.  The allowable limit is 40mb.";
                        break;
                    case 2:
                        $up_err = "2: The upload is larger than the MAX_FILE_SIZE directive that was specified via html";
                        $up_err = "2: The file you tried to upload is just too big.  The allowable limit is 15mb.";
                        break;
                    case 3:
                        $up_err = "3: The file was only partially uploaded";
                        break;
                    case 3:
                        $up_err = "4: no file was uploaded";
                        break;
                    default:
                        $up_err = "NOT SET";
                }
        } else {
                // The file name will always be that of the file being uploaded
                $filedir = $top_dir . ($csub == '' ? "" : "/$csub");

                // strip these characters '/', '\', ';', and ' ' replace with an '_'.
                $find_ary = array("\\", "/", " ", ";");         // instead of these...
                $rpl_ary = array("_", "_", "_", "_");               // use the _ character
                $us_file_name = str_replace($find_ary, $rpl_ary, $_FILES['upload_file']['name']);
            # make sure we still have a valid file name:
            if ("$us_file_name" == "") {
                $up_err = "Error Reported - Invalid Upload to HomeCU Directory";
            }

        }
        if ("$up_err" != "") {
                $msg = "
Upload File Error --\n
Client Information \n
    Client Filename: {$_FILES['upload_file']['name']}\n
    Client Filesize: {$_FILES['upload_file']['size']}\n
    Client Filetype: {$_FILES['upload_file']['type']}\n\n
    Client IP: {$_SERVER['REMOTE_ADDR']}\n\n
Web Server Information \n
    Temp File Name - {$_FILES['upload_file']['tmp_name']}
    Error Reported - $up_err\n\n

                            ";
                $notify = new ErrorMail;
                $notify->line = __LINE__;
                $notify->file = __FILE__;
                $notify->callingfunction = __FUNCTION__;
                $notify->sql = $msg;
                $notify->mailto = "miki@homecu.net";
                $notify->subject = "HomeCU Directories upload error";
                $notify->cu = "$Cu";
                $notify->SendErr();
                // IF we got here, the file is NOT an uploaded file report an error

                // An error may occur here if the file is too large, this can be set in the php.ini file the variable is upload_max_filesize
                print <<< print_html
                    <center>
                    <br>
                    There was an error uploading the file <b>{$_FILES['upload_file']['name']}</b>.<br>
                    The error reported was: <b>$up_err</b>.<br>
                    Please retry uploading the file.<br>
                    If the problem persists call DMS and report the problem.

                    </center>
print_html;
            } else {

                // ** Try and create a previous version of the file before uploaded

                // ** Rotate file for historical
                rotate_file ($us_file_name, $filedir. "/");


        $filename = $filedir . "/" . $us_file_name;
                // move the file into the selected private directory
                if (!move_uploaded_file($_FILES['upload_file']['tmp_name'], $filename)) {
                    unlink ($_FILES['upload_file']['tmp_name']);
                // Print error screen -- couldn't move file
                print <<< html_text
                    <br><br>
                    Uh-oh, couldn't post the file where it belongs.  Not sure what happened.  Better call DMS.
html_text;
                } else {
                    // File was moved change the mod settings
                    $rc = @chmod($filename, 0644);
        }
}
}

        if ((isset($DFiles)) && ($DFiles != '')) {
            // Now do any of the other postings, such as delete files
            if (isset($delete)) {
                foreach ($delete as $filename) {
                    // Be sure there are not / or \ in the file name
                    $us_file_name = str_replace("/", "", $filename);
                    $us_file_name = str_replace("\\", "", $us_file_name);


                    // If checked then we delete the file
                    $delete_file = $top_dir . ($csub == '' ? "" : "/$csub") . "/" . $us_file_name;
                    //$delete_file = $top_dir . ($csub == '' ? "" : "/$csub") . "/" . $filename;
                    //$delete_file = $top_dir . "/" . $csub . "/" . $filename;

                    if (file_exists($delete_file)) {
                        if (is_file($delete_file)) {
                            // * FILE
                            // ** allow the removal of files that start with "."
                            if (substr($us_file_name, 0, 1) == ".") {
                                if (!@unlink ($delete_file)) {
                                    // This will unlink the file from this directory
                                    $msg .= "Unable to delete the file!  Please try again.<br>";
                                } else {
                                    $msg .= "The file '$filename' was deleted successfully.<br>";
                                }
                            } else {
                                // ** Changed this to now rotate the file through the historical process
                                // * and not have a "current" file
                                rotate_file ($us_file_name, $top_dir . "/" . $cspath);
                            }
                        } elseif (is_dir($delete_file)) {
              // * DIRECTORY
                            $directory_empty = TRUE;
                        $directory = dir($delete_file);
                        while (FALSE !== ($item = $directory->read())) {
                                // If an item is not "." or "..", dir is not empty
                                if ($item != '.' && $item != '..')  {
                                    $directory_empty = FALSE;
                                    break;
                                }
                            }
                            $directory->close();
                            if(($directory_empty == TRUE) && ( @rmdir ($delete_file))) {
                                $msg .= "The folder '$filename' was deleted successfully.<br>";
                            } else {
                                $msg .= "Unable to delete folder '$filename'!  Please be sure the folder is empty.<br>";
                            }
                        }
                    }
                }
            }
        }
    }

function restore_file() {

    global $self, $efile, $msg, $replace, $csub, $delete, $top_dir, $Upload, $DFiles, $err_msg, $cdir, $cspath, $HCUDocs_MaxPreviousVersion;

    // Technically.. I should only be able to restore historical files, I am trying to NOT allow current file to be restored.. makes little sense..
    // So what I need to do is get the original filename from the restored file



    $restore_file_tmpname = "";
    $restore_file_basename = $efile;            // start with current name

    // * trim leading "."
    if (substr($restore_file_basename, 0, 1) == ".") {
        $restore_file_basename  = substr($restore_file_basename, 1);
    }
    // * Now truncate the end where the .X may exist
    $restore_file_basename = substr($restore_file_basename, 0, strrpos($restore_file_basename, "."));

    $restore_file_tmpname = "." . $restore_file_basename . "." . ($HCUDocs_MaxPreviousVersion + 1);

    $restore_file_directory = $top_dir . "/" . $cspath . "/";
    // This is what I was thinking
    if (is_file($restore_file_directory . $efile)) {

        // Rename the file we are going to restore to .{HCUDocMaximum + 1}
// print "<Br> RENAME - " . $restore_file_directory . $efile . " to " . $restore_file_directory . $restore_file_tmpname;
        if (@copy($restore_file_directory . $efile, $restore_file_directory . $restore_file_tmpname)) {

            // Next call the Rotate File Function .. Rotate all through
            rotate_file ($restore_file_basename, $restore_file_directory);
// print "<br> ROTATE FILE file: " . $restore_file_basename . " dir: " . $restore_file_directory;

            // Rename the .{HCUDocMaximum + 1} to current file
            @rename($restore_file_directory . $restore_file_tmpname, $restore_file_directory . $restore_file_basename);
// print "<br>RENAME tmp - " . $restore_file_directory . $restore_file_tmpname . " to " . $restore_file_directory . $restore_file_basename;
        }


    } // DO NOTHING IF FILE NOT FOUND

}
function edit_form() {

        global $self, $efile, $msg, $replace, $csub, $delete, $top_dir, $Upload, $DFiles, $err_msg, $cdir, $cspath, $act;


        // Decide FileName

// print "efile  - $efile<bR>csub - $csub<br>cdir - $cdir<br>cspath - $cspath<br>";

        $folder_path = ($cspath == "" ? "&nbsp;" : "Folder: &nbsp; <a href='$self?cdir=$cdir&csub=$cspath'>$cspath</a>");

        if ($efile == "") {
            // * NEW FILE
            $folder_path .= " / NEW FILE";
            $filename_formedit = "<input type=\"text\" name=\"efile_new\" value=\"\">.html";
        } else {
            $folder_path .= " / $efile";
        }
        print <<< print_html
        <html><head><title>HCU_Docs</title>
        <LINK REL=stylesheet HREF='/monitor/css/monitor.css' TYPE='text/css'>
        </head>
        <body>
        <form method="post" action="$self" enctype="multipart/form-data">
            <input type="hidden" name="action" value="upload">
            <input type="hidden" name="csub" value="$cspath">
            <input type="hidden" name="cdir" value="$cdir">
            <input type="hidden" name="cpath" value="$cpath">
            <br><div align=center><table width=95% border=0 cellspacing=0 cellpadding=4>
            <tr><td colspan=4 class="bar" align=center>HomeCU Documents</td></tr>
            <tr>
                <td class="hdrl">&nbsp;</td>
                <td class="hdrl"><a href="{$infourl}/hcuadm/cuilist.prg" target="_parent">Credit Union List</a></td>
                <td colspan=2 class="hdrl">$folder_path $filename_formedit</td>
            </tr>
            <tr>
                <td colspan=4 class="dtl" align="center">

print_html;

        $filename_formedit = "";
        $filenew = (strtoupper($act) == "NEW");

        if ($filenew) {
            // ** Possibly create a new blank file for this, maybe for NEW require a name for the file

            $efile = "";
        } else {
            // Read the file and send the information to the text area
            $cu_file = $top_dir . "/" . $csub . "/" . $efile;
            $file_opened = false;
            if (file_exists($cu_file)) {
                if ($fp = fopen($cu_file, "r")) {
                    $file_opened = true;
                    $contents = fread($fp, filesize($cu_file));
                }
            }

            // $filename_formedit = "$efile<input type=\"hidden\" name=\"efile\" value=\"$efile\">";
        }


        // ** For .html extended files -- I want to include the TinyMCE insert
        $textarea_TinyMCE = "";

        if ((strtolower(substr($cu_file, (strrpos($cu_file, ".") === false ? strlen($cu_file) : strrpos($cu_file, ".")))) == ".html") || $filenew) {
            $textarea_TinyMCE = <<< set_TinyMCE
                <script type="text/javascript" src="/monitor/tinymce/jscripts/tiny_mce/tiny_mce.js"></script>

                <script type="text/javascript">
                tinyMCE.init({
                                // General options
                                mode : "textareas",
                                theme : "advanced",
                                plugins : "autolink,lists,spellchecker,pagebreak,style,layer,table,save,advhr,advimage,advlink,emotions,iespell,inlinepopups,insertdatetime,preview,media,searchreplace,print,contextmenu,paste,directionality,fullscreen,noneditable,visualchars,nonbreaking,xhtmlxtras,template",

                                // Theme options
                                theme_advanced_buttons1 : "save, bold,italic,underline,strikethrough,|,justifyleft,justifycenter,justifyright,justifyfull,|,styleselect,formatselect,fontselect,fontsizeselect",
                                theme_advanced_buttons2 : "cut,copy,paste,pastetext,pasteword,|,search,replace,|,bullist,numlist,|,outdent,indent,blockquote,|,undo,redo,|,link,unlink,anchor,image,cleanup,help,code,|,insertdate,inserttime,preview,|,forecolor,backcolor",
                                theme_advanced_buttons3 : "tablecontrols,|,hr,removeformat,visualaid,|,sub,sup,|,charmap,emotions,iespell,media,advhr,|,print,|,ltr,rtl,|,fullscreen",
                                theme_advanced_buttons4 : "insertlayer,moveforward,movebackward,absolute,|,styleprops,spellchecker,|,cite,abbr,acronym,del,ins,attribs,|,visualchars,nonbreaking,blockquote,pagebreak,|,insertfile,insertimage",
                                theme_advanced_toolbar_location : "top",
                                theme_advanced_toolbar_align : "left",
                                theme_advanced_statusbar_location : "bottom",
                                theme_advanced_resizing : true,

                                // Skin options
                                skin : "o2k7",
                                skin_variant : "silver",
                                save_enablewhendirty : true,
                                save_onsavecallback : "savefile"

                                // Example content CSS (should be your site CSS)
//                              content_css : "css/example.css",

                });
                function savefile () {

                    // * *Be sure the filename was enterred if this is NEW
                    // if it is new, then put the filename + .html into the efile hidden field..
                    // This becomes the new filename
                    var objfilename = document.forms[0].elements['efile_new'];
                    var objsavedfilename = document.forms[0].elements['efile'];
                    var isnewdoc = objfilename != null;
                    var savefileok = true;

                    if (isnewdoc) {
                        // ** Be sure they have entered a filename for the form
                        if (objfilename.value == "") {
                            window.alert ("Enter file name for this new file.");
                            savefileok = false;
                        } else {
                            // *Save the file name to be saved
                            objsavedfilename.value = objfilename.value + ".html";
                        }
                    }

                    // *FORCE THE SUBMIT
                    if (savefileok) {
                        document.forms[0].submit();
                    }
                }
                </script>
set_TinyMCE;
        }



        if (($file_opened == true && !$filenew) || ($filenew)) {
            $showcontents=htmlspecialchars($contents);
            print <<< print_html

                $textarea_TinyMCE

                <script language="javascript">
                    <!--
                    var win=null;
                    function Preview() {
                        win = window.open("","htmlWin","scrollbars=1,menubar=1,status=1")
                        //win.document.write("<BASE HREF='" + document.Tag.baseHref.value + "'>")
                        win.document.write("<P>")
                        win.document.write(document.preview.script_doc.value)
                        win.document.write("</P>")
                    }
                    // -->
                </script>
                <form name="preview" action="$self" method="post">
                    <input type="hidden" name="action" value="saveedit">
                    <input type="hidden" name="csub" value="$cspath">
                    <input type="hidden" name="cdir" value="$cdir">
                    <input type="hidden" name="cpath" value="$cpath>">
                    <input type="hidden" name="efile" value="$efile">
                    <br>
                    <textarea name="script_doc" rows=50 cols=90>$showcontents</textarea>
                </form>
print_html;
        } else {
            // Problem opening the file
            print '
            <table align=center border=0 cellpadding=0 cellspacing=0 width="60%" class="dmsbg"><tr><td>
            <table border=0 cellpadding=0 cellspacing=0 width="100%">
                <tr>
                    <td class="dtl">
                        An incorrect selection was made, please go back to the <a href="' . $self . '">menu</a><br>
                        and select again.
                    </td>
                </tr>
            </table>
            </td></tr></table>';
        }

        print <<< print_html
                </td>
            </tr>
        </table>
        </form></body>

print_html;
    }

function rotate_file($HCUDocs_Filename, $HCUDocs_Directory) {

// ** This function will rotate the current file along with the max number of 'hidden' previous versions
// *   and rotate through {max previous version} - 1 renamed to {max previous version} and finally current name
// *   renamed to {previous version}.1

    global $cpath, $top_dir, $HCUDocs_MaxPreviousVersion;

    // global $msg, $upload_file, $upload_file_name, $upload_file_size, $upload_file_type, $replace, $csub, $delete, $top_dir, $Upload, $DFiles, $err_msg, $cdir, $cspath;

    // $cdir = basename(rtrim(($top_dir . ($csub == '' ? "" : "/$csub")),'/'));

    // Process will be as follows
    //  * - Delete {Filename}.{MaxVersions}
    //  * - Loop through remaining previous version, renaming extension to be Numeric + 1
    //  * - Rename {Filename} to {Filename}.1


    // $HCUDocs_Filename = "";
    // $HCUDocs_Directory = "";
    // $HCUDocs_MaxPreviousVersion = 5;

    // ** Check to see if Directory has a "/" at the end.. If NOT , then add it
    $HCUDocs_Directory .= (substr($HCUDocs_Directory, -1) != "/" ? "/" : "");


    $LoopFilename = "";
    $LoopFilename = "$HCUDocs_Directory" . "." . $HCUDocs_Filename . ".$HCUDocs_MaxPreviousVersion";
    // * First look for the MAX previous version of file and delete if found
/*
    if (file_exists($LoopFilename)) {
        if (is_file($Loopfilename)) {
            if (!@unlink ($delete_file)) {
                // NOT ABLE TO DELETE FILE
            } else {
                // FILE DELETED
            }
        }
    }
*/



    // * NOW LOOP THROUGH REMAINING Version Numbers, reording {Max -1 } to {Max}, {Max - 2} to {Max - 1}, etc
    for ($idxPreVersion = $HCUDocs_MaxPreviousVersion - 1; $idxPreVersion > 0; $idxPreVersion--) {
        $LoopFilename = "$HCUDocs_Directory" . "." . $HCUDocs_Filename . ".$idxPreVersion";
        $LoopNewName = "$HCUDocs_Directory" . "." . $HCUDocs_Filename . "." . ($idxPreVersion + 1);
        if (file_exists($LoopFilename)) {
            // ** File exists.. Rename to be (idxPreVersion)
            if (! @rename($LoopFilename, $LoopNewName)) {
                // file could NOT be renamed
            }
        }
    }


    // ** Rename the original file
    $LoopFilename = $HCUDocs_Directory . $HCUDocs_Filename;
    $LoopNewName = $HCUDocs_Directory . "." . $HCUDocs_Filename . ".1";

    // ** ONLY Rename if the original file it really exists
    if (file_exists($LoopFilename)) {
        if (! @rename($LoopFilename, $LoopNewName)) {

            // ** COULD NOT RENAME
        }
    }



    // ** NOW we should have the hidden files setup... ready to either upload the new file
    // ** Or save a file


}

?>