<?php

namespace Smarty\Compile\Tag;

/**
 * Smarty Internal Plugin Compile Section Class
 *


 */
class Section extends ForeachSection {

	/**
	 * Attribute definition: Overwrites base class.
	 *
	 * @var array
	 * @see BasePlugin
	 */
	protected $required_attributes = ['name', 'loop'];

	/**
	 * Attribute definition: Overwrites base class.
	 *
	 * @var array
	 * @see BasePlugin
	 */
	protected $shorttag_order = ['name', 'loop'];

	/**
	 * Attribute definition: Overwrites base class.
	 *
	 * @var array
	 * @see BasePlugin
	 */
	protected $optional_attributes = ['start', 'step', 'max', 'show', 'properties'];

	/**
	 * counter
	 *
	 * @var int
	 */
	protected $counter = 0;

	/**
	 * Name of this tag
	 *
	 * @var string
	 */
	protected $tagName = 'section';

	/**
	 * Valid properties of $smarty.section.name.xxx variable
	 *
	 * @var array
	 */
	protected $nameProperties = [
		'first', 'last', 'index', 'iteration', 'show', 'total', 'rownum', 'index_prev',
		'index_next', 'loop',
	];

	/**
	 * {section} tag has no item properties
	 *
	 * @var array
	 */
	protected $itemProperties = null;

	/**
	 * {section} tag has always name attribute
	 *
	 * @var bool
	 */
	protected $isNamed = true;

