~~NOCACHE~~
@s7[Könyvtár]

A könyvek címére vagy borítójára kattintva megjelenik a könyv oldala.
;;w/odg:A zölddel jelzett könyvek még nincsenek befejezve. Amelyik letölthető közülük, az félkész állapotú.;;
A címkékre kattintva szűkített listát lehet kérni. A szűkített listában újabb címkére kattintva tovább szűkül a lista.

Clicking on the title or cover of a book brings up the page of the book. 
;;w/odg:Books marked with green color aren’t finished yet. Ones that can be downloaded are work in progress.;;
Clicking on a tag filters the listing. Clicking on a tag on a fitered listing filters it more.

<php>
include('data/pages/konyvtar/konyvtar_adatok.php');
global $rendezes;

$par=urldecode($_SERVER['QUERY_STRING']);
$par=explode('&', $par);
$par=$par[1];
if(substr($par, 0, 6)=='fbclid') $par='';
$par=trim($par, ',');

$imgw=120;

if($par=='')
	$par=array('*');
else
{
	$par=explode(',', $par);
	$par=array_values(array_filter($par));
	for($a=0; $a<=count($par); $a++)
	{
		switch($par[$a]):
		case 'tömör':
			$tomor=true;
			$par[$a]='';
			break;
		case 'hátsó':
			$hatso=true;
			$par[$a]='';
			break;
		case 'évszám':
			$rendezes='ev';
			$par[$a]='';
			break;
		case 'szószám':
			$rendezes='szo';
			$par[$a]='';
			break;
		case 'készül':
		case 'műfaj':
		case 'év':
		case 'szó':
			$tint=$par[$a];
			$par[$a]='';
			break;
		case 'en':
		case 'lv':
			$lng=$par[$a];
			$par[$a]='';
			break;
		endswitch;
		if(is_numeric($par[$a]))
		{
			$imgw=$par[$a];
			$par[$a]='';
		}
	}
}
$par=array_values(array_filter($par));

$szototal=0;
$oldaltotal=0;
foreach($konyvtar as $konyv)
{
	if(is_array($konyv['szo']))
		$szototal+=array_sum($konyv['szo']);
	else
		$szototal+=$konyv['szo'];
	if(is_array($konyv['konyv']))
		$oldaltotal+=minoldal($konyv['konyv']);
}


$vickyurl='http://lattilad.org/vicky/konyvtar/konyv?';
$kepurl='http://lattilad.org/vicky/_media/konyvtar/*.jpg?nocache';
if($hatso)
	$kepurl=str_replace('*', 'hatso/*', $kepurl);

for($k=0; $k<count($konyvtar); $k++)
{
	$konyv=$konyvtar[$k];
	$tags=explode(' ', $konyv['tag']);
	foreach($tags as $tag)
		$alltags[$tag]++;
	if(!$konyv['keszul'])
	{
		$alltags['befejezett']++;
		$konyvtar[$k]['tag'].=' befejezett';
	}
	else
	{
		$alltags['készülőben']++;
		$konyvtar[$k]['tag'].=' készülőben';
	}
	if(isset($konyv['konyv'][0]['link']))
	{
		$alltags['letölthető']++;
		$konyvtar[$k]['tag'].=' letölthető';
	}
}

foreach($alltags as $tag=>$num)
{
	if(in_array($tag, $par))
		$taglist[$tag]='<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.implode(',', array_diff($par, array($tag))).($tomor?',tömör':'').' style="background-color: #ffff00; color: black">'.$tag.'</a>'.' '.$num;
	else
		if($par[0]=='*')
			$taglist[$tag]='<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.$tag.'>'.$tag.'</a>'.' '.$num;
		else
			$taglist[$tag]='<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.implode(',', $par).($tomor?',tömör':'').','.$tag.'>'.$tag.'</a>'.' '.$num;
}

ksort($taglist);
$taglist[]='<br>&nbsp;<br>';
placeback($taglist, 'befejezett');
placeback($taglist, 'készülőben');
placeback($taglist, 'letölthető');

echo '<hr><center>:: '.implode(' :: ', $taglist).' :: <br>&nbsp;<br>– összesen '.count($konyvtar)
	.' kötet –<br>&nbsp;<br>';
if($tomor)
	if($par[0]=='*')
		echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar style="background-color: #ffff00; color: black">tömör változat (csak címlapok)</a>';
	else
		echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.implode(',', $par).' style="background-color: #ffff00; color: black">tömör változat (csak címlapok)</a>';
