implement copying of Stations for Seminary copy feature
This commit is contained in:
commit
40a233fa7d
4342 changed files with 1215466 additions and 0 deletions
209
www/analytics/libs/HTML/QuickForm2/Controller/Action/Jump.php
Normal file
209
www/analytics/libs/HTML/QuickForm2/Controller/Action/Jump.php
Normal file
|
|
@ -0,0 +1,209 @@
|
|||
<?php
|
||||
/**
|
||||
* This handler performs an HTTP redirect to a specific page
|
||||
*
|
||||
* PHP version 5
|
||||
*
|
||||
* LICENSE:
|
||||
*
|
||||
* Copyright (c) 2006-2010, Alexey Borzov <avb@php.net>,
|
||||
* Bertrand Mansion <golgote@mamasam.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
*
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
* * The names of the authors may not be used to endorse or promote products
|
||||
* derived from this software without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
|
||||
* IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
|
||||
* THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
||||
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
||||
* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
||||
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
||||
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
||||
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
|
||||
* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
||||
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*
|
||||
* @category HTML
|
||||
* @package HTML_QuickForm2
|
||||
* @author Alexey Borzov <avb@php.net>
|
||||
* @author Bertrand Mansion <golgote@mamasam.com>
|
||||
* @license http://opensource.org/licenses/bsd-license.php New BSD License
|
||||
* @version SVN: $Id: Jump.php 294039 2010-01-26 12:29:46Z avb $
|
||||
* @link http://pear.php.net/package/HTML_QuickForm2
|
||||
*/
|
||||
|
||||
/** Interface for Controller action handlers */
|
||||
// require_once 'HTML/QuickForm2/Controller/Action.php';
|
||||
|
||||
/**
|
||||
* This handler performs an HTTP redirect to a specific page
|
||||
*
|
||||
* @category HTML
|
||||
* @package HTML_QuickForm2
|
||||
* @author Alexey Borzov <avb@php.net>
|
||||
* @author Bertrand Mansion <golgote@mamasam.com>
|
||||
* @version Release: @package_version@
|
||||
*/
|
||||
class HTML_QuickForm2_Controller_Action_Jump
|
||||
implements HTML_QuickForm2_Controller_Action
|
||||
{
|
||||
/**
|
||||
* Splits (part of) the URI into path and query components
|
||||
*
|
||||
* @param string String of the form 'foo?bar'
|
||||
* @return array Array of the form array('foo', '?bar)
|
||||
*/
|
||||
protected static function splitUri($uri)
|
||||
{
|
||||
if (false === ($qm = strpos($uri, '?'))) {
|
||||
return array($uri, '');
|
||||
} else {
|
||||
return array(substr($uri, 0, $qm), substr($uri, $qm));
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Removes the '..' and '.' segments from the path component
|
||||
*
|
||||
* @param string Path component of the URL, possibly with '.' and '..' segments
|
||||
* @return string Path component of the URL with '.' and '..' segments removed
|
||||
*/
|
||||
protected static function normalizePath($path)
|
||||
{
|
||||
$pathAry = explode('/', $path);
|
||||
$i = 1;
|
||||
|
||||
do {
|
||||
if ('.' == $pathAry[$i]) {
|
||||
if ($i < count($pathAry) - 1) {
|
||||
array_splice($pathAry, $i, 1);
|
||||
} else {
|
||||
$pathAry[$i] = '';
|
||||
$i++;
|
||||
}
|
||||
|
||||
} elseif ('..' == $pathAry[$i]) {
|
||||
if (1 == $i) {
|
||||
array_splice($pathAry, 1, 1);
|
||||
|
||||
} elseif ('..' != $pathAry[$i - 1]) {
|
||||
if ($i < count($pathAry) - 1) {
|
||||
array_splice($pathAry, $i - 1, 2);
|
||||
$i--;
|
||||
} else {
|
||||
array_splice($pathAry, $i - 1, 2, '');
|
||||
}
|
||||
}
|
||||
|
||||
} else {
|
||||
$i++;
|
||||
}
|
||||
} while ($i < count($pathAry));
|
||||
|
||||
return implode('/', $pathAry);
|
||||
}
|
||||
|
||||
/**
|
||||
* Resolves relative URL using current page's URL as base
|
||||
*
|
||||
* The method follows procedure described in section 4 of RFC 1808 and
|
||||
* passes the examples provided in section 5 of said RFC. Values from
|
||||
* $_SERVER array are used for calculation of "current URL"
|
||||
*
|
||||
* @param string Relative URL, probably from form's action attribute
|
||||
* @return string Absolute URL
|
||||
*/
|
||||
protected static function resolveRelativeURL($url)
|
||||
{
|
||||
$https = !empty($_SERVER['HTTPS']) && ('off' != strtolower($_SERVER['HTTPS']));
|
||||
$scheme = ($https? 'https:': 'http:');
|
||||
if ('//' == substr($url, 0, 2)) {
|
||||
return $scheme . $url;
|
||||
|
||||
} else {
|
||||
$host = $scheme . '//' . $_SERVER['SERVER_NAME'] .
|
||||
(($https && 443 == $_SERVER['SERVER_PORT'] ||
|
||||
!$https && 80 == $_SERVER['SERVER_PORT'])? '': ':' . $_SERVER['SERVER_PORT']);
|
||||
if ('' == $url) {
|
||||
return $host . $_SERVER['REQUEST_URI'];
|
||||
|
||||
} elseif ('/' == $url[0]) {
|
||||
list($actPath, $actQuery) = self::splitUri($url);
|
||||
return $host . self::normalizePath($actPath) . $actQuery;
|
||||
|
||||
} else {
|
||||
list($basePath, $baseQuery) = self::splitUri($_SERVER['REQUEST_URI']);
|
||||
list($actPath, $actQuery) = self::splitUri($url);
|
||||
if ('' == $actPath) {
|
||||
return $host . $basePath . $actQuery;
|
||||
} else {
|
||||
$path = substr($basePath, 0, strrpos($basePath, '/') + 1) . $actPath;
|
||||
return $host . self::normalizePath($path) . $actQuery;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
public function perform(HTML_QuickForm2_Controller_Page $page, $name)
|
||||
{
|
||||
// we check whether *all* pages up to current are valid
|
||||
// if there is an invalid page we go to it, instead of the
|
||||
// requested one
|
||||
if ($page->getController()->isWizard()
|
||||
&& !$page->getController()->isValid($page)
|
||||
) {
|
||||
$page = $page->getController()->getFirstInvalidPage();
|
||||
}
|
||||
|
||||
// generate the URL for the page 'display' event and redirect to it
|
||||
$action = $page->getForm()->getAttribute('action');
|
||||
// Bug #13087: RFC 2616 requires an absolute URI in Location header
|
||||
if (!preg_match('@^([a-z][a-z0-9.+-]*):@i', $action)) {
|
||||
$action = self::resolveRelativeURL($action);
|
||||
}
|
||||
|
||||
if (!$page->getController()->propagateId()) {
|
||||
$controllerId = '';
|
||||
} else {
|
||||
$controllerId = '&' . HTML_QuickForm2_Controller::KEY_ID . '=' .
|
||||
$page->getController()->getId();
|
||||
}
|
||||
if (!defined('SID') || '' == SID || ini_get('session.use_only_cookies')) {
|
||||
$sessionId = '';
|
||||
} else {
|
||||
$sessionId = '&' . SID;
|
||||
}
|
||||
|
||||
return $this->doRedirect(
|
||||
$action . (false === strpos($action, '?')? '?': '&') .
|
||||
$page->getButtonName('display') . '=true' . $controllerId . $sessionId
|
||||
);
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* Redirects to a given URL via Location: header and exits the script
|
||||
*
|
||||
* A separate method is mostly needed for creating mocks of this class
|
||||
* during testing.
|
||||
*
|
||||
* @param string URL to redirect to
|
||||
*/
|
||||
protected function doRedirect($url)
|
||||
{
|
||||
header('Location: ' . $url);
|
||||
exit;
|
||||
}
|
||||
}
|
||||
?>
|
||||
Loading…
Add table
Add a link
Reference in a new issue