/* PageRenderer.java

	Purpose:

	Description:

	History:
		Sat Jan  3 17:58:50     2009, Created by tomyeh

Copyright (C) 2008 Potix Corporation. All Rights Reserved.

This program is distributed under LGPL Version 2.1 in the hope that
it will be useful, but WITHOUT ANY WARRANTY.
*/
package org.zkoss.zhtml.impl;

import java.io.IOException;
import java.io.StringWriter;
import java.io.Writer;
import java.util.Iterator;

import org.zkoss.zhtml.Text;
import org.zkoss.zk.ui.Component;
import org.zkoss.zk.ui.Execution;
import org.zkoss.zk.ui.Executions;
import org.zkoss.zk.ui.Page;
import org.zkoss.zk.ui.UiException;
import org.zkoss.zk.ui.WebApp;
import org.zkoss.zk.ui.sys.Attributes;
import org.zkoss.zk.ui.sys.ComponentCtrl;
import org.zkoss.zk.ui.sys.ExecutionsCtrl;
import org.zkoss.zk.ui.sys.HtmlPageRenders;
import org.zkoss.zk.ui.sys.PageCtrl;

/**
 * The page render for ZHTML pages.
 *
 * @author tomyeh
 * @since 5.0.0
 */
public class PageRenderer implements org.zkoss.zk.ui.sys.PageRenderer {
	/**
	 * An execution attribute to retrieve the render context.
	 */
	private static final String ATTR_RENDER_CONTEXT = "org.zkoss.zhtml.renderContext";

	/**
	 * Returns the render context, or null if not available. The render context is available only if
	 * the ZHTML page is rendered directly (rather than via inclusion).
	 *
	 * @param exec
	 *            the execution. If null, Executions.getCurrent() is assumed.
	 */
	public static TagRenderContext getTagRenderContext(Execution exec) {
		if (exec == null)
			exec = Executions.getCurrent();
		return exec != null ? (TagRenderContext) exec.getAttribute(ATTR_RENDER_CONTEXT) : null;
	}

	// PageRenderer//
	public void render(Page page, Writer out) throws IOException {
		final Execution exec = Executions.getCurrent();
		final String ctl = ExecutionsCtrl.getPageRedrawControl(exec);
		boolean au = exec.isAsyncUpdate(null);
		if (!au && (page.isComplete() || "complete".equals(ctl))) {
			renderComplete(exec, page, out);
			return;
		}

		boolean pageOnly = au;
		if (!pageOnly)
			pageOnly = (exec.isIncluded() || "page".equals(ctl)) && !"desktop".equals(ctl);

		if (pageOnly)
			renderPage(exec, page, out, au);
		else {
			exec.setAttribute(Attributes.PAGE_REDRAW_CONTROL, "complete");
			renderComplete(exec, page, out);
		}
	}

	private static void write(Writer out, String s) throws IOException {
		if (s != null)
			out.write(s);
	}

	private static void writeln(Writer out, String s) throws IOException {
		if (s != null) {
			out.write(s);
			out.write('\n');
		}
	}

	/**
	 * Renders the page if {@link Page#isComplete} is false.
	 *
	 * @param au
	 *            whether it is caused by an asynchronous update
	 */
	protected void renderPage(Execution exec, Page page, Writer out, boolean au)
			throws IOException {
		if (!au) {
			out.write(HtmlPageRenders.outLangStyleSheets(exec, null, null));
			out.write(HtmlPageRenders.outLangJavaScripts(exec, null, null));
		}

		HtmlPageRenders.outPageContent(exec, page, out, au);
		if (!au && ((PageCtrl) page).getOwner() == null)
			writeln(out, HtmlPageRenders.outUnavailable(exec));
	}

	/**
	 * Renders the page if {@link Page#isComplete} is true. In other words, the page content
	 * contains HTML/BODY tags.
	 */
	protected void renderComplete(Execution exec, Page page, Writer out) throws IOException {
		final Object ret = beforeRenderHtml(exec, page, out);

		for (Iterator it = page.getRoots().iterator(); it.hasNext();)
			((ComponentCtrl) it.next()).redraw(out);

		afterRenderHtml(exec, page, out, ret);
	}