else
	if($par[0]=='*')
		echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?tömör>tömör változat (csak címlapok)</a>';
	else
		echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.implode(',', $par).',tömör>tömör változat (csak címlapok)</a>';

if($hatso)
	echo '<br><a href=http://lattilad.org/vicky/konyvtar/konyvtar?tömör,hátsó style="background-color: #ffff00; color: black">hátsó borítók</a>';
else
	echo '<br><a href=http://lattilad.org/vicky/konyvtar/konyvtar?tömör,hátsó>hátsó borítók</a>';

echo '<br>&nbsp;<br><a href=http://lattilad.org/vicky/konyvtar/konyvtar?évszám>rendezés évszám szerint</a>';
echo '<br><a href=http://lattilad.org/vicky/konyvtar/konyvtar?szószám>rendezés terjedelem szerint</a>';

if($par[0]!='*')
	echo '<br>&nbsp;<br><a href=http://lattilad.org/vicky/konyvtar/konyvtar'.($tomor?'?tömör':'').'>Vissza a teljes listához</a><br>&nbsp;<br>';

echo '</center><hr><br>';

if($rendezes!='')
	usort($konyvtar, 'rendezes');

switch($tint)
{
	case 'készül':
		echo 'letölthető :: <font style="background-color: #ff0000; color: #000000"> készül </font> :: <font style="background-color: #00ff00; color: #000000"> készül, de letölthető </font><br>';
		break;
	case 'műfaj':
		echo '<font style="background-color: #ffff00; color: #000000"> regény </font> :: <font style="background-color: #ff0000; color: #000000"> verseskötet </font> :: <font style="background-color: #00ff00; color: #000000"> számítástechnika </font> :: egyéb<br>';
		break;
	case 'év':
		echo '2020-tól :: <font style="background-color: #ff0000; color: #000000"> 2017–2019 </font> :: <font style="background-color: #ffff00; color: #000000"> 2010–2016 </font> :: <font style="background-color: #00ff00; color: #000000"> 2002–2009 </font> :: <font style="background-color: #0000ff; color: #000000"> 2002 előtt </font><br>';
		break;
	case 'szó':
		echo '500 ezer szó fölött :: <font style="background-color: #ff0000; color: #000000"> 100–500 ezer szó </font> :: <font style="background-color: #ffff00; color: #000000"> 30–100 ezer szó </font> :: <font style="background-color: #00ff00; color: #000000"> 10–30 ezer szó </font> :: <font style="background-color: #0000ff; color: #000000"> 10 ezer szó alatt </font><br>';
		break;
}


