/home/coolpkct/www/websites/cake3.cool.rocks/admin/commands/pluploader.php
<?php
/**
 * Part of Showkase web site management package
 *
 * @package Showkase
 * @author Jack Hardie {@link http://www.jhardie.com}
 * @copyright Copyright (c) 2012, SimpleViewer Inc.
 */
defined('SK_ACCESS')||die('<h1>403: Forbidden</h1>');
 // HTTP headers for no cache etc
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
header("Cache-Control: no-store, no-cache, must-revalidate");
header("Cache-Control: post-check=0, pre-check=0", false);
header("Pragma: no-cache");
$sep = DIRECTORY_SEPARATOR;
require_once "classes{$sep}pagefactory.php";
require_once "classes{$sep}themeset.php";
// change errors to exceptions
function exception_error_handler($errno, $errstr, $errfile, $errline ) {
throw new ErrorException($errstr, $errno, 0, $errfile, $errline);
}
ini_set('html_errors', 0);
set_error_handler("exception_error_handler");

/**
 * Command - Repair
 *
 * @package Showkase
 */
 class Pluploader extends Command {
    function doExecute( Request $request ) {
        if (DEMO_MODE) {
            die('{"jsonrpc" : "2.0", "error" : {"code": 100, "message": "Demo version file not saved"}, "id" : "id"}');
        }
        try {
            $targetDir = $request->getProperty('skAbsImagePath');
            if (!file_exists($targetDir)) {
                throw new Exception('Cannot find image directory '.$targetDir);
            }
            $this->pluploadCode($targetDir);
            $pageRef     = $request->getProperty('skPageRef');
            $pageType    = $request->getProperty('skPageType');
            $pagePath    = $request->getProperty('skPagePath');
            $pageFactory = new PageFactory(new ThemeSet());
            $page        = $pageFactory->make($pageType, $pageRef, $pagePath);
            if ($pageType == 'library') {
                // note difference from gallery upload, rebuild instead of addnewimages so no need for user rebuild option
                $page->gallery->rebuild();
            } else {
                $page->gallery->addNewImages();
            }
            $page->gallery->saveGallery();  
        } catch (Exception $e) {
            die('{"jsonrpc" : "2.0", "error" : {"code": 100, "message": "'.$e->getMessage().' in '.basename($e->getFile()).', line '.$e->getLine().'"}, "id" : "id"}'); 
        }
        // Return JSON-RPC response
        die('{"jsonrpc" : "2.0", "result" : null, "id" : "id"}');
    }
    
    /**
     * Plupload code from web site July 2012
     * Unchanged apart from formatting and target directory parameter
     *
     * @param string absolute path to target directory with trailing separator
     * @return void
     */
    private function pluploadCode($targetDir)
    {
        $cleanupTargetDir = true; // Remove old files
        $maxFileAge = 5 * 3600; // Temp file age in seconds

        //set_time_limit() causes errors on some web servers
        //if (function_exists('set_time_limit')) {
        //    @set_time_limit(5 * 60);  // 5 minutes execution time
        //}

        $chunk = isset($_REQUEST["chunk"]) ? intval($_REQUEST["chunk"]) : 0;
        $chunks = isset($_REQUEST["chunks"]) ? intval($_REQUEST["chunks"]) : 0;
        $fileName = isset($_REQUEST["name"]) ? $_REQUEST["name"] : '';
        // Clean the fileName for security reasons
        $fileName = preg_replace('/[^\w\._]+/', '_', $fileName);
        // Make sure the fileName is unique but only if chunking is disabled
        if ($chunks < 2 && file_exists($targetDir . DIRECTORY_SEPARATOR . $fileName)) {
            $ext = strrpos($fileName, '.');
            $fileName_a = substr($fileName, 0, $ext);
            $fileName_b = substr($fileName, $ext);
            $count = 1;
            while (file_exists($targetDir . DIRECTORY_SEPARATOR . $fileName_a . '_' . $count . $fileName_b)) {
                $count++;
            }
            $fileName = $fileName_a . '_' . $count . $fileName_b;
        }
        $filePath = $targetDir . DIRECTORY_SEPARATOR . $fileName;
        // Create target dir
        if (!file_exists($targetDir))
          @mkdir($targetDir);
        // Remove old temp files  
        if ($cleanupTargetDir && is_dir($targetDir) && ($dir = opendir($targetDir))) {
            while (($file = readdir($dir)) !== false) {
                $tmpfilePath = $targetDir . DIRECTORY_SEPARATOR . $file;
                // Remove temp file if it is older than the max age and is not the current file
                if (
                        preg_match('/\.part$/', $file)
                        && (filemtime($tmpfilePath) < time() - $maxFileAge)
                        && ($tmpfilePath != "{$filePath}.part")
                    ) {
                    @unlink($tmpfilePath);
                }
            }
            closedir($dir);
        } else
        die('{"jsonrpc" : "2.0", "error" : {"code": 100, "message": "Failed to open temp directory."}, "id" : "id"}');
        // Look for the content type header
        if (isset($_SERVER["HTTP_CONTENT_TYPE"]))
            $contentType = $_SERVER["HTTP_CONTENT_TYPE"];
        if (isset($_SERVER["CONTENT_TYPE"]))
            $contentType = $_SERVER["CONTENT_TYPE"];
        
        // Handle non multipart uploads older WebKit versions didn't support multipart in HTML5
        if (strpos($contentType, "multipart") !== false) {
            if (isset($_FILES['file']['tmp_name']) && is_uploaded_file($_FILES['file']['tmp_name'])) {
                // Open temp file
                $out = fopen("{$filePath}.part", $chunk == 0 ? "wb" : "ab");
                if ($out) {
                    // Read binary input stream and append it to temp file
                    $in = fopen($_FILES['file']['tmp_name'], "rb");
                  if ($in) {
                      while ($buff = fread($in, 4096)) {
                        fwrite($out, $buff);
                      }
                  } else {
                      die('{"jsonrpc" : "2.0", "error" : {"code": 101, "message": "Failed to open input stream."}, "id" : "id"}');
                  }
                  fclose($in);
                  fclose($out);
                  @unlink($_FILES['file']['tmp_name']);
                } else {
                    die('{"jsonrpc" : "2.0", "error" : {"code": 102, "message": "Failed to open output stream."}, "id" : "id"}');
                }
            } else {
                die('{"jsonrpc" : "2.0", "error" : {"code": 103, "message": "Failed to move uploaded file."}, "id" : "id"}');
            }
        } else {
            // Open temp file
            $out = fopen("{$filePath}.part", $chunk == 0 ? "wb" : "ab");
            if ($out) {
                // Read binary input stream and append it to temp file
                $in = fopen("php://input", "rb");
                if ($in) {
                    while ($buff = fread($in, 4096)) {
                        fwrite($out, $buff);
                    }
                } else {
                    die('{"jsonrpc" : "2.0", "error" : {"code": 101, "message": "Failed to open input stream."}, "id" : "id"}');
                }
              fclose($in);
              fclose($out);
            } else
            die('{"jsonrpc" : "2.0", "error" : {"code": 102, "message": "Failed to open output stream."}, "id" : "id"}');
        }
        // Check if file has been uploaded
        if (!$chunks || $chunk == $chunks - 1) {
            // Strip the temp .part suffix off 
            rename("{$filePath}.part", $filePath);
        }
    }
}