Wala shell

Advanced PHP File Manager

Server IP: 127.0.0.1 | PHP Version: 8.3.30 | Domains Hosted: 54

Name	Size	Last Modified
📁 ..	-	2025-05-25 12:49
📄 CHART.php <?php class CHART { var $live = FALSE; var $live_delay = 1; var $live_url = NULL; var $y_max_value = 0; var $yaxis_label = NULL; var $data = array(); function __construct($live = FALSE, $live_delay = 1, $url = NULL) { $this->live = (boolean) $live; $this->live_delay = (int) $live_delay; $this->live_url = trim($url); } function addDataSet($data, $title, $color) { $this->data[] = new CHART_DATA($data, $title, $color); } function render() { return $this->render_header() . $this->render_data() . $this->render_footer(); } private function render_data() { $buf = ""; $buf .= "<chart_data>"; $buf .="<row>\n<null/>\n"; if(isset($this->data[0])) { for($c = count($this->data[0]->data), $i=1; $i <= $c; $i++) { $buf .= "<string>{$i}</string>\n"; } } $buf .="</row>"; foreach($this->data as $chart_data) { $buf .= "<row>\n<string>{$chart_data->title}</string>\n"; foreach($chart_data->data as $value) { $buf .= "<number>{$value}</number>\n"; } $buf .= "</row>"; } $buf .="</chart_data>"; return $buf; } private function render_header() { $buf = " <chart> <axis_category size='10' color='000000' alpha='0' font='arial' bold='false' skip='0' steps='6' orientation='horizontal' /> <axis_ticks value_ticks='true' category_ticks='true' major_thickness='1' minor_thickness='1' minor_count='1' major_color='000000' minor_color='222222' position='outside' /> <axis_value min='0' max='{$this->y_max_value}' font='arial' bold='false' size='10' color='000000' alpha='100' steps='6' prefix='' suffix='' decimals='0' separator='' show_min='true' /> <chart_border color='000000' top_thickness='1' bottom_thickness='1' left_thickness='1' right_thickness='1' />\n"; $buf .= "<series_color>\n"; foreach($this->data as $set) { $buf .= "<color>{$set->color}</color>\n"; } $buf .= "</series_color>\n"; return $buf; } private function render_footer() { $buf = "<chart_grid_h alpha='10' color='000000' thickness='1' type='solid' /> <chart_grid_v alpha='10' color='000000' thickness='1' type='solid' /> <chart_pref line_thickness='2' point_shape='none' fill_shape='false' /> <chart_rect x='50' y='35' width='890' positive_alpha='30' negative_color='ff0000' negative_alpha='10' /> <chart_type>Line</chart_type> <chart_value position='cursor' size='12' color='ffffff' alpha='75' /> <legend_label layout='horizontal' bold='false' size='11' alpha='90'/> <legend_rect x='50' y='10' width='890' height='20' margin='0' fill_alpha='8' line_color='000000' line_alpha='0' line_thickness='0'/> <draw> <text color='000000' alpha='60' font='arial' rotation='-90' bold='true' size='13' x='0' y='155' width='250' height='30' h_align='middle' v_align='middle'>{$this->yaxis_label}</text> </draw> "; if($this->live) { $buf .= "<live_update url='{$this->live_url}' delay='{$this->live_delay}' />\n"; } $buf .= "</chart>"; return $buf; } } class CHART_DATA { var $data = array(); //options var $title = NULL; var $color = NULL; function CHART_DATA(&$data, $title, $color) { $this->data = &$data; $this->title = &$title; $this->color = &$color; } }	3.16 KB	2021-12-15 13:42
📄 CValidation.php <?php class CValidation { protected $_info; public function __construct() { $this->_info = NULL; } public function ExtractPost($tbl, &$d, $disp) { $this->_info = $disp->_info; $goFlag = 1 ; $index = array_keys($tbl->_dattrs); foreach ( $index as $i ) { $attr = $tbl->_dattrs[$i]; if ( $attr == NULL \|\| $attr->bypassSavePost()) continue; $d[$attr->_key] = $attr->extractPost(); $needCheck = TRUE; if ( $attr->_type == 'sel1' \|\| $attr->_type == 'sel2' ) { if ( $disp->_act == 'c' ) { $needCheck = FALSE; } else { $attr->populate_sel1_options($this->_info, $d); } } if ( $needCheck ) { $res = $this->validateAttr($attr, $d[$attr->_key]); $this->setValid($goFlag, $res); } } $res = $this->validatePostTbl($tbl, $d); $this->setValid($goFlag, $res); $this->_info = NULL; // if 0 , make it always point to curr page return $goFlag; } protected function checkListener(&$listener) { if ( $listener['secure']->GetVal() == '0' ) { if ( isset($listener['certFile']) && !$listener['certFile']->HasVal() ) { $listener['certFile']->SetErr(NULL); } if ( isset($listener['keyFile']) && !$listener['keyFile']->HasVal() ) { $listener['keyFile']->SetErr(NULL); } } else { $tids = array('L_SSL_CERT'); $this->validateElement($tids, $listener); } } protected function validateElement($tids, &$data) { $tblDef = DTblDef::GetInstance(); $valid = 1; foreach ( $tids as $tid ) { $tbl = $tblDef->GetTblDef($tid); $d = &DUtil::locateData( $data, $tbl->_dataLoc ); if ( $d == NULL ) continue; if ( $tbl->_holderIndex != NULL ) { $keys = array_keys( $d ); foreach( $keys as $key ) { $res = $this->validateTblAttr($tblDef, $tbl, $d[$key]); $this->setValid($valid, $res); } } else { $res = $this->validateTblAttr($tblDef, $tbl, $d); $this->setValid($valid, $res); } } return $valid; } protected function setValid(&$valid, $res) { if ( $valid != -1 ) { if ( $res == -1 ) { $valid = -1; } elseif ( $res == 0 && $valid == 1 ) { $valid = 0; } } if ( $res == 2 ) { $valid = 2; } } protected function validatePostTbl($tbl, &$d) { $isValid = 1; if ( $tbl->_holderIndex != NULL && isset($d[$tbl->_holderIndex])) { $newref = $d[$tbl->_holderIndex]->GetVal(); $oldref = NULL; if(isset($this->_info['holderIndex_cur'])) { $oldref = $this->_info['holderIndex_cur']; } //echo "oldref = $oldref newref = $newref \n"; if ( $oldref == NULL \|\| $newref != $oldref ) { if (isset($this->_info['holderIndex']) && $this->_info['holderIndex'] != NULL && in_array($newref, $this->_info['holderIndex']) ) { $d[$tbl->_holderIndex]->SetErr('This value has been used! Please choose a unique one.'); $isValid = -1; } } } $checkedTids = array( 'VH_TOP_D', 'VH_BASE', 'VH_UDB', 'ADMIN_USR', 'ADMIN_USR_NEW', 'L_GENERAL', 'L_GENERAL1', 'ADMIN_L_GENERAL', 'ADMIN_L_GENERAL1', // WS 'L_GENERAL_NEW', 'L_GENERAL_DEL', 'LT_GENERAL_NEW', 'LT_GENERAL', // LSLB 'L_SSL_CERT', 'TP', 'TP1' ) ; if ( in_array($tbl->_id, $checkedTids) ) { switch ($tbl->_id) { case 'TP': case 'TP1': $isValid = $this->chkPostTbl_TP($d); break; case 'VH_BASE': case 'VH_TOP_D': $isValid = $this->chkPostTbl_VH_BASE($d); break; case 'VH_UDB': $isValid = $this->chkPostTbl_VH_UDB($d); break; case 'ADMIN_USR': $isValid = $this->chkPostTbl_ADMIN_USR($d); break; case 'ADMIN_USR_NEW': $isValid = $this->chkPostTbl_ADMIN_USR_NEW($d); break; case 'L_GENERAL_NEW': // for lb case 'L_GENERAL_DEL': case 'L_GENERAL': case 'LT_GENERAL_NEW': case 'LT_GENERAL': case 'L_GENERAL1': // for ws case 'ADMIN_L_GENERAL': case 'ADMIN_L_GENERAL1': $isValid = $this->chkPostTbl_L_GENERAL($d); break; case 'L_SSL_CERT': $isValid = $this->chkPostTbl_L_SSL_CERT($d); break; } } return $isValid; } protected function chkPostTbl_TP(&$d) { $isValid = 1; $confCenter = ConfCenter::singleton(); $oldName = trim($confCenter->GetDispInfo()->_name); $newName = trim($d['name']->GetVal()); if($oldName != $newName && array_key_exists($newName, $confCenter->_serv->_data['tpTop'])) { $d['name']->SetErr("Template: \"$newName\" already exists. Please use a different name."); $isValid = -1; } return $isValid; } protected function chkPostTbl_VH_BASE(&$d) { $isValid = 1; $confCenter = ConfCenter::singleton(); $oldName = trim($confCenter->GetDispInfo()->_name); $newName = trim($d['name']->GetVal()); if($oldName != $newName && array_key_exists($newName, $confCenter->_serv->_data['vhTop'])) { $d['name']->SetErr("Virtual Hostname: \"$newName\" already exists. Please use a different name."); $isValid = -1; } return $isValid; } protected function chkPostTbl_VH_UDB(&$d) { $isValid = 1; if ( $d['pass']->GetVal() != $d['pass1']->GetVal() ) { $d['pass']->SetErr('Passwords do not match!'); $isValid = -1; } if ( !$d['pass']->HasVal() ) { //new user $d['pass']->SetErr('Missing password!'); $isValid = -1; } if ( $isValid == -1 ) { return -1; } if ( strlen($d['pass']->GetVal()) > 0 ) { $newpass = $this->encryptPass($d['pass']->GetVal()); $d['passwd'] = new CVal($newpass); } return 1; } protected function encryptPass($val) { $valid_chars = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789/."; $limit = strlen($valid_chars)-1; $isMac = (strtoupper(PHP_OS) === 'DARWIN'); if (CRYPT_MD5 == 1 && !$isMac) { $salt = '$1$'; for($i = 0; $i < 8; $i++) { $salt .= $valid_chars[rand(0,$limit)]; } $salt .= '$'; } else { $salt = $valid_chars[rand(0,$limit)]; $salt .= $valid_chars[rand(0,$limit)]; } $pass = crypt($val, $salt); return $pass; } protected function chk_admname($name) { if (!$name->HasErr()) { $val = $name->GetVal(); if (strlen($val) > 25) { $name->SetErr('name cannot be longer than 25 characters'); } else { $v1 = escapeshellcmd($val); if (($v1 !== $val) \|\| preg_match('/[:\/]/', $val)) { $name->SetErr('invalid characters in name'); } } } return $name->HasErr(); } protected function chkPostTbl_ADMIN_USR(&$d) { $isValid = 1; $this->chk_admname($d['name']); if ($d['name']->HasErr()) { $isValid = -1; } elseif ( !$d['oldpass']->HasVal() ) { $d['oldpass']->SetErr('Missing Old password!'); $isValid = -1; } else { $file = $_SERVER['LS_SERVER_ROOT'] . 'admin/conf/htpasswd'; $udb = ConfigFileEx::loadUserDB($file); $olduser = $this->_info['holderIndex_cur']; $passwd = $udb[$olduser]['passwd']->GetVal(); $oldpass = $d['oldpass']->GetVal(); $encypt = crypt($oldpass, $passwd); if ( $encypt != $passwd ) { $d['oldpass']->SetErr('Invalid old password!'); $isValid = -1; } } if ( !$d['pass']->HasVal() ) { $d['pass']->SetErr('Missing new password!'); $isValid = -1; } elseif ( $d['pass']->GetVal() != $d['pass1']->GetVal() ) { $d['pass']->SetErr('New passwords do not match!'); $isValid = -1; } if ( $isValid == -1 ) { return -1; } $newpass = $this->encryptPass($d['pass']->GetVal()); $d['passwd'] = new CVal($newpass); return 1; } protected function chkPostTbl_ADMIN_USR_NEW(&$d) { $isValid = 1; $this->chk_admname($d['name']); if ($d['name']->HasErr()) { $isValid = -1; } if ( !$d['pass']->HasVal() ) { $d['pass']->SetErr('Missing new password!'); $isValid = -1; } elseif ( $d['pass']->GetVal() != $d['pass1']->GetVal() ) { $d['pass']->SetErr('New passwords do not match!'); $isValid = -1; } if ( $isValid == -1 ) { return -1; } $newpass = $this->encryptPass($d['pass']->GetVal()); $d['passwd'] = new CVal($newpass); return 1; } protected function chkPostTbl_L_GENERAL(&$d) { $isValid = 1; $ip = $d['ip']->GetVal(); if ( $ip == 'ANY' ) { $ip = ''; } $port = $d['port']->GetVal(); $d['address'] = new CVal("$ip:$port"); $confCenter = ConfCenter::singleton(); $oldName = trim($confCenter->GetDispInfo()->_name); $newName = trim($d['name']->GetVal()); if($oldName != $newName && array_key_exists($newName, $confCenter->_serv->_data['listeners'])) { $d['name']->SetErr("Listener \"$newName\" already exists. Please use a different name."); $isValid = -1; } return $isValid; } protected function isCurrentListenerSecure() { $confCenter = ConfCenter::singleton(); $listenerName = trim($confCenter->GetDispInfo()->_name); $l = $confCenter->_serv->_data['listeners'][$listenerName]; return ($l['secure']->GetVal() == 1); } protected function chkPostTbl_L_SSL_CERT(&$d) { $isValid = 1; if ($this->isCurrentListenerSecure()) { $err = 'Value must be set for secured listener'; if (!$d['keyFile']->HasVal()) { $d['keyFile']->SetErr($err); $isValid = -1; } if (!$d['certFile']->HasVal()) { $d['certFile']->SetErr($err); $isValid = -1; } } return $isValid; } protected function validateTblAttr($tblDef, $tbl, &$data) { $valid = 1; if ( $tbl->_subTbls != NULL ) { $tid = DUtil::getSubTid($tbl->_subTbls, $data); if ( $tid == NULL ) { return; } $tbl1 = $tblDef->GetTblDef($tid); } else { $tbl1 = $tbl; } $index = array_keys($tbl1->_dattrs); foreach ( $index as $i ) { $attr = $tbl1->_dattrs[$i]; if ( $attr->_type == 'sel1' \|\| $attr->_type == 'sel2' ) { $attr->populate_sel1_options($this->_info, $data); } $res = $this->validateAttr($attr, $data[$attr->_key]); $this->setValid($valid, $res); } return $valid; } protected function validateAttr($attr, &$cvals) { $valid = 1; if ( is_array($cvals) ) { for ( $i = 0 ; $i < count($cvals) ; ++$i ) { $res = $this->isValidAttr($attr, $cvals[$i]); $this->setValid($valid, $res); } } else { $valid = $this->isValidAttr($attr, $cvals); } return $valid; } protected function isValidAttr($attr, $cval) { if ($cval == NULL \|\| $cval->HasErr()) return -1; if ( !$cval->HasVal()) { if ( $attr->_allowNull ) { return 1; } $cval->SetErr('value must be set'); return -1; } if ( $attr->_type == 'cust' ) { return 1; } $chktype = array('uint', 'name', 'vhname', 'dbname', 'sel','sel1','sel2', 'bool','file','filep','file0','file1', 'filetp', 'path', 'note', 'uri','expuri','url', 'httpurl', 'email', 'dir', 'addr', 'ipport', 'wsaddr', 'parse'); if ( !in_array($attr->_type, $chktype) ) { // not checked type ('domain', 'subnet' return 1; } $type3 = substr($attr->_type, 0, 3); if ( $type3 == 'sel' ) { // for sel, sel1, sel2 $funcname = 'chkAttr_sel'; } elseif ( $type3 == 'fil' \|\| $type3 == 'pat' ) { $funcname = 'chkAttr_file'; } else { $funcname = 'chkAttr_' . $attr->_type; } if ( $attr->_multiInd == 1 ) { $valid = 1; $vals = DUtil::splitMultiple($cval->GetVal()); $err = array(); $funcname .= '_val'; foreach( $vals as $i=>$v ) { $res = $this->$funcname($attr, $v, $err[$i]); $this->setValid($valid, $res); } $cval->SetErr(trim(implode(' ', $err))); return $valid; }else { return $this->$funcname($attr, $cval); } } protected function chkAttr_sel($attr, $cval) { $err = ''; $res = $this->chkAttr_sel_val($attr, $cval->GetVal(), $err); $cval->SetErr($err); return $res; } protected function chkAttr_sel_val($attr, $val, &$err) { if ( isset( $attr->_maxVal ) && !array_key_exists($val, $attr->_maxVal) ) { $err = "invalid value: $val"; return -1; } return 1; } protected function chkAttr_name($attr, $cval) { $cval->SetVal( preg_replace("/\s+/", ' ', $cval->GetVal())); $res = $this->chkAttr_name_val($attr, $cval->GetVal(), $err); $cval->SetErr($err); return $res; } protected function chkAttr_name_val($attr, $val, &$err) { if ( preg_match( "/[{}<>&%]/", $val) ) { $err = 'invalid characters in name'; return -1; } if ( strlen($val) > 100 ) { $err = 'name can not be longer than 100 characters'; return -1; } return 1; } protected function chkAttr_dbname($attr, $cval) { $cval->SetVal(preg_replace("/\s+/", ' ', $cval->GetVal())); $val = $cval->GetVal(); if ( preg_match( "/[,;<>&%]/", $val ) ) { $cval->SetErr('Invalid characters found in name'); return -1; } if ( strpos($val, ' ') !== FALSE ) { $cval->SetErr('No space allowed in the name'); return -1; } if ( strlen($val) > 100 ) { $cval->SetErr('name can not be longer than 100 characters'); return -1; } return 1; } protected function chkAttr_note($attr, $cval) { if (preg_match("/[{}<]/", $cval->GetVal(), $m)) { // avoid <script, also {} for conf format $cval->SetErr("character $m[0] not allowed"); return -1; } return 1; } protected function chkAttr_vhname($attr, $cval) { $res = $this->chkAttr_dbname($attr, $cval); if ($res == 1) { $this->_info['VH_NAME'] = $cval->GetVal(); } return $res; } protected function allow_create($attr, $absname) { if ( strpos($attr->_maxVal, 'c') === FALSE ) { return FALSE; } if ( $attr->_minVal >= 2 && ( strpos($absname, $_SERVER['LS_SERVER_ROOT']) === 0 )) { return TRUE; } if (isset($this->_info['VH_ROOT'])) { $VH_ROOT = $this->_info['VH_ROOT']; } else { $VH_ROOT = NULL; } if (isset($this->_info['DOC_ROOT'])) { $DOC_ROOT = $this->_info['DOC_ROOT']; } if ( $attr->_minVal >= 3 && ( strpos($absname, $VH_ROOT) === 0 ) ) { return TRUE; } if ( $attr->_minVal == 4 && ( strpos($absname, $DOC_ROOT) === 0 ) ) { return TRUE; } return FALSE; } protected function clean_absolute_path($abspath) { $absname = PathTool::clean($abspath); if ( isset( $_SERVER['LS_CHROOT'] ) ) { $root = $_SERVER['LS_CHROOT']; $len = strlen($root); if ( strncmp( $absname, $root, $len ) == 0 ) { $absname = substr($absname, $len); } } return $absname; } protected function test_file(&$absname, &$err, $attr) { $absname = $this->clean_absolute_path($absname); if ( $attr->_type == 'file0' ) { if ( !file_exists($absname) ) { return 1; //allow non-exist } } if ( $attr->_type == 'path' \|\| $attr->_type == 'filep' \|\| $attr->_type == 'dir' ) { $type = 'path'; } else { $type = 'file'; } if ( ($type == 'path' && !is_dir($absname)) \|\| ($type == 'file' && !is_file($absname)) ) { $err = $type .' '. htmlspecialchars($absname) . ' does not exist.'; if ( $this->allow_create($attr, $absname) ) { $err .= ' <a href="javascript:createFile(\''. $attr->_htmlName . '\')">CLICK TO CREATE</a>'; } else { $err .= ' Please create manually.'; } return -1; } if ( (strpos($attr->_maxVal, 'r') !== FALSE) && !is_readable($absname) ) { $err = $type . ' '. htmlspecialchars($absname) . ' is not readable'; return -1; } if ( (strpos($attr->_maxVal, 'w') !== FALSE) && !is_writable($absname) ) { $err = $type . ' '. htmlspecialchars($absname) . ' is not writable'; return -1; } if ( (strpos($attr->_maxVal, 'x') !== FALSE) && !is_executable($absname) ) { $err = $type . ' '. htmlspecialchars($absname) . ' is not executable'; return -1; } return 1; } protected function chkAttr_file($attr, $cval) { $val = $cval->GetVal(); $err = ''; $res = $this->chkAttr_file_val($attr, $val, $err); $cval->SetVal($val); $cval->SetErr($err); return $res; } protected function chkAttr_dir($attr, $cval) { $val = $cval->GetVal(); $err = ''; if ( substr($val,-1) == '' ) { $res = $this->chkAttr_file_val($attr, substr($val,0,-1), $err); } else { $res = $this->chkAttr_file_val($attr, $val, $err); } $cval->SetVal($val); $cval->SetErr($err); return $res; } protected function isNotAllowedPath($path) { $blocked = '/admin/html/'; if (strpos($path, $blocked) !== false) { return true; } return false; } protected function isNotAllowedExtension($path) { $ext = substr($path, -4); $notallowed = ['.php', '.cgi', '.pl', '.shtml']; foreach ($notallowed as $test) { if (strcasecmp($ext, $test) == 0) { return true; } } return false; } protected function check_cmd_invalid_str($cmd) { // check if it's allowed command, do not allow ' " -c -i /dev/tcp bash sh csh tcsh zsh ksh $cmd = str_replace('.', 'a', $cmd); // replace . with char before pattern check $pattern = '#("\|\'\|;\|-c\|-i\|/dev/tcp\|\Wbash\W\|\Wsh\W\|\Wcsh\W\|\Wtcsh\W\|\Wzsh\W\|\Wksh\W)#'; if (preg_match($pattern, $cmd, $m)) { return $m[0]; } $cmd = str_replace('\\', '', $cmd); // remove all escape & try again if (preg_match($pattern, $cmd, $m)) { return $m[0]; } return null; } public function chkAttr_file_val($attr, $val, &$err) { // apply to all if ($this->isNotAllowedPath($val)) { $err = 'Directory not allowed'; return -1; } if ( $attr->_type == 'file0' && $this->isNotAllowedExtension($val)) { $err = 'File extension not allowed'; return -1; } clearstatcache(); $err = NULL; if ( $attr->_type == 'filep' ) { $path = substr($val, 0, strrpos($val,'/')); } else { $path = $val; if ($attr->_type == 'file1') { // file1 is command $invalid_str = $this->check_cmd_invalid_str($path); if ($invalid_str) { $err = 'Cannot contain string ' . htmlspecialchars($invalid_str, ENT_QUOTES); return -1; } $pos = strpos($val, ' '); if ($pos > 0) { $path = substr($val, 0, $pos); // check first part is valid path } } } $res = $this->chk_file1($attr, $path, $err); if ($attr->_type == 'filetp') { $pathtp = $_SERVER['LS_SERVER_ROOT'] . 'conf/templates/'; if (strstr($path, $pathtp) === FALSE) { $err = ' Template file must locate within $SERVER_ROOT/conf/templates/'; $res = -1; } else if (substr($path, -4) != '.xml') { $err = ' Template file name needs to be ".xml"'; $res = -1; } } if ($res == -1 && $_POST['file_create'] == $attr->_htmlName && $this->allow_create($attr, $path)) { if (PathTool::createFile($path, $err, $attr->_htmlName)) { $err = "$path has been created successfully."; } $res = 0; // make it always point to curr page } if ( $attr->_key == 'vhRoot' ) { if ( substr($path,-1) != '/' ) { $path .= '/'; } if ($res == -1) { // do not check path for vhroot, it may be different owner $err = ''; $res = 1; } $this->_info['VH_ROOT'] = $path; } elseif ($attr->_key == 'docRoot') { if ($res == -1) { // do not check path for vhroot, it may be different owner $err = ''; $res = 1; } } return $res; } protected function chk_file1($attr, &$path, &$err) { if ($this->get_abs_path($attr->_minVal, $path, $err) == 1) { return $this->test_file($path, $err, $attr); } } protected function get_cleaned_abs_path($attr_minVal, &$path, &$err) { if ($this->get_abs_path($attr_minVal, $path, $err) == 1) { $absname = $this->clean_absolute_path($path); return $absname; } return null; } protected function get_abs_path($attr_minVal, &$path, &$err) { if(!strlen($path)) { $err = "Invalid Path."; return -1; } $s = substr($path, 0, 1); if ( strpos($path, '$VH_NAME') !== FALSE ) { $path = str_replace('$VH_NAME', $this->_info['VH_NAME'], $path); } if ( $s == '/' ) { return 1; } if ( $attr_minVal == 1 ) { $err = 'only accept absolute path'; return -1; } elseif ( $attr_minVal == 2 ) { if (strncasecmp('$SERVER_ROOT', $path, 12) == 0) { $path = $_SERVER['LS_SERVER_ROOT'] . substr($path, 13); } elseif ($s == '$') { $err = 'only accept absolute path or path relative to $SERVER_ROOT: ' . $path; return -1; } else { $path = $_SERVER['LS_SERVER_ROOT'] . $path; // treat as relative to SERVER_ROOT } } elseif ( $attr_minVal == 3 ) { if ( strncasecmp('$SERVER_ROOT', $path, 12) == 0 ) { $path = $_SERVER['LS_SERVER_ROOT'] . substr($path, 13); } elseif ( strncasecmp('$VH_ROOT', $path, 8) == 0 ) { if (isset($this->_info['VH_ROOT'])) { $path = $this->_info['VH_ROOT'] . substr($path, 9); } } elseif ($s == '$') { $err = 'only accept absolute path or path relative to $SERVER_ROOT or $VH_ROOT'; return -1; } else { $path = $_SERVER['LS_SERVER_ROOT'] . $path; // treat as relative to SERVER_ROOT } } elseif ( $attr_minVal == 4 ) { if ( strncasecmp('$SERVER_ROOT', $path, 12) == 0 ) { $path = $_SERVER['LS_SERVER_ROOT'] . substr($path, 13); } elseif ( strncasecmp('$VH_ROOT', $path, 8) == 0 ) { $path = $this->_info['VH_ROOT'] . substr($path, 9); } elseif ( strncasecmp('$DOC_ROOT', $path, 9) == 0 ) { $path = $this->_info['DOC_ROOT'] . substr($path, 10); } else { $path = $this->_info['DOC_ROOT'] . $path; } } return 1; } protected function chkAttr_uri($attr, $cval) { $val = $cval->GetVal(); if ( $val[0] != '/' ) { $cval->SetErr('URI must start with "/"'); return -1; } return 1; } protected function chkAttr_expuri($attr, $cval) { $val = $cval->GetVal(); if ( substr($val, 0, 1) == '/' \|\| strncmp( $val, 'exp:', 4 ) == 0 ) { return 1; } else { $cval->SetErr('URI must start with "/" or "exp:"'); return -1; } } protected function chkAttr_url($attr, $cval) { $val = $cval->GetVal(); if (( substr($val, 0, 1) != '/' ) &&( strncmp( $val, 'http://', 7 ) != 0 ) &&( strncmp( $val, 'https://', 8 ) != 0 )) { $cval->SetErr('URL must start with "/" or "http(s)://"'); return -1; } return 1; } protected function chkAttr_httpurl($attr, $cval) { $val = $cval->GetVal(); if (strncmp( $val, 'http://', 7 ) != 0 ) { $cval->SetErr('Http URL must start with "http://"'); return -1; } return 1; } protected function chkAttr_email($attr, $cval) { $err = ''; $res = $this->chkAttr_email_val($attr, $cval->GetVal(), $err); $cval->SetErr($err); return $res; } protected function chkAttr_email_val($attr, $val, &$err) { if ( preg_match("/^[[:alnum:]._-]+@.+/", $val ) ) { return 1; } else { $err = 'invalid email format: ' . $val; return -1; } } protected function isUdsAddr($v) { // check UDS:// unix: if (preg_match('/^(UDS:\/\/\|unix:)(.+)$/i', $v, $m)) { $v = $m[2]; $supportedvar = ['$SERVER_ROOT', '$VH_NAME', '$VH_ROOT', '$DOC_ROOT']; $v = str_replace($supportedvar, 'VAR', $v); if (preg_match("/^[a-z0-9\-_\/\.]+$/i", $v)) { return 1; } } return 0; } protected function chkAttr_addr($attr, $cval) { $v = $cval->GetVal(); if (preg_match("/^([[:alnum:]._-]+\|\[[[:xdigit:]:]+\]):(\d)+$/", $v)) { return 1; } if ($this->isUdsAddr($v)) { return 1; } $cval->SetErr('invalid address: correct syntax is "IPV4\|IPV6_address:port" or UDS://path or unix:path'); return -1; } protected function chkAttr_ipport($attr, $cval) { if ( preg_match("/^([[:alnum:]._-]+\|\[[[:xdigit:]:]+\]\|\):(\d)+$/", $cval->GetVal()) ) { return 1; } else { $cval->SetErr('invalid address: correct syntax is "IPV4\|IPV6_address:port" or ":port" for any IP.'); return -1; } } protected function chkAttr_wsaddr($attr, $cval) { $v = $cval->GetVal(); if ( preg_match("/^((http\|https):\/\/)?([[:alnum:]._-]+\|\[[[:xdigit:]:]+\])(:\d+)?$/", $v) ) { return 1; } if ($this->isUdsAddr($v)) { return 1; } $cval->SetErr('invalid address: correct syntax is "[http\|https://]IPV4\|IPV6_address[:port]" or Unix Domain Socket address "UDS://path or unix:path".'); return -1; } protected function chkAttr_bool($attr, $cval) { $val = $cval->GetVal(); if ( $val === '1' \|\| $val === '0' ) { return 1; } $cval->SetErr('invalid value'); return -1; } protected function chkAttr_parse($attr, $cval) { $err = ''; $res = $this->chkAttr_parse_val($attr, $cval->GetVal(), $err); $cval->SetErr($err); return $res; } protected function chkAttr_parse_val($attr, $val, &$err) { if ( preg_match($attr->_minVal, $val) ) { return 1; } else { if ($attr->_maxVal) { $err = "invalid format - $val, please check syntax"; } else { $err = "invalid value - $val"; } return -1; } } protected function getKNum($strNum) { $tag = substr($strNum, -1); switch( $tag ) { case 'K': case 'k': $multi = 1024; break; case 'M': case 'm': $multi = 1048576; break; case 'G': case 'g': $multi = 1073741824; break; default: return intval($strNum); } return (intval(substr($strNum, 0, -1)) * $multi); } protected function chkAttr_uint($attr, $cval) { $val = $cval->GetVal(); if ( preg_match("/^(-?\d+)([KkMmGg]?)$/", $val, $m) ) { $val1 = $this->getKNum($val); if (isset($attr->_minVal)) { $min = $this->getKNum($attr->_minVal); if ($val1 < $min) { $cval->SetErr('number is less than the minumum required'); return -1; } } if (isset($attr->_maxVal)) { $max = $this->getKNum($attr->_maxVal); if ( $val1 > $max ) { $cval->SetErr('number exceeds maximum allowed'); return -1; } } return 1; } else { $cval->SetErr('invalid number format'); return -1; } } protected function chkDups(&$data, &$checkList, $key) { if ( in_array( $data[$key]->GetVal(), $checkList ) ) { $data[$key]->SetErr( "This $key \"" . $data[$key]->GetVal() . '\" already exists. Please enter a different one.'); return FALSE; } return TRUE; } protected function chkExtApp(&$data, &$attr) { $isValid = TRUE; if ( $data['autoStart']->GetVal() ) { if ( !$data['path']->HasVal() ) { $data['path']->SetErr('must provide path when autoStart is enabled'); $isValid = FALSE; } if ( !$data['backlog']->HasVal() ) { $data['backlog']->SetErr('must enter backlog value when autoStart is enabled'); $isValid = FALSE; } if ( !$data['instances']->HasVal() ) { $data['instances']->SetErr('must give number of instances when autoStart is enabled'); $isValid = FALSE; } } if ( isset($attr['names']) && (!$this->chkDups($to, $attr['names'], 'name')) ) { $isValid = FALSE; } return $isValid; } protected function chkScriptHandler(&$to, &$attr) { $vals = DUtil::splitMultiple( $to['suffix']->GetVal() ); $isValid = TRUE; foreach( $vals as $suffix ) { if ( in_array( $suffix, $attr['names'] ) ) { $t[] = $suffix; $isValid = FALSE; } } if ( !$isValid ) { $to['suffix']->SetErr(' Suffix ' . implode(', ', $t) . ' already exists. Please use a different suffix.'); } return $isValid; } }	27.12 KB	2021-12-15 13:42
📄 ConfData.php <?php class CVal { private $_v = NULL; //value private $_e = NULL; //err public function __construct($v, $e=NULL) { $this->_v = $v; $this->_e = $e; } public function GetVal() { return $this->_v; } public function SetVal($v) { $this->_v = $v; } public function HasVal() { // 0 is valid return ($this->_v !== NULL && $this->_v !== ''); } public function GetErr() { return $this->_e; } public function SetErr($e) { $this->_e = $e; } public function HasErr() { return $this->_e != NULL; } } class ConfData { var $_data; var $_path; var $_type; //{'serv','admin','vh','tp'} var $_id; public function __construct($type, $path, $id=NULL) { $this->_data = array(); $this->_type = $type; $this->_path = $path; $this->_id = $id; } public function setId($id) { $this->_id = $id; } }	853 B	2021-12-15 13:42
📄 ConfigFile.php <?php class ConfigFile { private $pageDef; private $tblDef; //TAG=0, VALUE=1, ELEMENTS=2 public function __construct() {} //type = ('serv','vh','admin','tp','ha') public function load(&$confData, &$err) { if ($confData->_type == 'ha' && !is_file($confData->_path) && !$this->init_haconfig($confData->_path)) { // if not exist, write an empty file return false; } $xmltree = new XmlTreeBuilder(); $rootNode = &$xmltree->ParseFile($confData->_path, $err); if ( $rootNode != null ) { $this->pageDef = DPageDef::GetInstance(); $this->tblDef = DTblDef::GetInstance(); $this->load_data($rootNode, $confData); switch( $confData->_type ) { case 'serv': $this->fill_serv($confData); break; case 'admin': $this->fill_listener($confData); break; case 'vh': case 'tp': $this->fill_vh($confData); break; case 'ha': break; } return true; } error_log($err); $confData->_data = array(); return false; } function init_haconfig($confpath) { $fd = fopen($confpath, 'w'); if ( !$fd ) { error_log("failed to open in write mode for $confpath"); return false; } $text = '<?xml version="1.0" encoding="UTF-8"?>'."\n" . '<haConfig></haConfig>' . "\n"; if(fwrite($fd, $text) === false) { error_log("failed to write temp config for $confpath"); return false; } fclose($fd); return true; } public function save(&$confData) { $fd = fopen($confData->_path . ".new", 'w'); if ( !$fd ) { error_log("failed to open in write mode for " . $confData->_path . ".new"); return false; } if ( !isset($this->pageDef)) { $this->pageDef = DPageDef::GetInstance(); $this->tblDef = DTblDef::GetInstance(); } $data = &$this->convert_data($confData); $level = 0; $result = '<?xml version="1.0" encoding="UTF-8"?>'."\n"; $this->writeStruct( $result, $level, $data); if(fwrite($fd, $result) === false) { error_log("failed to write temp config for " . $confData->_path . ".new"); return false; } fclose($fd); @unlink($confData->_path . ".bak"); if(!rename($confData->_path, $confData->_path . ".bak")) { error_log("failed to rename " . $confData->_path . " to " . $confData->_path . ".bak"); return false; } if(!rename($confData->_path . ".new", $confData->_path)) { error_log("failed to rename " . $confData->_path . ".new to " . $confData->_path); return false; } return true; } private function &convert_data($confData) { $type = $confData->_type; $from = $confData->_data; $to0 = array(); if ( $type == 'serv' ) { $t = CLIENT::UTYPE; if ( $t == 'LSWS' ) $to = &$to0['httpServerConfig']; else $to = &$to0['loadBalancerConfig']; } elseif ( $type == 'vh' ) { $to = &$to0['virtualHostConfig']; } elseif ( $type == 'tp' ) { $to = &$to0['virtualHostTemplate']; } elseif ( $type == 'admin' ) { $to = &$to0['adminConfig']; } elseif ( $type == 'ha' ) { $to = &$to0['haConfig']; } $pages = $this->pageDef->GetFileDef($type); $num = count($pages); for ( $c = 0 ; $c < $num ; ++$c ) { $page = $pages[$c]; if ( $page->GetLayerId() == null ){ $this->convertStruct( $from, $to, $page->GetTids() ); } else { $from1 = &DUtil::locateData( $from, $page->GetDataLoc() ); if ( empty($from1) ) { continue; } $to1 = &DUtil::locateData( $to, $page->GetLayerId() ); if ( $page->GetHolderIndex() == null ) { $this->convertStruct( $from1, $to1, $page->GetTids() ); } else { $keys = array_keys($from1); foreach( $keys as $key ) { $to2 = array(); $this->convertStruct( $from1[$key], $to2, $page->GetTids() ); $to1[] = $to2; } } } } return $to0; } private function load_data(&$rootNode, &$confData) { $holder = &$confData->_data; $el = &$rootNode[2]; $pages = $this->pageDef->GetFileDef($confData->_type); $num = count($pages); for ( $c = 0 ; $c < $num ; ++$c ) { $page = &$pages[$c]; if ( $page->GetLayerId() == null ) $this->extractSection( $el, $holder, $page->GetTids() ); else { $isRepeated = ($page->GetHolderIndex() != null); $els = &$this->locateXmlElement( $el, $page->GetLayerId(), $isRepeated ); if ( count($els) == 0 ) continue; $holder1 = &DUtil::locateData( $holder, $page->GetDataLoc() ); if ( !$isRepeated ) { $this->extractSection( $els[0], $holder1, $page->GetTids() ); } else { $innercount = count($els); for ( $j = 0 ; $j < $innercount ; ++$j ) { $holder2 = array(); $this->extractSection( $els[$j], $holder2, $page->GetTids() ); if ($holder2[$page->GetHolderIndex()] != null) $holder1[$holder2[$page->GetHolderIndex()]->GetVal()] = $holder2; else { error_log("empty page index " . $page->GetHolderIndex() . print_r($page, true)); error_log("holder2 is " . print_r($holder2, true)); die(); } } } } } } private function fill_serv(&$confData) { $holder = &$confData->_data; $runningAs = 'user('. $holder['general']['user']->GetVal() . ') : group(' . $holder['general']['group']->GetVal() .')' ; $holder['general']['runningAs'] = new CVal($runningAs); $proc = 1; if (CLIENT::UTYPE == 'LSWS') { $proc = substr($_SERVER['LSWS_CHILDREN'], 0, 1); if ($proc == '9') { if (isset($holder['general']['workerProcesses'])) { $proc = 0; // bypass } else { $proc = substr($_SERVER['LSWS_CHILDREN'], 2); } } } elseif (CLIENT::UTYPE == 'LSLB') { $proc = substr($_SERVER['LSLB_CHILDREN'], 0, 1); if ($proc == '9') { if (isset($holder['general']['workerProcesses'])) { $proc = 0; // bypass } else { // 9:n $proc = substr($_SERVER['LSLB_CHILDREN'], 2); } } } if ($proc > 0) { $holder['general']['workerProcesses'] = new CVal($proc); } $this->fill_listener($confData); } private function fill_listener(&$confData) { $listeners = &$confData->_data['listeners']; if ( empty($listeners)) return; $lnames = array_keys($listeners); foreach ( $lnames as $ln ) { $l = &$listeners[$ln]; if (isset($l['address'])) { $addr = $l['address']->GetVal(); $pos = strrpos($addr,':'); if ( $pos ) { $ip = substr($addr, 0, $pos); if ( $ip == '*' ) $ip = 'ANY'; $l['ip'] = new CVal($ip); $l['port'] = new CVal(substr($addr, $pos+1)); } } } } private function fill_vh(&$confData) { $ctxs = &$confData->_data['context']; if ( empty($ctxs) ) return; $keys = array_keys($ctxs); $i = 1; foreach ( $keys as $k ) { $ctxs[$k]['order'] = new CVal($i); ++$i; } } private function extractSection( &$el, &$holder, $tids) { foreach( $tids as $tid ) { $tbl = $this->tblDef->GetTblDef($tid); $holderIndex = $tbl->_holderIndex; $isRepeated = ($holderIndex != null); $els = &$this->locateXmlElement($el, $tbl->_layerId, $isRepeated); if ( count($els) == 0 ) continue; $holder_cur = &DUtil::locateData( $holder, $tbl->_dataLoc ); $tags = $tbl->GetTags(); foreach ($els as $e) { if ( $isRepeated ) { $loader_root = array(); $loader_cur = &DUtil::locateData( $loader_root, $tbl->_dataLoc ); $this->extractElement('' , $tags, $e, $loader_cur); if ( $tbl->_subTbls != null ) { $this->extractSubTbl($e, $loader_root, $tbl); } if ( $tbl->_linkedTbls != null && isset($tbl->_linkedTbls['file']) ) { $this->extractSection($e, $loader_cur, $tbl->_linkedTbls['file']); } if ($loader_cur[$holderIndex] != null) { $holder_cur[ $loader_cur[$holderIndex]->GetVal() ] = $loader_cur; } } else { $this->extractElement('' , $tags, $e, $holder_cur); if ( $tbl->_subTbls != null ) { $this->extractSubTbl($e, $holder_cur, $tbl) ; } } } } } private function extractSubTbl($el, &$holder, $tbl) { $holder1 = &DUtil::locateData( $holder, $tbl->_dataLoc ); $tid = DUtil::getSubTid($tbl->_subTbls, $holder1); if ( $tid == null ) return; if ( is_array($tid) ) { $tids = $tid; $holder2 = array() ; $this->extractSection($el, $holder2, $tids) ; foreach ( $holder2 as $key => $val ) { $holder1[$key] = $val ; } } else { $tids = array( $tid ) ; $holder2 = array() ; $this->extractSection($el, $holder2, $tids) ; $holder3 = &DUtil::locateData($holder2, $tbl->_dataLoc) ; $keys = array_keys($holder3) ; foreach ( $holder3[$keys[0]] as $key => $val ) { $holder1[$key] = $val ; } } } private function &locateXmlElement(&$el, $layerId, $isRepeated) { $els = array(); if ( $layerId == null ) { $els[] = &$el; } else { $layerIds = explode(':', $layerId); $depth = count($layerIds); $el1 = &$el; for ( $layer = 0 ; $layer < $depth ; ++$layer ) { $innercount = count($el1); $tag = $layerIds[$layer]; $found = false; for ( $i = 0 ; $i < $innercount ; ++$i ) { if ( $el1[$i][0] == $tag ) { $found = true; if ( ($layer+1) == $depth ) { $els[] = &$el1[$i][2]; if ( !$isRepeated ) break; } else { $el1 = &$el1[$i][2]; break; } } } if (!$found) break; } } return $els; } private function extractElement($prefix, $tags, $el, &$data) { $ids = array_keys($tags); foreach ($el as $e) { $name = $e[0]; if ( in_array($name, $ids) ) { if ( is_array($tags[$name]) ) { $prefix1 = $prefix . $name . ':'; $this->extractElement( $prefix1, $tags[$name], $e[2], $data ); } else { $index = $prefix . $name; if ( $tags[$name] == 2 ) $data[$index][] = new CVal($e[1]); else $data[$index] = new CVal($e[1]); } } } } private function writeStruct(&$result, &$level, &$data) { $keys = array_keys($data); foreach ($keys as $key) { $data1 = &$data[$key]; if (is_array($data1)) { if (isset($data1[0])) { //numeric $c = count($data1); for ($i = 0; $i < $c; ++$i) { if (is_array($data1[$i])) { $result .= $this->xmlTagS($level, $key); $this->writeStruct($result, $level, $data1[$i]); $result .= $this->xmlTagE($level, $key); } else $result .= $this->xmlTag($level, $key, $data1[$i]); } } else { $result .= $this->xmlTagS($level, $key); $this->writeStruct($result, $level, $data1); $result .= $this->xmlTagE($level, $key); } } else { if (isset($data1)) $result .= $this->xmlTag($level, $key, $data1); } } } private function convertStruct( &$from, &$to, $tids ) { foreach( $tids as $tid ) { $tbl = $this->tblDef->GetTblDef($tid); $fholder = &DUtil::locateData($from, $tbl->_dataLoc); if ( !isset($fholder) ) continue; $holder = &DUtil::locateData($to, $tbl->_layerId); if ( $tbl->_holderIndex != null ) { $fkeys = array_keys( $fholder ); foreach ( $fkeys as $fkey ) { $data = array(); $from1 = &$fholder[$fkey]; $this->convertOneLevel($from1, $data, $tbl->_dattrs); if ( $tbl->_subTbls != null ) { $this->convertSubTbl($from1, $data, $tbl); } if ( $tbl->_linkedTbls != null && isset($tbl->_linkedTbls['file']) ) { $this->convertStruct($from1, $data, $tbl->_linkedTbls['file']); } $holder[] = $data; } } else { $this->convertOneLevel($fholder, $holder, $tbl->_dattrs); if ( $tbl->_subTbls != null ) { $this->convertSubTbl($fholder, $holder, $tbl) ; } } } } private function convertSubTbl($from, &$to, $tbl) { $tid1 = DUtil::getSubTid($tbl->_subTbls, $from); if ( $tid1 == null ) return; if ( is_array($tid1) ) { $this->convertStruct( $from, $to, $tid1 ); } else { $tbl1 = $this->tblDef->getTblDef($tid1) ; $this->convertOneLevel($from, $to, $tbl1->_dattrs) ; } } private function convertOneLevel($from, &$to, $attrs) { foreach ( $attrs as $attr ) { if ( $attr->_type != 'action' && $attr->_FDE[0] == 'Y' ) { $this->convertCopy($from, $to, $attr); } } } private function convertCopy( $from, &$to, $attr ) { $attr_key = $attr->_key; if ( !isset($from[$attr_key]) && $attr->_allowNull ) { return; } $prepared = null; if (isset($from[$attr_key]) && is_array($from[$attr_key]) ) { foreach ( $from[$attr_key] as $i ) { $prepared[] = $i->GetVal(); } } elseif (isset($from[$attr_key]) && $from[$attr_key]->HasVal()) { $prepared = $from[$attr_key]->GetVal(); } if ( strpos($attr_key, ':') === false ) { $to[$attr_key] = $prepared; } else { $to1 = &DUtil::locateData($to, $attr_key); $to1 = $prepared; } } private function xmlTag($level, $tag, $value) { $val = htmlspecialchars($value); if (substr($val, 0, 1) == "\n") { // textarea1, start and end with \n return str_repeat(' ', $level) . "<$tag>$val" . str_repeat(' ', $level) ."</$tag>\n"; } elseif (strpos($val, "\n") !== false) { // old textarea, add \n at begin and end return str_repeat(' ', $level) . "<$tag>\n$val\n" . str_repeat(' ', $level) ."</$tag>\n"; } return str_repeat(' ', $level) . "<$tag>$val</$tag>\n"; } private function xmlTagS(&$level, $tag) { return str_repeat(' ', $level++) . "<$tag>\n"; } private function xmlTagE(&$level, $tag) { return str_repeat(' ', --$level) . "</$tag>\n"; } }	13.98 KB	2021-12-15 13:42
📄 ConfigFileEx.php <?php class ConfigFileEx { // grep logging.log.fileName, no need from root tag, any distinctive point will do public static function grepTagValue($filename, $tags) { $contents = file_get_contents($filename); if (is_array($tags)) { $values = array(); foreach ($tags as $tag) { $values[$tag] = ConfigFileEx::grepSingleTagValue($tag, $contents); } return $values; } return ConfigFileEx::grepSingleTagValue($tags, $contents); } public static function grepSingleTagValue($tag, &$contents) { $singleTags = explode('.', $tag); $cur_pos = 0; $end_tag = ''; foreach($singleTags as $singletag) { $findtag = "<$singletag>"; $cur_pos = strpos($contents, $findtag, $cur_pos); if ($cur_pos === false) break; $cur_pos += strlen($findtag); $end_tag = "</$singletag>"; } if(!strlen($contents) \|\| !strlen($end_tag)) { $last_pos = false; } else { $last_pos = strpos($contents, $end_tag, $cur_pos); } if ( $last_pos !== false) { return substr($contents, $cur_pos, $last_pos - $cur_pos); } else return null; } public static function loadHAVip($haconf) { if (!file_exists($haconf)) { return null; } $contents = file_get_contents($haconf); if ($contents === false) { return null; } if (preg_match_all('/<vip>(.+)<\/vip>/', $contents, $res)) { $r = $res[1]; $ips = []; foreach ($r as $vips) { $vipsl = preg_split("/[\s,]+/", trim($vips), -1, PREG_SPLIT_NO_EMPTY); $ips = array_merge($ips, $vipsl); } $ips = array_unique($ips); $finallist = []; foreach ($ips as $ip) { $finallist[$ip] = $ip; } return $finallist; } else { return null; } } // other files public static function &loadMime($filename) { $lines = file($filename); if ( $lines == false ) { return false; } $mime = array(); foreach( $lines as $line ) { $c = strpos($line, '='); if ( $c > 0 ) { $suffix = trim(substr($line, 0, $c)); $type = trim(substr($line, $c+1 )); $mime[$suffix] = array('suffix' => new CVal($suffix), 'type' => new CVal($type)); } } ksort($mime, SORT_STRING); reset($mime); return $mime; } public static function saveMime($filename, &$mime) { $fd = fopen($filename, 'w'); if ( !$fd ) { return false; } ksort($mime, SORT_STRING); reset($mime); foreach( $mime as $key => $entry ) { if ( strlen($key) < 8 ) { $key = substr($key . ' ', 0, 8); } $line = "$key = " . $entry['type']->GetVal() . "\n"; fputs( $fd, $line ); } fclose($fd); return true; } public static function &loadUserDB($filename) { if ( PathTool::isDenied($filename) ) { return false; } $lines = file($filename); $udb = array(); if ( $lines == false ) { error_log('failed to read from ' . $filename); return $udb; } foreach( $lines as $line ) { $line = trim($line); $parsed = explode(":",$line); if(is_array($parsed)) { $size = count($parsed); if($size != 2 && $size !=3) { continue; } if(!strlen($parsed[0]) \|\| !strlen($parsed[1])) { continue; } $user = array(); if($size >= 2) { $user['name'] = new CVal(trim($parsed[0])); $user['passwd'] = new CVal(trim($parsed[1])); } if($size == 3 && strlen($parsed[2])) { $user['group'] = new CVal(trim($parsed[2])); } $udb[$user['name']->GetVal()] = $user; } } ksort($udb); reset($udb); return $udb; } public static function saveUserDB($filename, &$udb) { if ( PathTool::isDenied($filename) ) { return false; } $fd = fopen($filename, 'w'); if ( !$fd ) { return false; } ksort($udb); reset($udb); foreach( $udb as $name => $user ) { $line = $name . ':' . $user['passwd']->GetVal(); if (isset($user['group']) ) { $line .= ':' . $user['group']->GetVal(); } fputs( $fd, "$line\n" ); } fclose($fd); return true; } public static function &loadGroupDB($filename) { if ( PathTool::isDenied($filename) ) { return false; } $gdb = array(); $lines = file($filename); if ( $lines == false ) { return $gdb; } foreach( $lines as $line ) { $line = trim($line); $parsed = explode(':', $line); if(is_array($parsed) && count($parsed) == 2) { $nameval = trim($parsed[0]); $group = array( 'name' => new CVal($nameval), 'users' => new CVal(trim($parsed[1]))); $gdb[$nameval] = $group; } } ksort($gdb); reset($gdb); return $gdb; } public static function saveGroupDB($filename, &$gdb) { if ( PathTool::isDenied($filename) ) { return false; } $fd = fopen($filename, 'w'); if ( !$fd ) { return false; } ksort($gdb); reset($gdb); foreach( $gdb as $name => $entry ) { $line = $name . ':' . $entry['users']->GetVal() . "\n"; fputs( $fd, $line ); } fclose($fd); return true; } }	4.96 KB	2021-12-15 13:42
📄 CustStatusCode.php <?php class CustStatusCode { public static function &Get() { $status = array ( 300 => 'Multiple Choices', 301 => 'Moved Permanently', 302 => 'Found', 303 => 'See Other', 305 => 'Use Proxy', 307 => 'Temporary Redirect', 400 => 'Bad Request', 401 => 'Unauthorized', 402 => 'Payment Required', 403 => 'Forbidden', 404 => 'Not Found', 405 => 'Method Not Allowed', 406 => 'Not Acceptable', 407 => 'Proxy Authentication Required', 408 => 'Request Time-out', 409 => 'Conflict', 410 => 'Gone', 411 => 'Length Required', 412 => 'Precondition Failed', 413 => 'Request Entity Too Large', 414 => 'Request-URI Too Large', 415 => 'Unsupported Media Type', 416 => 'Requested range not satisfiable', 417 => 'Expectation Failed', 500 => 'Internal Server Error', 501 => 'Not Implemented', 502 => 'Bad Gateway', 503 => 'Service Unavailable', 504 => 'Gateway Time-out', 505 => 'HTTP Version not supported', 520 => 'Unknown Error from the origin web server', ); $options = array(); foreach ( $status as $key => $value ) { $options[$key] = "$key $value"; } return $options; } public static function &GetRedirect() { $status = array ( 300 => 'Multiple Choices', 301 => 'Moved Permanently', 302 => 'Found', 303 => 'See Other', 305 => 'Use Proxy', 307 => 'Temporary Redirect', 410 => 'Gone', 400 => 'Bad Request', 401 => 'Unauthorized', 402 => 'Payment Required', 403 => 'Forbidden', 404 => 'Not Found', 405 => 'Method Not Allowed', 406 => 'Not Acceptable', 407 => 'Proxy Authentication Required', 408 => 'Request Time-out', 409 => 'Conflict', 411 => 'Length Required', 412 => 'Precondition Failed', 413 => 'Request Entity Too Large', 414 => 'Request-URI Too Large', 415 => 'Unsupported Media Type', 416 => 'Requested range not satisfiable', 417 => 'Expectation Failed', 500 => 'Internal Server Error', 501 => 'Not Implemented', 502 => 'Bad Gateway', 503 => 'Service Unavailable', 504 => 'Gateway Time-out', 505 => 'HTTP Version not supported' ); $options = array(); foreach ( $status as $key => $value ) { $options[$key] = "$key $value"; } return $options; } }	2.22 KB	2021-12-15 13:42
📄 DATTR_HELP.php <?php class DATTR_HELP { private $db; private $edb; private function __construct() { $this->init(); } public static function GetInstance() { if ( !isset($GLOBALS['_DATTR_HELP_']) ) $GLOBALS['_DATTR_HELP_'] = new DATTR_HELP(); return $GLOBALS['_DATTR_HELP_']; } public function GetItem($label) { if (isset($this->db[$label])) return $this->db[$label]; else return NULL; } public function GetEditTip($labels) { $tips = array(); foreach ($labels as $label) { if (isset($this->edb[$label])) $tips = array_merge($tips, $this->edb[$label]); } return $tips; } private function init() { // add other customized items here include 'DATTR_HELP_inc.php'; } }	767 B	2021-12-15 13:42
📄 DATTR_HELP_ITEM.php <?php class DATTR_HELP_ITEM { private $name; private $desc; private $tips; private $syntax; private $example; function __construct($name, $desc, $tips = NULL, $syntax = NULL, $example = NULL) { $this->name = $name; $this->desc = $desc; $this->tips = str_replace('<br>', '<br/>', $tips); $this->syntax = $syntax; $this->example = $example; } function render($key, $blocked_reason='') { $key = str_replace(array(':','_'), '', $key ); $buf = '<img class="xtip-hover-' . $key . '" src="/static/images/icons/help.png">' . '<div id="xtip-note-' . $key . '" class="snp-mouseoffset notedefault"><b>' . $this->name . '</b>' ; if ($blocked_reason) { $buf .= " <i>$blocked_reason</i>"; } $buf .= '<hr size=1 color=black>' . $this->desc . '<br><br>'; if ($this->syntax) { $buf .= '<strong>Syntax:</strong> ' . $this->syntax . '<br><br>'; } if ($this->example) { $buf .= '<strong>Example:</strong> ' . $this->example . '<br><br>'; } if ($this->tips) { $buf .= '<strong>Tip(s):</strong><ul type=circle>'; $tips = explode('<br/>', $this->tips); foreach($tips as $ti) { $ti = trim($ti); if ($ti != '') $buf .= '<li>' . $ti . '</li>'; } $buf .= '</ul>'; } $buf .= '</div>'; return $buf; } function render0($key, $blocked_version=0) { $key = str_replace(array(':','_'), '', $key ); $buf = '<img class="xtip-hover-' . $key . '" src="/static/images/icons/help.png">' . '<div id="xtip-note-' . $key . '" class="snp-mouseoffset notedefault"><b>' . $this->name . '</b>' ; switch ($blocked_version) { case 0: break; case 1: // LSWS ENTERPRISE; $buf .= ' <i>This feature is available in Enterprise Edition</i>'; break; case 2: // LSWS 2CPU + case 3: // LSLB 2CPU + $buf .= ' <i>This feature is available for Multiple-CPU license</i>'; break; //case 4: // NCPU // $buf .= ' <i>This feature is available for Unlimited-CPU license</i>'; // break; } $buf .= '<hr size=1 color=black>' . $this->desc . '<br><br>'; if ($this->syntax) { $buf .= '<strong>Syntax:</strong> ' . $this->syntax . '<br><br>'; } if ($this->example) { $buf .= '<strong>Example:</strong> ' . $this->example . '<br><br>'; } if ($this->tips) { $buf .= '<strong>Tip(s):</strong><ul type=circle>'; $tips = explode('<br/>', $this->tips); foreach($tips as $ti) { $ti = trim($ti); if ($ti != '') $buf .= '<li>' . $ti . '</li>'; } $buf .= '</ul>'; } $buf .= '</div>'; return $buf; } }	2.53 KB	2021-12-15 13:42
📄 DAttrBase.php <?php class DAttrBase { public $_htmlName; public $_key; public $_helpKey; public $_type; public $_minVal; public $_maxVal; public $_inputType; public $_inputAttr; public $_label; public $_allowNull; public $_glue; public $_href; public $_hrefLink; public $_multiInd; public $_FDE = 'YYY'; //File:Display:Editable public $_note; public $_icon; public $_linkedkeys; public function __construct($key, $type, $label, $inputType=NULL, $allowNull=true, $min=NULL, $max=NULL, $inputAttr=NULL, $multiInd=0, $helpKey=NULL) { $this->_htmlName = $key; $this->_key = $key; $this->_type = $type; $this->_label = $label; $this->_minVal = $min; $this->_maxVal = $max; $this->_inputType = $inputType; $this->_inputAttr = $inputAttr; $this->_allowNull = $allowNull; $this->_multiInd = $multiInd; $this->_helpKey = ($helpKey == NULL)? $key:$helpKey; } public function dup($key, $label, $helpkey) { $cname = get_class($this); $d = new $cname($this->_key, $this->_type, $this->_label, $this->_inputType, $this->_allowNull, $this->_minVal, $this->_maxVal, $this->_inputAttr, $this->_multiInd, $this->_helpKey); $d->_htmlName = $this->_htmlName; $d->_glue = $this->_glue; $d->_href = $this->_href; $d->_hrefLink = $this->_hrefLink; $d->_FDE = $this->_FDE; $d->_note = $this->_note; $d->_icon = $this->_icon; $d->_linkedkeys = $this->_linkedkeys; if ( $key != NULL ) { $d->_htmlName = $key; $d->_key = $key; } if ($label != NULL) $d->_label = $label; if ($helpkey != NULL) $d->_helpKey = $helpkey; return $d; } protected function extractCheckBoxOr() { $value = 0; $novalue = 1; foreach ($this->_maxVal as $val => $disp) { $name = $this->_key . $val; if (isset($_POST[$name]) && ($val !== '')) { $novalue = 0; $value = $value \| $val; } } return ( $novalue ? '' : $value ); } protected function extractSplitMultiple(&$value) { if ( $this->_glue == ' ' ) $vals = preg_split("/[,; ]+/", $value, -1, PREG_SPLIT_NO_EMPTY); else $vals = preg_split("/[,;]+/", $value, -1, PREG_SPLIT_NO_EMPTY); $vals1 = array(); foreach( $vals as $val ) { $val1 = trim($val); if ( strlen($val1) > 0 && !in_array($val1,$vals1)) { $vals1[] = $val1; } } if ( $this->_glue == ' ') $value = implode(' ', $vals1); else $value = implode(', ', $vals1); } protected function toHtmlContent($cval, $refUrl=NULL) { $o = ''; if ( $cval == NULL \|\| !$cval->HasVal()) { $o .= '<span class="field_novalue">Not Set</span>'; return $o; } $value = $cval->GetVal(); $err = $cval->GetErr(); if ( $this->_type == 'sel1' && $value != NULL && !array_key_exists($value, $this->_maxVal) ) { $err = 'Invalid value - ' . htmlspecialchars($value,ENT_QUOTES); } else if ( $err != NULL ) { $type3 = substr($this->_type, 0, 3); if ( $type3 == 'fil' \|\| $type3 == 'pat' ) { $validator = new ConfValidation(); $validator->chkAttr_file_val($this, $value, $err); //error_log('revalidate path ' . $value); } } if ( $err ) { $cval->SetErr($err); $o .= '<span class="field_error">' . $err . '</span><br>'; } if ( $this->_href ) { $link = $this->_hrefLink; if ( strpos($link, '$V') ) { $link = str_replace('$V', urlencode($value), $link); } $o .= '<span class="field_url"><a href="' . $link . '">'; } elseif ( $refUrl != NULL ) { $o .= '<span class="field_refUrl"><a href="' . $refUrl . '">'; } if ( $this->_type === 'bool' ) { if ( $value === '1' ) { $o .= 'Yes'; } elseif ( $value === '0' ) { $o .= 'No'; } else { $o .= '<span class="field_novalue">Not Set</span>'; } } else if($this->_key == "note") { $o .= '<textarea readonly rows=4 cols=60 style="width:100%">' . htmlspecialchars($value,ENT_QUOTES) . '</textarea>'; } elseif ( $this->_type === 'sel' \|\| $this->_type === 'sel1' ) { if ( $this->_maxVal != NULL && array_key_exists($value, $this->_maxVal) ) { $o .= $this->_maxVal[$value]; } else { $o .= htmlspecialchars($value,ENT_QUOTES); } } elseif ( $this->_type === 'checkboxOr' ) { if ($this->_minVal !== NULL && ($value === '' \|\| $value === NULL) ) { // has default value, for "Not set", set default val $value = $this->_minVal; } foreach( $this->_maxVal as $val=>$name ) { if ( ($value === $val) \|\| ($value === '0' && $val === 0) \|\| ($value !== '' && $val !== '' && (intval($value) & intval($val)) > 0) ) { $gif = 'checked.gif'; } else { $gif = 'unchecked.gif'; } $o .= '<img src="/static/images/graphics/'.$gif.'" width="12" height="12"> '; $o .= $name . '   '; } } elseif ( $this->_inputType === 'textarea1' ) { $o .= '<textarea readonly '. $this->_inputAttr .'>' . htmlspecialchars($value,ENT_QUOTES) . '</textarea>'; } elseif ( $this->_inputType === 'text' ) { $o .= '<span class="field_text">' . htmlspecialchars($value, ENT_QUOTES) . '</span>'; } elseif ( $this->_type == 'ctxseq' ) { $o = $value . '  <a href=' . $this->_hrefLink . $value . '> + </a>' ; $o .= '/<a href=' . $this->_hrefLink . '-' . $value . '> - ' ; } elseif ( $this->_type == 'action' ) { $o .= $value; } else { $o .= htmlspecialchars($value); } if ( $this->_href \|\| $refUrl != NULL) { $o .= '</a></span>'; } return $o; } protected function getNote() { if ( $this->_note != NULL ) return $this->_note; if ( $this->_type == 'uint' ) { if ( $this->_maxVal ) return 'number valid range: '. $this->_minVal . ' - ' . $this->_maxVal; elseif ( $this->_minVal !== NULL ) return 'number >= '. $this->_minVal ; } else if ($this->_type == 'parse' && $this->_maxVal) { return 'Syntax: ' . $this->_maxVal; // parsehelp } return null; } protected function genOptions($options, $selValue) { $o = ''; if ( $options ) { foreach ( $options as $key => $value ) { if ($key === 'forcesel') { $o .= '<option disabled '; if ($selValue === null \|\| $selValue === '') { $o .= 'selected'; } } else { $o .= '<option value="' . $key .'"'; if ( $key == $selValue ) { if (!($selValue === '' && $key === 0) && !($selValue === NULL && $key === 0) && !($selValue === '0' && $key === '') && !($selValue === 0 && $key === '')) $o .= ' selected'; } } $o .= ">$value</option>\n"; } } return $o; } public function extractPost() { $cval = NULL; $postVal = DUtil::grab_input("post",$this->_htmlName); if (get_magic_quotes_gpc()) { $postVal = stripslashes($postVal); } if ( $this->_multiInd == 2 ) { $cval = array(); $v = preg_split("/\n+/", $postVal, -1, PREG_SPLIT_NO_EMPTY); foreach( $v as $vi ) { $cval[] = new CVal(trim($vi)); } } else if ( $this->_type === 'checkboxOr' ) { $value = $this->extractCheckBoxOr(); $cval = new CVal($value); } else { $value = trim($postVal); if ( $this->_multiInd == 1 ) { $this->extractSplitMultiple( $value ); } if ($this->_inputType === 'textarea1') { $value = "\n$value\n"; // add line break for easy editing } $cval = new CVal($value); } return $cval; } public function toHtml(&$data, $refUrl=NULL, $linkedData=NULL) { $o = ''; if ( $this->_type == 'action' ) { $a = ''; $o .= $this->toHtmlContent(new CVal($data)); } else if ( is_array( $data ) ) { for ( $i = 0 ; $i < count($data) ; ++$i ) { $o .= $this->toHtmlContent($data[$i], $refUrl); $o .= '<br>'; } } else { $o .= $this->toHtmlContent($data, $refUrl); } return $o; } public function toHtmlInput(&$data, $seq=NULL, $isDisable=false) { $err = ''; if ( is_array($data) ) { $value = []; foreach( $data as $d ) { $value[] = $d->GetVal(); $e1 = $d->GetErr(); if ( $e1 != NULL ) $err .= $e1 .'<br>'; } } else { if($data != NULL) { $value = $data->GetVal(); $err = $data->GetErr(); } else { $value = NULL; } } if ( is_array( $value ) && $this->_inputType != 'checkbox' ) { if ( $this->_multiInd == 1 ) $glue = ', '; else $glue = "\n"; $value = implode( $glue, $value ); } $name = $this->_htmlName; if ( $seq != NULL ) $name .= $seq; $inputAttr = $this->_inputAttr; if ( $isDisable ) $inputAttr .= ' disabled'; $input = ''; $note = $this->getNote(); if ( $note ) $input .= '<span class="field_note">'. htmlspecialchars($note,ENT_QUOTES) .'</span><br>'; if ( $err != '' ) { $input .= '<span class="field_error">'; $type3 = substr($this->_type, 0, 3); if ( $type3 == 'fil' \|\| $type3 == 'pat' ) { $input .= $err . '</span><br>'; } else $input .= htmlspecialchars($err,ENT_QUOTES) . '</span><br>'; } $style = 'xtbl_value'; if ( $this->_inputType === 'text' ) { $input .= '<input class="' . $style . '" type="text" name="'.$this->_htmlName.'" '. $inputAttr.' value="' .htmlspecialchars($value,ENT_QUOTES). '">'; return $input; } if ( $this->_inputType === 'password' ) { $input .= '<input class="' . $style . '" type="password" name="'.$this->_htmlName.'" '.$inputAttr.' value="' .$value. '">'; return $input; } if ( $this->_inputType === 'textarea' \|\| $this->_inputType === 'textarea1' ) { $input .= '<textarea name="'.$name.'" '.$inputAttr.'>'. htmlspecialchars($value,ENT_QUOTES). '</textarea>'; return $input; } if ( $this->_inputType === 'radio' && $this->_type === 'bool') { $input .= '<input type="radio" id="'.$name.'1" name="'.$name.'" '.$inputAttr.' value="1" '; if ( $value == '1' ) $input .= 'checked'; $input .= '><label for="'.$name.'1"> Yes </label>    '; $input .= '<input type="radio" id="'.$name.'0" name="'.$name.'" '.$inputAttr.' value="0" '; if ( $value == '0' ) $input .= 'checked'; $input .= '><label for="'.$name.'0"> No </label>'; if ( $this->_allowNull ) { $input .= '    <input type="radio" id="'.$name.'" name="'.$name.'" '.$inputAttr.' value="" '; if ( $value != '0' && $value != '1' ) $input .= 'checked'; $input .= '><label for="'.$name.'"> Not Set </label>'; } return $input; } if ( $this->_inputType === 'checkbox' ) { $id = $name . $value['val']; $input .= '<input type="checkbox" id="'.$id.'" name="'.$name.'" '.$inputAttr.' value="'.$value['val'].'"'; if ( $value['chk'] ) $input .= ' checked'; $input .= '><label for="'.$id.'"> ' . $value['val'] . ' </label>'; return $input; } if ( $this->_inputType === 'checkboxgroup' ) { if ($this->_minVal !== NULL && ($value === '' \|\| $value === NULL) ) { // has default value, for "Not set", set default val $value = $this->_minVal; } $js0 = $js1 = ''; if (array_key_exists('0', $this->_maxVal) \|\| array_key_exists('', $this->_maxVal)) { $chval = array_keys($this->_maxVal); foreach ($chval as $chv) { if ($chv == '0' \|\| $chv === '') $js1 = "document.confform.$name$chv.checked=false;"; else $js0 .= "document.confform.$name$chv.checked=false;"; } $js1 = " onclick=\"$js1\""; $js0 = " onclick=\"$js0\""; } foreach ($this->_maxVal as $val => $disp) { $id = $name . $val; $input .= '<input type="checkbox" id="' . $id . '" name="' . $id . '" value="' . $val . '"'; if (($value === $val) \|\| ($value === '0' && $val === 0) \|\| ($val !== '' && (((int) $value & (int) $val) > 0))) { $input .= ' checked'; } $input .= ($val === '0' \|\| $val === 0 \|\| $val === '') ? $js0 : $js1; $input .= '><label for="' . $id . '"> ' . $disp . ' </label>  '; } return $input; } if ( $this->_inputType === 'select' ) { $input .= '<select name="'.$name.'" '.$inputAttr.'>'; $input .= ($this->genOptions($this->_maxVal, $value)); $input .= '</select>'; return $input; } } public function populate_sel1_options($info, &$data) { $options = array(); if ( $this->_allowNull ) { $options[''] = ''; } else { $options['forcesel'] = '-- Please select --'; } foreach( $this->_minVal as $loc ) { $d = $info; $locs = explode(':', $loc); foreach ( $locs as $l ) { if ( substr($l, 0, 2) == '$$' ) { //$$type!fcgi $t = strpos($l, '!'); $tag = substr($l, 2, $t-2); $tag0 = substr($l, $t+1); // default if (isset($data[$tag]) && $data[$tag]->HasVal()) { $l = $data[$tag]->GetVal(); } else { $l = $tag0; } } if (!empty($d[$l])) { $d = $d[$l]; } else { $d = NULL; break; } } if ( $d != NULL ) { $options = $options + $d; // this is array add } } $this->_maxVal = $options; } }	13.19 KB	2021-12-15 13:42
📄 DFileSect.php <?php class DFileSect { private $_tids; private $_layerId; private $_dataLoc; private $_holderIndex; public function __construct($tids, $layerId=NULL, $dataLoc=NULL, $holderIndex=NULL) { $this->_tids = $tids; $this->_layerId = $layerId; $this->_dataLoc = $dataLoc; $this->_holderIndex = $holderIndex; } public function GetTids() { return $this->_tids; } public function GetLayerId() { return $this->_layerId; } public function GetDataLoc() { return $this->_dataLoc; } public function GetHolderIndex() { return $this->_holderIndex; } }	582 B	2021-12-15 13:42
📄 DPage.php <?php class DPage { public $_type;//serv, vh, sl, admin public $_id; public $_name; public $_title; public $_helpLink; public $_tblIds; public $_includeScript; public function __construct($type, $id, $name, $title, $tblIds) { $this->_type = $type; $this->_id = $id; $this->_name = $name; $this->_title = $title; $this->_tblIds = $tblIds; $this->_helpLink = 'index.html'; } public function PrintHtml(&$confData, $disp) { $viewTags = 'vbsDdBCiI'; $editTags = 'eEaScn'; $isEdit = ( strpos($editTags, $disp->_act) !== false ); if ( $disp->_act == 'd' \|\| $disp->_act == 'i' ) $this->printActionConfirm($disp); if ( $disp->_err != null ) { echo GUIBase::message("",$disp->_err,"error"); } $tblDef = DTblDef::GetInstance(); if ( $disp->_tid == null ) { $tids = $this->_tblIds; } else { $tid = DUtil::getLastId($disp->_tid); $tids = array($tid); } $ref = DUtil::getLastId($disp->_ref); foreach ($tids as $ti ) { $tbl = $tblDef->GetTblDef($ti); $isExtract = false; if ( $disp->_act == 'a' ) { $d = array(); } else if ( $disp->_act == 'S' \|\| $disp->_act == 'c' \|\| $disp->_act == 'n') //save failed or in change { $isExtract = true; $d = &$confData; } else { $d = DUtil::locateData($confData, $tbl->_dataLoc, $disp->_ref); } if ( $tbl->_holderIndex != null ) { if ( $disp->_act == 'e' \|\| $disp->_act == 'E' \|\| $disp->_act == 'a') { $disp->_info['holderIndex'] = is_array($d)? array_keys($d):null; $disp->_info['holderIndex_cur'] = $ref; } if ( !$isExtract && $ref != null && substr($ti, -3) != 'TOP') $d = &$d[$ref]; } else { $disp->_info['holderIndex'] = null; } echo "<div>"; $tbl->PrintHtml($d, $ref, $disp, $isEdit); echo "</div>"; if ($isEdit == false && $tbl->_linkedTbls != null && isset($tbl->_linkedTbls['disp'])) { foreach($tbl->_linkedTbls['disp'] as $lti) { $linkedtbl = $tblDef->GetTblDef($lti); $dlinked = DUtil::locateData($d, $linkedtbl->_dataLoc); echo "<div>"; $linkedtbl->PrintHtml($dlinked, $ref, $disp, false); echo "</div>"; } } } } private function printActionConfirm($disp) { $hasB = (strpos($disp->_tid, '`') !== false ); echo '<div class=message>'; if ( $disp->_act == 'd' ) { $actString = $hasB ? 'DC' : 'Dc'; //should validate whether there is reference to this entry echo 'Are you sure you want to delete this entry?<br>'. '<span class="edit-link">'. $this->getActionLink($disp, $actString) . '</span>'. '<br>This will be permanently removed from the configuration file.'; } else if ( $disp->_act == 'i' ) { $actString = $hasB ? 'IC' : 'Ic'; echo 'Are you sure you want to instantiate this virtual host?<br>'. '<span class="edit-link">'. $this->getActionLink($disp, $actString) . '</span>'. '<br>This will create a dedicated configuration file for this virtual host.'; } echo "</div>"; } private function getActionLink($disp, $actions) { $buf = ''; $allActions = array('D'=>'Yes', 'c'=>'Cancel', 'C'=>'Cancel','I'=>'Yes'); $chars = preg_split('//', $actions, -1, PREG_SPLIT_NO_EMPTY); foreach ( $chars as $act ) { $ctrlUrl = '<a href="' . $disp->_ctrlUrl . 'm=' . $disp->_mid . '&p=' . $disp->_pid; $t = ''; $r = ''; $buf .= '   '; $name = $allActions[$act]; if ( $act == 'b' \|\| $act == 'c' ) { $act = 'b'; } elseif ( strpos('vEdDCBiI', $act) !== false ) { if ( $act == 'C' ) { $act = 'B'; } $t = '&t=' . $disp->_tid; $r = '&r=' . urlencode($disp->_ref); } $buf .= $ctrlUrl . $t . $r . '&a=' . $act . '&tk=' . $disp->_token . '">' . $name . '</a>'; } return $buf; } }	3.72 KB	2021-12-15 13:42
📄 DTbl.php <?php class DTbl { public $_id; public $_title; public $_dattrs; public $_helpKey; public $_width = '100%'; public $_align; public $_isMulti;//0:regular, 1:multi-top, 2:multi-detail public $_icon; public $_addTbl; public $_cols; public $_hasNote = false; public $_hasB = false; public $_layerId = NULL; public $_dataLoc = NULL; public $_holderIndex = NULL; public $_subTbls = NULL; public $_defaultExtract = NULL; public $_linkedTbls = NULL; public $_showParentRef = false; public function __construct($id, $title=NULL, $isMulti=0, $addTbl=NULL, $align=0, $icon=NULL, $hasNote=NULL) { $this->_id = $id; $this->_title = $title; $this->_isMulti = $isMulti; $this->_addTbl = $addTbl; $this->_align = $align; $this->_icon = $icon; if ($hasNote === NULL && $this->_isMulti) $this->_hasNote = TRUE; } public function dup($newId, $title=NULL) { $d = new DTbl($newId, $this->_title, $this->_isMulti, $this->_addTbl, $this->_align, $this->_icon); $d->_dattrs = $this->_dattrs; $d->_helpKey = $this->_helpKey; $d->_width = $this->_width; $d->_cols = $this->_cols; $d->_hasNote = $this->_hasNote; $d->_hasB = $this->_hasB; $d->_layerId = $this->_layerId; $d->_dataLoc = $this->_dataLoc; $d->_holderIndex = $this->_holderIndex; $d->_subTbls = $this->_subTbls; $d->_defaultExtract = $this->_defaultExtract; $d->_linkedTbls = $this->_linkedTbls; $d->_showParentRef = $this->_showParentRef; if ($title != NULL) { $d->_title = $title; } return $d; } public function setRepeated( $holderIndex ) { $this->_holderIndex = $holderIndex; } public function setAttr(&$attrs, $dataLoc=NULL, $layerId=NULL, $helpKey=NULL) { $this->_dattrs = &$attrs; $this->_layerId = $layerId; $this->_dataLoc = $dataLoc; $this->_helpKey = $helpKey; if ( $this->_isMulti == 1 ) { $this->_cols = count($attrs); if ($this->_hasNote) $this->_cols++; if($this->_icon != NULL) $this->_cols++; } else { if (count($attrs) == 1 && $this->_dattrs[0]->_label == '') { $this->_cols = 1; } else $this->_cols = 3; } } public function setDataLoc($dataLoc, $layerId=NULL) { $this->_dataLoc = $dataLoc; if ($layerId != NULL) $this->_layerId = $layerId; } public function GetTags() { $tags = array(); $keys = array_keys($this->_dattrs); foreach ( $keys as $key ) { $attr = $this->_dattrs[$key]; $pos = strpos($attr->_key, ':'); if ( $pos === false ) $tags[$attr->_key] = $attr->_multiInd; else { $layer = substr($attr->_key, 0, $pos); $id = substr($attr->_key, $pos+1); $tags[$layer][$id] = $attr->_multiInd; } } return $tags; } public function getActionLink($disp, $actions, $editTid='', $editRef='') { $buf = ''; $allActions = array('a'=>'Add', 'v'=>'View', 'e'=>'Edit', 'E'=>'Edit', 'd'=>'Delete', 's'=>'Save', 'b'=>'Back', 'B'=>'Back', 'n'=>'Next', 'D'=>'Yes', 'c'=>'Cancel', 'C'=>'Cancel', 'i'=>'Instantiate', 'I'=>'Yes', 'X' => 'View/Edit'); $chars = preg_split('//', $actions, -1, PREG_SPLIT_NO_EMPTY); foreach ( $chars as $act ) { $ctrlUrl = '<a href="' . $disp->_ctrlUrl . 'm=' . $disp->_mid . '&p=' . $disp->_pid; $t = ''; $r = ''; $buf .= '   '; $name = $allActions[$act]; if ( $act == 'b' \|\| $act == 'c' ) { $act = 'b'; } elseif ( $act == 'e' ) { $t = '&t=' . $this->_id; } elseif ( $act == 'a' ) { $t = '&t=' . $disp->_tid . '`' . $this->_addTbl; if ( $disp->_ref != NULL ) { $r = '&r=' . $disp->_ref . '`'; } } elseif ( strpos('vEdDCBiI', $act) !== false ) { if ( $act == 'C' ) { $act = 'B'; } if ( isset($this->_hasB) && $this->_hasB && $editTid != '' ) { $t = '&t=' . $disp->_tid . '`' . $editTid; $r = '&r=' . $disp->_ref . '`' . urlencode($editRef); } else { if ( $editTid == '' ) { $editTid = $disp->_tid; } if ( $editRef == '' ) { $editRef = $disp->_ref; } $t = '&t=' . $editTid; $r = '&r=' . urlencode($editRef); } } if ( $act == 's' ) { $buf .= '<a href="javascript:document.confform.submit()">Save</a>'; } elseif ( $act == 'n' ) { $buf .= '<a href="javascript:document.confform.a.value=\'n\';document.confform.submit()">Next</a>'; } elseif( $act == 'X') { //vhtop=>vh_... tptop=>tp_.... sltop=>sl_... $menuType = substr($disp->_type, 0, 2); if ($menuType == 'sl' && isset($disp->_info['LNS_menu'])) { $menuType = $disp->_info['LNS_menu'][$editRef]; // for lslb } elseif ($menuType == 'lb' && isset($disp->_info['CLS_menu'])) { $menuType = $disp->_info['CLS_menu'][$editRef]; // for lslb } $buf .= '<a href="' . $disp->_ctrlUrl . 'm=' . $menuType . '_' . $editRef . "\">{$name}</a>"; } else { $buf .= $ctrlUrl . $t . $r . '&a=' . $act . '&tk=' . $disp->_token . '">' . $name . '</a>'; } } return $buf; } public function PrintHtml(&$data, $ref, $disp, $isEdit) { if ($isEdit) $this->printEditHtml($data, $disp); else $this->printViewHtml($data, $ref, $disp); } private function getPrintHeader($disp, $actString) { $buf = '<tr><td class=xtbl_header colspan="' . $this->_cols . '">'; // tooltip $table_help = ' '; $dhelp_item = DATTR_HELP::GetInstance()->GetItem($this->_helpKey); if($dhelp_item != NULL) { $table_help = '   &nbsp' . $dhelp_item->render($this->_helpKey); } else if (count($this->_dattrs) == 1) { $av = array_values($this->_dattrs); $a0 = $av[0]; if ($a0->_inputType == 'textarea1') { $dhelp_item = DATTR_HELP::GetInstance()->GetItem($a0->_helpKey); if($dhelp_item != NULL) { $table_help = '     ' . $dhelp_item->render($a0->_helpKey, $a0->blockedReason()); } } } $title = $this->_title; if ($this->_showParentRef && $disp->_ref != NULL) { $pos = strpos($disp->_ref, '`'); if ($pos !== FALSE) $title .= ' - ' . substr($disp->_ref, 0, $pos); else $title .= ' - ' . $disp->_ref; } $buf .= '<span class="xtbl_title">'. $title . $table_help . '</span>'; $all_blocked = TRUE; $keys = array_keys($this->_dattrs); foreach( $keys as $i ) { if ( $this->_dattrs[$i]->blockedReason() == '' ) { $all_blocked = FALSE; break; } } if ($all_blocked) $actString = NULL; if ( $actString != NULL ) { $titleActionLink = $this->getActionLink($disp, $actString); $buf .= '<span class="xtbl_edit">'.$titleActionLink.'</span>'; } $buf .= "</td></tr>\n"; if ( $this->_isMulti == 1 ) { $buf .= '<tr class="xtbl_title2">'; $hasSort = ( $disp->_sort != NULL && $disp->_sort[0] == $this->_id ); $a = '1'; //ascend $url = $disp->_ctrlUrl . 'm=' . $disp->_mid . '&p=' . $disp->_pid; if ( $disp->_tid != NULL ) $url .= '&t=' . $disp->_tid; if ( $disp->_ref != NULL ) $url .= '&r=' . $disp->_ref; if ($this->_icon != NULL) $buf .= '<td class="icon"></td>'; if ($this->_hasNote) $buf .= '<td class="icon"></td>'; foreach( $keys as $i ) { $attr = $this->_dattrs[$i]; if ( $attr->_FDE[1] == 'N' ) continue; $buf .= '<td'; if ( isset($this->_align[$i]) ) $buf .= ' align="'.$this->_align[$i] .'"'; $buf .= '>' . $attr->_label; if ( $attr->_type != 'action' ) { $buf .= ' <a href="' . $url . '&sort=' . $this->_id . '`'; if ( $hasSort && array_key_exists(2,$disp->_sort) && array_key_exists(1,$disp->_sort) && $disp->_sort[2] == $attr->_key && $disp->_sort[1] == '1' ) $a = '0'; else $a = '1'; $buf .= $a . $attr->_key . '">'; $buf .= ($a=='1')? '<img src="/static/images/icons/up.gif" border="0" width="13" align="absmiddle">' : '<img src="/static/images/icons/down.gif" width="13" align="absmiddle" border="0">'; $buf .= '</a>'; } if ( $attr->_type == 'ctxseq' ) { $attr->_hrefLink = $url . $attr->_href; } $buf .= '</td>'; } $buf .= "</tr>\n"; } return $buf; } private function printViewHtml(&$data, $ref, $disp) { $buf = '<div><table width="'.$this->_width.'" class="xtbl" border="0" cellpadding="5" cellspacing="1">' . "\n"; if ( $this->_isMulti == 1) { if ( $this->_addTbl == NULL ) $actString = 'e'; else if ( $this->_addTbl != 'N' ) $actString = 'a'; else $actString = ''; if ( $this->_hasB ) $actString .= 'B'; $buf .= $this->getPrintHeader($disp, $actString); if ( $data != NULL && count($data) > 0 ) { $keys = array_keys($data); if ( $disp->_sort[0] == $this->_id ) { if ( array_key_exists(2,$disp->_sort) && $this->_holderIndex == $disp->_sort[2] ) { if ( $disp->_sort[1] == 1 ) sort($keys); else rsort($keys); } else { //default context view sort if(!array_key_exists(1,$disp->_sort) && $disp->_pid == "context" ) { $disp->_sort[2] = "order"; $disp->_sort[1] = 0; //asc } $s = array(); if(array_key_exists(2,$disp->_sort)) $by = $disp->_sort[2]; else $by = NULL; foreach( $keys as $key ) { $d = &$data[$key]; if(array_key_exists($by, $d)) { $a = $d[$by]; $a = $a->GetVal(); } else { $a = NULL; } $s[$key] = $a; } if ( array_key_exists(1,$disp->_sort) && $disp->_sort[1] == 1 ) { if ( $by == 'order' ) asort($s, SORT_NUMERIC); else asort($s, SORT_STRING); } else { if ( $by == 'order' ) arsort($s, SORT_NUMERIC); else arsort($s, SORT_STRING); } $keys = array_keys($s); } } $action_attr = NULL; foreach ($this->_dattrs as $attr) { if ($attr->_type == 'action') { $action_attr = $attr; break; } } foreach ( $keys as $key ) { $buf .= $this->getPrintHtmlLine1($data[$key], $key, $disp, $action_attr); } } } else { if ( $ref == NULL ) { $actString = 'e'; if ( $this->_hasB ) $actString .= 'B'; } else { $actString = 'Ed'; $actString .= ($this->_hasB ? 'B' : 'b'); } $buf .= $this->getPrintHeader($disp, $actString); $keys = array_keys($this->_dattrs); foreach( $keys as $i ) { $buf .= $this->getPrintHtmlLine($data, $disp, $i); } } $buf .= '</table></div>'; echo "$buf \n"; } private function getEditTips() { $labels = array($this->_helpKey); foreach ($this->_dattrs as $attr) { $labels[] = $attr->_helpKey; } $tips = DATTR_HELP::GetInstance()->GetEditTip($labels); $buf = ''; if (!empty($tips)) { $buf = '<div class="tips"><ul>'; foreach( $tips as $tip ) { if(strlen($tip)) { $buf .= "<li>$tip</li>\n"; } } $buf .= '</ul></div>'; } return $buf; } private function printEditHtml(&$data, $disp) { $buf = $this->getEditTips(); $buf .= "\n". '<div><table width="'.$this->_width.'" class="xtbl" border="0" cellpadding="5" cellspacing="1">' . "\n"; $actString = ( (substr($this->_id, -3) == 'SEL') ? 'n':'s' ) . ( $this->_hasB ? 'B':'b'); $buf .= $this->getPrintHeader($disp, $actString); $keys = array_keys($this->_dattrs); foreach ( $keys as $key ) { $buf .= $this->getPrintHtmlInputLine($data, $disp->_info, $key); } $buf .= '</table></div>'; echo "$buf \n"; } private function getPrintHtmlLine(&$data, $disp, $index) { $valwid = 0; $attr = $this->_dattrs[$index]; if ( $attr == NULL \|\| $attr->_FDE[1] == 'N') { return ''; } $blockedReason = $attr->blockedReason(); if ( $attr->_type == 'sel1' ) { $attr->populate_sel1_options($disp->_info, $data); } $buf = '<tr class="xtbl_value">'; if ( $attr->_label ) { if ($blockedReason) { $buf .= '<td class="xtbl_label_blocked">'; } else { $buf .= '<td class="xtbl_label">'; } $buf .= $attr->_label; if ($this->_cols == 1) { $buf .= '     '; } else { $buf .= '</td><td class="icon">'; } //add tooltip $dhelp_item = DATTR_HELP::GetInstance()->GetItem($attr->_helpKey); if($dhelp_item != NULL) { $buf .= $dhelp_item->render($attr->_helpKey, $blockedReason); } $buf .= '</td>'; } if ($this->_cols == 1) { $buf .= '</tr><tr class="xtbl_value"><td'; } else { $buf .= '<td'; } if ($blockedReason) { $buf .= ' class="xtbl_value_blocked"'; } if ($valwid > 0) { $buf .= " width=\"$valwid\""; } $buf .= '>'; if ( $attr->_href ) { $link = $disp->_ctrlUrl . 'm=' . $disp->_mid . '&p=' . $disp->_pid; if ( $disp->_tid != NULL ) $link .= '&t=' . $disp->_tid; if ( $disp->_ref != NULL ) $link .= '&r='. $disp->_ref; $link .= $attr->_href; $attr->_hrefLink = str_replace('$R', $disp->_ref, $link); } $buf .= ($attr->toHtml($data[$attr->_key])); $buf .= "</td></tr>\n"; return $buf; } private function getPrintHtmlInputLine(&$data, &$info, $key) { $attr = $this->_dattrs[$key]; if ( $attr == NULL \|\| $attr->_FDE[2] == 'N') return ''; $valwid = 0; $blockedReason = $attr->blockedReason(); if ( $attr->_type == 'sel1' ) { $attr->populate_sel1_options($info, $data); } $buf = '<tr class="xtbl_value">'; if ( $attr->_label ) { if ($blockedReason) { $buf .= '<td class="xtbl_label_blocked">'; } else { $buf .= '<td class="xtbl_label">'; } $buf .= $attr->_label; if ($this->_cols == 1) { $buf .= '     '; } else { $buf .= '</td><td class="icon">'; } //add tooltip $dhelp_item = DATTR_HELP::GetInstance()->GetItem($attr->_helpKey); if($dhelp_item != NULL) { $buf .= $dhelp_item->render($attr->_helpKey, $blockedReason); } $buf .= '</td>'; } if ($this->_cols == 1) { $buf .= '</tr><tr class="xtbl_value"><td'; } else { $buf .= '<td'; } if ($blockedReason) { $buf .= ' class="xtbl_value_blocked" '; } if ($valwid > 0) { $buf .= " width=\"$valwid\""; } $buf .= '>'; if ($blockedReason) $buf .= ($attr->toHtml($data[$attr->_key])); else $buf .= ($attr->toHtmlInput($data[$attr->_key])); $buf .= "</td></tr>\n"; return $buf; } private function getPrintHtmlLine1(&$data, $key0, $disp, $action_attr) { static $htmlid; if (isset($htmlid)) $htmlid++; else $htmlid = 1; $buf = '<tr class="xtbl_value">'; $keys = array_keys($this->_dattrs); //allow index field clickable, same as first action $actionLink = null; $indexActionLink = null; if ($action_attr != NULL) { if ( is_array($action_attr->_minVal) ) { $index = $action_attr->_minVal[0]; $ti = $action_attr->_minVal[$data[$index]->GetVal()]; if ( $ti == NULL ) $ti = $action_attr->_minVal[1]; } else $ti = $action_attr->_minVal; $actionLink = $this->getActionLink($disp, $action_attr->_maxVal, $ti, $key0); $tmp_a = strpos($actionLink, '"') +1; $tmp_e = strpos($actionLink, '">'); $indexActionLink = substr($actionLink, $tmp_a, $tmp_e - $tmp_a); } foreach( $keys as $key ) { $attr = $this->_dattrs[$key]; if ( $attr->_FDE[1] == 'N' ) continue; $linkedData = NULL; if ($attr->_linkedkeys != NULL) { $linkedData = $data[$attr->_linkedkeys]; } if($key == 0) { if ($this->_icon != NULL) { if($attr->_key == "type" && is_array($attr->_maxVal) && is_array($this->_icon)) { $icon_name = array_key_exists($data['type']->GetVal(), $this->_icon) ? $this->_icon[$data['type']->GetVal()] : 'application'; } else { $icon_name = $this->_icon; } $buf .= '<td class="icon"><img src="/static/images/icons/'. $icon_name . '.gif"></td>'; } if ($this->_hasNote) { $buf .= '<td class="icon">'; if(isset($data['note']) && $data['note']->HasVal()) { $buf .= '<img class="xtip-hover-info' . $htmlid . '" src="/static/images/icons/info.gif">' . '<div id="xtip-note-info' . $htmlid . '" class="snp-mouseoffset notedefault">' . htmlspecialchars($data['note']->GetVal(), ENT_QUOTES) . '</div>'; } $buf .= '</td>'; } } $buf .= '<td'; if ( isset($this->_align[$key]) ) $buf .= ' align="'.$this->_align[$key] .'"'; $buf .= '>'; if ( $attr->_type == 'action' ) { $buf .= ($attr->toHtml($actionLink)); } else { if ( $attr->_type == 'sel1' ) { $attr->populate_sel1_options($disp->_info, $data); } if ($attr->_key == $this->_holderIndex) { $buf .= ($attr->toHtml($data[$attr->_key], $indexActionLink, $linkedData)); } else { $buf .= ($attr->toHtml($data[$attr->_key], NULL, $linkedData)); } } $buf .= '</td>'; } $buf .= "</tr>\n"; return $buf; } }	16.7 KB	2021-12-15 13:42
📄 DUtil.php <?php class DUtil { public static function object_sort(&$array_data, $column, $direction, $type) { // get a list of columns $columns = array(); foreach ($array_data as $key => $row) { $columns[$key] = $row->$column; } array_multisort($columns, $direction, $type, $array_data); } public static function grab_input($origin = "",$name = "",$type = "") { $temp = null; $origin = strtoupper($origin); if($name == "" \|\| $origin == "") { die("input error"); } switch($origin) { case "REQUEST": case "ANY": $temp = $_REQUEST; break; case "GET": $temp = $_GET; break; case "POST": $temp = $_POST; break; case "COOKIE": $temp = $_COOKIE; break; case "FILE": $temp = $_FILES; break; case "SERVER": $temp = $_SERVER; break; default: die("input extract error."); break; } if(array_key_exists($name,$temp)) { $temp = $temp[$name]; } else { $temp = null; } switch($type) { case "int": return (int) $temp; break; case "float": return (float) $temp; break; case "string": return trim((string) $temp); break; case "array": return (is_array($temp) ? $temp : null); break; case "object": return (is_object($temp) ? $temp : null); break; default: return trim((string) $temp); //default string break; } } public static function genOptions($options, $selValue) { $o = ''; if ( $options ) { foreach ( $options as $key => $value ) { $o .= '<option value="' . $key .'"'; if ( $key == $selValue ) $o .= ' selected'; $o .= ">$value</option>\n"; } } return $o; } public static function getGoodVal($val) { if ( $val != null && strpos($val, '<') !== false ) { return null; } else return $val; } public static function getGoodVal1(&$val) { if ( $val != null && strpos($val, '<') !== false ) { $val = null; return null; } else return $val; } public static function getLastId($id) { if ( $id == null ) return null; $pos = strrpos($id, '`'); if ( $pos === false ) return $id; else return substr($id, $pos+1); } public static function trimLastId(&$id) { $pos = strrpos($id, '`'); if ( $pos !== false ) $id = substr($id, 0, $pos); else $id = null; } public static function switchLastId(&$curId, $newId) { $pos = strrpos($curId, '`'); if ( $pos !== false ) $curId = substr($curId, 0, $pos+1) . $newId; else $curId = $newId; } public static function &locateData0(&$holder, $dataloc, $ref=null) { $data = &$holder; if ( $dataloc != null ) { $datalocs = explode(':', $dataloc); foreach ( $datalocs as $loc ) { $data = &$data[$loc]; } if ( $ref != null ) $data = &$data[$ref]; } return $data; } public static function &locateData(&$holder, $dataloc, $ref = null) { $data = &$holder; if ($ref != null) { $refs = explode('`', $ref); } if ($dataloc != null) { $datalocs = explode(':', $dataloc); foreach ($datalocs as $loc) { $r = strpos($loc, '!$'); if ($r > 0) { $a = substr($loc, $r + 2); $loc = substr($loc, 0, $r); $data = &$data[$loc][$refs[$a]]; } else { $data = &$data[$loc]; } } } return $data; } public static function getSubTid($subTbls, $data) { $key = $subTbls[0]; if ( !isset($data[$key]) ) return $subTbls[1]; $newkey = $data[$key]->GetVal(); if ( ($newkey == '0') \|\| !isset($subTbls[$newkey]) ) { return $subTbls[1]; } else return $subTbls[$newkey]; } public static function splitMultiple($val) { return preg_split("/, /", $val, -1, PREG_SPLIT_NO_EMPTY); } public static function array_string_keys($input) { $output = array(); if ($input != null && is_array($input)) { foreach($input as $k => $v) { $output[] = (string)$k; } } return $output; } public static function getDataVal(&$holderArray, $key) { if ($holderArray == null \|\| ! is_array($holderArray) \|\| empty($holderArray[$key]) \|\| ! is_a($holderArray[$key], 'CVal')) { return null; } else { return $holderArray[$key]->GetVal(); } } public static function dbg_out($tag, &$obj, $visible=true) { if ($visible) echo "<pre> $tag \n" . print_r($obj, true) . "\n</pre>"; else echo "<!-- $tag --\n" . print_r($obj, true) . "-->\n"; } public static function dbg_tag($tag, $visible=true) { if ($visible) echo "<pre>$tag \n</pre>"; else echo "<!-- $tag -->\n"; } }	4.71 KB	2021-12-15 13:42
📄 DispInfo.php <?php class DispInfo { var $_ctrlUrl ; var $_mid ; var $_pid ; var $_tid ; var $_ref ; var $_act ; var $_token ; var $_tokenInput ; var $_sort ; var $_type ; var $_name ; var $_tabs ; var $_titleLabel ; var $_info ; var $_err ; function __construct( $url ) { $this->_ctrlUrl = $url ; $has_mid = FALSE ; $has_pid = FALSE ; $this->_mid = $this->_pid = $this->_tid = $this->_ref = NULL ; $this->_mid = DUtil::getGoodVal(DUtil::grab_input("request", 'm')) ; if ( $this->_mid == NULL ) { $this->_mid = 'serv' ; } else { $has_mid = TRUE ; } $pos = strpos($this->_mid, '_') ; if ( $pos > 0 ) { $this->_type = substr($this->_mid, 0, $pos) ; $this->_name = substr($this->_mid, $pos + 1) ; } else { $this->_type = $this->_mid ; $this->_name = NULL ; } $this->_info['mid'] = $this->_name ; $this->_tabs = DPageDef::GetInstance()->GetTabDef($this->_type) ; if ( ! is_array($this->_tabs) ) { die("Invalid pid") ; } $pids = array_keys($this->_tabs) ; if ( $has_mid ) { $this->_pid = DUtil::getGoodVal(DUtil::grab_input("request", 'p')) ; } if ( $this->_pid == NULL ) { // get default $this->_pid = $pids[0] ; } else { if ( ! in_array($this->_pid, $pids) ) die("Invalid pid") ; $has_pid = TRUE ; } if ( $has_pid && ! isset($_REQUEST['t0']) && isset($_REQUEST['t']) ) { $this->_tid = DUtil::getGoodVal($_REQUEST['t']) ; if ( isset($_GET['t1']) && ( DUtil::getLastId($this->_tid) != DUtil::getGoodVal1($_GET['t1']) ) ) $this->_tid .= '`' . $_GET['t1'] ; if ( isset($_REQUEST['r']) ) $this->_ref = DUtil::getGoodVal1($_REQUEST['r']) ; if ( isset($_GET['r1']) ) $this->_ref .= '`' . DUtil::getGoodVal1($_GET['r1']) ; } $this->_act = DUtil::getGoodVal(DUtil::grab_input("request", 'a')) ; if ( $this->_act == NULL ) { $this->_act = 'v' ; } $this->_tokenInput = DUtil::getGoodVal(DUtil::grab_input("request", 'tk')) ; $this->_token = CLIENT::singleton()->getToken() ; if ( isset($_GET['sort']) ) { $sort = DUtil::getGoodVal1($_GET['sort']) ; $pos = strpos($sort, '`') ; $this->_sort[0] = substr($sort, 0, $pos) ; //tbl $this->_sort[1] = substr($sort, $pos + 1, 1) ; //ascend $this->_sort[2] = substr($sort, $pos + 2) ; //key } else { $this->_sort[0] = 0 ; } $this->init() ; } function init( $serverName = '' ) { $label = 'Error' ; switch ( $this->_type ) { case 'serv': $label = 'Server » ' . $serverName ; break ; case 'sltop': $label = 'Listeners' ; break ; case 'sl': $label = 'Listener » ' . $this->_name ; break ; case 'sl4': $label = 'TCP Listener » ' . $this->_name ; break ; case 'vhtop': $label = 'Virtual Hosts' ; break ; case 'vh': $label = 'Virtual Host » ' . $this->_name ; break ; case 'tptop': $label = 'Virtual Host Templates' ; break ; case 'tp': $label = 'Virtual Host Template » ' . $this->_name ; break ; case 'lbtop': $label = 'Clusters' ; break ; case 'lb': $label = 'Layer 7 Cluster » ' . $this->_name ; break ; case 'lb4': $label = 'Layer 4 Cluster » ' . $this->_name ; break ; case 'ha': $label = 'High Availability' ; break ; case 'admin': $label = 'WebAdmin Console' ; break ; case 'altop': $label = 'WebAdmin Listeners' ; break ; case 'al': $label = 'WebAdmin Listener » ' . $this->_name ; break ; } $this->_titleLabel = $label ; } }	4.3 KB	2021-12-15 13:42
📄 GUIBase.php <?php class GUIBase { public static function message($title="", $msg="", $type = "normal") { return "<div class=panel_{$type} align=left><span class='gui_{$type}'>" . (strlen($title) ? "$title<hr size=1 noshade>" : "") . "$msg</span></div>"; } public static function header($title = NULL) { //charset need to use utf-8 for international chars support. replaced iso-8859-1 $tk = CLIENT::singleton()->getToken(); return "<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.0 Transitional//EN' 'http://www.w3.org/TR/html4/loose.dtd'> <html> <head> <title>{$title} - LiteSpeed WebAdmin Console</title> <meta http-equiv='Content-Type' content='text/html; charset=utf-8'> <meta HTTP-EQUIV='Cache-control' CONTENT='no-cache'> <meta HTTP-EQUIV='Pragma' CONTENT='no-cache'> <meta HTTP-EQUIV='Expires' CONTENT='-1'> <meta name=\"robots\" content=\"noindex\"> <link rel='Shortcut Icon' type='image/x-icon' href='/static/images/icons/favicon.ico' /> <link rel='stylesheet' type='text/css' href='/static/styles/style.css'> <script type='text/javascript' src='/static/scripts/general.js'></script> </head> <body > <form name='mgrform' method='post' action='/service/serviceMgr.php'> <input type='hidden' name='act'><input type='hidden' name='actId'><input type='hidden' name='vl'><input type='hidden' name='tk' value='{$tk}'> </form> <div id=\"main-wrapper\">"; } public static function gen_top_menu($dropdown_ul, $ver_link='') { global $_SESSION; $product = PRODUCT::GetInstance(); $state = DUtil::getGoodVal(DUtil::grab_input("get","state")); if($state == 'restarted') { $product->refreshVersion(); } $buf = '<div><a href="/index.php"><img src="/static/images/logo/product_logo.svg" width="300px"/></a><span style="float:right;margin-top:45px">' . $product->product . ' ' . ucwords(strtolower($product->edition)) . ' '; if ($ver_link != '') $buf .= "<a href=\"$ver_link\" title=\"Go to version management\">{$product->version}</a>"; else $buf .= $product->version; $buf .= '    <a href="/login.php?logoff=1">Log Off</a></span></div>'; $buf .= '<div id="nav" class="xui_menu">' . $dropdown_ul; $buf .= '</div> <div id="content-wrapper"> <!-- START CONTENT -->'; if(CLIENT::singleton()->hasChanged()) { $buf .= GUIBase::message("",'Configuration has been modified. To apply changes, please perform a <a href="javascript:go(\'restart\', \'\');">Graceful Restart</a>.'); } return $buf; } public static function gen_footer($year, $extra) { $buf = ' <!-- END CONTENT --> </div> <div id="copyright" align="center">Copyright © ' . $year . ' <a href="https://www.litespeedtech.com">LiteSpeed Technologies, Inc.</a> All Rights Reserved.</div>' . "<!-- $extra -->\n" . '</body></html>'; return $buf; } public static function gen_left_menu($tabs) { $disp = ConfCenter::singleton()->GetDispInfo(); $area = $disp->_type; $buf = '<!-- START TABS --> <div class="xtab" style="margin-left:-8px;"><ul>'; foreach ( $tabs as $tabName => $tabKey ) { $on = ''; if ( strpos($tabKey, $area) !== false) { $on = 'class="on"'; } $buf .= "<li $on><a href=\"/config/confMgr.php?m={$tabKey}\">{$tabName}</a></li>\n"; } $buf .= '</ul></div> <!-- END TABS -->'; return $buf; } }	3.25 KB	2021-12-15 13:42
📄 PathTool.php <?php class PathTool { public static function getAbsolutePath($root, $path) { if ( substr($path, -1) != '/' ) $path .= '/'; $newPath = $this->getAbsoluteFile($root, $path); return $newPath; } public static function getAbsoluteFile($root, $path) { if ( substr($path, 0, 1) != '/' ) $path = $root . '/' . $path; $newPath = $this->clean($path); return $newPath; } public static function hasSymbolLink($path) { if ( $path != realpath($path) ) return true; else return false; } public static function clean($path) { do { $newS1 = $path; $newS = str_replace('//', '/', $path); $path = $newS; } while ( $newS != $newS1 ); do { $newS1 = $path; $newS = str_replace('/./', '/', $path); $path = $newS; } while ( $newS != $newS1 ); do { $newS1 = $path; $newS = preg_replace('/\/[^\/^\.]+\/\.\.\//', '/', $path); $path = $newS; } while ( $newS != $newS1 ); return $path; } public static function createFile($path, &$err, $htmlname) { if ( file_exists($path) ) { $err = is_file($path) ? "Already exists $path" : "name conflicting with an existing directory $path"; return false; } $dir = substr($path, 0, (strrpos($path, '/'))); $dirmode = 0700; // default $filemode = 0600; $specials = ['userDB:location', 'groupDB:location']; if (in_array($htmlname, $specials)) { $dirmode = 0755; // conf dir will be group protected $filemode = 0644; $special_note = 'WebAdmin user does not have permission to create this file. You can manually create it and populate the data. Make sure it is readable by the user that web server is running as (usually nobody).'; if ( PathTool::createDir($dir, $dirmode, $err) ) { if ( touch($path) ) { chmod($path, $filemode); return true; } $err = 'failed to create file '. $path; } $err .= '. ' . $special_note; return false; } if ( PathTool::createDir($dir, $dirmode, $err) ) { if ( touch($path) ) { chmod($path, $filemode); //populate vhconf tags $type = 'vh'; if ($htmlname == 'templateFile') $type = 'tp'; $newconf = new ConfData($type, $path, 'newconf'); $config = new ConfigFile(); $res = $config->save($newconf); if ( !$res ) { $err = 'failed to save to file ' . $path; return false; } return true; } else $err = 'failed to create file '. $path; } return false; } public static function createDir($path, $mode, &$err) { if ( file_exists($path) ) { if ( is_dir($path) ) return true; else { $err = "$path is not a directory"; return false; } } $parent = substr($path, 0, (strrpos($path, '/'))); if ( strlen($parent) <= 1 ) { $err = "invalid path: $path"; return false; } if ( !file_exists($parent) && !PathTool::createDir($parent, $mode, $err) ) return false; if ( mkdir($path, $mode) ) return true; else { $err = "fail to create directory $path"; return false; } } public static function isDenied($path) { $absname = realpath($path); if ( strncmp( $absname, '/etc/', 5 ) == 0 ) return true; else return false; } }	3.3 KB	2021-12-15 13:42
📄 XmlTreeBuilder.php <?php class XmlTreeBuilder { private $parser; private $node_stack; private $cur_node; private $cur_val; //TAG=0, VALUE=1, ELEMENTS=2 public function &ParseFile($filename, &$err) { if ( !is_file($filename) ) { $err = $filename . ' is not a valid file.'; return NULL; } $fd = fopen($filename, 'r'); if ( !$fd ) { $err = 'failed to open file ' . $filename; return NULL; } $len = filesize($filename); if ( $len > 0 ) { $contents = fread($fd, $len); fclose($fd); $root = $this->parseString($contents, $err); } else { $root = array(); fclose($fd); } if ( $err != NULL ) { $err .= '<br> Failed to parse file ' . $filename; return NULL; } return $root; } private function parseString($xmlstring, &$err) { $this->parser = xml_parser_create(); xml_set_object($this->parser, $this); xml_parser_set_option($this->parser, XML_OPTION_CASE_FOLDING, false); xml_set_element_handler($this->parser, 'startElement', 'endElement'); xml_set_character_data_handler($this->parser, 'characterData'); // Build a Root node and initialize the node_stack... $this->node_stack = array(); $this->cur_node = NULL; $this->startElement(null, 'root', array()); // parse the data and free the parser... $result = xml_parse($this->parser, $xmlstring); if ( !$result ) { $err = 'XML error: '. xml_error_string(xml_get_error_code($this->parser)) . ' at line ' . xml_get_current_line_number($this->parser); } xml_parser_free($this->parser); if ( !$result ) return NULL; // return the root node... return $this->cur_node[2][0]; } private function startElement($parser, $name, $attrs) { if ( $this->cur_node != NULL ) { $this->node_stack[] = $this->cur_node; } $this->cur_node = array(); $this->cur_node[0] = $name; //'TAG'=0 // foreach ($attrs as $key => $value) // { // $node[$key] = $value; // } //no attributes used in xml $this->cur_val = ''; $this->cur_node[2] = array();//'ELEMENTS'=2 } private function endElement($parser, $name) { $this->cur_node[1] = trim($this->cur_val);//'VALUE'=1 $node = $this->cur_node; // and add it an element of the last node in the stack... $this->cur_node = array_pop($this->node_stack); $this->cur_node[2][] = $node; } private function characterData($parser, $data) { // add this data to the last node in the stack... $this->cur_val .= $data; } private function xmlNodeOutput(&$node, $space) { $output = str_repeat(' ', $space); $attrs = array(); foreach( array_keys($node) as $key ) { if ( $key == 0 ) //'TAG' { $name = &$node[0]; } elseif ( $key == 1 ) //'VALUE' { $data = &$node[1]; } elseif ( $key == 2 ) //'ELEMENTS' { $elements = &$node[2]; } else { $attrs[$key] = $node[$key]; } } $name = $node[0]; //'TAG' $output .= "<$name"; if ( count($attrs) > 0 ) { foreach( $attrs as $key => $value ) { $output .= " $key=\"$value\""; } } $output .= '>'; if ( count($elements) == 0 ) { $output .= "$data</$name>\n"; } else { $output .= "\n"; if ( $data ) { $output .= str_repeat(' ', $space+1); $output .= $data . "\n"; } foreach( array_keys($elements) as $key ) { $output .= $this->xmlNodeOutput($elements[$key], $space+1); } $output .= str_repeat(' ', $space); $output .= "</$name>\n"; } return $output ; } }	3.37 KB	2021-12-15 13:42
📄 blowfish.php <?php /** * The Cipher_blowfish:: class implements the Cipher interface enryption data * using the Blowfish algorithm. * * $Horde: horde/lib/Cipher/blowfish.php,v 1.2.2.3 2003/01/03 13:23:22 jan Exp $ * * Copyright 2002-2003 Mike Cochrane <mike@graftonhall.co.nz> * * See the enclosed file COPYING for license information (LGPL). If you * did not receive this file, see http://www.fsf.org/copyleft/lgpl.html. * * @author Mike Cochrane <mike@graftonhall.co.nz> * @version $Revision: 1.3 $ * @since Horde 2.2 * @package horde.cipher / // Change for phpMyAdmin by lem9: //class Horde_Cipher_blowfish extends Horde_Cipher { class Horde_Cipher_blowfish { / Pi Array / var $p = array( 0x243F6A88, 0x85A308D3, 0x13198A2E, 0x03707344, 0xA4093822, 0x299F31D0, 0x082EFA98, 0xEC4E6C89, 0x452821E6, 0x38D01377, 0xBE5466CF, 0x34E90C6C, 0xC0AC29B7, 0xC97C50DD, 0x3F84D5B5, 0xB5470917, 0x9216D5D9, 0x8979FB1B); / S Boxes / var $s1 = array( 0xD1310BA6, 0x98DFB5AC, 0x2FFD72DB, 0xD01ADFB7, 0xB8E1AFED, 0x6A267E96, 0xBA7C9045, 0xF12C7F99, 0x24A19947, 0xB3916CF7, 0x0801F2E2, 0x858EFC16, 0x636920D8, 0x71574E69, 0xA458FEA3, 0xF4933D7E, 0x0D95748F, 0x728EB658, 0x718BCD58, 0x82154AEE, 0x7B54A41D, 0xC25A59B5, 0x9C30D539, 0x2AF26013, 0xC5D1B023, 0x286085F0, 0xCA417918, 0xB8DB38EF, 0x8E79DCB0, 0x603A180E, 0x6C9E0E8B, 0xB01E8A3E, 0xD71577C1, 0xBD314B27, 0x78AF2FDA, 0x55605C60, 0xE65525F3, 0xAA55AB94, 0x57489862, 0x63E81440, 0x55CA396A, 0x2AAB10B6, 0xB4CC5C34, 0x1141E8CE, 0xA15486AF, 0x7C72E993, 0xB3EE1411, 0x636FBC2A, 0x2BA9C55D, 0x741831F6, 0xCE5C3E16, 0x9B87931E, 0xAFD6BA33, 0x6C24CF5C, 0x7A325381, 0x28958677, 0x3B8F4898, 0x6B4BB9AF, 0xC4BFE81B, 0x66282193, 0x61D809CC, 0xFB21A991, 0x487CAC60, 0x5DEC8032, 0xEF845D5D, 0xE98575B1, 0xDC262302, 0xEB651B88, 0x23893E81, 0xD396ACC5, 0x0F6D6FF3, 0x83F44239, 0x2E0B4482, 0xA4842004, 0x69C8F04A, 0x9E1F9B5E, 0x21C66842, 0xF6E96C9A, 0x670C9C61, 0xABD388F0, 0x6A51A0D2, 0xD8542F68, 0x960FA728, 0xAB5133A3, 0x6EEF0B6C, 0x137A3BE4, 0xBA3BF050, 0x7EFB2A98, 0xA1F1651D, 0x39AF0176, 0x66CA593E, 0x82430E88, 0x8CEE8619, 0x456F9FB4, 0x7D84A5C3, 0x3B8B5EBE, 0xE06F75D8, 0x85C12073, 0x401A449F, 0x56C16AA6, 0x4ED3AA62, 0x363F7706, 0x1BFEDF72, 0x429B023D, 0x37D0D724, 0xD00A1248, 0xDB0FEAD3, 0x49F1C09B, 0x075372C9, 0x80991B7B, 0x25D479D8, 0xF6E8DEF7, 0xE3FE501A, 0xB6794C3B, 0x976CE0BD, 0x04C006BA, 0xC1A94FB6, 0x409F60C4, 0x5E5C9EC2, 0x196A2463, 0x68FB6FAF, 0x3E6C53B5, 0x1339B2EB, 0x3B52EC6F, 0x6DFC511F, 0x9B30952C, 0xCC814544, 0xAF5EBD09, 0xBEE3D004, 0xDE334AFD, 0x660F2807, 0x192E4BB3, 0xC0CBA857, 0x45C8740F, 0xD20B5F39, 0xB9D3FBDB, 0x5579C0BD, 0x1A60320A, 0xD6A100C6, 0x402C7279, 0x679F25FE, 0xFB1FA3CC, 0x8EA5E9F8, 0xDB3222F8, 0x3C7516DF, 0xFD616B15, 0x2F501EC8, 0xAD0552AB, 0x323DB5FA, 0xFD238760, 0x53317B48, 0x3E00DF82, 0x9E5C57BB, 0xCA6F8CA0, 0x1A87562E, 0xDF1769DB, 0xD542A8F6, 0x287EFFC3, 0xAC6732C6, 0x8C4F5573, 0x695B27B0, 0xBBCA58C8, 0xE1FFA35D, 0xB8F011A0, 0x10FA3D98, 0xFD2183B8, 0x4AFCB56C, 0x2DD1D35B, 0x9A53E479, 0xB6F84565, 0xD28E49BC, 0x4BFB9790, 0xE1DDF2DA, 0xA4CB7E33, 0x62FB1341, 0xCEE4C6E8, 0xEF20CADA, 0x36774C01, 0xD07E9EFE, 0x2BF11FB4, 0x95DBDA4D, 0xAE909198, 0xEAAD8E71, 0x6B93D5A0, 0xD08ED1D0, 0xAFC725E0, 0x8E3C5B2F, 0x8E7594B7, 0x8FF6E2FB, 0xF2122B64, 0x8888B812, 0x900DF01C, 0x4FAD5EA0, 0x688FC31C, 0xD1CFF191, 0xB3A8C1AD, 0x2F2F2218, 0xBE0E1777, 0xEA752DFE, 0x8B021FA1, 0xE5A0CC0F, 0xB56F74E8, 0x18ACF3D6, 0xCE89E299, 0xB4A84FE0, 0xFD13E0B7, 0x7CC43B81, 0xD2ADA8D9, 0x165FA266, 0x80957705, 0x93CC7314, 0x211A1477, 0xE6AD2065, 0x77B5FA86, 0xC75442F5, 0xFB9D35CF, 0xEBCDAF0C, 0x7B3E89A0, 0xD6411BD3, 0xAE1E7E49, 0x00250E2D, 0x2071B35E, 0x226800BB, 0x57B8E0AF, 0x2464369B, 0xF009B91E, 0x5563911D, 0x59DFA6AA, 0x78C14389, 0xD95A537F, 0x207D5BA2, 0x02E5B9C5, 0x83260376, 0x6295CFA9, 0x11C81968, 0x4E734A41, 0xB3472DCA, 0x7B14A94A, 0x1B510052, 0x9A532915, 0xD60F573F, 0xBC9BC6E4, 0x2B60A476, 0x81E67400, 0x08BA6FB5, 0x571BE91F, 0xF296EC6B, 0x2A0DD915, 0xB6636521, 0xE7B9F9B6, 0xFF34052E, 0xC5855664, 0x53B02D5D, 0xA99F8FA1, 0x08BA4799, 0x6E85076A); var $s2 = array( 0x4B7A70E9, 0xB5B32944, 0xDB75092E, 0xC4192623, 0xAD6EA6B0, 0x49A7DF7D, 0x9CEE60B8, 0x8FEDB266, 0xECAA8C71, 0x699A17FF, 0x5664526C, 0xC2B19EE1, 0x193602A5, 0x75094C29, 0xA0591340, 0xE4183A3E, 0x3F54989A, 0x5B429D65, 0x6B8FE4D6, 0x99F73FD6, 0xA1D29C07, 0xEFE830F5, 0x4D2D38E6, 0xF0255DC1, 0x4CDD2086, 0x8470EB26, 0x6382E9C6, 0x021ECC5E, 0x09686B3F, 0x3EBAEFC9, 0x3C971814, 0x6B6A70A1, 0x687F3584, 0x52A0E286, 0xB79C5305, 0xAA500737, 0x3E07841C, 0x7FDEAE5C, 0x8E7D44EC, 0x5716F2B8, 0xB03ADA37, 0xF0500C0D, 0xF01C1F04, 0x0200B3FF, 0xAE0CF51A, 0x3CB574B2, 0x25837A58, 0xDC0921BD, 0xD19113F9, 0x7CA92FF6, 0x94324773, 0x22F54701, 0x3AE5E581, 0x37C2DADC, 0xC8B57634, 0x9AF3DDA7, 0xA9446146, 0x0FD0030E, 0xECC8C73E, 0xA4751E41, 0xE238CD99, 0x3BEA0E2F, 0x3280BBA1, 0x183EB331, 0x4E548B38, 0x4F6DB908, 0x6F420D03, 0xF60A04BF, 0x2CB81290, 0x24977C79, 0x5679B072, 0xBCAF89AF, 0xDE9A771F, 0xD9930810, 0xB38BAE12, 0xDCCF3F2E, 0x5512721F, 0x2E6B7124, 0x501ADDE6, 0x9F84CD87, 0x7A584718, 0x7408DA17, 0xBC9F9ABC, 0xE94B7D8C, 0xEC7AEC3A, 0xDB851DFA, 0x63094366, 0xC464C3D2, 0xEF1C1847, 0x3215D908, 0xDD433B37, 0x24C2BA16, 0x12A14D43, 0x2A65C451, 0x50940002, 0x133AE4DD, 0x71DFF89E, 0x10314E55, 0x81AC77D6, 0x5F11199B, 0x043556F1, 0xD7A3C76B, 0x3C11183B, 0x5924A509, 0xF28FE6ED, 0x97F1FBFA, 0x9EBABF2C, 0x1E153C6E, 0x86E34570, 0xEAE96FB1, 0x860E5E0A, 0x5A3E2AB3, 0x771FE71C, 0x4E3D06FA, 0x2965DCB9, 0x99E71D0F, 0x803E89D6, 0x5266C825, 0x2E4CC978, 0x9C10B36A, 0xC6150EBA, 0x94E2EA78, 0xA5FC3C53, 0x1E0A2DF4, 0xF2F74EA7, 0x361D2B3D, 0x1939260F, 0x19C27960, 0x5223A708, 0xF71312B6, 0xEBADFE6E, 0xEAC31F66, 0xE3BC4595, 0xA67BC883, 0xB17F37D1, 0x018CFF28, 0xC332DDEF, 0xBE6C5AA5, 0x65582185, 0x68AB9802, 0xEECEA50F, 0xDB2F953B, 0x2AEF7DAD, 0x5B6E2F84, 0x1521B628, 0x29076170, 0xECDD4775, 0x619F1510, 0x13CCA830, 0xEB61BD96, 0x0334FE1E, 0xAA0363CF, 0xB5735C90, 0x4C70A239, 0xD59E9E0B, 0xCBAADE14, 0xEECC86BC, 0x60622CA7, 0x9CAB5CAB, 0xB2F3846E, 0x648B1EAF, 0x19BDF0CA, 0xA02369B9, 0x655ABB50, 0x40685A32, 0x3C2AB4B3, 0x319EE9D5, 0xC021B8F7, 0x9B540B19, 0x875FA099, 0x95F7997E, 0x623D7DA8, 0xF837889A, 0x97E32D77, 0x11ED935F, 0x16681281, 0x0E358829, 0xC7E61FD6, 0x96DEDFA1, 0x7858BA99, 0x57F584A5, 0x1B227263, 0x9B83C3FF, 0x1AC24696, 0xCDB30AEB, 0x532E3054, 0x8FD948E4, 0x6DBC3128, 0x58EBF2EF, 0x34C6FFEA, 0xFE28ED61, 0xEE7C3C73, 0x5D4A14D9, 0xE864B7E3, 0x42105D14, 0x203E13E0, 0x45EEE2B6, 0xA3AAABEA, 0xDB6C4F15, 0xFACB4FD0, 0xC742F442, 0xEF6ABBB5, 0x654F3B1D, 0x41CD2105, 0xD81E799E, 0x86854DC7, 0xE44B476A, 0x3D816250, 0xCF62A1F2, 0x5B8D2646, 0xFC8883A0, 0xC1C7B6A3, 0x7F1524C3, 0x69CB7492, 0x47848A0B, 0x5692B285, 0x095BBF00, 0xAD19489D, 0x1462B174, 0x23820E00, 0x58428D2A, 0x0C55F5EA, 0x1DADF43E, 0x233F7061, 0x3372F092, 0x8D937E41, 0xD65FECF1, 0x6C223BDB, 0x7CDE3759, 0xCBEE7460, 0x4085F2A7, 0xCE77326E, 0xA6078084, 0x19F8509E, 0xE8EFD855, 0x61D99735, 0xA969A7AA, 0xC50C06C2, 0x5A04ABFC, 0x800BCADC, 0x9E447A2E, 0xC3453484, 0xFDD56705, 0x0E1E9EC9, 0xDB73DBD3, 0x105588CD, 0x675FDA79, 0xE3674340, 0xC5C43465, 0x713E38D8, 0x3D28F89E, 0xF16DFF20, 0x153E21E7, 0x8FB03D4A, 0xE6E39F2B, 0xDB83ADF7); var $s3 = array( 0xE93D5A68, 0x948140F7, 0xF64C261C, 0x94692934, 0x411520F7, 0x7602D4F7, 0xBCF46B2E, 0xD4A20068, 0xD4082471, 0x3320F46A, 0x43B7D4B7, 0x500061AF, 0x1E39F62E, 0x97244546, 0x14214F74, 0xBF8B8840, 0x4D95FC1D, 0x96B591AF, 0x70F4DDD3, 0x66A02F45, 0xBFBC09EC, 0x03BD9785, 0x7FAC6DD0, 0x31CB8504, 0x96EB27B3, 0x55FD3941, 0xDA2547E6, 0xABCA0A9A, 0x28507825, 0x530429F4, 0x0A2C86DA, 0xE9B66DFB, 0x68DC1462, 0xD7486900, 0x680EC0A4, 0x27A18DEE, 0x4F3FFEA2, 0xE887AD8C, 0xB58CE006, 0x7AF4D6B6, 0xAACE1E7C, 0xD3375FEC, 0xCE78A399, 0x406B2A42, 0x20FE9E35, 0xD9F385B9, 0xEE39D7AB, 0x3B124E8B, 0x1DC9FAF7, 0x4B6D1856, 0x26A36631, 0xEAE397B2, 0x3A6EFA74, 0xDD5B4332, 0x6841E7F7, 0xCA7820FB, 0xFB0AF54E, 0xD8FEB397, 0x454056AC, 0xBA489527, 0x55533A3A, 0x20838D87, 0xFE6BA9B7, 0xD096954B, 0x55A867BC, 0xA1159A58, 0xCCA92963, 0x99E1DB33, 0xA62A4A56, 0x3F3125F9, 0x5EF47E1C, 0x9029317C, 0xFDF8E802, 0x04272F70, 0x80BB155C, 0x05282CE3, 0x95C11548, 0xE4C66D22, 0x48C1133F, 0xC70F86DC, 0x07F9C9EE, 0x41041F0F, 0x404779A4, 0x5D886E17, 0x325F51EB, 0xD59BC0D1, 0xF2BCC18F, 0x41113564, 0x257B7834, 0x602A9C60, 0xDFF8E8A3, 0x1F636C1B, 0x0E12B4C2, 0x02E1329E, 0xAF664FD1, 0xCAD18115, 0x6B2395E0, 0x333E92E1, 0x3B240B62, 0xEEBEB922, 0x85B2A20E, 0xE6BA0D99, 0xDE720C8C, 0x2DA2F728, 0xD0127845, 0x95B794FD, 0x647D0862, 0xE7CCF5F0, 0x5449A36F, 0x877D48FA, 0xC39DFD27, 0xF33E8D1E, 0x0A476341, 0x992EFF74, 0x3A6F6EAB, 0xF4F8FD37, 0xA812DC60, 0xA1EBDDF8, 0x991BE14C, 0xDB6E6B0D, 0xC67B5510, 0x6D672C37, 0x2765D43B, 0xDCD0E804, 0xF1290DC7, 0xCC00FFA3, 0xB5390F92, 0x690FED0B, 0x667B9FFB, 0xCEDB7D9C, 0xA091CF0B, 0xD9155EA3, 0xBB132F88, 0x515BAD24, 0x7B9479BF, 0x763BD6EB, 0x37392EB3, 0xCC115979, 0x8026E297, 0xF42E312D, 0x6842ADA7, 0xC66A2B3B, 0x12754CCC, 0x782EF11C, 0x6A124237, 0xB79251E7, 0x06A1BBE6, 0x4BFB6350, 0x1A6B1018, 0x11CAEDFA, 0x3D25BDD8, 0xE2E1C3C9, 0x44421659, 0x0A121386, 0xD90CEC6E, 0xD5ABEA2A, 0x64AF674E, 0xDA86A85F, 0xBEBFE988, 0x64E4C3FE, 0x9DBC8057, 0xF0F7C086, 0x60787BF8, 0x6003604D, 0xD1FD8346, 0xF6381FB0, 0x7745AE04, 0xD736FCCC, 0x83426B33, 0xF01EAB71, 0xB0804187, 0x3C005E5F, 0x77A057BE, 0xBDE8AE24, 0x55464299, 0xBF582E61, 0x4E58F48F, 0xF2DDFDA2, 0xF474EF38, 0x8789BDC2, 0x5366F9C3, 0xC8B38E74, 0xB475F255, 0x46FCD9B9, 0x7AEB2661, 0x8B1DDF84, 0x846A0E79, 0x915F95E2, 0x466E598E, 0x20B45770, 0x8CD55591, 0xC902DE4C, 0xB90BACE1, 0xBB8205D0, 0x11A86248, 0x7574A99E, 0xB77F19B6, 0xE0A9DC09, 0x662D09A1, 0xC4324633, 0xE85A1F02, 0x09F0BE8C, 0x4A99A025, 0x1D6EFE10, 0x1AB93D1D, 0x0BA5A4DF, 0xA186F20F, 0x2868F169, 0xDCB7DA83, 0x573906FE, 0xA1E2CE9B, 0x4FCD7F52, 0x50115E01, 0xA70683FA, 0xA002B5C4, 0x0DE6D027, 0x9AF88C27, 0x773F8641, 0xC3604C06, 0x61A806B5, 0xF0177A28, 0xC0F586E0, 0x006058AA, 0x30DC7D62, 0x11E69ED7, 0x2338EA63, 0x53C2DD94, 0xC2C21634, 0xBBCBEE56, 0x90BCB6DE, 0xEBFC7DA1, 0xCE591D76, 0x6F05E409, 0x4B7C0188, 0x39720A3D, 0x7C927C24, 0x86E3725F, 0x724D9DB9, 0x1AC15BB4, 0xD39EB8FC, 0xED545578, 0x08FCA5B5, 0xD83D7CD3, 0x4DAD0FC4, 0x1E50EF5E, 0xB161E6F8, 0xA28514D9, 0x6C51133C, 0x6FD5C7E7, 0x56E14EC4, 0x362ABFCE, 0xDDC6C837, 0xD79A3234, 0x92638212, 0x670EFA8E, 0x406000E0); var $s4 = array( 0x3A39CE37, 0xD3FAF5CF, 0xABC27737, 0x5AC52D1B, 0x5CB0679E, 0x4FA33742, 0xD3822740, 0x99BC9BBE, 0xD5118E9D, 0xBF0F7315, 0xD62D1C7E, 0xC700C47B, 0xB78C1B6B, 0x21A19045, 0xB26EB1BE, 0x6A366EB4, 0x5748AB2F, 0xBC946E79, 0xC6A376D2, 0x6549C2C8, 0x530FF8EE, 0x468DDE7D, 0xD5730A1D, 0x4CD04DC6, 0x2939BBDB, 0xA9BA4650, 0xAC9526E8, 0xBE5EE304, 0xA1FAD5F0, 0x6A2D519A, 0x63EF8CE2, 0x9A86EE22, 0xC089C2B8, 0x43242EF6, 0xA51E03AA, 0x9CF2D0A4, 0x83C061BA, 0x9BE96A4D, 0x8FE51550, 0xBA645BD6, 0x2826A2F9, 0xA73A3AE1, 0x4BA99586, 0xEF5562E9, 0xC72FEFD3, 0xF752F7DA, 0x3F046F69, 0x77FA0A59, 0x80E4A915, 0x87B08601, 0x9B09E6AD, 0x3B3EE593, 0xE990FD5A, 0x9E34D797, 0x2CF0B7D9, 0x022B8B51, 0x96D5AC3A, 0x017DA67D, 0xD1CF3ED6, 0x7C7D2D28, 0x1F9F25CF, 0xADF2B89B, 0x5AD6B472, 0x5A88F54C, 0xE029AC71, 0xE019A5E6, 0x47B0ACFD, 0xED93FA9B, 0xE8D3C48D, 0x283B57CC, 0xF8D56629, 0x79132E28, 0x785F0191, 0xED756055, 0xF7960E44, 0xE3D35E8C, 0x15056DD4, 0x88F46DBA, 0x03A16125, 0x0564F0BD, 0xC3EB9E15, 0x3C9057A2, 0x97271AEC, 0xA93A072A, 0x1B3F6D9B, 0x1E6321F5, 0xF59C66FB, 0x26DCF319, 0x7533D928, 0xB155FDF5, 0x03563482, 0x8ABA3CBB, 0x28517711, 0xC20AD9F8, 0xABCC5167, 0xCCAD925F, 0x4DE81751, 0x3830DC8E, 0x379D5862, 0x9320F991, 0xEA7A90C2, 0xFB3E7BCE, 0x5121CE64, 0x774FBE32, 0xA8B6E37E, 0xC3293D46, 0x48DE5369, 0x6413E680, 0xA2AE0810, 0xDD6DB224, 0x69852DFD, 0x09072166, 0xB39A460A, 0x6445C0DD, 0x586CDECF, 0x1C20C8AE, 0x5BBEF7DD, 0x1B588D40, 0xCCD2017F, 0x6BB4E3BB, 0xDDA26A7E, 0x3A59FF45, 0x3E350A44, 0xBCB4CDD5, 0x72EACEA8, 0xFA6484BB, 0x8D6612AE, 0xBF3C6F47, 0xD29BE463, 0x542F5D9E, 0xAEC2771B, 0xF64E6370, 0x740E0D8D, 0xE75B1357, 0xF8721671, 0xAF537D5D, 0x4040CB08, 0x4EB4E2CC, 0x34D2466A, 0x0115AF84, 0xE1B00428, 0x95983A1D, 0x06B89FB4, 0xCE6EA048, 0x6F3F3B82, 0x3520AB82, 0x011A1D4B, 0x277227F8, 0x611560B1, 0xE7933FDC, 0xBB3A792B, 0x344525BD, 0xA08839E1, 0x51CE794B, 0x2F32C9B7, 0xA01FBAC9, 0xE01CC87E, 0xBCC7D1F6, 0xCF0111C3, 0xA1E8AAC7, 0x1A908749, 0xD44FBD9A, 0xD0DADECB, 0xD50ADA38, 0x0339C32A, 0xC6913667, 0x8DF9317C, 0xE0B12B4F, 0xF79E59B7, 0x43F5BB3A, 0xF2D519FF, 0x27D9459C, 0xBF97222C, 0x15E6FC2A, 0x0F91FC71, 0x9B941525, 0xFAE59361, 0xCEB69CEB, 0xC2A86459, 0x12BAA8D1, 0xB6C1075E, 0xE3056A0C, 0x10D25065, 0xCB03A442, 0xE0EC6E0E, 0x1698DB3B, 0x4C98A0BE, 0x3278E964, 0x9F1F9532, 0xE0D392DF, 0xD3A0342B, 0x8971F21E, 0x1B0A7441, 0x4BA3348C, 0xC5BE7120, 0xC37632D8, 0xDF359F8D, 0x9B992F2E, 0xE60B6F47, 0x0FE3F11D, 0xE54CDA54, 0x1EDAD891, 0xCE6279CF, 0xCD3E7E6F, 0x1618B166, 0xFD2C1D05, 0x848FD2C5, 0xF6FB2299, 0xF523F357, 0xA6327623, 0x93A83531, 0x56CCCD02, 0xACF08162, 0x5A75EBB5, 0x6E163697, 0x88D273CC, 0xDE966292, 0x81B949D0, 0x4C50901B, 0x71C65614, 0xE6C6C7BD, 0x327A140A, 0x45E1D006, 0xC3F27B9A, 0xC9AA53FD, 0x62A80F00, 0xBB25BFE2, 0x35BDD2F6, 0x71126905, 0xB2040222, 0xB6CBCF7C, 0xCD769C2B, 0x53113EC0, 0x1640E3D3, 0x38ABBD60, 0x2547ADF0, 0xBA38209C, 0xF746CE76, 0x77AFA1C5, 0x20756060, 0x85CBFE4E, 0x8AE88DD8, 0x7AAAF9B0, 0x4CF9AA7E, 0x1948C25C, 0x02FB8A8C, 0x01C36AE4, 0xD6EBE1F9, 0x90D4F869, 0xA65CDEA0, 0x3F09252D, 0xC208E69F, 0xB74E6132, 0xCE77E25B, 0x578FDFE3, 0x3AC372E6); / The number of rounds to do / var $_rounds = 16; / Constructor / function Cipher_blowfish($params = null) { } /* * Set the key to be used for en/decryption * * @param String $key The key to use / function setKey($key) { $key = $this->_formatKey($key); $keyPos = $keyXor = 0; $iMax = count($this->p); $keyLen = count($key); for ($i = 0; $i < $iMax; $i++) { for ($t = 0; $t < 4; $t++) { $keyXor = ($keyXor << 8) \| (($key[$keyPos]) & 0x0ff); if (++$keyPos == $keyLen) { $keyPos = 0; } } $this->p[$i] = $this->p[$i] ^ $keyXor; } $encZero = array('L' => 0, 'R' => 0); for ($i = 0; $i + 1 < $iMax; $i += 2) { $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']); $this->p[$i] = $encZero['L']; $this->p[$i + 1] = $encZero['R']; } $iMax = count($this->s1); for ($i = 0; $i < $iMax; $i += 2) { $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']); $this->s1[$i] = $encZero['L']; $this->s1[$i + 1] = $encZero['R']; } $iMax = count($this->s2); for ($i = 0; $i < $iMax; $i += 2) { $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']); $this->s2[$i] = $encZero['L']; $this->s2[$i + 1] = $encZero['R']; } $iMax = count($this->s3); for ($i = 0; $i < $iMax; $i += 2) { $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']); $this->s3[$i] = $encZero['L']; $this->s3[$i + 1] = $encZero['R']; } $iMax = count($this->s4); for ($i = 0; $i < $iMax; $i += 2) { $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']); $this->s4[$i] = $encZero['L']; $this->s4[$i + 1] = $encZero['R']; } } /* * Return the size of the blocks that this cipher needs * * @return Integer The number of characters per block / function getBlockSize() { return 8; } /* * Encrypt a block on data. * * @param String $block The data to encrypt * @param optional String $key The key to use * * @return String the encrypted output / function encryptBlock($block, $key = null) { if (!is_null($key)) { $this->setKey($key); } list($L, $R) = array_values(unpack('N', $block)); $parts = $this->_encryptBlock($L, $R); return pack("NN", $parts['L'], $parts['R']); } /** * Encrypt a block on data. * * @param String $L The data to encrypt. * @param String $R The data to encrypt. * * @return String The encrypted output. / function _encryptBlock($L, $R) { $L ^= $this->p[0]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[1]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[2]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[3]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[4]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[5]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[6]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[7]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[8]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[9]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[10]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[11]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[12]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[13]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[14]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[15]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[16]; $R ^= $this->p[17]; return array('L' => $R, 'R' => $L); } /* * Decrypt a block on data. * * @param String $block The data to decrypt * @param optional String $key The key to use * * @return String the decrypted output / function decryptBlock($block, $key = null) { if (!is_null($key)) { $this->setKey($key); } // change for phpMyAdmin $L = null; $R = null; $retarray = array_values(unpack('N', $block)); if(isset($retarray[0])) { $L = $retarray[0]; } if(isset($retarray[1])) { $R = $retarray[1]; } // end change for phpMyAdmin $L ^= $this->p[17]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[16]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[15]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[14]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[13]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[12]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[11]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[10]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[9]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[8]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[7]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[6]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[5]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[4]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[3]; $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[2]; $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[1]; $decrypted = pack("NN", $R ^ $this->p[0], $L); return $decrypted; } /** * Converts a text key into an array. * * @return array The key. / function _formatKey($key) { return array_values(unpack('C', $key)); } } // higher-level functions: /** * String padding * * @param string input string * @param integer length of the result * @param string the filling string * @param integer padding mode * * @return string the padded string * * @access public / function full_str_pad($input, $pad_length, $pad_string = '', $pad_type = 0) { $str = ''; $length = $pad_length - strlen($input); if ($length > 0) { // str_repeat doesn't like negatives if ($pad_type == STR_PAD_RIGHT) { // STR_PAD_RIGHT == 1 $str = $input.str_repeat($pad_string, $length); } elseif ($pad_type == STR_PAD_BOTH) { // STR_PAD_BOTH == 2 $str = str_repeat($pad_string, floor($length/2)); $str .= $input; $str .= str_repeat($pad_string, ceil($length/2)); } else { // defaults to STR_PAD_LEFT == 0 $str = str_repeat($pad_string, $length).$input; } } else { // if $length is negative or zero we don't need to do anything $str = $input; } return $str; } /* * Encryption using blowfish algorithm * * @param string original data * @param string the secret * * @return string the encrypted result * * @access public * * @author lem9 / function PMA_blowfish_encrypt($data, $secret) { $pma_cipher = new Horde_Cipher_blowfish; $encrypt = ''; for ($i=0; $i<strlen($data); $i+=8) { $block = substr($data, $i, 8); if (strlen($block) < 8) { $block = full_str_pad($block,8,"\0", 1); } $encrypt .= $pma_cipher->encryptBlock($block, $secret); } return base64_encode($encrypt); } /* * Decryption using blowfish algorithm * * @param string encrypted data * @param string the secret * * @return string original data * * @access public * * @author lem9 */ function PMA_blowfish_decrypt($encdata, $secret) { $pma_cipher = new Horde_Cipher_blowfish; $decrypt = ''; $data = base64_decode($encdata); for ($i=0; $i<strlen($data); $i+=8) { $decrypt .= $pma_cipher->decryptBlock(substr($data, $i, 8), $secret); } return trim($decrypt); } ?>	26.82 KB	2021-12-15 13:42
📄 jCryption.php <?php /** * jCryption * * PHP versions 4 and 5 * * LICENSE: This source file is subject to version 3.0 of the PHP license * that is available through the world-wide-web at the following URI: * http://www.php.net/license/3_0.txt. If you did not receive a copy of * the PHP License and are unable to obtain it through the web, please * send a note to license@php.net so we can mail you a copy immediately. * * Many of the functions in this class are from the PEAR Crypt_RSA package ... * So most of the credits goes to the original creator of this package Alexander Valyalkin * you can get the package under http://pear.php.net/package/Crypt_RSA * * I just changed, added, removed and improved some functions to fit the needs of jCryption * * @author Daniel Griesser <daniel.griesser@jcryption.org> * @copyright 2010 Daniel Griesser * @license http://www.php.net/license/3_0.txt PHP License 3.0 * @version 1.1 * @link http://jcryption.org/ / class jCryption { var $_key_len; var $_e; /* * Constructor * * @access public / public function __construct($e = "\x01\x00\x01") { $this->_e = $e; } /* * Generates the Keypair with the given keyLength the encryption key e ist set staticlly * set to 65537 for faster encryption. * * @param int $keyLength * @return array * @access public / function generateKeypair($keyLength) { $this->_key_len = intval($keyLength); if ($this->_key_len < 8) { $this->_key_len = 8; } // set [e] to 0x10001 (65537) $e = $this->bin2int($this->_e); // generate [p], [q] and [n] $p_len = intval(($this->_key_len + 1) / 2); $q_len = $this->_key_len - $p_len; $p1 = $q1 = 0; do { // generate prime number [$p] with length [$p_len] with the following condition: // GCD($e, $p - 1) = 1 do { $p = $this->getPrime($p_len); $p1 = $this->dec($p); $tmp = $this->GCD($e, $p1); } while (!$this->isOne($tmp)); // generate prime number [$q] with length [$q_len] with the following conditions: // GCD($e, $q - 1) = 1 // $q != $p do { $q = $this->getPrime($q_len); //$q = 102238965184417281201422828818276460200050705922822343263269460146519295919831; $q1 = $this->dec($q); $tmp = $this->GCD($e, $q1); } while (!$this->isOne($tmp) && !$this->cmpAbs($q, $p)); // if (p < q), then exchange them if ($this->cmpAbs($p, $q) < 0) { $tmp = $p; $p = $q; $q = $tmp; $tmp = $p1; $p1 = $q1; $q1 = $tmp; } // calculate n = p q $n = $this->mul($p, $q); } while ($this->bitLen($n) != $this->_key_len); // calculate d = 1/e mod (p - 1) * (q - 1) $pq = $this->mul($p1, $q1); $d = $this->invmod($e, $pq); // store RSA keypair attributes $keypair = array('n'=>$n, 'e'=>$e, 'd'=>$d, 'p'=>$p, 'q'=>$q); return $keypair; } function useKeys($keys,$keyLength) { $this->_key_len = intval($keyLength); if ($this->_key_len < 8) { $this->_key_len = 8; } // set [e] to 0x10001 (65537) $e = $this->bin2int($this->_e); // generate [p], [q] and [n] $p_len = intval(($this->_key_len + 1) / 2); $q_len = $this->_key_len - $p_len; $p1 = $q1 = 0; do { do { $q = $keys[rand(0,count($keys))]; $p = $keys[rand(0,count($keys))]; $p1 = $this->dec($p); $q1 = $this->dec($q); } while (!$this->cmpAbs($q, $p)); // if (p < q), then exchange them if ($this->cmpAbs($p, $q) < 0) { $tmp = $p; $p = $q; $q = $tmp; $tmp = $p1; $p1 = $q1; $q1 = $tmp; } // calculate n = p * q $n = $this->mul($p, $q); } while ($this->bitLen($n) != $this->_key_len); // calculate d = 1/e mod (p - 1) * (q - 1) $pq = $this->mul($p1, $q1); $d = $this->invmod($e, $pq); // store RSA keypair attributes $keypair = array('n'=>$n, 'e'=>$e, 'd'=>$d, 'p'=>$p, 'q'=>$q); return $keypair; } /** * Finds greatest common divider (GCD) of $num1 and $num2 * * @param string $num1 * @param string $num2 * @return string * @access public / function GCD($num1, $num2) { do { $tmp = bcmod($num1, $num2); $num1 = $num2; $num2 = $tmp; } while (bccomp($num2, '0')); return $num1; } /* * Performs Miller-Rabin primality test for number $num * with base $base. Returns true, if $num is strong pseudoprime * by base $base. Else returns false. * * @param string $num * @param string $base * @return bool * @access private / function _millerTest($num, $base) { if (!bccomp($num, '1')) { // 1 is not prime ;) return false; } $tmp = bcsub($num, '1'); $zero_bits = 0; while (!bccomp(bcmod($tmp, '2'), '0')) { $zero_bits++; $tmp = bcdiv($tmp, '2'); } $tmp = $this->powmod($base, $tmp, $num); if (!bccomp($tmp, '1')) { // $num is probably prime return true; } while ($zero_bits--) { if (!bccomp(bcadd($tmp, '1'), $num)) { // $num is probably prime return true; } $tmp = $this->powmod($tmp, '2', $num); } // $num is composite return false; } /* * Transforms binary representation of large integer into its native form. * * Example of transformation: * $str = "\x12\x34\x56\x78\x90"; * $num = 0x9078563412; * * @param string $str * @return string * @access public / function bin2int($str) { $result = '0'; $n = strlen($str); do { $result = bcadd(bcmul($result, '256'), ord($str {--$n} )); } while ($n > 0); return $result; } /* * Transforms large integer into binary representation. * * Example of transformation: * $num = 0x9078563412; * $str = "\x12\x34\x56\x78\x90"; * * @param string $num * @return string * @access public / function int2bin($num) { $result = ''; do { $result .= chr(bcmod($num, '256')); $num = bcdiv($num, '256'); } while (bccomp($num, '0')); return $result; } /* * Calculates pow($num, $pow) (mod $mod) * * @param string $num * @param string $pow * @param string $mod * @return string * @access public / function powmod($num, $pow, $mod) { if (function_exists('bcpowmod')) { // bcpowmod is only available under PHP5 return bcpowmod($num, $pow, $mod); } // emulate bcpowmod $result = '1'; do { if (!bccomp(bcmod($pow, '2'), '1')) { $result = bcmod(bcmul($result, $num), $mod); } $num = bcmod(bcpow($num, '2'), $mod); $pow = bcdiv($pow, '2'); } while (bccomp($pow, '0')); return $result; } /* * Calculates $num1 * $num2 * * @param string $num1 * @param string $num2 * @return string * @access public / function mul($num1, $num2) { return bcmul($num1, $num2); } /* * Calculates $num1 % $num2 * * @param string $num1 * @param string $num2 * @return string * @access public / function mod($num1, $num2) { return bcmod($num1, $num2); } /* * Compares abs($num1) to abs($num2). * Returns: * -1, if abs($num1) < abs($num2) * 0, if abs($num1) == abs($num2) * 1, if abs($num1) > abs($num2) * * @param string $num1 * @param string $num2 * @return int * @access public / function cmpAbs($num1, $num2) { return bccomp($num1, $num2); } /* * Tests $num on primality. Returns true, if $num is strong pseudoprime. * Else returns false. * * @param string $num * @return bool * @access private / function isPrime($num) { static $primes = null; static $primes_cnt = 0; if (is_null($primes)) { // generate all primes up to 10000 $primes = array(); for ($i = 0; $i < 10000; $i++) { $primes[] = $i; } $primes[0] = $primes[1] = 0; for ($i = 2; $i < 100; $i++) { while (!$primes[$i]) { $i++; } $j = $i; for ($j += $i; $j < 10000; $j += $i) { $primes[$j] = 0; } } $j = 0; for ($i = 0; $i < 10000; $i++) { if ($primes[$i]) { $primes[$j++] = $primes[$i]; } } $primes_cnt = $j; } // try to divide number by small primes for ($i = 0; $i < $primes_cnt; $i++) { if (bccomp($num, $primes[$i]) <= 0) { // number is prime return true; } if (!bccomp(bcmod($num, $primes[$i]), '0')) { // number divides by $primes[$i] return false; } } / try Miller-Rabin's probable-primality test for first 7 primes as bases / for ($i = 0; $i < 7; $i++) { if (!$this->_millerTest($num, $primes[$i])) { // $num is composite return false; } } // $num is strong pseudoprime return true; } /* * Produces a better random number * for seeding mt_rand() * * @access private / function _makeSeed() { return hexdec(sha1(sha1(microtime(true)mt_rand()).md5(microtime(true)mt_rand()))); } /* * Generates prime number with length $bits_cnt * * @param int $bits_cnt * @access public / function getPrime($bits_cnt) { $bytes_n = intval($bits_cnt / 8); $bits_n = $bits_cnt % 8; do { $str = ''; mt_srand((int)$this->_makeSeed()); for ($i = 0; $i < $bytes_n; $i++) { $str .= chr((int)sha1(mt_rand() microtime(true)) & 0xff); } $n = mt_rand() * microtime(true) & 0xff; $n \|= 0x80; $n >>= 8 - $bits_n; $str .= chr($n); $num = $this->bin2int($str); // search for the next closest prime number after [$num] if (!bccomp(bcmod($num, '2'), '0')) { $num = bcadd($num, '1'); } while (!$this->isPrime($num)) { $num = bcadd($num, '2'); } } while ($this->bitLen($num) != $bits_cnt); return $num; } /** * Calculates $num - 1 * * @param string $num * @return string * @access public / function dec($num) { return bcsub($num, '1'); } /* * Returns true, if $num is equal to one. Else returns false * * @param string $num * @return bool * @access public / function isOne($num) { return !bccomp($num, '1'); } /* * Finds inverse number $inv for $num by modulus $mod, such as: * $inv * $num = 1 (mod $mod) * * @param string $num * @param string $mod * @return string * @access public / function invmod($num, $mod) { $x = '1'; $y = '0'; $num1 = $mod; do { $tmp = bcmod($num, $num1); $q = bcdiv($num, $num1); $num = $num1; $num1 = $tmp; $tmp = bcsub($x, bcmul($y, $q)); $x = $y; $y = $tmp; } while (bccomp($num1, '0')); if (bccomp($x, '0') < 0) { $x = bcadd($x, $mod); } return $x; } /* * Returns bit length of number $num * * @param string $num * @return int * @access public / function bitLen($num) { $tmp = $this->int2bin($num); $bit_len = strlen($tmp) 8; $tmp = ord($tmp {strlen($tmp) - 1} ); if (!$tmp) { $bit_len -= 8; } else { while (!($tmp & 0x80)) { $bit_len--; $tmp <<= 1; } } return $bit_len; } /** * Calculates bitwise or of $num1 and $num2, * starting from bit $start_pos for number $num1 * * @param string $num1 * @param string $num2 * @param int $start_pos * @return string * @access public / function bitOr($num1, $num2, $start_pos) { $start_byte = intval($start_pos / 8); $start_bit = $start_pos % 8; $tmp1 = $this->int2bin($num1); $num2 = bcmul($num2, 1 << $start_bit); $tmp2 = $this->int2bin($num2); if ($start_byte < strlen($tmp1)) { $tmp2 \|= substr($tmp1, $start_byte); $tmp1 = substr($tmp1, 0, $start_byte).$tmp2; } else { $tmp1 = str_pad($tmp1, $start_byte, "\0").$tmp2; } return $this->bin2int($tmp1); } /* * Returns part of number $num, starting at bit * position $start with length $length * * @param string $num * @param int start * @param int length * @return string * @access public / function subint($num, $start, $length) { $start_byte = intval($start / 8); $start_bit = $start % 8; $byte_length = intval($length / 8); $bit_length = $length % 8; if ($bit_length) { $byte_length++; } $num = bcdiv($num, 1 << $start_bit); $tmp = substr($this->int2bin($num), $start_byte, $byte_length); $tmp = str_pad($tmp, $byte_length, "\0"); $tmp = substr_replace($tmp, $tmp {$byte_length - 1} & chr(0xff >> (8 - $bit_length)), $byte_length - 1, 1); return $this->bin2int($tmp); } /* * Converts a hex string to bigint string * * @param string $hex * @return string * @access public / function hex2bint($hex) { $result = '0'; for ($i = 0; $i < strlen($hex); $i++) { $result = bcmul($result, '16'); if ($hex[$i] >= '0' && $hex[$i] <= '9') { $result = bcadd($result, $hex[$i]); } else if ($hex[$i] >= 'a' && $hex[$i] <= 'f') { $result = bcadd($result, '1'.('0' + (ord($hex[$i]) - ord('a')))); } else if ($hex[$i] >= 'A' && $hex[$i] <= 'F') { $result = bcadd($result, '1'.('0' + (ord($hex[$i]) - ord('A')))); } } return $result; } /* * Converts a hex string to int * * @param string $hex * @return int * @access public / function hex2int($hex) { $result = 0; for ($i = 0; $i < strlen($hex); $i++) { $result = 16; if ($hex[$i] >= '0' && $hex[$i] <= '9') { $result += ord($hex[$i]) - ord('0'); } else if ($hex[$i] >= 'a' && $hex[$i] <= 'f') { $result += 10 + (ord($hex[$i]) - ord('a')); } else if ($hex[$i] >= 'A' && $hex[$i] <= 'F') { $result += 10 + (ord($hex[$i]) - ord('A')); } } return $result; } /** * Converts a bigint string to the ascii code * * @param string $bigint * @return string * @access public / function bint2char($bigint) { $message = ''; while (bccomp($bigint, '0') != 0) { $ascii = bcmod($bigint, '256'); $bigint = bcdiv($bigint, '256', 0); $message .= chr($ascii); } return $message; } /* * Removes the redundacy in den encrypted string * * @param string $string * @return mixed * @access public / function redundacyCheck($string) { $r1 = substr($string, 0, 2); $r2 = substr($string, 2); $check = $this->hex2int($r1); $value = $r2; $sum = 0; for ($i = 0; $i < strlen($value); $i++) { $sum += ord($value[$i]); } if ($check == ($sum & 0xFF)) { return $value; } else { return NULL; } } /* * Decrypts a given string with the $dec_key and the $enc_mod * * @param string $encrypted * @param int $dec_key * @param int $enc_mod * @return string * @access public / function decrypt($encrypted, $dec_key, $enc_mod) { //replaced split with explode $blocks = explode(' ', $encrypted); $result = ""; $max = count($blocks); for ($i = 0; $i < $max; $i++) { $dec = $this->hex2bint($blocks[$i]); $dec = $this->powmod($dec, $dec_key, $enc_mod); $ascii = $this->bint2char($dec); $result .= $ascii; } return $this->redundacyCheck($result); } /* * Converts a given decimal string to any base between 2 and 36 * * @param string $decimal * @param int $base * @return string */ function dec2string($decimal, $base) { $string = null; $base = (int) $base; if ($base < 2 \| $base > 36 \| $base == 10) { echo 'BASE must be in the range 2-9 or 11-36'; exit; } $charset = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'; $charset = substr($charset, 0, $base); do { $remainder = bcmod($decimal, $base); $char = substr($charset, $remainder, 1); $string = "$char$string"; $decimal = bcdiv(bcsub($decimal, $remainder), $base); } while ($decimal > 0); return strtolower($string); } function getE() { return $this->_e; } function generatePrime($length) { $this->_key_len = intval($length); if ($this->_key_len < 8) { $this->_key_len = 8; } $e = $this->bin2int("\x01\x00\x01"); $p_len = intval(($this->_key_len + 1) / 2); do { $p = $this->getPrime($p_len); $p1 = $this->dec($p); $tmp = $this->GCD($e, $p1); } while (!$this->isOne($tmp)); return $p; } }	15.73 KB	2021-12-15 13:42
📁 ws	-	2025-05-25 12:49

Edit File:

Terminal