	/**
	 * Compiles code for the {section} tag
	 *
	 * @param array $args array with attributes from parser
	 * @param \Smarty\Compiler\Template $compiler compiler object
	 *
	 * @return string compiled code
	 * @throws \Smarty\CompilerException
	 * @throws \Smarty\Exception
	 */
	public function compile($args, \Smarty\Compiler\Template $compiler, $parameter = [], $tag = null, $function = null): string
	{
		$compiler->loopNesting++;
		// check and get attributes
		$_attr = $this->getAttributes($compiler, $args);
		$attributes = ['name' => $compiler->getId($_attr['name'])];
		unset($_attr['name']);
		foreach ($attributes as $a => $v) {
			if ($v === false) {
				$compiler->trigger_template_error("'{$a}' attribute/variable has illegal value", null, true);
			}
		}
		$local = "\$__section_{$attributes['name']}_" . $this->counter++ . '_';
		$sectionVar = "\$_smarty_tpl->tpl_vars['__smarty_section_{$attributes['name']}']";

		if ($compiler->tag_nocache) {
			// push a {nocache} tag onto the stack to prevent caching of this block
			$this->openTag($compiler, 'nocache');
		}

		$this->openTag($compiler, 'section', ['section', $compiler->tag_nocache]);

		$initLocal = [];
		$initNamedProperty = [];
		$initFor = [];
		$incFor = [];
		$cmpFor = [];
		$propValue = [
			'index' => "{$sectionVar}->value['index']", 'show' => 'true', 'step' => 1,
			'iteration' => "{$local}iteration",
		];
		$propType = ['index' => 2, 'iteration' => 2, 'show' => 0, 'step' => 0,];
		// search for used tag attributes
		$this->scanForProperties($attributes, $compiler);
		if (!empty($this->matchResults['named'])) {
			$namedAttr = $this->matchResults['named'];
		}
		if (isset($_attr['properties']) && preg_match_all("/['](.*?)[']/", $_attr['properties'], $match)) {
			foreach ($match[1] as $prop) {
				if (in_array($prop, $this->nameProperties)) {
					$namedAttr[$prop] = true;
				} else {
					$compiler->trigger_template_error("Invalid property '{$prop}'", null, true);
				}
			}
		}
		$namedAttr['index'] = true;
		$output = "<?php\n";
		foreach ($_attr as $attr_name => $attr_value) {
			switch ($attr_name) {
				case 'loop':
					if (is_numeric($attr_value)) {
						$v = (int)$attr_value;
						$t = 0;
					} else {
						$v = "(is_array(@\$_loop=$attr_value) ? count(\$_loop) : max(0, (int) \$_loop))";
						$t = 1;
					}
					if ($t === 1) {
						$initLocal['loop'] = $v;
						$v = "{$local}loop";
					}
					break;
				case 'show':
					if (is_bool($attr_value)) {
						$v = $attr_value ? 'true' : 'false';
						$t = 0;
					} else {
						$v = "(bool) $attr_value";
						$t = 3;
					}
					break;
				case 'step':
					if (is_numeric($attr_value)) {
						$v = (int)$attr_value;
						$v = ($v === 0) ? 1 : $v;
						$t = 0;
						break;
					}
					$initLocal['step'] = "((int)@$attr_value) === 0 ? 1 : (int)@$attr_value";
					$v = "{$local}step";
					$t = 2;
					break;
				case 'max':
				case 'start':
					if (is_numeric($attr_value)) {
						$v = (int)$attr_value;
						$t = 0;
						break;
					}
					$v = "(int)@$attr_value";
					$t = 3;
					break;
			}
			if ($t === 3 && $compiler->getId($attr_value)) {
				$t = 1;
			}
			$propValue[$attr_name] = $v;
			$propType[$attr_name] = $t;
		}
		if (isset($namedAttr['step'])) {
			$initNamedProperty['step'] = $propValue['step'];
		}
		if (isset($namedAttr['iteration'])) {
			$propValue['iteration'] = "{$sectionVar}->value['iteration']";
		}
		$incFor['iteration'] = "{$propValue['iteration']}++";
		$initFor['iteration'] = "{$propValue['iteration']} = 1";
		if ($propType['step'] === 0) {
			if ($propValue['step'] === 1) {
				$incFor['index'] = "{$sectionVar}->value['index']++";
			} elseif ($propValue['step'] > 1) {
				$incFor['index'] = "{$sectionVar}->value['index'] += {$propValue['step']}";
			} else {
				$incFor['index'] = "{$sectionVar}->value['index'] -= " . -$propValue['step'];
			}
		} else {
			$incFor['index'] = "{$sectionVar}->value['index'] += {$propValue['step']}";
		}
		if (!isset($propValue['max'])) {
			$propValue['max'] = $propValue['loop'];
			$propType['max'] = $propType['loop'];
		} elseif ($propType['max'] !== 0) {
			$propValue['max'] = "{$propValue['max']} < 0 ? {$propValue['loop']} : {$propValue['max']}";
			$propType['max'] = 1;
		} else {
			if ($propValue['max'] < 0) {
				$propValue['max'] = $propValue['loop'];
				$propType['max'] = $propType['loop'];
			}
		}
		if (!isset($propValue['start'])) {
			$start_code =
				[1 => "{$propValue['step']} > 0 ? ", 2 => '0', 3 => ' : ', 4 => $propValue['loop'], 5 => ' - 1'];
			if ($propType['loop'] === 0) {
				$start_code[5] = '';
				$start_code[4] = $propValue['loop'] - 1;
			}
			if ($propType['step'] === 0) {
				if ($propValue['step'] > 0) {
					$start_code = [1 => '0'];
					$propType['start'] = 0;
				} else {
					$start_code[1] = $start_code[2] = $start_code[3] = '';
					$propType['start'] = $propType['loop'];
				}
			} else {
				$propType['start'] = 1;
			}
			$propValue['start'] = join('', $start_code);
		} else {
			$start_code =
				[
					1 => "{$propValue['start']} < 0 ? ", 2 => 'max(', 3 => "{$propValue['step']} > 0 ? ", 4 => '0',
					5 => ' : ', 6 => '-1', 7 => ', ', 8 => "{$propValue['start']} + {$propValue['loop']}", 10 => ')',
					11 => ' : ', 12 => 'min(', 13 => $propValue['start'], 14 => ', ',
					15 => "{$propValue['step']} > 0 ? ", 16 => $propValue['loop'], 17 => ' : ',
					18 => $propType['loop'] === 0 ? $propValue['loop'] - 1 : "{$propValue['loop']} - 1",
					19 => ')',
				];
			if ($propType['step'] === 0) {
				$start_code[3] = $start_code[5] = $start_code[15] = $start_code[17] = '';
				if ($propValue['step'] > 0) {
					$start_code[6] = $start_code[18] = '';
				} else {
					$start_code[4] = $start_code[16] = '';
				}
			}
			if ($propType['start'] === 0) {
				if ($propType['loop'] === 0) {
					$start_code[8] = $propValue['start'] + $propValue['loop'];
				}
				$propType['start'] = $propType['step'] + $propType['loop'];
				$start_code[1] = '';
				if ($propValue['start'] < 0) {
					for ($i = 11; $i <= 19; $i++) {
						$start_code[$i] = '';
					}
					if ($propType['start'] === 0) {
						$start_code = [
							max(
								$propValue['step'] > 0 ? 0 : -1,
								$propValue['start'] + $propValue['loop']
							),
						];
					}
				} else {
					for ($i = 1; $i <= 11; $i++) {
						$start_code[$i] = '';
					}
					if ($propType['start'] === 0) {
						$start_code =
							[
								min(
									$propValue['step'] > 0 ? $propValue['loop'] : $propValue['loop'] - 1,
									$propValue['start']
								),
							];
					}
				}
			}
			$propValue['start'] = join('', $start_code);
		}
		if ($propType['start'] !== 0) {
			$initLocal['start'] = $propValue['start'];
			$propValue['start'] = "{$local}start";
		}
		$initFor['index'] = "{$sectionVar}->value['index'] = {$propValue['start']}";
		if (!isset($_attr['start']) && !isset($_attr['step']) && !isset($_attr['max'])) {
			$propValue['total'] = $propValue['loop'];
			$propType['total'] = $propType['loop'];
		} else {
			$propType['total'] =
				$propType['start'] + $propType['loop'] + $propType['step'] + $propType['max'];
			if ($propType['total'] === 0) {
				$propValue['total'] =
					min(
						ceil(
							($propValue['step'] > 0 ? $propValue['loop'] - $propValue['start'] :
								(int)$propValue['start'] + 1) / abs($propValue['step'])
						),
						$propValue['max']
					);
			} else {
				$total_code = [
					1 => 'min(', 2 => 'ceil(', 3 => '(', 4 => "{$propValue['step']} > 0 ? ",
					5 => $propValue['loop'], 6 => ' - ', 7 => $propValue['start'], 8 => ' : ',
					9 => $propValue['start'], 10 => '+ 1', 11 => ')', 12 => '/ ', 13 => 'abs(',
					14 => $propValue['step'], 15 => ')', 16 => ')', 17 => ", {$propValue['max']})",
				];
				if (!isset($propValue['max'])) {
					$total_code[1] = $total_code[17] = '';
				}
				if ($propType['loop'] + $propType['start'] === 0) {
					$total_code[5] = $propValue['loop'] - $propValue['start'];
					$total_code[6] = $total_code[7] = '';
				}
				if ($propType['start'] === 0) {
					$total_code[9] = (int)$propValue['start'] + 1;
					$total_code[10] = '';
				}
				if ($propType['step'] === 0) {
					$total_code[13] = $total_code[15] = '';
					if ($propValue['step'] === 1 || $propValue['step'] === -1) {
						$total_code[2] = $total_code[12] = $total_code[14] = $total_code[16] = '';
					} elseif ($propValue['step'] < 0) {
						$total_code[14] = -$propValue['step'];
					}
					$total_code[4] = '';
					if ($propValue['step'] > 0) {
						$total_code[8] = $total_code[9] = $total_code[10] = '';
					} else {
						$total_code[5] = $total_code[6] = $total_code[7] = $total_code[8] = '';
					}
				}
				$propValue['total'] = join('', $total_code);
			}
		}
		if (isset($namedAttr['loop'])) {
			$initNamedProperty['loop'] = "'loop' => {$propValue['loop']}";
		}
		if (isset($namedAttr['total'])) {
			$initNamedProperty['total'] = "'total' => {$propValue['total']}";
			if ($propType['total'] > 0) {
				$propValue['total'] = "{$sectionVar}->value['total']";
			}
		} elseif ($propType['total'] > 0) {
			$initLocal['total'] = $propValue['total'];
			$propValue['total'] = "{$local}total";
		}
		$cmpFor['iteration'] = "{$propValue['iteration']} <= {$propValue['total']}";
		foreach ($initLocal as $key => $code) {
			$output .= "{$local}{$key} = {$code};\n";
		}
		$_vars = 'array(' . join(', ', $initNamedProperty) . ')';
		$output .= "{$sectionVar} = new \\Smarty\\Variable({$_vars});\n";
		$cond_code = "{$propValue['total']} !== 0";
		if ($propType['total'] === 0) {
			if ($propValue['total'] === 0) {
				$cond_code = 'false';
			} else {
				$cond_code = 'true';
			}
		}
		if ($propType['show'] > 0) {
			$output .= "{$local}show = {$propValue['show']} ? {$cond_code} : false;\n";
			$output .= "if ({$local}show) {\n";
		} elseif ($propValue['show'] === 'true') {
			$output .= "if ({$cond_code}) {\n";
		} else {
			$output .= "if (false) {\n";
		}
		$jinit = join(', ', $initFor);
		$jcmp = join(', ', $cmpFor);
		$jinc = join(', ', $incFor);
		$output .= "for ({$jinit}; {$jcmp}; {$jinc}){\n";
		if (isset($namedAttr['rownum'])) {
			$output .= "{$sectionVar}->value['rownum'] = {$propValue['iteration']};\n";
		}
		if (isset($namedAttr['index_prev'])) {
			$output .= "{$sectionVar}->value['index_prev'] = {$propValue['index']} - {$propValue['step']};\n";
		}
		if (isset($namedAttr['index_next'])) {
			$output .= "{$sectionVar}->value['index_next'] = {$propValue['index']} + {$propValue['step']};\n";
		}
		if (isset($namedAttr['first'])) {
			$output .= "{$sectionVar}->value['first'] = ({$propValue['iteration']} === 1);\n";
		}
		if (isset($namedAttr['last'])) {
			$output .= "{$sectionVar}->value['last'] = ({$propValue['iteration']} === {$propValue['total']});\n";
		}
		$output .= '?>';
		return $output;
	}
}