src/main/scala/net/tz/lift/snippet/Panel.scala
author Tomas Zeman <tzeman@volny.cz>
Sat, 20 Aug 2011 10:43:23 +0200
changeset 21 9026ebb197e2
parent 20 22424e6508cd
permissions -rw-r--r--
Panel: added optional caption and path
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     1
/*
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     2
 * Copyright 2011 Tomas Zeman <tzeman@volny.cz>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     3
 *
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     4
 * Licensed under the Apache License, Version 2.0 (the "License");
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     5
 * you may not use this file except in compliance with the License.
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     6
 * You may obtain a copy of the License at
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     7
 *
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     8
 *     http://www.apache.org/licenses/LICENSE-2.0
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
     9
 *
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    10
 * Unless required by applicable law or agreed to in writing, software
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    11
 * distributed under the License is distributed on an "AS IS" BASIS,
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    12
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    13
 * See the License for the specific language governing permissions and
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    14
 * limitations under the License.
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    15
 */
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    16
package net.tz.lift.snippet
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    17
21
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    18
import net.liftweb.common._
3
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    19
import net.liftweb.mapper.MappedField
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    20
import scala.xml.{NodeSeq, Text}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    21
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    22
object AttrRow {
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    23
  def apply(name: => NodeSeq, value: => NodeSeq) =  new AttrRow(name, value,
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    24
    "attr-name", "attr-value")
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    25
  def apply(f: MappedField[_, _]) = new AttrRow(Text(f.displayName), f.asHtml,
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    26
    "attr-name", "attr-value")
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    27
  def formRow(name: => NodeSeq, input: => NodeSeq) = new AttrRow(name, input,
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    28
    "form-name", "form-value")
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    29
  def submitRow(button: => NodeSeq) = new SpanRow(button)
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    30
}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    31
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    32
class AttrRow(name: => NodeSeq, value: => NodeSeq, nameCss: String,
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    33
  valueCss: String) extends Function0[NodeSeq] {
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    34
  def tdN = <td class={nameCss}>{name}</td>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    35
  def tdV = <td class={valueCss}>{value}</td>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    36
  def apply(): NodeSeq = <tr>{tdN :: tdV :: Nil}</tr>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    37
}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    38
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    39
class SpanRow(value: => NodeSeq) extends AttrRow(NodeSeq.Empty, value, "", "")
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    40
{
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    41
  override def apply(): NodeSeq = <tr><td colspan="2">{value}</td></tr>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    42
}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    43
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    44
object Panel {
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    45
  def apply(attrs: Iterable[AttrRow]) = new Panel(attrs)
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    46
  def fromFields(fields: Iterable[MappedField[_,_]]) =
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    47
    new Panel(fields.map(AttrRow(_)))
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    48
}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    49
20
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    50
class Panel(attrs: => Iterable[AttrRow]) extends CssTr {
3
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    51
  def apply(in: NodeSeq): NodeSeq = <table>{attrs.map(_())}</table>
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    52
  def &(other: Function1[NodeSeq, NodeSeq]) = new Function1[NodeSeq, NodeSeq] {
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    53
    def apply(in: NodeSeq): NodeSeq = List(Panel.this, other) flatMap (_(in))
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    54
  }
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    55
}
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    56
20
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    57
import net.liftweb.http.TemplateFinder
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    58
import net.liftweb.util.Helpers._ // CSS transforms
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    59
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    60
/**
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    61
 * A panel using template in <code>/templates-hidden/panel</code> for
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    62
 * values rendering.
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    63
 */
21
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    64
class TplPanel(caption: Box[String], cells: List[(NodeSeq, NodeSeq)],
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    65
  path: Box[List[String]]) extends CssTr {
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    66
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    67
  def this(cells: List[(NodeSeq, NodeSeq)], p: List[String]) =
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    68
    this(Empty, cells, Full(p))
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    69
  def this(cells: List[(NodeSeq, NodeSeq)]) = this(Empty, cells, Empty)
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    70
20
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    71
  def apply(in: NodeSeq): NodeSeq = TemplateFinder.findAnyTemplate(
21
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    72
    path.openOr(List("templates-hidden", "panel"))) map { xml =>
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    73
    (".caption *" #> caption &
9026ebb197e2 Panel: added optional caption and path
Tomas Zeman <tzeman@volny.cz>
parents: 20
diff changeset
    74
      ".row *" #> cells.map { r =>
20
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    75
      ".n *" #> r._1 &
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    76
      ".v *" #> r._2
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    77
    })(xml)
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    78
  } openOr NodeSeq.Empty
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    79
}
22424e6508cd Added OptionalFieldDisplay, DataTable, Loc helpers
Tomas Zeman <tzeman@volny.cz>
parents: 3
diff changeset
    80
3
61b9f48ce17d Attribute panel
Tomas Zeman <tzeman@volny.cz>
parents:
diff changeset
    81
// vim: set ts=2 sw=2 et: