panel = $panel;
	}
	public function get_panel() {
		return $this->panel;
	}
}
// }}}
/* SetupPanel {{{
 *
 */
class SetupPanel extends Page {
}
// }}}
/* SetupBlock {{{
 *
 */
class SetupBlock extends Block {
	var $header;
	var $body;
	public function SetupBlock($title) {
		$this->header = $title;
	}
	public function add_label($text) {
		$this->body .= $text;
	}
	public function add_text_option($name, $label=null) {
		global $config;
		$val = $config->get_string($name);
		if(!is_null($label)) {
			$this->body .= "";
		}
		$this->body .= "\n";
	}
	public function add_longtext_option($name, $label=null) {
		global $config;
		$val = $config->get_string($name);
		if(!is_null($label)) {
			$this->body .= "";
		}
		$this->body .= "\n";
		$this->body .= "\n"; // setup page auto-layout counts 
 tags
	}
	public function add_bool_option($name, $label=null) {
		global $config;
		$checked = $config->get_bool($name) ? " checked" : "";
		if(!is_null($label)) {
			$this->body .= "";
		}
		$this->body .= "\n";
	}
	public function add_hidden_option($name, $label=null) {
		global $config;
		$val = $config->get_string($name);
		$this->body .= "";
	}
	public function add_int_option($name, $label=null) {
		global $config;
		$val = $config->get_string($name);
		if(!is_null($label)) {
			$this->body .= "";
		}
		$this->body .= "\n";
	}
	public function add_shorthand_int_option($name, $label=null) {
		global $config;
		$val = to_shorthand_int($config->get_string($name));
		if(!is_null($label)) {
			$this->body .= "";
		}
		$this->body .= "\n";
	}
	public function add_choice_option($name, $options, $label=null) {
		global $config;
		$current = $config->get_string($name);
		
		if(!is_null($label)) {
			$this->body .= "";
		}
		$html = "";
		$this->body .= $html;
	}
}
// }}}
class Setup extends Extension {
// event handling {{{
	public function receive_event($event) {
		if(is_a($event, 'PageRequestEvent') && ($event->page == "setup")) {
			global $user;
			if(!$user->is_admin()) {
				global $page;
				$page->set_title("Error");
				$page->set_heading("Error");
				$page->add_side_block(new NavBlock(), 0);
				$page->add_main_block(new Block("Permission Denied", "This page is for admins only"), 0);
			}
			else {
				if($event->get_arg(0) == "save") {
					global $config;
					send_event(new ConfigSaveEvent($config));
					$config->save();
					
					global $page;
					$page->set_mode("redirect");
					$page->set_redirect(make_link("setup"));
				}
				else {
					$panel = new SetupPanel();
					send_event(new SetupBuildingEvent($panel));
					$this->build_page($panel);
				}
			}
		}
		if(is_a($event, 'SetupBuildingEvent')) {
			$themes = array();
			foreach(glob("themes/*") as $theme_dirname) {
				$name = str_replace("themes/", "", $theme_dirname);
				$themes[ucfirst($name)] = $name;
			}
			$sb = new SetupBlock("General");
			$sb->add_text_option("title", "Site title: ");
			$sb->add_text_option("front_page", "
Front page: ");
			$sb->add_text_option("base_href", "
Base URL: ");
			$sb->add_text_option("data_href", "
Data URL: ");
			$sb->add_text_option("contact_link", "
Contact URL:");
			$sb->add_choice_option("theme", $themes, "
Theme: ");
			// $sb->add_int_option("anon_id", "
Anonymous ID: "); // FIXME: create advanced options page
			$sb->add_hidden_option("anon_id");
			$event->panel->add_main_block($sb, 0);
		}
		if(is_a($event, 'ConfigSaveEvent')) {
			$event->config->set_string_from_post("title");
			$event->config->set_string_from_post("front_page");
			$event->config->set_string_from_post("base_href");
			$event->config->set_string_from_post("data_href");
			$event->config->set_string_from_post("contact_link");
			$event->config->set_string_from_post("theme");
			$event->config->set_int_from_post("anon_id");
		}
		if(is_a($event, 'UserBlockBuildingEvent')) {
			if($event->user->is_admin()) {
				$event->add_link("Board Config", make_link("setup"));
			}
		}
	}
// }}}
// HTML building {{{
	private function build_page($panel) {
		$setupblock_html1 = "";
		$setupblock_html2 = "";
		ksort($panel->mainblocks);
		/*
		$flip = true;
		foreach($panel->mainblocks as $block) {
			if(is_a($block, 'SetupBlock')) {
				if($flip) $setupblock_html1 .= $this->sb_to_html($block);
				else $setupblock_html2 .= $this->sb_to_html($block);
				$flip = !$flip;
			}
		}
		*/
		/*
		 * Try and keep the two columns even; count the line breaks in
		 * each an calculate where a block would work best
		 */
		$len1 = 0;
		$len2 = 0;
		foreach($panel->mainblocks as $block) {
			if(is_a($block, 'SetupBlock')) {
				$html = $this->sb_to_html($block);
				$len = count(explode("
", $html));
				if($len1 <= $len2) {
					$setupblock_html1 .= $this->sb_to_html($block);
					$len1 += $len;
				}
				else {
					$setupblock_html2 .= $this->sb_to_html($block);
					$len2 += $len;
				}
			}
		}
		$table = "