foreach($konyvtar as $konyv)
{
	$tags=explode(' ', $konyv['tag']);
	sort($tags);
	if(
		$par[0]=='*'
		||!array_diff($par, $tags)
	)
	{
		$hits++;
		if($hits==1&&!$tomor)
			echo '<table width=100%><tr><th><center>cím</center></th><th><center>borító</center></th><th><center>év</center></th><th><center>1000 szó</center></th><th><center>címkék</center></th><th><center>letöltés (oldalszám)</center></th></tr>';

		if($hatso)
		{
			if(!file_exists('data/media/konyvtar/hatso/'.$konyv['cimlap'].'.jpg'))
				$konyv['cimlap']='nincs_'; 
		}
		else
			if(!file_exists('data/media/konyvtar/'.$konyv['cimlap'].'.jpg'))
				$konyv['cimlap']='nincs_'; 

		if(!$tomor)
		{
			echo '<tr>';

			echo '<td style="vertical-align: middle; '
				.($konyv['keszul']?' background-color: #040':'')
				.'"><a href="'.$vickyurl.$konyv['vicky']
				.'"><font size=6>'
				.str_replace('.', '<br><font size=4>', $konyv['cim'])
				.'</font></font></a></td>';
		}

		$tintc='';
		switch($tint)
		{
			case 'készül':
				if(isset($konyv['keszul']))
				{
					$tintc='&c=ff000080';
					if(isset($konyv['konyv']))
						$tintc='&c=00ff0080';
				}
				break;
			case 'műfaj':
				if(in_array('regény', $tags))
					$tintc='&c=ffff0040';
				if(in_array('vers', $tags))
					$tintc='&c=ff000080';
				if(in_array('számítástechnika', $tags))
					$tintc='&c=00ff0040';
				break;
			case 'év':
				if($konyv['ev']<2002)
					$tintc='&c=0000ff40';
				if($konyv['ev']>=2002&&$konyv['ev']<2010)
					$tintc='&c=00ff0060';
				if($konyv['ev']>=2010&&$konyv['ev']<2017)
					$tintc='&c=ffff0040';
				if($konyv['ev']>=2017&&$konyv['ev']<2020)
					$tintc='&c=ff000040';
				break;
			case 'szó':
				if(is_array($konyv['szo']))
					$szo=array_sum($konyv['szo']);
					else
					$szo=$konyv['szo'];
				if($szo<10)
					$tintc='&c=0000ff60';
				if($szo>=10&&$szo<30)
					$tintc='&c=00ff0060';
				if($szo>=30&&$szo<100)
					$tintc='&c=ffff0040';
				if($szo>=100&&$szo<500)
					$tintc='&c=ff000060';
				break;
		}
		echo '<td><a href="'.$vickyurl.$konyv['vicky'].'">'
			.'<img src="http://lattilad.org/dev/irs.php?f='
			.$konyv['cimlap'].'&w='.$imgw.$tintc
			.'" title="'.$konyv['cim'].'">'
			.(isset($konyv['cimlap'])?'</a>':'').'</td>';

		if(!$tomor)
		{
			if(is_array($konyv['ev']))
				echo '<td style="vertical-align: middle">'.min($konyv['ev']).'–'.max($konyv['ev']).'</td>';
			else
				echo '<td style="vertical-align: middle">'.$konyv['ev'].'</td>';

			if(is_array($konyv['szo']))
				echo '<td style="vertical-align: middle" align=right>'.array_sum($konyv['szo']).'</td>';
			else
				echo '<td style="vertical-align: middle" align=right>'.$konyv['szo'].'</td>';

			echo '<td style="vertical-align: middle">';

			foreach($tags as $tag)
				if(!in_array($tag, array('befejezett', 'készülőben', 'letölthető')))
					showtag($tag, $par);
			echo '</td>';

			if(isset($konyv['konyv']))
			{
				echo '<td style="vertical-align: middle; text-align: center">';
				foreach($konyv['konyv'] as $kiadas)
					if(isset($kiadas['link']))
						echo '<a href="http://lattilad.org/vicky/_media/konyvtar/'.$kiadas['link'].'">'.$kiadas["meret"].' ('.$kiadas["oldal"].')<br></a><br>&nbsp;<br>';
						else
						echo $kiadas["meret"].' ('.$kiadas["oldal"].')';
				echo '</td>';
			}

			echo '</tr>';
		}
	}
}
if(!$tomor)
	echo '</table>';

echo '&nbsp;<br>';

if($par[0]!='*')
	echo 'A keresés '.($hits?$hits.' találatot adott.':' nem adott találatot.').'<br>&nbsp;<br>';

echo 'Összesen kb. '.number_format($szototal*1000, 0, '', ' ').' szó, '.number_format($oldaltotal, 0, '', ' ').' oldal.<br>A még befejezetlen művek esetében a méret ideiglenes adat: a Kissynél a 29. rész végét jelenti, a Nindánál 2022. augusztus 13.-i szám.';

function showtag($tag, $par)
{
	if(in_array($tag, $par))
		echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.$tag.' style="background-color: #ffff00; color: black">'.$tag.'</a><br>';
	else
		if($par[0]=='*')
			echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.$tag.'>'.$tag.'</a><br>';
		else
			echo '<a href=http://lattilad.org/vicky/konyvtar/konyvtar?'.implode(',', $par).','.$tag.'>'.$tag.'</a><br>';
}

function placeback(&$array, $key)
{
	$x=$array[$key];
	unset($array[$key]);
	$array[$key]=$x;
}
function minoldal($konyv)
{
	$min=10000;
	foreach($konyv as $kiadas)
		if(isset($kiadas['oldal'])
			&&$kiadas['meret']!='melléklet'
			&&$kiadas['oldal']<$min)
				$min=$kiadas['oldal'];
	return $min;
}
function rendezes($a, $b)
{
	global $rendezes;
	if($rendezes=='ev')
		return mx($a[$rendezes])>mx($b[$rendezes]);
		else
		return sum($a[$rendezes])<sum($b[$rendezes]);
}
function mx($a)
{
	if(is_array($a))
		return max($a);
		else
		return substr($a, -4);
}
function sum($a)
{
	if(is_array($a))
		return array_sum($a);
		else
		return $a;
}
</php>