	/**
	 * Prepares for rendering a complete ZHTML page. After rendering, the caller shall also invoke
	 * {@link #afterRenderHtml}. Furthermore, the return value of this method shall be passed as the
	 * <code>param</code> argument of {@link #afterRenderHtml}.
	 *
	 * @see #afterRenderHtml
	 */
	public static Object beforeRenderHtml(Execution exec, Page page, Writer out)
			throws IOException {
		final TagRenderContext rc = (TagRenderContext) beforeRenderTag(exec);
		if (rc == null)
			return null; // already been called

		HtmlPageRenders.setContentType(exec, page);

		write(out, HtmlPageRenders.outFirstLine(exec, page)); // might null
		write(out, HtmlPageRenders.outDocType(exec, page)); // might null
		return rc;
	}

	/**
	 * Ends and cleans up the rendering of a complete ZHTML page.
	 *
	 * @param param
	 *            the value returned by {@link #beforeRenderHtml}.
	 * @see #beforeRenderHtml
	 */
	public static void afterRenderHtml(Execution exec, Page page, Writer out, Object param)
			throws IOException {
		if (param == null)
			return; // nothing to do

		final TagRenderContext rc = (TagRenderContext) param;
		String rcs = rc.complete();
		WebApp webApp = exec.getDesktop().getWebApp();

		if (rcs.length() > 0) {
			Object notice = webApp.getAttribute("org.zkoss.zk.ui.client.notice");
			if (notice instanceof String) {
				rcs += '\n' + ((String) notice);
			}

			if (out instanceof StringWriter) {
				final StringBuffer buf = ((StringWriter) out).getBuffer();
				int j = buf.lastIndexOf("</body>");
				if (j < 0)
					j = buf.lastIndexOf("</html>");
				if (j >= 0)
					buf.insert(j, rcs);
				else
					buf.append(rcs);
			} else {
				out.write(rcs);
			}
		}

		write(out, HtmlPageRenders.outHeaderZkTags(exec, page));
		if (rcs.length() == 0) {
			Object notice = webApp.getAttribute("org.zkoss.zk.ui.client.notice");
			if (notice instanceof String) {
				out.write((String) notice);
			}
		}
		writeln(out, HtmlPageRenders.outUnavailable(exec));
		afterRenderTag(exec, param);
	}

	/**
	 * Prepares for rendering a ZHTML tag. After rendering, the caller shall also invoke
	 * {@link #afterRenderTag}. Furthermore, the return value of this method shall be passed as the
	 * <code>param</code> argument of {@link #afterRenderTag}.
	 *
	 * @return the result of this invocation. It shall be passed to the <code>param</code> argument
	 *         of {@link #afterRenderTag}.
	 * @see #afterRenderTag
	 */
	public static Object beforeRenderTag(Execution exec) {
		TagRenderContext rc = getTagRenderContext(exec);
		if (rc != null)
			return null; // already been called

		rc = new TagRenderContext();
		if (exec == null) {
			exec = Executions.getCurrent();
		}
		exec.setAttribute(ATTR_RENDER_CONTEXT, rc);
		return rc;
	}

	/**
	 * Ends and cleans up the rendering of a ZHTML tag.
	 *
	 * @param param
	 *            the value returned by {@link #beforeRenderHtml}.
	 */
	public static void afterRenderTag(Execution exec, Object param) {
		if (param != null)
			exec.setAttribute(ATTR_RENDER_CONTEXT, null);
	}

	/**
	 * Converts the children of the give component into a string-typed content, or null if no
	 * children at all.
	 *
	 * @exception UiException
	 *                if some of the children is not ZHTML tags (i.e., not {@link AbstractTag}).
	 * @since 5.0.7
	 */
	public static String childrenToContent(Component comp) {
		Component c;
		if ((c = comp.getFirstChild()) != null) {
			final StringBuffer sb = new StringBuffer();
			for (; c != null; c = c.getNextSibling())
				childrenToContent(comp, c, sb);
			comp.getChildren().clear();
			return sb.toString();
		}
		return null;
	}

	private static final void childrenToContent(Component owner, Component comp, StringBuffer sb) {
		if (comp instanceof Text) {
			sb.append(((Text) comp).getValue());
			return;
		}
		if (!(comp instanceof AbstractTag))
			throw new UiException(
					"Non-ZHTML components are not allowed, " + comp + ", for " + owner);

		final AbstractTag tag = (AbstractTag) comp;
		sb.append(tag.getPrologHalf(true)); // don't generate UUID if possible

		if (comp instanceof ContentTag)
			sb.append(((ContentTag) comp).getContent());

		for (Component c = tag.getFirstChild(); c != null; c = c.getNextSibling())
			childrenToContent(owner, c, sb);

		sb.append(tag.getEpilogHalf());
	}
}
