<?
/* COPYRIGHT(C) 2002 Root's,Inc. ALL RIGHTS RESERVED.
 *---------------------------------------------------------------------------
 * CoCo Ichibanya WebSite Administration System.
 *
 * 漢字コード:EUC
 * 改行コード:LF
 * $Id: common.php,v 1.1.1.1 2002/11/28 07:40:12 hayashi Exp $
 * $Revision: 1.1.1.1 $
 * $Date: 2002/11/28 07:40:12 $
 * $Author: hayashi $
 *---------------------------------------------------------------------------
 */

  /* データベース接続オプション */
  //define("DBOPTION", "dbname=ichibanya");
  define("DBOPTION", "host=192.168.0.182 dbname=ichibanya");
  /* 画像格納ディレクトリ（小画像） */
  define("SMALL_IMG_URI","/menu_imgs/");
  /* 画像格納ディレクトリ（大画像） */
  define("BIG_IMG_URI","/menu_imgs/");
  /* 画像格納ディレクトリ（最新情報） */
  define("NEW_IMG_URI","/whatsnew_imgs/");
	
	/* ピンセット名 */
	define("PIN_NAME", "coco");

	/* 店舗表示ピンアイコンテンプレート（通常用） */
	define("PIN_LIST", "500,504,506,502");

	/* 店舗表示ピンアイコンテンプレート（携帯用） */
	define("PIN_LIST_HANDHELD", "501,505,507,503");

	/* 携帯ページの表示レベル */
	define("MAP_LEVEL_HANDHELD", 6);

	/* ダミー画像パス */
	define("IMAGE_MAP_DUMMY", "/shop/search/images/map_dummy.gif");
?>
<?
/* COPYRIGHT(C) 2002 Root's,Inc. ALL RIGHTS RESERVED.
 *---------------------------------------------------------------------------
 * CoCo Ichibanya WebSite Administration System.
 *
 * 漢字コード:EUC
 * 改行コード:LF
 * $Id: template.class.inc,v 1.1.1.1 2002/11/22 01:31:26 hayashi Exp $
 * $Revision: 1.1.1.1 $
 * $Date: 2002/11/22 01:31:26 $
 * $Author: hayashi $
 *---------------------------------------------------------------------------
 */

/* テンプレートクラス */
class template {
  var $fname  ; // テンプレートファイル名
  var $mainitem ; // main用変数置場
  var $loopitem ; // loop用変数置場
  var $loopname ; // 設定中loop名
  var $loopone  ; // loop一回分のバッファ
  var $kconv    ; // 漢字変換出力
  var $kcin     ; // 入力ファイル漢字コード
  var $kcout    ; // 出力漢字コード

  var $dbg = 0  ; // デバッグモード

  // コンストラクタ
  function template( $filename = "./template.html" , $icode = "" , $ocode = "SJIS" ) {
    $this->fname  = $filename ;
    $this->mainitem = array() ;
    $this->loopitem = array() ;
    $this->loopname = "" ;
    $this->loopone  = "" ;
    if( $icode == "" ) {
      $this->kconv = 0 ;
      $this->kcin  = "EUC-JP" ;
      $this->kcout = "SJIS" ;
    } else {
      $this->kconv = 1 ;
      $this->kcin  = $icode ;
      $this->kcout = $ocode ;
    }
  }

  // デバッグモードフラグ設定
  function dbgmode( $dbgflag ) {
    $this->dbg = $dbgflag ;
  }

  // 漢字の変換設定
  // $conv 0:変換しない   1:変換する
  // $incode , $outcode : "EUC-JP" , "SJIS" , "JIS"
  function set_kcode( $conv , $incode = "EUC-JP" , $outcode = "SJIS" ) {
    if ( $conv ) {
      $this->kconv = 1 ;
      $this->kcin  = $incode ;
      $this->kcout = $outcode ;
    } else {
      $this->kconv = 0 ;
    }
  }

  // テンプレートファイル名の変更
  function set_fname( $filename ) {
    $this->fname = $filename ;
  }

  // 置換用変数の追加
  function assign( $name , $value ) {
    if ( $this->loopname == "" ) {
      $this->mainitem[ "%".$name."%" ] = $value ;
    } else {
      $this->loopone[ "%".$name."%" ] = $value ;
    }
    if ( $this->dbg ) {
      echo "<!-- assign [%" . $name . "%] = \"" . $value . "\" -->\n" ;
    }
  }

  // ループ名設定
  function loopset( $lpname ) {
    // loopnext()を行う前にloopset()を呼び出すと
    // loopnext()以降に設定した値を忘れるので要注意。
    if ( $lpname == "" ) {
      $this->loopname = "" ;
      return ;
    }
    $this->loopname = $lpname ;
    $this->loopone = array() ;
    if ( $this->dbg ) {
      echo "<!-- loopset [" . $lpname . "] -->\n" ;
    }
  }

  // ループの繰り返し
  function loopnext() {
    // assign()でデータをセットしたら最後に必ずloopnext()を
    // 呼び出すようにする事。
    if ( $this->loopname != "" ) {
      $this->loopitem[ $this->loopname ][] = $this->loopone ;
      $this->loopone = array() ;
      if ( $this->dbg ) {
        echo "\n<!-- loopnext(loopitem)\n" ;
        print_r( $this->loopitem ) ;
        echo "-->\n" ;
      }
    } else {
      if ( $this->dbg ) {
        echo "\n<!-- loopnext(main-loop ERROR!) -->\n" ;
      }
    }

  }

  // コード変換と出力
  function flush( $outvar = 0 ) {

    $loopmode = "" ;  // main時は""。それ以外はloopタグのloop名
    $loopbuf   = array() ; // loop中のhtmlデータと置換キー

    ob_start() ;
    if ( $this->dbg ) {
      echo "\n<!-- assign data\n" ;
      print_r( $this->mainitem ) ;
      print_r( $this->loopitem ) ;
      echo "-->\n" ;
    }
    if ( !(@ $fp = fopen( $this->fname , "r" ) ) ) {
      echo "\nFile Open Error!!\n" ;
      $contents = ob_get_contents() ;
      ob_end_clean() ;
      echo $contents ;
      exit ;
    }
    $outflg = 1 ;
    while ( !feof( $fp ) ) {
      $lbuf = fgets( $fp, 16384 ) ;
      if ( $loopmode == "" ) {  // main
        if ( $outflg ) {  // 出力可である
          if ( eregi( "<!--[ \t]+tmpl:loop[ \t]+%(.*)%[ \t].*-->" , $lbuf , $regs ) ) {
            if ( $this->dbg ) {
              echo "\n<!-- match [loop] data\n" ;
              print_r( $regs ) ;
              echo "-->\n" ;
            }
            $loopmode = $regs[1] ;
            continue ;
          } elseif ( eregi( "<!--[ \t]+tmpl:ifdef[ \t]+(%.*%)[ \t].*-->" , $lbuf , $regs ) ) {
            if( ! isset( $this->mainitem[ $regs[1] ] ) ) {
              $outflg = 0 ;
            }
            if ( $this->dbg ) {
              echo "\n<!-- match [ifdef] data\n" ;
              print_r( $regs ) ;
              echo "-->\n" ;
            }
          } elseif ( eregi( "<!--[ \t]+tmpl:endif[ \t].*-->"
                          , $lbuf , $regs ) ) {
            continue ;   // 何もしない
          } else {
            $this->tmplchgline( &$lbuf , &$this->mainitem ) ;
            echo $lbuf ;
            continue ;
          }
        } else {  // 出力不可
          if ( eregi( "<!--[ \t]+tmpl:endif[ \t].*-->" , $lbuf
                            , $regs ) ) {
            $outflg = 1 ;
          }
          continue ;
        }
      } else { // loopが設定してある。
        if ( eregi( "<!--[ \t]+tmpl:endloop[ \t].*-->" , $lbuf , $regs ) ) {
          // 全ての出力(loopの終了)
          if ( $this->dbg ) {
            echo "\n<!-- loopbuf data\n" ;
            print_r( $loopbuf ) ;
            echo "-->\n" ;
          }

          for ( $i = 0 ;
            is_array( $this->loopitem[$loopmode][$i] ) ; $i++ ) {
            $outflg = 1 ;
            for ( $j = 0 ; $loopbuf[$j] ; $j++ ) {
              if( $loopbuf[$j][0] == -1 ) {
                if ( isset( $this->loopitem[$loopmode][$i][$loopbuf[$j][2]] ) ) {
                  $outflg = 1 ;
                } else {
                  $outflg = 0 ;
                }
                continue ;
              }
              if( $loopbuf[$j][0] == -2 ) {
                $outflg = 1 ;
                continue ;
              }

              if ( ! $outflg ) { continue ; }

              $this->tmpllpchgline( &$otmp , &$loopbuf[$j] ,
                      &$this->loopitem[$loopmode][$i] ) ;
              echo $otmp ;
            }
          }

          $loopmode = "" ;
          $loopbuf = array() ;
          continue ;
        }
        // ループ内コンテンツを検索キーを探しながら溜める
        $mcco = preg_match_all( "/%[_\-a-z][_\-\.0-9a-z]*%/"
                    , $lbuf , $regs ) ;
        if( $mcco == 0 ) {
          if ( eregi( "<!--[ \t]+tmpl:endif[ \t].*-->" , $lbuf
                            , $dummy ) ) {
            $mcco = -2 ;
          }
        }
        if( $mcco == 1 ) {
          if ( eregi( "<!--[ \t]+tmpl:ifdef[ \t].*-->" , $lbuf
                            , $dummy ) ) {
            $mcco = -1 ;
          }
        }
        $loopbuf[] = array_merge( array ( $mcco , $lbuf )
                    , $regs[0] ) ;
        continue ;
      }
    }
    fclose( $fp ) ;
    $contents = ob_get_contents() ;
    ob_end_clean() ;
    if( $outvar ) {
      if ( $this->kconv ) {
        return( mb_convert_encoding( &$contents ,
          $this->kcout , $this->kcin ) ) ;
      } else {
        return( $contents ) ;
      }
    } else {
      if ( $this->kconv ) {
        echo mb_convert_encoding( &$contents ,
          $this->kcout , $this->kcin ) ;
      } else {
        echo $contents ;
      }
    }
  }

// local-function

  // 1行分の置換を行う。
  // tmplchgline( string 置換される文字列 , array 置換データ )
  // Return値 : ture:置換部分あり false:無し
  //            置換される文字列が、置換されて戻る。

  function  tmplchgline( $lbuf , $chgstrs ) {

    if( $mcco = preg_match_all( "/%[_\-a-z][_\-\.0-9a-z]*%/"
          , $lbuf , $regs , PREG_SET_ORDER ) ) {
      for( $i = 0 ; $i < $mcco ; $i++ ) {
        if ( isset( $chgstrs[$regs[$i][0]] ) ) {
          $otmp = str_replace( $regs[$i][0] ,
            $chgstrs[$regs[$i][0]] , $lbuf ) ;
          $lbuf = $otmp ;
        }
      }
      return true ;
    } else {
      return false ;
    }

  }


  // ループ内の1行の置換を行う。
  // tmpllpchgline( string 置換後文字列 , array 置換元データ
  //                , array 置換データ )

  function  tmpllpchgline( $obuf , $lpbuf , $chgstrs ) {

    $chgco = $lpbuf[0] + 2 ;
    $obuf = $lpbuf[1] ;
    for ( $k = 2 ; $k < $chgco ; $k++ ) {
      if ( isset( $chgstrs[ $lpbuf[$k] ] ) ) {
        $xtmp = str_replace( $lpbuf[$k] ,
          $chgstrs[ $lpbuf[$k] ] , $obuf ) ;
        $obuf = $xtmp ;
      }
    }
  }

}
// endof Tmpl-class
?>