/*

 * 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 fis.base.model

import net.liftweb.common._

import net.liftweb.record.{Field, MetaRecord, Record}

import net.liftweb.record.field._

import net.liftweb.squerylrecord.KeyedRecord

import net.liftweb.squerylrecord.RecordTypeMode._

import scala.xml.{NodeSeq, Text}

class CodeListItem private () extends Record[CodeListItem] with

  Entity[CodeListItem] {

  def meta = CodeListItem

  /** I18n flag for this item's name. */

  val i18n = new BooleanField(this)

  /** Default item flag. */

  val dflt = new BooleanField(this)

  /** Reference to code list id (enum id). */

  val codeListType = new IntField(this)

  override def toXHtml = Text(linkName)

}

object CodeListItem extends CodeListItem with MetaRecord[CodeListItem] with

  MetaEntity[CodeListItem] {

  def getTable = BaseSchema.codeListItems

  def items(codeListType: Int) = from(getTable) { cli =>

    where(cli.codeListType === codeListType)

    select(cli)

  }

  def defaultItem(codeListType: Int): Box[CodeListItem] =

    items(codeListType) find (_.dflt.get)

}

trait CodeList[T] {

  def items: Iterable[T]

  def defaultItem: Box[T]

  def item(id: Long): Box[T]

}

  def item(id: Long) = CodeListItem.findByKey(id) map (tr(_))

}

import net.liftweb.http.SHtml

import net.liftweb.util.Helpers._

class CodeListItemField[T, OwnerType <: Record[OwnerType]](own: OwnerType,

  Converter0[Box[T]] {

  def item: Box[CodeListItem] = CodeListItem.findByKey(get)

  override def defaultValueBox: Box[Long] =

  override def toXHtml = item map { _.toXHtml } openOr NodeSeq.Empty

  protected def buildDisplayList: List[(Long, String)] =

      (i.id, i.linkName)

    }

  private def elem = SHtml.selectObj[Long](buildDisplayList, Full(get),

    set(_)) % ("tabindex" -> tabIndex.toString)

  override def toForm: Box[NodeSeq] = uniqueFieldId match {

    case Full(id) => Full(elem % ("id" -> id))

    case _ => Full(elem)

  }

}

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