Форум АНТИЧАТ - Потерялось значение функции

Потерялось значение функции
28.05.2008, 21:56
serg-php
Участник форума
Регистрация: 28.01.2008
Сообщений: 247
Провел на форуме:
205760
Репутация: 28
Потерялось значение функции
Народ! Прошу помощи!
Есть файл:
PHP код:

		
			
<?php

/*********************/

/*                   */

/*  Version : 5.1.0  */

/*  Author  : RM     */

/*  Comment : 071223 */

/*                   */

/*********************/



function CheckLoggedInAdm( )

{

    include_once( SITE_PATH."inc/admin.inc.php" );

    if ( !isadmin( ) )

    {

        header( "Location: index.php?page=login&ref_url=".urlencode( $_SERVER['REQUEST_URI'] ) );

        exit( );

    }

}



function IsBanned( $id, $UNBAN_MIN, $type = "" )

{

    global $db;

    if ( !$id || !$UNBAN_MIN )

    {

        return 0;

    }

    $esc_ip = $db->esc( $_SERVER['REMOTE_ADDR'] );

    $ts = $db->one_data( "SELECT UNIX_TIMESTAMP(bdate) FROM ".TBL_IP." WHERE ip=INET_ATON(".$esc_ip.") AND link_id='{$id}' AND type='{$type}'" );

    if ( !$ts )

    {

        $db->query( "INSERT IGNORE INTO ".TBL_IP." (ip,link_id,bdate,type) VALUES (INET_ATON(".$esc_ip."),'{$id}',".SQL_NOW.",'{$type}')" );

    }

    else

    {

        if ( HW_TIME - $UNBAN_MIN * 60 < $ts )

        {

            return 1;

        }

        $db->query( "UPDATE ".TBL_IP." SET bdate=".SQL_NOW." WHERE ip=INET_ATON(".$esc_ip.") AND link_id='{$id}' AND type='{$type}'"." AND bdate<DATE_SUB(".SQL_NOW.", INTERVAL {$UNBAN_MIN} MINUTE)" );

        if ( $db->affected_rows( ) < 1 )

        {

            return 1;

        }

    }

    return 0;

}



function get_daughter_cats( $catid, $tbl = TBL_CAT )

{

    global $db;

    static $A_RES = NULL;

    if ( is_array( $catid ) )

    {

        $cnt = count( $catid );

        $i = 0;

        for ( ;    $i < $cnt;    ++$i    )

        {

            if ( !ctype_digit( ( boolean )$catid[$i] ) )

            {

                unset( $catid[$i] );

            }

        }

        $catid = implode( ",", $catid );

    }

    else if ( !ctype_digit( ( boolean )$catid ) )

    {

        $catid = preg_replace( "/[^\\d,]/", "", $catid );

    }

    if ( !isset( $A_RES[$tbl][$catid] ) )

    {

        $id_arr_tmp = explode( ",", $catid );

        $id_arr = array( );

        while ( 0 < count( $id_arr_tmp ) )

        {

            $id_arr = array_merge( $id_arr, $id_arr_tmp );

            $id_arr_tmp = $db->one_col_array( "SELECT id FROM ".$tbl." WHERE pid IN(\"".implode( "\",\"", $id_arr_tmp )."\")" );

        }

        $A_RES[$tbl][$catid] = $id_arr;

    }

    return "\"".implode( "\",\"", $A_RES[$tbl][$catid] )."\"";

}



function EvalBuffer( $buf, $vars = "", $show = 0 )

{

    $buf = HawkTpl::evalbuffer( $buf, $vars );

    if ( $show )

    {

        echo $buf;

        return "";

    }

    else

    {

        return $buf;

    }

}



function EvalAdvTpl( $tf, $vars = "", $show = 0 )

{

    return evalbuffer( hwreadtpl( $tf ), $vars, $show );

}



function hwReadTpl( $f )

{

    return file_get_contents( hwlnggetpath( $f ) );

}



function hwLngGetPath( $f, $lang = "" )

{

    if ( !$lang )

    {

        $lang = $HW_LANG;

    }

    if ( $lang == "en" )

    {

        return $f;

    }

    $ext = substr( ( $_s = strrchr( $f, "." ) ) !== false ? $_s : "", 1 );

    if ( $ext == "txt" && basename( $f ) != "config_sel.txt" )

    {

        return $f;

    }

    $f_new = hwlngcalcpath( $f, $lang );

    if ( $f_new != $f && file_exists( $f_new ) )

    {

        $f = $f_new;

    }

    return $f;

}