/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/* This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this
 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
#include "prmem.h"
#include "plstr.h"
#include "prlog.h"
#include "prio.h"
#include "mimecont.h"
#include "nsMimeStringResources.h"

#define MIME_SUPERCLASS mimeObjectClass
MimeDefClass(MimeContainer, MimeContainerClass, mimeContainerClass,
             &MIME_SUPERCLASS);

static int MimeContainer_initialize(MimeObject*);
static void MimeContainer_finalize(MimeObject*);
static int MimeContainer_add_child(MimeObject*, MimeObject*);
static int MimeContainer_parse_eof(MimeObject*, bool);
static int MimeContainer_parse_end(MimeObject*, bool);
static bool MimeContainer_displayable_inline_p(MimeObjectClass* clazz,
                                               MimeHeaders* hdrs);

#if defined(DEBUG) && defined(XP_UNIX)
static int MimeContainer_debug_print(MimeObject*, PRFileDesc*, int32_t depth);
#endif

static int MimeContainerClassInitialize(MimeContainerClass* clazz) {
  MimeObjectClass* oclass = (MimeObjectClass*)&clazz->object;

  NS_ASSERTION(!oclass->class_initialized,
               "1.1 <rhp@netscape.com> 19 Mar 1999 12:00");
  oclass->initialize = MimeContainer_initialize;
  oclass->finalize = MimeContainer_finalize;
  oclass->parse_eof = MimeContainer_parse_eof;
  oclass->parse_end = MimeContainer_parse_end;
  oclass->displayable_inline_p = MimeContainer_displayable_inline_p;
  clazz->add_child = MimeContainer_add_child;

#if defined(DEBUG) && defined(XP_UNIX)
  oclass->debug_print = MimeContainer_debug_print;
#endif
  return 0;
}

static int MimeContainer_initialize(MimeObject* object) {
  /* This is an abstract class; it shouldn't be directly instantiated. */
  NS_ASSERTION(object->clazz != (MimeObjectClass*)&mimeContainerClass,
               "1.1 <rhp@netscape.com> 19 Mar 1999 12:00");

  return ((MimeObjectClass*)&MIME_SUPERCLASS)->initialize(object);
}

static void MimeContainer_finalize(MimeObject* object) {
  MimeContainer* cont = (MimeContainer*)object;

  /* Do this first so that children have their parse_eof methods called
   in forward order (0-N) but are destroyed in backward order (N-0)
   */

  /* If we're being destroyed, prior to deleting any data, mark
   * flush data in all children and mark them as closed, to avoid
   * flushing during subsequent mime_free of the children.
   * This also helps if this (parent) object is already marked as
   * closed, but a child is not yet marked as closed.
   */
  ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_eof(object, true);
  if (cont->children) {
    int i;
    for (i = 0; i < cont->nchildren; i++) {
      MimeObject* kid = cont->children[i];
      if (kid && !kid->closed_p) {
        kid->clazz->parse_eof(kid, true);
      }
    }
  }

  if (!object->parsed_p) object->clazz->parse_end(object, false);

  if (cont->children) {
    int i;
    for (i = cont->nchildren - 1; i >= 0; i--) {
      MimeObject* kid = cont->children[i];
      if (kid) mime_free(kid);
      cont->children[i] = 0;
    }
    PR_FREEIF(cont->children);
    cont->nchildren = 0;
  }
  ((MimeObjectClass*)&MIME_SUPERCLASS)->finalize(object);
}

static int MimeContainer_parse_eof(MimeObject* object, bool abort_p) {
  MimeContainer* cont = (MimeContainer*)object;
  int status;

  /* We must run all of this object's parent methods first, to get all the
   data flushed down its stream, so that the children's parse_eof methods
   can access it.  We do not access *this* object again after doing this,
   only its children.
   */
  status = ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_eof(object, abort_p);
  if (status < 0) return status;

  if (cont->children) {
    int i;
    for (i = 0; i < cont->nchildren; i++) {
      MimeObject* kid = cont->children[i];
      if (kid && !kid->closed_p) {
        int lstatus = kid->clazz->parse_eof(kid, abort_p);
        if (lstatus < 0) return lstatus;
      }
    }
  }
  return 0;
}

static int MimeContainer_parse_end(MimeObject* object, bool abort_p) {
  MimeContainer* cont = (MimeContainer*)object;
  int status;

  /* We must run all of this object's parent methods first, to get all the
   data flushed down its stream, so that the children's parse_eof methods
   can access it.  We do not access *this* object again after doing this,
   only its children.
   */
  status = ((MimeObjectClass*)&MIME_SUPERCLASS)->parse_end(object, abort_p);
  if (status < 0) return status;

  if (cont->children) {
    int i;
    for (i = 0; i < cont->nchildren; i++) {
      MimeObject* kid = cont->children[i];
      if (kid && !kid->parsed_p) {
        int lstatus = kid->clazz->parse_end(kid, abort_p);
        if (lstatus < 0) return lstatus;
      }
    }
  }
  return 0;
}

static int MimeContainer_add_child(MimeObject* parent, MimeObject* child) {
  MimeContainer* cont = (MimeContainer*)parent;
  MimeObject **old_kids, **new_kids;

  NS_ASSERTION(parent && child, "1.1 <rhp@netscape.com> 19 Mar 1999 12:00");
  if (!parent || !child) return -1;

  old_kids = cont->children;
  new_kids =
      (MimeObject**)PR_MALLOC(sizeof(MimeObject*) * (cont->nchildren + 1));
  if (!new_kids) return MIME_OUT_OF_MEMORY;

  if (cont->nchildren > 0)
    memcpy(new_kids, old_kids, sizeof(MimeObject*) * cont->nchildren);
  new_kids[cont->nchildren] = child;
  PR_Free(old_kids);
  cont->children = new_kids;
  cont->nchildren++;

  child->parent = parent;

  /* Copy this object's options into the child. */
  child->options = parent->options;

  return 0;
}

static bool MimeContainer_displayable_inline_p(MimeObjectClass* clazz,
                                               MimeHeaders* hdrs) {
  return true;
}

#if defined(DEBUG) && defined(XP_UNIX)
static int MimeContainer_debug_print(MimeObject* obj, PRFileDesc* stream,
                                     int32_t depth) {
  MimeContainer* cont = (MimeContainer*)obj;
  int i;
  char* addr = mime_part_address(obj);
  for (i = 0; i < depth; i++) PR_Write(stream, "  ", 2);
  /*
  PR_Write(stream, "<%s %s (%d kid%s) 0x%08X>\n",
      obj->clazz->class_name,
      addr ? addr : "???",
      cont->nchildren, (cont->nchildren == 1 ? "" : "s"),
      (uint32_t) cont);
  */
  PR_FREEIF(addr);

  /*
    if (cont->nchildren > 0)
    fprintf(stream, "\n");
   */

  for (i = 0; i < cont->nchildren; i++) {
    MimeObject* kid = cont->children[i];
    int status = kid->clazz->debug_print(kid, stream, depth + 1);
    if (status < 0) return status;
  }

  /*
    if (cont->nchildren > 0)
    fprintf(stream, "\n");
   */

  return 0;
}
#endif