Mercurial > epgrec.yaz

view getepg.old.php @ 95:d9b9d1d903a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix: ¤µ¤é¤Ë½¤Àµ
author epgrec@park.mda.or.jp <yoneda@recorder.localnet.mda.or.jp>
date Wed, 03 Mar 2010 00:02:15 +0900
parents 12ed8ad837fc
children 3bed74eca373
line wrap: on
line source

#!/usr/bin/php
<?php
  include_once('config.php');
  include_once( INSTALL_PATH . '/DBRecord.class.php' );
  include_once( INSTALL_PATH . '/Reservation.class.php' );
  include_once( INSTALL_PATH . '/Keyword.class.php' );
  include_once( INSTALL_PATH . '/Settings.class.php' );
  
  $settings = Settings::factory();
  
  if( file_exists( $settings->temp_data ) ) @unlink( $settings->temp_data );
  if( file_exists( $settings->temp_xml ) ) @unlink( $settings->temp_xml );

  // BSを処ç†ã™ã‚‹
  if( $settings->bs_tuners != 0 ) {
	// 録画é‡è¤‡ãƒã‚§ãƒƒã‚¯
	$num = DBRecord::countRecords(  RESERVE_TBL, "WHERE complete = '0' AND (type = 'BS' OR type = 'CS') AND endtime > now() AND starttime < addtime( now(), '00:03:05')" );
	if( $num == 0 ) {
	 	$cmdline = "CHANNEL=211 DURATION=180 TYPE=BS TUNER=0 MODE=0 OUTPUT=".$settings->temp_data." ".DO_RECORD . " >/dev/null 2>&1";
  		exec( $cmdline );
  		$cmdline = $settings->epgdump." /BS ".$settings->temp_data." ".$settings->temp_xml;
  		exec( $cmdline );
  		storeProgram( "BS", $settings->temp_xml );
  		if( file_exists( $settings->temp_data ) ) @unlink( $settings->temp_data );
  		if( file_exists( $settings->temp_xml ) ) @unlink( $settings->temp_xml );
	}

	// CS
	if ($settings->cs_rec_flg != 0) {
		$num = DBRecord::countRecords(  RESERVE_TBL, "WHERE complete = '0' AND (type = 'BS' OR type = 'CS') AND endtime > now() AND starttime < addtime( now(), '00:03:05')" );
		if( $num == 0 ) {
			$cmdline = "CHANNEL=CS8 DURATION=120 TYPE=CS TUNER=0 MODE=0 OUTPUT=".$settings->temp_data." ".DO_RECORD . " >/dev/null 2>&1";
			exec( $cmdline );
			$cmdline = $settings->epgdump." /CS ".$settings->temp_data." ".$settings->temp_xml;
			exec( $cmdline );
			storeProgram( "CS", $settings->temp_xml );
			if( file_exists( $settings->temp_data ) ) @unlink( $settings->temp_data );
			if( file_exists( $settings->temp_xml ) ) @unlink( $settings->temp_xml );
		}
		$num = DBRecord::countRecords(  RESERVE_TBL, "WHERE complete = '0' AND (type = 'BS' OR type = 'CS') AND endtime > now() AND starttime < addtime( now(), '00:03:05')" );
		if( $num == 0 ) {
			$cmdline = "CHANNEL=CS24 DURATION=120 TYPE=CS TUNER=0 MODE=0 OUTPUT=".$settings->temp_data." ".DO_RECORD . " >/dev/null 2>&1";
			exec( $cmdline );
			$cmdline = $settings->epgdump." /CS ".$settings->temp_data." ".$settings->temp_xml;
			exec( $cmdline );
			storeProgram( "CS", $settings->temp_xml );
			if( file_exists( $settings->temp_data ) ) @unlink( $settings->temp_data );
			if( file_exists( $settings->temp_xml ) ) @unlink( $settings->temp_xml );
	  	}
  	}
  }
  
  // 地上波を処ç†ã™ã‚‹
  if( $settings->gr_tuners != 0 ) {
	foreach( $GR_CHANNEL_MAP as $key=>$value ){
		// 録画é‡è¤‡ãƒã‚§ãƒƒã‚¯
		$num = DBRecord::countRecords(  RESERVE_TBL, "WHERE complete = '0' AND type = 'GR' AND endtime > now() AND starttime < addtime( now(), '00:01:10')" );
		if( $num == 0 ) {
			$cmdline = "CHANNEL=".$value." DURATION=60 TYPE=GR TUNER=0 MODE=0 OUTPUT=".$settings->temp_data." ".DO_RECORD . " >/dev/null 2>&1";
			exec( $cmdline );
			$cmdline = $settings->epgdump." ".$key." ".$settings->temp_data." ".$settings->temp_xml;
			exec( $cmdline );
			storeProgram( "GR", $settings->temp_xml );
 			if( file_exists( $settings->temp_data ) ) @unlink( $settings->temp_data );
  			if( file_exists( $settings->temp_xml ) ) @unlink( $settings->temp_xml );
  		}
  	}
  }
  
  // ä¸è¦ãªãƒ—ログラムã®å‰Šé™¤
  // 8日以上å‰ã®ãƒ—ログラムを消ã™
  $arr = array();
  $arr = DBRecord::createRecords(  PROGRAM_TBL, "WHERE endtime < subdate( now(), 8 )" );
  foreach( $arr as $val ) $val->delete();
	
  // 8日以上先ã®ãƒ‡ãƒ¼ã‚¿ãŒã‚ã‚Œã°æ¶ˆã™
  $arr = array();
  $arr = DBRecord::createRecords(  PROGRAM_TBL, "WHERE starttime  > adddate( now(), 8 )" );
  foreach( $arr as $val ) $val->delete();
  
  // キーワード自動録画予約
  $arr = array();
  $arr = Keyword::createKeywords();
  foreach( $arr as $val ) {
	try {
		$val->reservation();
	}
	catch( Exception $e ) {
		// 無視
	}
  }
  
  exit();
  
  function storeProgram( $type, $xmlfile ) {
	global $BS_CHANNEL_MAP, $GR_CHANNEL_MAP, $CS_CHANNEL_MAP;
	// ãƒãƒ£ãƒ³ãƒãƒ«ãƒžãƒƒãƒ—ファイルã®æº–å‚™
	$map = array();
	if( $type == "BS" ) $map = $BS_CHANNEL_MAP;
	else if( $type == "GR") $map = $GR_CHANNEL_MAP;
	else if( $type == "CS") $map = $CS_CHANNEL_MAP;
	
	// XML parse
  	$xml = @simplexml_load_file( $xmlfile );
	if( $xml === false ) {
		return;	// XMLãŒèª­ã¿å–ã‚Œãªã„ãªã‚‰ä½•ã‚‚ã—ãªã„
	}
	// channel抽出
	foreach( $xml->channel as $ch ) {
		$disc = $ch['id'];
	 try {
		// ãƒãƒ£ãƒ³ãƒãƒ«ãƒ‡ãƒ¼ã‚¿ã‚’探ã™
		$num = DBRecord::countRecords( CHANNEL_TBL , "WHERE channel_disc = '" . $disc ."'" );
		if( $num == 0 ) {
			// channel discãŒãªã„よã†ãªã‚‰é£›ã°ã™
			if( array_key_exists( "$disc", $map ) ) {
				// ãƒãƒ£ãƒ³ãƒãƒ«ãƒ‡ãƒ¼ã‚¿ãŒãªã„ãªã‚‰æ–°è¦ä½œæˆ
				$rec = new DBRecord( CHANNEL_TBL );
				$rec->type = $type;
				$rec->channel = $map["$disc"];
				$rec->channel_disc = $disc;
				$rec->name = $ch->{'display-name'};
			}
		}
		else {
			// 存在ã—ãŸå ´åˆã‚‚ã€ã¨ã‚Šã‚ãˆãšãƒãƒ£ãƒ³ãƒãƒ«åã¯æ›´æ–°ã™ã‚‹
			$rec = new DBRecord(CHANNEL_TBL, "channel_disc", $disc );
			$rec->name = $ch->{'display-name'};
		}
	 }
	 catch( Exception $e ) {
		// 無視
	 }
	}
	// channel 終了
	
	// programme å–å¾—
	
	foreach( $xml->programme as $program ) {
		$channel_disc = $program['channel'];
		if( ! array_key_exists( "$channel_disc", $map ) ) continue;
		
		$channel = $map["$channel_disc"];
		$starttime = str_replace(" +0900", '', $program['start'] );
		$endtime = str_replace( " +0900", '', $program['stop'] );
		$title = $program->title;
		$desc = $program->desc;
		$cat_ja = "";
		$cat_en = "";
		foreach( $program->category as $cat ) {
			if( $cat['lang'] == "ja_JP" ) $cat_ja = $cat;
			if( $cat['lang'] == "en" ) $cat_en = $cat;
		}
		$program_disc = md5( $channel_disc . $starttime . $endtime );
		// printf( "%s %s %s %s %s %s %s \n", $program_disc, $channel, $starttime, $endtime, $title, $desc, $cat_ja );
		try {
		 // カテゴリを処ç†ã™ã‚‹
		 $category_disc = md5( $cat_ja . $cat_en );
		 $num = DBRecord::countRecords(CATEGORY_TBL, "WHERE category_disc = '".$category_disc."'" );
		 $cat_rec = null;
		 if( $num == 0 ) {
			// æ–°è¦ã‚«ãƒ†ã‚´ãƒªã®è¿½åŠ 
			$cat_rec = new DBRecord( CATEGORY_TBL );
			$cat_rec->name_jp = $cat_ja;
			$cat_rec->name_en = $cat_en;
		 	$cat_rec->category_disc = $category_disc;
		 }
		 else
			$cat_rec = new DBRecord(CATEGORY_TBL, "category_disc" , $category_disc );
		  //
		 $channel_rec = new DBRecord(CHANNEL_TBL, "channel_disc", $channel_disc );
		 $num = DBRecord::countRecords(PROGRAM_TBL, "WHERE program_disc = '".$program_disc."'" );
		 if( $num == 0 ) {
			// æ–°è¦ç•ªçµ„
			// é‡è¤‡ãƒã‚§ãƒƒã‚¯ åŒæ™‚間帯ã«ã‚る番組
			$options = "WHERE channel_disc = '".$channel_disc."' ".
				"AND starttime < '". $endtime ."' AND endtime > '".$starttime."'";
			$battings = DBRecord::countRecords(PROGRAM_TBL, $options );
			if( $battings > 0 ) {
				// é‡è¤‡ç™ºç”Ÿï¼ãŠãらã放映時間ã®å¤‰æ›´
				$records = DBRecord::createRecords(PROGRAM_TBL, $options );
				foreach( $records as $rec ) {
					// 自動録画予約ã•ã‚ŒãŸç•ªçµ„ã¯æ”¾æ˜ æ™‚間変更ã¨åŒæ™‚ã«ã„ã£ãŸã‚“削除ã™ã‚‹
					try {
						$reserve = new DBRecord(RESERVE_TBL, "program_id", $rec->id );
						if( $reserve->autorec ) {
							Reservation::cancel( $reserve->id );
						}
					}
					catch( Exception $e ) {
						//無視
					}
					// 番組削除
					$rec->delete();
				}
			}
			// //
			$rec = new DBRecord( PROGRAM_TBL );
			$rec->channel_disc = $channel_disc;
			$rec->channel_id = $channel_rec->id;
			$rec->type = $type;
			$rec->channel = $channel_rec->channel;
			$rec->title = $title;
			$rec->description = $desc;
			$rec->category_id = $cat_rec->id;
			$rec->starttime = $starttime;
			$rec->endtime = $endtime;
			$rec->program_disc = $program_disc;
		 }
		 else {
			// 番組内容更新
			$rec = new DBRecord( PROGRAM_TBL, "program_disc", $program_disc );
			$rec->title = $title;
		 	$rec->description = $desc;
			$rec->category_id = $cat_rec->id;
		 }
		}
		catch(Exception $e) {
			exit( $e->getMessage() );
		}
	}
  }
?>