/*
 * $Id$
 *
 * Copyright (c) 2002-2014, Universite catholique de Louvain (UCL), Belgium
 * Copyright (c) 2002-2014, Professor Benoit Macq
 * Copyright (c) 2010-2011, Kaori Hagihara
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "placeholder_manager.h"
#include "opj_inttypes.h"

#ifdef SERVER
#include "fcgi_stdio.h"
#define logstream FCGI_stdout
#else
#define FCGI_stdout stdout
#define FCGI_stderr stderr
#define logstream stderr
#endif /*SERVER*/



placeholderlist_param_t * gene_placeholderlist(void)
{
  placeholderlist_param_t *list;

  list = (placeholderlist_param_t *)malloc( sizeof(placeholderlist_param_t));
  
  list->first = NULL;
  list->last  = NULL;

  return list;
}

void delete_placeholderlist( placeholderlist_param_t **list)
{
  placeholder_param_t *ptr, *next;

  if(!(*list))
    return;

  ptr = (*list)->first;
  
  while( ptr){
    next=ptr->next;
    delete_placeholder( &ptr);
    ptr=next;
  }
  free( *list);
}

placeholder_param_t * gene_placeholder( box_param_t *box, Byte8_t origID)
{
  placeholder_param_t *placeholder;

  placeholder = (placeholder_param_t *)malloc( sizeof(placeholder_param_t));
  
  strncpy( placeholder->TBox, "phld", 4);
  placeholder->Flags = 1; /* only the access to the original contents of this box, for now */
  placeholder->OrigID = origID;
  placeholder->OrigBH = fetch_headbytes( box);
  placeholder->OrigBHlen = box->headlen;
  placeholder->LBox = 20+(Byte4_t)box->headlen;
  placeholder->next = NULL;

  return placeholder;
}

void delete_placeholder( placeholder_param_t **placeholder)
{
  if( (*placeholder)->OrigBH)
    free((*placeholder)->OrigBH);
  free(*placeholder);
}

void insert_placeholder_into_list( placeholder_param_t *phld, placeholderlist_param_t *phldlist)
{
  if( phldlist->first)
    phldlist->last->next = phld;
  else
    phldlist->first = phld;
  phldlist->last = phld;
}

void print_placeholder( placeholder_param_t *phld)
{
  int i;

  fprintf( logstream, "placeholder info:\n");
  fprintf( logstream, "\t LBox: %d %#x\n", phld->LBox, phld->LBox);
  fprintf( logstream, "\t TBox: %.4s\n", phld->TBox);
  fprintf( logstream, "\t Flags: %#x %#x\n", phld->Flags, phld->Flags);
  fprintf( logstream, "\t OrigID: %" PRId64 "\n", phld->OrigID);
  fprintf( logstream, "\t OrigBH: ");
  
  for( i=0; i< phld->OrigBHlen; i++)
    fprintf( logstream, "%02x ", phld->OrigBH[i]);
  fprintf( logstream, "\t");

  for( i=0; i< phld->OrigBHlen; i++)
    fprintf( logstream, "%c", phld->OrigBH[i]);
  fprintf( logstream, "\n");
}

void print_allplaceholder( placeholderlist_param_t *list)
{
  placeholder_param_t *ptr;

  if( !list)
    return;
  
  fprintf( logstream, "all placeholder info: \n");
  ptr = list->first;
  while( ptr != NULL){
    print_placeholder( ptr);
    ptr=ptr->next;
  }
}
