';
$vardump = empty($var) ? true : $vardump;
if($vardump) {
var_dump($var);
} else {
print_r($var);
}
exit();
}
function debuginfo() {
global $_G;
if(getglobal('setting/debug')) {
$db = & DB::object();
$_G['debuginfo'] = array(
'time' => number_format((microtime(true) - $_G['starttime']), 6),
'queries' => $db->querynum,
'memory' => ucwords(C::memory()->type)
);
if($db->slaveid) {
$_G['debuginfo']['queries'] = 'Total '.$db->querynum.', Slave '.$db->slavequery;
}
return TRUE;
} else {
return FALSE;
}
}
function getfocus_rand($module) {
global $_G;
if(empty($_G['setting']['focus']) || !array_key_exists($module, $_G['setting']['focus']) || !empty($_G['cookie']['nofocus_'.$module]) || !$_G['setting']['focus'][$module]) {
return null;
}
loadcache('focus');
if(empty($_G['cache']['focus']['data']) || !is_array($_G['cache']['focus']['data'])) {
return null;
}
$focusid = $_G['setting']['focus'][$module][array_rand($_G['setting']['focus'][$module])];
return $focusid;
}
function check_seccode($value, $idhash, $fromjs = 0, $modid = '') {
return helper_seccheck::check_seccode($value, $idhash, $fromjs, $modid);
}
function check_secqaa($value, $idhash) {
return helper_seccheck::check_secqaa($value, $idhash);
}
function seccheck($rule, $param = array()) {
return helper_seccheck::seccheck($rule, $param);
}
function make_seccode($seccode = '') {
return helper_seccheck::make_seccode($seccode);
}
function make_secqaa() {
return helper_seccheck::make_secqaa();
}
function adshow($parameter) {
global $_G;
if($_G['inajax'] || $_G['group']['closead']) {
return;
}
$return = (isset($_G['config']['plugindeveloper']) && $_G['config']['plugindeveloper'] == 2) ? '[ad '.$parameter.'] ' : '';
$params = explode('/', $parameter);
$customid = 0;
$customc = explode('_', $params[0]);
if($customc[0] == 'custom') {
$params[0] = $customc[0];
$customid = $customc[1];
}
$adcontent = null;
if(empty($_G['setting']['advtype']) || !in_array($params[0], $_G['setting']['advtype'])) {
$adcontent = '';
}
if($adcontent === null) {
loadcache('advs');
$adids = array();
$evalcode = &$_G['cache']['advs']['evalcode'][$params[0]];
$parameters = &$_G['cache']['advs']['parameters'][$params[0]];
$codes = &$_G['cache']['advs']['code'][$_G['basescript']][$params[0]];
if(!empty($codes)) {
foreach($codes as $adid => $code) {
$parameter = &$parameters[$adid];
$checked = true;
@eval($evalcode['check']);
if($checked) {
$adids[] = $adid;
}
}
if(!empty($adids)) {
$adcode = $extra = '';
@eval($evalcode['create']);
if(empty($notag)) {
$adcontent = ''.$adcode.'';
} else {
$adcontent = $adcode;
}
}
}
}
$adfunc = 'ad_'.$params[0];
$_G['setting']['pluginhooks'][$adfunc] = null;
hookscript('ad', 'global', 'funcs', array('params' => $params, 'content' => $adcontent, 'customid' => $customid), $adfunc);
if(!$_G['setting']['hookscript']['global']['ad']['funcs'][$adfunc]) {
hookscript('ad', $_G['basescript'], 'funcs', array('params' => $params, 'content' => $adcontent, 'customid' => $customid), $adfunc);
}
return $return.($_G['setting']['pluginhooks'][$adfunc] === null ? $adcontent : $_G['setting']['pluginhooks'][$adfunc]);
}
function showmessage($message, $url_forward = '', $values = array(), $extraparam = array(), $custom = 0) {
require_once libfile('function/message');
return dshowmessage($message, $url_forward, $values, $extraparam, $custom);
}
function submitcheck($var, $allowget = 0, $seccodecheck = 0, $secqaacheck = 0) {
if(!getgpc($var)) {
return FALSE;
} else {
return helper_form::submitcheck($var, $allowget, $seccodecheck, $secqaacheck);
}
}
function multi($num, $perpage, $curpage, $mpurl, $maxpages = 0, $page = 10, $autogoto = FALSE, $simple = FALSE, $jsfunc = FALSE) {
return $num > $perpage ? helper_page::multi($num, $perpage, $curpage, $mpurl, $maxpages, $page, $autogoto, $simple, $jsfunc) : '';
}
function simplepage($num, $perpage, $curpage, $mpurl) {
return helper_page::simplepage($num, $perpage, $curpage, $mpurl);
}
function censor($message, $modword = NULL, $return = FALSE, $modasban = TRUE) {
return helper_form::censor($message, $modword, $return, $modasban);
}
function censormod($message) {
return getglobal('group/ignorecensor') || !$message ? false :helper_form::censormod($message);
}
function space_merge(&$values, $tablename, $isarchive = false) {
global $_G;
$uid = empty($values['uid'])?$_G['uid']:$values['uid'];
$var = "member_{$uid}_{$tablename}";
if($uid) {
if(!isset($_G[$var])) {
$ext = $isarchive ? '_archive' : '';
if(($_G[$var] = C::t('common_member_'.$tablename.$ext)->fetch($uid)) !== false) {
if($tablename == 'field_home') {
$_G['setting']['privacy'] = empty($_G['setting']['privacy']) ? array() : (is_array($_G['setting']['privacy']) ? $_G['setting']['privacy'] : dunserialize($_G['setting']['privacy']));
$_G[$var]['privacy'] = empty($_G[$var]['privacy'])? array() : is_array($_G[$var]['privacy']) ? $_G[$var]['privacy'] : dunserialize($_G[$var]['privacy']);
foreach (array('feed','view','profile') as $pkey) {
if(empty($_G[$var]['privacy'][$pkey]) && !isset($_G[$var]['privacy'][$pkey])) {
$_G[$var]['privacy'][$pkey] = isset($_G['setting']['privacy'][$pkey]) ? $_G['setting']['privacy'][$pkey] : array();
}
}
$_G[$var]['acceptemail'] = empty($_G[$var]['acceptemail'])? array() : dunserialize($_G[$var]['acceptemail']);
if(empty($_G[$var]['acceptemail'])) {
$_G[$var]['acceptemail'] = empty($_G['setting']['acceptemail'])?array():dunserialize($_G['setting']['acceptemail']);
}
}
} else {
C::t('common_member_'.$tablename.$ext)->insert(array('uid'=>$uid));
$_G[$var] = array();
}
}
$values = array_merge($values, $_G[$var]);
}
}
function runlog($file, $message, $halt=0) {
helper_log::runlog($file, $message, $halt);
}
function stripsearchkey($string) {
$string = trim($string);
$string = str_replace('*', '%', addcslashes($string, '%_'));
return $string;
}
function dmkdir($dir, $mode = 0777, $makeindex = TRUE){
if(!is_dir($dir)) {
dmkdir(dirname($dir), $mode, $makeindex);
@mkdir($dir, $mode);
if(!empty($makeindex)) {
@touch($dir.'/index.html'); @chmod($dir.'/index.html', 0777);
}
}
return true;
}
function dreferer($default = '') {
global $_G;
$default = empty($default) && $_ENV['curapp'] ? $_ENV['curapp'].'.php' : '';
$_G['referer'] = !empty($_GET['referer']) ? $_GET['referer'] : $_SERVER['HTTP_REFERER'];
$_G['referer'] = substr($_G['referer'], -1) == '?' ? substr($_G['referer'], 0, -1) : $_G['referer'];
if(strpos($_G['referer'], 'member.php?mod=logging')) {
$_G['referer'] = $default;
}
$reurl = parse_url($_G['referer']);
if(!$reurl || (isset($reurl['scheme']) && !in_array(strtolower($reurl['scheme']), array('http', 'https')))) {
$_G['referer'] = '';
}
list($http_host,)=explode(':', $_SERVER['HTTP_HOST']);
if(!empty($reurl['host']) && !in_array($reurl['host'], array($http_host, 'www.'.$http_host)) && !in_array($http_host, array($reurl['host'], 'www.'.$reurl['host']))) {
if(!in_array($reurl['host'], $_G['setting']['domain']['app']) && !isset($_G['setting']['domain']['list'][$reurl['host']])) {
$domainroot = substr($reurl['host'], strpos($reurl['host'], '.')+1);
if(empty($_G['setting']['domain']['root']) || (is_array($_G['setting']['domain']['root']) && !in_array($domainroot, $_G['setting']['domain']['root']))) {
$_G['referer'] = $_G['setting']['domain']['defaultindex'] ? $_G['setting']['domain']['defaultindex'] : 'index.php';
}
}
} elseif(empty($reurl['host'])) {
$_G['referer'] = $_G['siteurl'].'./'.$_G['referer'];
}
$_G['referer'] = durlencode($_G['referer']);
return $_G['referer'];
}
function ftpcmd($cmd, $arg1 = '') {
static $ftp;
$ftpconfig = getglobal('setting/ftp');
if(empty($ftpconfig['on']) || empty($ftpconfig['host'])) {
return $cmd == 'error' ? -101 : 0;
} elseif($ftp == null) {
$ftp = & discuz_ftp::instance();
}
if(!$ftp->enabled) {
return $ftp->error();
} elseif($ftp->enabled && !$ftp->connectid) {
$ftp->connect();
}
switch ($cmd) {
case 'upload' : return $ftp->upload(getglobal('setting/attachdir').'/'.$arg1, $arg1); break;
case 'delete' : return $ftp->ftp_delete($arg1); break;
case 'close' : return $ftp->ftp_close(); break;
case 'error' : return $ftp->error(); break;
case 'object' : return $ftp; break;
default : return false;
}
}
function diconv($str, $in_charset, $out_charset = CHARSET, $ForceTable = FALSE) {
global $_G;
$in_charset = strtoupper($in_charset);
$out_charset = strtoupper($out_charset);
if(empty($str) || $in_charset == $out_charset) {
return $str;
}
$out = '';
if(!$ForceTable) {
if(function_exists('iconv')) {
$out = iconv($in_charset, $out_charset.'//IGNORE', $str);
} elseif(function_exists('mb_convert_encoding')) {
$out = mb_convert_encoding($str, $out_charset, $in_charset);
}
}
if($out == '') {
$chinese = new Chinese($in_charset, $out_charset, true);
$out = $chinese->Convert($str);
}
return $out;
}
function widthauto() {
global $_G;
if($_G['disabledwidthauto']) {
return 0;
}
if(!empty($_G['widthauto'])) {
return $_G['widthauto'] > 0 ? 1 : 0;
}
if($_G['setting']['switchwidthauto'] && !empty($_G['cookie']['widthauto'])) {
return $_G['cookie']['widthauto'] > 0 ? 1 : 0;
} else {
return $_G['setting']['allowwidthauto'] ? 0 : 1;
}
}
function renum($array) {
$newnums = $nums = array();
foreach ($array as $id => $num) {
$newnums[$num][] = $id;
$nums[$num] = $num;
}
return array($nums, $newnums);
}
function sizecount($size) {
if($size >= 1073741824) {
$size = round($size / 1073741824 * 100) / 100 . ' GB';
} elseif($size >= 1048576) {
$size = round($size / 1048576 * 100) / 100 . ' MB';
} elseif($size >= 1024) {
$size = round($size / 1024 * 100) / 100 . ' KB';
} else {
$size = intval($size) . ' Bytes';
}
return $size;
}
function swapclass($class1, $class2 = '') {
static $swapc = null;
$swapc = isset($swapc) && $swapc != $class1 ? $class1 : $class2;
return $swapc;
}
function writelog($file, $log) {
helper_log::writelog($file, $log);
}
function getstatus($status, $position) {
$t = $status & pow(2, $position - 1) ? 1 : 0;
return $t;
}
function setstatus($position, $value, $baseon = null) {
$t = pow(2, $position - 1);
if($value) {
$t = $baseon | $t;
} elseif ($baseon !== null) {
$t = $baseon & ~$t;
} else {
$t = ~$t;
}
return $t & 0xFFFF;
}
function notification_add($touid, $type, $note, $notevars = array(), $system = 0) {
return helper_notification::notification_add($touid, $type, $note, $notevars, $system);
}
function manage_addnotify($type, $from_num = 0, $langvar = array()) {
helper_notification::manage_addnotify($type, $from_num, $langvar);
}
function sendpm($toid, $subject, $message, $fromid = '', $replypmid = 0, $isusername = 0, $type = 0) {
return helper_pm::sendpm($toid, $subject, $message, $fromid, $replypmid, $isusername, $type);
}
function g_icon($groupid, $return = 0) {
global $_G;
if(empty($_G['cache']['usergroups'][$groupid]['icon'])) {
$s = '';
} else {
if(preg_match('/^https?:\/\//is', $_G['cache']['usergroups'][$groupid]['icon'])) {
$s = '
';
} else {
$s = '
';
}
}
if($return) {
return $s;
} else {
echo $s;
}
}
function updatediytemplate($targettplname = '', $tpldirectory = '') {
$r = false;
$alldata = !empty($targettplname) ? array( C::t('common_diy_data')->fetch($targettplname, $tpldirectory)) : C::t('common_diy_data')->range();
require_once libfile('function/portalcp');
foreach($alldata as $value) {
$r = save_diy_data($value['tpldirectory'], $value['primaltplname'], $value['targettplname'], dunserialize($value['diycontent']));
}
return $r;
}
function space_key($uid, $appid=0) {
global $_G;
return substr(md5($_G['setting']['siteuniqueid'].'|'.$uid.(empty($appid)?'':'|'.$appid)), 8, 16);
}
function getposttablebytid($tids, $primary = 0) {
return table_forum_post::getposttablebytid($tids, $primary);
}
function getposttable($tableid = 0, $prefix = false) {
return table_forum_post::getposttable($tableid, $prefix);
}
function memory($cmd, $key='', $value='', $ttl = 0, $prefix = '') {
if($cmd == 'check') {
return C::memory()->enable ? C::memory()->type : '';
} elseif(C::memory()->enable && in_array($cmd, array('set', 'add', 'get', 'rm', 'inc', 'dec'))) {
if(defined('DISCUZ_DEBUG') && DISCUZ_DEBUG) {
if(is_array($key)) {
foreach($key as $k) {
C::memory()->debug[$cmd][] = ($cmd == 'get' || $cmd == 'rm' || $cmd == 'add' ? $value : '').$prefix.$k;
}
} else {
C::memory()->debug[$cmd][] = ($cmd == 'get' || $cmd == 'rm' || $cmd == 'add' ? $value : '').$prefix.$key;
}
}
switch ($cmd) {
case 'set': return C::memory()->set($key, $value, $ttl, $prefix); break;
case 'add': return C::memory()->add($key, $value, $ttl, $prefix); break;
case 'get': return C::memory()->get($key, $value); break;
case 'rm': return C::memory()->rm($key, $value); break;
case 'inc': return C::memory()->inc($key, $value ? $value : 1); break;
case 'dec': return C::memory()->dec($key, $value ? $value : -1); break;
}
}
return null;
}
function ipaccess($ip, $accessli
[原创]金猪山遐想 - 文学艺术 - 台山同学网 - Powered by Discuz!
3380| 14
[原创]金猪山遐想
金猪山遐想
连日来的雨，好不容易到星期天终于有放晴的迹象了。于是决定和vod 将郁闷压抑的心情放飞端芬金猪山。
金猪山在端芬一带名头很响，但为何叫“金猪”却很少人去讨究。下午3点，当我们的车渐渐靠近这一端芬名山时，就开始有点感悟了。远看端芬那泰平原平平整整的像一台丰盛的拜桌，而金猪山则恰似一头金猪，静卧于拜桌之上，千百年来为那泰人民祈得风调雨顺，使得端芬一带成为台山富裕之乡，此山大概因此而得名吧？
斜阳翠山格外秀美，一条清澈小河含情脉脉地依山而过。但有谁想到就是这么一条温顺的小溪，几天前竟大发雌威，一连冲垮了八处围堤，给这一带的稻田造成莫大损失，幸亏端芬政府、村民的协力抢救才限制了洪灾的进一步扩大。
从村民的唠叨中，我们得知，金猪山一直以来是他们心中的圣山，从小就喝这水长大（村民们拍胸口打赌，这水肯定比我们台城的水质靓），用这水灌溉，因这水而富的。但近年来，不知何故，从不断流，水量均衡的溪水变得不规则了，水势忽小忽大，甚至出现断流迹象，难以捉摸，难以驾驭。
带着村民的疑问，心中的思考，我和vod 沿着便道向金猪山腹地迈进。白练般的瀑布，在阳光下闪闪烁烁，涓涓的水声在耳边叮咚回响。但不得不承认，在这原本优美的环境中我们察觉到了不和谐的音律。
大概从N年前开始，这里的山头，被某些人承包了，为短期的经济效益的驱使，他们烧山毁林，破坏了原生土长的灌林莽草，种上了千山一色的速生桉树，而这外来树种却鸠占鹊巢，对原生植物极不亲和，甚至赶尽杀绝，使原来的莨箕茅草稀疏了；稔树山茶见少了；土松原杉绝迹了。养分耗尽，土石外露，留不住水土，这当然引起大自然的报复。我们一路看到的山路被水冲垮，鹅卵石成堆，山体滑坡，黄土外露，惨不忍睹。
这次心情放飞，结果飞不起来。金猪山之行引起了我心中对于人和大自然的反思：难道与天斗、与地斗错了？人类征服大自然是笑话吗？
看来以后还是少言征服，多讲了解、亲近、顺应的好。毕竟谋事在人，成事在天啊！
人类一说征服大自然，上帝也笑了！
再见，金猪山。心情不好影响了和你的进一步交流，但并不影响内心对你的爱恋。希望下次再来时能见到你重现婀娜妙美的英姿，以了心中对你的牵挂。
OLD5
端芬金猪山
那泰平原
小山溪
洪水肆虐过的稻田
种满速生桉树的山头
随处可见的小瀑布
植被遭破坏造成的山体滑坡
水土流失严重
［此帖子已被 old5 在 2006-10-16 14:25:08 编辑过］
［此帖子已被 old5 在 2006-10-16 14:27:20 编辑过］
［此帖子已被 old5 在 2006-10-16 14:30:06 编辑过］
Old5： 非常喜欢阅读你图文并茂的游记。 请问你是否旅游记者？你读书时是否没有选修公关一课？所以才令你的征文得票岀奇的低，当然这与该文早已贴过，在征文中重现缺少新鲜感有关，真为你感到惋惜。
［此帖子已被 无琴 在 2006-10-19 3:59:32 编辑过］
拜读老伍的美文,如饮清泉,入口甘甜,沁人肺腑,75ONE网民们有福了,希望常见佳作.请问老伍,你我早已不陌生,能告诉我位于那泰的金猪山离山底圩有多远?好让我回乡时顺道去看看.
回无琴：同样的，自看过你在音乐导航版发表的《帕格尼尼第一号D大调小提琴协奏曲》的帖子，知道你酷爱艺术，所以也常常喜欢留意你的发言。据我所知，同学网有许多音乐爱好者，小时候也练过琴，并且造诣不低，但音乐专栏里面还是冷清得出奇。这只能说明同学网大家注重的是感情的交流，对往事的美好回忆。
我的工作并不涉及文字，只不过我比较喜欢在周末假期期间到户外走走，释放一下工作压力，顺便学习拍拍照片，写写所谓的游记，与喜欢远足的朋友交流而已。能够得到你的关注，谢谢了！
至于我的拙文参加评选，本身就是一念之间的事情，凑凑热闹吧，无所谓啦。都是同学，而且所谓奖品也是象征性的，都是为了搞搞气氛而已，皆大欢喜就好。
回玫瑰花：以前常到你们公司打搅，谢过！
金猪山在接近端芬镇的公路上就可以看到，过大同桥从那泰管区的直路一直走就可以走到山脚。或者到哪里随便问的人都可以了。
另外我重新查了一下金猪山的资料如下：金猪山，“山上有草，味甘如蔗”，故名“甘蔗山”，绵亘百里，海拔567.7米。山多大石，是出水中，湍激潆洄，清澈见底。古时候，有人梁无功筑“云叠洞”，由洞入曰“白水带”，曰“莲花坑”，曰“甇石坑”。至半山腰，有“白鹅潭”，瀑布悬泻，溅沫喷珠，林壑震响，怪石丛立骇人。
呵呵，看来我是受心情影响，空手宝山了。
o1d5two：一口气看完你对金猪山图文并貌的介绍心内好象打破了五味瓶---不知何滋味。无论在老美、在中国以及世界各地环保问题、水土保留问题都是个难题但愿家乡为民父母者不要鼠目寸光只顾眼前利益而勿略了子孙后代利益。
另对你在同学网只求付出给人欣赏，不求回报的崇高思想境界表示敬意！
老伍,很高兴以前在台西路时经常得到你和亮哥的指教,获益非浅.近几年都未曾见过你了,好吗?
金猪山原来就在我眼前经过,真是有眼不识金山,多谢指引.
照片非常漂亮。文字相当出色，尤其从河水的变化中引出保护环境的话题，更是高人一着。
得也也小姐光顾，很开心！
童时也曾受教于赵老师、伍老师，请代向两老问好。
Old5:你的文章写得很好,相片拍得自然.金猪山是广海,端芬两镇的界山.第一张相片是在莲花坑附近拍的,第二张相是在石榴花山东面拍的.
我当年也涉足过这一带,你是第二批走过这\"长征\"崎岖之路的人,你说\"空手宝山\",我说\"如获至宝\".你是带着一个目的而去,我还有一个\"不可告人\"的目的,希望有机会合作,让你的照片获得新生.
窥视卡
雷达卡
发表于 2006-10-16 13:19:29
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
照妖镜
发表于 2006-10-16 15:41:04
楼主
