<?
	/**
	 * Get All updated links
	 */
	get_data_and_write('
						SELECT
							id,
							title,
							url,
							description,
							theme_id,
							visible,
							deleted,
							variants,
							onfirst
						FROM
							link
						WHERE
							point >= "'.$point.'"
						ORDER BY
							rand('.$user_id.')
						',
						'links_all'
						);


	/**
	 * Get new links
	 */
	get_data_and_write('
						SELECT
							id,
							title,
							url,
							description,
							theme_id,
							visible,
							deleted,
							variants,
							onfirst
						FROM
							link
						WHERE
							point >= "'.$point.'"
						ORDER BY
							id DESC
						LIMIT '.($GLOBALS['Conf']->Pager->LinkRecPerPage/3*1)
						,
						'links_new'
						);


	/**
	 * Get Links for first page
	 */	
	get_data_and_write('
						SELECT
							id,
							title,
							url,
							description,
							theme_id,
							visible,
							deleted,
							variants,
							onfirst
						FROM
							link
						WHERE
							point >= "'.$point.'" AND
							onfirst <> 0
						ORDER BY
							id DESC
						LIMIT '.($GLOBALS['Conf']->Pager->LinkRecPerPage/3*2)
						,
						'links_onfisrt'
						);



	/**
	 * Get psevdo-random arrays
	 */
	$target = '~data/rands.inc';
	
	if (!file_exists($target))
	{
		$rands = array();
		
		for ($i = 0; $i < 50; $i++)
			$rands = array_merge( $rands, get_rand($i) );

		$str = arrofarr_to_str( 'rands', $rands );
		write_to_inc( $target, &$str );

		unset($str);
		unset($rands);
	}

	include_once( $target );


	/**
	 * Get word
	 */
	$target = '~data/word.inc';
	if (!file_exists($target))
	{
		$word = $DB->QGetOne( 'SELECT value FROM words WHERE type = 0 ORDER BY RAND('.$user_id.')' );
		
		$str = '$word=\''.$word.'\';';
		write_to_inc( $target, $str );
	}
	else
	{
		include_once( $target );
	}


	include_once('~design/html_title.inc');
	include_once('~design/html_description.inc');
	include_once('~design/html_keywords.inc');



	function get_rand( $add )
	{
		$rsrands = $GLOBALS['DB']->QExecute( 'SELECT ROUND(rand('.($GLOBALS['user_id']+$add*1000).') * 10000) as rn FROM words LIMIT 30' );
		$randsa = $rsrands->GetArray();
		
		unset($rsrands);

		return $randsa;
	}

	function get_data_and_write( $sql, $linkname)
	{
		global $DB;

		$rsnew_links = $DB->QExecute( $sql );
		
		if ($rsnew_links->RecordCount() > 0 )
		{
			$new_links = $rsnew_links->GetArray();
			unset($rsnew_links);
	
			$target = '~data/'.$linkname.'.inc';
			$ln = &$$linkname;
			
			if (!file_exists($target))
			{
				$ln = array();
			}
			else	
			{	
				include($target);
			}
		
			foreach($new_links as $key => $new_link)
			{
				if ($new_link['visible'] == 1 && $new_link['deleted'] == 0 && $new_link['variants'] > 0)
				{
					$variant = floor($new_link['variants']/100*((int)substr($GLOBALS['user_id'],-2)));
	
					$variant_links = $DB->QExecute('
													SELECT
														title,
														url,
														description
													FROM
														variant
													WHERE
														deleted = 0 AND
														link_id = ?
													ORDER BY
														id
													LIMIT ?, 1
													',
	
													array(
															$new_link['id'],
															$variant
															)
													);
	
					if ($variant_links->RecordCount() > 0 )
					{
						$new_link['title'] = $variant_links->fields['title'];
						$new_link['url'] = $variant_links->fields['url'];
						$new_link['description'] = $variant_links->fields['description'];
					}

					unset($variant_links);
					unset($variant);
				}
	
				if ($new_link['visible'] == 0 || $new_link['deleted'] == 1)
				{
					unset($ln[ $new_link['id'] ]);
				}
				else
				{
					$ln[ $new_link['id'] ] = array( $new_link['title'], $new_link['url'], $new_link['description'], $new_link['onfirst'] );
				}
			}
		
			if ($ln != null)
			{
				$str = arrofarr_to_str( $linkname, $ln );
			}
			else
			{
				$str = '';
			}
	
			write_to_inc($target, &$str );
			unset($ln);
			unset($$linkname);
			unset($str);
		}
		unset($new_links);
	}

?>