/* id.c : operations on node-revision IDs
 *
 * ====================================================================
 * Copyright (c) 2000-2004 CollabNet.  All rights reserved.
 *
 * This software is licensed as described in the file COPYING, which
 * you should have received as part of this distribution.  The terms
 * are also available at http://subversion.tigris.org/license-1.html.
 * If newer versions of this license are posted there, you may use a
 * newer version instead, at your option.
 *
 * This software consists of voluntary contributions made by many
 * individuals.  For exact contribution history, see the revision
 * history and logs, available at http://subversion.tigris.org/.
 * ====================================================================
 */

#include <string.h>
#include <stdlib.h>

#include "id.h"
#include "../libsvn_fs/fs-loader.h"



typedef struct {
  const char *node_id;
  const char *copy_id;
  const char *txn_id;
} id_private_t;


/* Accessing ID Pieces.  */

const char *
svn_fs_base__id_node_id (const svn_fs_id_t *id)
{
  id_private_t *pvt = id->fsap_data;

  return pvt->node_id;
}


const char *
svn_fs_base__id_copy_id (const svn_fs_id_t *id)
{
  id_private_t *pvt = id->fsap_data;

  return pvt->copy_id;
}


const char *
svn_fs_base__id_txn_id (const svn_fs_id_t *id)
{
  id_private_t *pvt = id->fsap_data;

  return pvt->txn_id;
}


svn_string_t *
svn_fs_base__id_unparse (const svn_fs_id_t *id,
                         apr_pool_t *pool)
{
  id_private_t *pvt = id->fsap_data;

  return svn_string_createf (pool, "%s.%s.%s",
                             pvt->node_id, pvt->copy_id, pvt->txn_id);
}


/*** Comparing node IDs ***/

svn_boolean_t
svn_fs_base__id_eq (const svn_fs_id_t *a,
                    const svn_fs_id_t *b)
{
  id_private_t *pvta = a->fsap_data, *pvtb = b->fsap_data;

  if (a == b)
    return TRUE;
  if (strcmp (pvta->node_id, pvtb->node_id) != 0)
     return FALSE;
  if (strcmp (pvta->copy_id, pvtb->copy_id) != 0)
    return FALSE;
  if (strcmp (pvta->txn_id, pvtb->txn_id) != 0)
    return FALSE;
  return TRUE;
}


svn_boolean_t
svn_fs_base__id_check_related (const svn_fs_id_t *a,
                               const svn_fs_id_t *b)
{
  id_private_t *pvta = a->fsap_data, *pvtb = b->fsap_data;

  if (a == b)
    return TRUE;

  return (strcmp (pvta->node_id, pvtb->node_id) == 0) ? TRUE : FALSE;
}


int
svn_fs_base__id_compare (const svn_fs_id_t *a,
                         const svn_fs_id_t *b)
{
  if (svn_fs_base__id_eq (a, b))
    return 0;
  return (svn_fs_base__id_check_related (a, b) ? 1 : -1);
}



/* Creating ID's.  */

static id_vtable_t id_vtable = {
  svn_fs_base__id_unparse,
  svn_fs_base__id_compare
};


svn_fs_id_t *
svn_fs_base__id_create (const char *node_id,
                        const char *copy_id,
                        const char *txn_id,
                        apr_pool_t *pool)
{
  svn_fs_id_t *id = apr_palloc (pool, sizeof (*id));
  id_private_t *pvt = apr_palloc (pool, sizeof (*pvt));

  pvt->node_id = apr_pstrdup (pool, node_id);
  pvt->copy_id = apr_pstrdup (pool, copy_id);
  pvt->txn_id = apr_pstrdup (pool, txn_id);
  id->vtable = &id_vtable;
  id->fsap_data = pvt;
  return id;
}


svn_fs_id_t *
svn_fs_base__id_copy (const svn_fs_id_t *id, apr_pool_t *pool)
{
  svn_fs_id_t *new_id = apr_palloc (pool, sizeof (*new_id));
  id_private_t *new_pvt = apr_palloc (pool, sizeof (*new_pvt));
  id_private_t *pvt = id->fsap_data;

  new_pvt->node_id = apr_pstrdup (pool, pvt->node_id);
  new_pvt->copy_id = apr_pstrdup (pool, pvt->copy_id);
  new_pvt->txn_id = apr_pstrdup (pool, pvt->txn_id);
  new_id->vtable = &id_vtable;
  new_id->fsap_data = new_pvt;
  return new_id;
}


svn_fs_id_t *
svn_fs_base__id_parse (const char *data,
                       apr_size_t len,
                       apr_pool_t *pool)
{
  svn_fs_id_t *id;
  id_private_t *pvt;
  char *data_copy, *str, *last_str;

  /* Dup the ID data into POOL.  Our returned ID will have references
     into this memory. */
  data_copy = apr_pstrmemdup (pool, data, len);

  /* Alloc a new svn_fs_id_t structure. */
  id = apr_palloc (pool, sizeof (*id));
  pvt = apr_palloc (pool, sizeof (*pvt));
  id->vtable = &id_vtable;
  id->fsap_data = pvt;

  /* Now, we basically just need to "split" this data on `.'
     characters.  We will use apr_strtok, which will put terminators
     where each of the '.'s used to be.  Then our new id field will
     reference string locations inside our duplicate string.*/

  /* Node Id */
  str = apr_strtok (data_copy, ".", &last_str);
  if (str == NULL)
    return NULL;
  pvt->node_id = str;

  /* Copy Id */
  str = apr_strtok (NULL, ".", &last_str);
  if (str == NULL)
    return NULL;
  pvt->copy_id = str;

  /* Txn Id */
  str = apr_strtok (NULL, ".", &last_str);
  if (str == NULL)
    return NULL;
  pvt->txn_id = str;

  return id;
}
