/*

 * Copyright 2012 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.fs.ui

import fis.base.ui._

import fis.fs.model._

import net.liftweb.common._

import net.liftweb.http._

import net.liftweb.util._

import net.tz.lift.model._

abstract class AttachmentForm extends HorizontalScreen with CancelButton with

  SaveButton with AttachmentCrud {

  protected object attachment extends ScreenVar[Attachment](

    Attachment.createRecord)

  override def hasUploadField = true

  protected val file = makeField[Box[FileParamHolder], Nothing](l10n("File"),

    Empty, field => SHtml.fileUpload(fph => field.set(Full(fph))),

    NothingOtherValueInitializer)

  protected def onSuccess(a: Attachment): Unit

  def finish() { for {

    fph <- file.get

    a1 <- attachment.store(fph)

    a2 <- save(a1)

  } {

    onSuccess(a2)

  }}

}

abstract class DeleteAttachmentForm extends HorizontalScreen with CancelButton

  with DeleteButton with AttachmentCrud {

  protected def getAttachment: Box[Attachment]

  val confirm = field(l10n("Really delete this attachment?"), false)

  protected def onSuccess(objectDeleted: Boolean, contentRemoved: Boolean): Unit

  def finish() {

    for {

      a <- getAttachment if confirm

      r <- delete(a)

      rm <- a.remove

    } {

      onSuccess(r, rm)

    }

  }

}

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