upload.prg

<?php
    // This file will upload a file for the credit union
    // It will perform the following functions

    // Process File
    // Redirect User
    // Exit File Exists
    // Exist Size Error
    // Print a form for upload

    require_once ("$admLibrary/ck_aticket.i");      // Just a precaution to make sure that it is processed through the cookie

$dms_ok=array('action'=>'string','FULLREFRESH'=>'digits',
'upload_file_name'=>'string');
dms_import($dms_ok);

    $self = "$PHP_SELF?ft={$ft}";
    $saved_file = "$home_path/tmp/$chome";

    // "full_refresh" -- this value is set for uploads in the /admbin/main container
    // value - true -- then show the FULL REFRESH checkbox
    // value - false -- then don't show the checkbox -- error check for them trying to circumvent

    switch ($action) {
        case "Upload File":
            // Now process the file, but only if...

            // First make sure the pgload finished -- If I find the .dat file then stop processing
            // and not allow them to upload any additional files
            if (file_exists($saved_file . ".dat")) {
                // ERROR --- STOP THEM From processing
                print <<< print_html
                    <center>
                    <br>
                    <h2><font color="blue">File Upload Error</font></h2>
                    <br>
                    <h2><font color="blue">Your previous upload did not complete, please contact support at DMS, Inc. for instructions.</font></h2>
                    </center>
print_html;
            } elseif (!is_uploaded_file($_FILES['upload_file']['tmp_name'])) {
                // A problem occurred record the information that I know and mail it to mark@homecu.net
                // Gather msg together
                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";
                        break;
                    case 2:
                        $up_err = "2: The upload is larger than the MAX_FILE_SIZE directive that was specified via html";
                        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";
                }
                $up_fe = (!file_exists("{$_FILES['upload_file']['tmp_name']}") ? "True" : "False");
                $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
    Client IP: {$_SERVER['REMOTE_ADDR']}\n\n
Web Server Information \n
    Temp File Name - {$_FILES['upload_file']['tmp_name']}
    Temp File exist - $up_fe\n
    Error Reported - $up_err\n\n

                            ";
                $notify = new ErrorMail;
                $notify->line = __LINE__;
                $notify->file = __FILE__;
                $notify->callingfunction = __FUNCTION__;
                $notify->sql = $msg;
                $notify->cu = "$Cu";
                $notify->survey = "";
                $notify->mailto = "mark@homecu.net";
                $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>
                    Please retry uploading the file.<br>
                    If the problem persists call DMS and report the problem.

                    </center>
print_html;
            } else {
                // PHP Variables provided with a file upload
                // $_FILES['###']['tmp_name'] - this is the field name that was on the multi-part form
                // -- this will also contain the location of the file when it was uploaded
                // $_FILES['###']['name'] - name of the file that was  uploaded
                // $_FILES['###']['size'] - size of file uploaded
                // $_FILES['###']['type'] - type of file uploaded -- mime/type
                // Our first Check is Okay, so now I want to Process the file
                $real_name = "";
        $find_ary = array("\\", "/", " ", ";");     // Create the list of characters for replacement
                $rpl_ary = array("", "", "", "");       // Create the list of characters that will be replacing

        $real_name = str_replace($find_ary, $rpl_ary, $_FILES['upload_file']['name']);
                // Now move the file from the temporary position into the credit unions /tmp directory
                if (!move_uploaded_file($_FILES['upload_file']['tmp_name'], $saved_file . ".daz")) {
                    unlink ($_FILES['upload_file']['tmp_name']);
                } else {
                    // File was moved change the mod settings
                    $rc = @chmod($saved_file . ".daz", 0644);
                }

                // File has now been uploaded and moved successfully

                // Need to copy the status files From old.txt to older.txt, from .txt to old.txt
                // Currently I will use the php "copy" function for the files
                if (file_exists("$home_path/public_html/status.old.txt"))
                    copy ("$home_path/public_html/status.old.txt", "$home_path/public_html/status.older.txt");

                if (file_exists("$home_path/public_html/status.txt"))
                    copy ("$home_path/public_html/status.txt", "$home_path/public_html/status.old.txt");


                // Now RUN the pgload process for this credit union
                // Use escapeshellcmd when using the home_path variable

                // MWS 2/27/03 -- before executing set the environment path for the users e-mail address
                $sql = "SELECT role, email
                                FROM cuadmnotify
                                WHERE cu = '$Cu'
                                    AND role in ('upload', 'alert') ";
                $em_rs = db_query($sql, $dbh);
                for ($row=0; $em_row = db_fetch_array($em_rs,$row); $row++) {
                    $role = trim($em_row['role']);
                    $$role = trim($em_row['email']);
                }
                db_free_result($em_rs);

                // Miki 5/27/04 -- get the pgload command string from the database
                $sql = "SELECT liveserver
                                FROM cuadmin
                                WHERE cu = '$Cu'";
                $em_rs = db_query($sql, $dbh);
                list($pgloadcmd) = db_fetch_array($em_rs, 0);
                db_free_result($em_rs);
                if (trim($pgloadcmd) == '') {
                    $pgloadcmd = "/usr/local/bin/pgload.pl -h $home_path";
                }
                $pgloadcmd = (escapeshellcmd("$pgloadcmd") . " >" . escapeshellcmd("$home_path/public_html/status.txt") . " 2>&1 &");

                $sql = "SELECT email FROM cuadminusers
                                WHERE cu = '$Cu' AND user_name = '$Cn' ";
                $em_rs = db_query($sql, $dbh);
                list($email) = db_fetch_array($em_rs, 0);
                db_free_result($em_rs);

                if (trim($email) != '')
                    { $upload = no_dupes("$email;$upload"); }

                putenv("ADMUSER=$Cn");
                putenv("ADMMAIL=$upload");
                if ("$alert" != "" ) { putenv("ALERTMAIL=$alert"); }

                if ($full_refresh && ($FULLREFRESH == 1)) {
                    // For FULL REFRESH Perform this extra step
                    // Set the "histtrunc" flag in the cuadmin table
                    $sql = "UPDATE cuadmin
                                    SET histtrunc = '1'
                                    WHERE cu = '$Cu' ";

                    $hist_rs = db_query($sql, $dbh);                // Execute the query
                    db_free_result($hist_rs);                               // Release
                }

                #$command = escapeshellcmd("$home_path/bin/pgload.sh") . " >" . escapeshellcmd("$home_path/public_html/status.txt") . " 2>&1 &";
                //$command = "$home_path/bin/pgload.pl >/dev/null &";       // This is a test script, to make sure php is handling this in the background

                #$rc = exec ($command);
                $rc = exec ($pgloadcmd);
                // Print the page text
                $refresh_text;
                if ($full_refresh && ($FULLREFRESH == 1)) {
                    $refresh_text = "<span style=\"color: red\">NOTE: You just performed a full refresh of your credit unions' data.  <b>If the file you just sent was not a full refresh</b>, you must create and upload a full refresh file now to fix the data!</span><br><br>";
                }

                // Now set a cookie for the filename that was last uploaded
                HCU_setcookie_env($SYSENV, "LastFileName", $upload_file_name, time()+60*60*24*30);

                print <<< html_text
                    <br>
                    $refresh_text



                    <h3>Thank You! Your upload file '{$_FILES['upload_file']['name']}' ({$_FILES['upload_file']['size']} bytes) was received and it is now being processed.</h3>

                    <br>
                    <b>THIS DOES NOT MEAN:</b>
                    <ul>
                    <li>That we received the correct file, </li>
                    <li>That this was the next sequential file,</li>
                    <li>Or that this it was even a digital banking file.</li>
                    </ul>
                    <br>
                    <br>
                    Please review the <a href="/admbin/main.prg/admin/status.html?ft=80" class='link2'>results</a> of this upload. Within about 30 seconds (or longer for large files) an email will be sent to confirm the results of this upload. You should insure that the file processed and there are no missing export files.
                    <br>
                    <br>
                    If you prefer, you can click on the 'Upload History' link at the left. You should see that this export was processed and no exports are missing. If this does not show in the list, be sure to check your email so you can see what happened and how to fix it.

html_text;


            }
            break;
        default:

            /*
                upload_status -- values
                    0 - The .dat file was NOT found -- all as usual
                    1 - The .dat file was found -- but is NOT being used by another process
                    2 - The .dat file was found AND the status.txt file is being used by another process
            */
            $upload_status = 0;
            // *** MWS 2/17/2006 -- Add new options for showing different stats based on where the CU is in the upload
                // process

            // *** CHECK STATUS OF EXISTENCE .dat FILE
            $dat_path_file = "/home/{$chome}/tmp/{$chome}.dat";

            // *** CHECK FOR USER ON .txt FILE
            $txt_path_file = "/home/{$chome}/public_html/status.txt";

            if (file_exists($dat_path_file)) {
                $upload_status = 1;
                // *** CHECK LOCK STATUS OF .dat FILE
                $ret_fuser = exec("/bin/fuser " . escapeshellcmd($txt_path_file));
                if ($ret_fuser != false) {
                    $upload_status = 2;
                }

            }

            // *** LAST UPLOAD STATUS
            $lastupl_msg = "";
            if (is_readable("$home_path/admin/status.html")) {
                $lastupload = date("m/d/y g:i:s A", filemtime("$home_path/admin/status.html"));

                if (!empty($lastupload)) {
                    $lastupl_msg = <<< set_msg
                        <tr><td colspan="2" class="dtl"><img src='/IMAGES/transfer.gif'>
                            <a href="/admbin/main.prg/admin/status.html?ft=80">View last upload status</a> dated $lastupload
                        </td></tr>
set_msg;
                }
            }

            if ($upload_status == 1) {
                // ** FILE WAS FOUND --- THEY WILL NOT BE ABLE TO UPLOAD --- BUT THE UPLOAD PROCESS HAS STOPPED
                print <<< form_data

                    <form method="" action="">
                        <br><br>
                        <table cellpadding="4" align="CENTER" cellspacing="0" border="0" class="dtl">
                            <tr><th align="CENTER" colspan="2" class="bar">$Cu File Upload</th></tr>
                            <tr><td colspan="2" align='center'>
                                <font color="blue">Your previous upload did not complete.</font>
                                </td></tr>
                            $lastupl_msg
                            <tr><td colspan="2">Contact DMS Support for help on completing the upload.</td></tr>
                        </table>
                        <br>
                        </form>

form_data;

            } elseif($upload_status == 2) {
                // ** FILE WAS FOUND --- THEY WILL NOT BE ABLE TO UPLOAD --- BUT THE UPLOAD PROCESS IS ONGOING

                print <<< form_data

                    <form method="" action="">
                        <br><br>
                        <table cellpadding="4" align="CENTER" cellspacing="0" border="0" class="dtl">
                            <tr><th align="CENTER" colspan="2" class="bar">$Cu File Upload</th></tr>
                            <tr><td colspan="2">Your upload is currently being processed.  Please check back later.</td></tr>
                        </table>
                        <br>
                        </form>

form_data;

            } else {
                // This is the default, which is to print the multi-part form for uploading

                    // Now create a special text for FULL REFRESH
                    if ($full_refresh) {
                        $refresh_text = "<span style=\"color: red\" >(FULL REFRESH)</span>";
                        $refresh_js = <<< js
                                    if (form_pass) {
                                        if (document.forms[0].FULLREFRESH.checked) {
                                            msg = "Uploading this file will perform a FULL REFRESH for your Credit Unions' data.  Are you sure this is what you want to do?  Press 'OK' to continue, otherwise press 'Cancel'";

                                            if (!window.confirm(msg)) {
                                                form_pass = false;
                                            }
                                        }
                                    }
js;
                        $refresh_box = <<< refresh
                            <tr><td>&nbsp;</td>
                                <td><input type="checkbox" name="FULLREFRESH" value="1">Perform Full Refresh?</td>
                            </tr>
refresh;
                    } else {
                        $refresh_text = "";
                        $refresh_js = "";
                    }

                    // Check for the existance of the LastFileName cookie, if it's there,
                    // then add some text to the script
                    $LastFileName_Text = "";
                    if ($_COOKIE['LastFileName']) {

                        $LastFileName_Text = "<tr><td colspan=\"2\">The path to the last file uploaded was:<br><br>" .
                            "<input type=\"text\" name=\"defvalue\" READONLY onfocus=\"this.select();\"value=\"" . trim($_COOKIE['LastFileName']) . "\" class=\"dtl\"size=70 style=\"border: 0;\">" .
                            "</td></tr>";
                    }

                    print <<< form_data
                        <script language="javascript">
                            function check_upload() {
                                var form_pass = true;
                                var msg = "";
                                var up_file = "";

                                // Be certain that a value has been entered into the file box
                                up_file = document.forms[0].upload_file.value;

                                if (up_file.length == 0) {
                                    msg = "I noticed you have not selected a file to upload.  Please choose a file before continuing.";
                                    window.alert (msg);
                                    form_pass = false;
                                }

                                $refresh_js

                                return form_pass;
                            }
                        </script>
                        <form method="post" action="$self" enctype="multipart/form-data">
                        <br><br>
                        <table cellpadding="4" align="CENTER" cellspacing="0" border="0" class="dtl">
                            <tr><th align="CENTER" colspan="2" class="bar">$Cu File Upload</th></tr>
                            $lastupl_msg
                            $LastFileName_Text
                            <tr><td>Choose a File:</td> <td><input type="file" name="upload_file"  size="36" onChange="copyFile()"></td></tr>
        <input type="hidden" name="upload_file_name" value="">
                            $refresh_box
                            <tr><td align="CENTER" colspan="2"><input type="submit" name="action" value="Upload File" onClick="return check_upload()"></td></tr>
                        </table>
                        <br>
                        </form>
                        <font color="blue" /><em>Note: </em>
                        The 'Upload File' button only requires a single-click. A double-click causes the file to be uploaded twice!
                        <p>Also, please wait for the upload to finish before trying to send again.</p></font>

        <script language="javascript">
            <!--
            function copyFile() {
                document.forms[0].upload_file_name.value = document.forms[0].upload_file.value;
            }
            // -->
        </script>
form_data;
            }
            break;
    }
function no_dupes($estring) {
    foreach (explode(";",$estring) as $x => $ema) {
        $ema = trim($ema);
        if ($ema != "" && (strpos("$return","$ema") === false)) {
            $return .= "$ema;";
        }
    }
    return $return;
}
?>