src/main/scala/net/tz/lift/snippet/Panel.scala
author Tomas Zeman <tzeman@volny.cz>
Wed, 30 Nov 2011 16:59:10 +0100
changeset 22 6b1a7f3429ca
parent 2 cf829ec742b3
permissions -rw-r--r--
ca1737768512bd36 Search by dynamic IP address, IP assignment history list
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
2
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     1
/*
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     2
 * Copyright 2011 Tomas Zeman <tzeman@volny.cz>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     3
 *
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     4
 * Licensed under the Apache License, Version 2.0 (the "License");
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     5
 * you may not use this file except in compliance with the License.
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     6
 * You may obtain a copy of the License at
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     7
 *
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     8
 *     http://www.apache.org/licenses/LICENSE-2.0
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     9
 *
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    10
 * Unless required by applicable law or agreed to in writing, software
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    11
 * distributed under the License is distributed on an "AS IS" BASIS,
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    12
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    13
 * See the License for the specific language governing permissions and
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    14
 * limitations under the License.
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    15
 */
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    16
package net.tz.lift.snippet
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    17
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    18
import net.liftweb.mapper.MappedField
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    19
import scala.xml.{NodeSeq, Text}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    20
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    21
object AttrRow {
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    22
  def apply(name: => NodeSeq, value: => NodeSeq) =  new AttrRow(name, value,
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    23
    "attr-name", "attr-value")
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    24
  def apply(f: MappedField[_, _]) = new AttrRow(Text(f.displayName), f.asHtml,
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    25
    "attr-name", "attr-value")
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    26
  def formRow(name: => NodeSeq, input: => NodeSeq) = new AttrRow(name, input,
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    27
    "form-name", "form-value")
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    28
  def submitRow(button: => NodeSeq) = new SpanRow(button)
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    29
}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    30
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    31
class AttrRow(name: => NodeSeq, value: => NodeSeq, nameCss: String,
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    32
  valueCss: String) extends Function0[NodeSeq] {
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    33
  def tdN = <td class={nameCss}>{name}</td>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    34
  def tdV = <td class={valueCss}>{value}</td>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    35
  def apply(): NodeSeq = <tr>{tdN :: tdV :: Nil}</tr>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    36
}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    37
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    38
class SpanRow(value: => NodeSeq) extends AttrRow(NodeSeq.Empty, value, "", "")
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    39
{
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    40
  override def apply(): NodeSeq = <tr><td colspan="2">{value}</td></tr>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    41
}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    42
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    43
object Panel {
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    44
  def apply(attrs: Iterable[AttrRow]) = new Panel(attrs)
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    45
  def fromFields(fields: Iterable[MappedField[_,_]]) =
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    46
    new Panel(fields.map(AttrRow(_)))
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    47
}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    48
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    49
class Panel(attrs: => Iterable[AttrRow]) extends Function1[NodeSeq, NodeSeq]
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    50
{
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    51
  def apply(in: NodeSeq): NodeSeq = <table>{attrs.map(_())}</table>
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    52
  def &(other: Function1[NodeSeq, NodeSeq]) = new Function1[NodeSeq, NodeSeq] {
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    53
    def apply(in: NodeSeq): NodeSeq = List(Panel.this, other) flatMap (_(in))
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    54
  }
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    55
}
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    56
cf829ec742b3 Main project functionality
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    57
// vim: set ts=2 sw=2 et: