/* This code is MODIFIED from the original source distribution, originally by
   M. Collins (1999).  The original documentation is contained below.
   
   The modifications to this file are by Min-Yen Kan, and are also distributed 
   under GNU GPL license, see below or the GNU GPL License included with the 
   distribution.

   The modifications enable the parser to work as a daemon, see the distributed
   README-daemonCollins.html for details.
 */

/* This code is the statistical natural language parser described in

   M. Collins. 1999.  Head-Driven
   Statistical Models for Natural Language Parsing. PhD Dissertation,
   University of Pennsylvania.

   Copyright (C) 1999 Michael Collins

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include <assert.h>

#include "hash.h"

void hash_make_table(int size,hash_table *hash)
{
  int i;
  hash->table=(hash_node **) malloc(size*sizeof(hash_node*));
  hash->num=0;
  for(i=0;i<size;i++)
    hash->table[i]=NULL;
  hash->size=size;
}

/*adds a new element if not already there, or increments the old value
otherwise*/
int hash_add_element(key_type *key,hash_table *hash,int count)
{
  int pos;
  hash_node *h,*p;


  pos=hashval(key,hash->size);

  if(hash->table[pos]==NULL)
    {
      h=(hash_node*) mymalloc(sizeof(hash_node));

      hash->table[pos]=h;
      key_copy(&(h->key),key);
      h->count=count;
      h->next=NULL;
      return count;
    }    

  h=hash->table[pos];

  while(h!=NULL&&!key_equal(&h->key,key))
    {
      p=h;
      h=h->next;
    }
  if(h==NULL)
    {
      h=(hash_node*) mymalloc(sizeof(hash_node));
      p->next=h;
      key_copy(&(h->key),key);
      h->count=count;
      h->next=NULL;
      return count;
    }

  (h->count)+=count;
  return (h->count);
}


int hash_find_element(key_type *key,hash_table *hash)
{
  int pos;
  hash_node *h;


  pos=hashval(key,hash->size);

  if(hash->table[pos]==NULL)
    return 0;

  h=hash->table[pos];

  while(h!=NULL&&!key_equal(&h->key,key))
    h=h->next;

  if(h==NULL)
    return 0;

  return (h->count);
}