/*

 * Copyright 2011 Tomas Zeman <tzeman@volny.cz>

 *

 * Licensed under the Apache License, Version 2.0 (the "License");

 * you may not use this file except in compliance with the License.

 * You may obtain a copy of the License at

 *

 *     http://www.apache.org/licenses/LICENSE-2.0

 *

 * Unless required by applicable law or agreed to in writing, software

 * distributed under the License is distributed on an "AS IS" BASIS,

 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

 * See the License for the specific language governing permissions and

 * limitations under the License.

 */

package net.tz.lift.snippet

import net.liftweb.http._

import scala.xml.{NodeSeq, Text}

trait SnippetHelpers {

  def mkPath(prefix: String, l: String*) =

    (prefix :: l.toList) mkString ("/", "/", "")

}

class A(href: => String) extends Function1[NodeSeq, NodeSeq] {

  def apply(in: NodeSeq): NodeSeq = <a href={href}>{in}</a>

}

object A {

  def apply(href: String)(in: NodeSeq): NodeSeq = (new A(href))(in)

  def apply(href: String): A = new A(href)

  def apply(href: String, cnt: String): NodeSeq = (new A(href))(Text(cnt))

}

object ActionLinks extends DispatchSnippet {

  def dispatch: DispatchIt = {

    case "are" => { xhtml => if (links.is.isEmpty) NodeSeq.Empty else xhtml }

    case _ => render _

  }

  import scala.collection.mutable.{BufferLike, ListBuffer}

  private object links extends RequestVar[ListBuffer[Either[Function0[NodeSeq], Function1[NodeSeq, NodeSeq]]]](new ListBuffer())

  def render(in: NodeSeq): NodeSeq = links.is.flatMap { _.fold( _(), _(in) ) ++

    Text("  ") }

  def append(l: NodeSeq) = links.is.append(Left( { () => l } ))

  def append(l: () => NodeSeq) = links.is.append(Left(l))

  def append(l: NodeSeq => NodeSeq) = links.is.append(Right(l))

}

object SimpleForm {

  def apply(l: Iterable[AttrRow], submitVal: String, onSubmit: () => Any):

    (NodeSeq => NodeSeq) = {

    val curS = S.currentSnippet

    def doit() = {

      onSubmit()

      curS foreach { S.mapSnippet(_, loop) }

    }

    def loop: (NodeSeq => NodeSeq) = {

      Panel(l ++ List(AttrRow.submitRow(SHtml.submit(submitVal, doit))))

    }

    loop

  }

  def apply(l: Iterable[AttrRow], submitVal: String): (NodeSeq => NodeSeq) =

    apply(l, submitVal, () => ())

}

// vim: set ts=2 sw=2 et: