ftp.nice.ch/pub/next/games/network/NeXTGo.2.7.NIHS.bs.gnutar.gz#/NeXTGo/godict.c

This is godict.c in view mode; [Download] [Up]

#include "comment.header"

/* $Id: godict.c,v 1.3 1997/07/06 19:35:01 ergo Exp $ */

/*
 * $Log: godict.c,v $
 * Revision 1.3  1997/07/06 19:35:01  ergo
 * actual version
 *
 * Revision 1.2  1997/05/04 18:57:05  ergo
 * added time control for moves
 *
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "godict.h"

#define LANGENTRY(line,label)    (!strncmp(line,label,strlen(label)))

#ifndef _TEST_COMPILE_
extern int NXRunAlertPanel(const char *title, const char *msg, const char *defaultButton, const char *alternateButton, const char *otherButton, ...);
#endif

#ifdef _DEBUG_DICT_
FILE *dump;
#endif

GODICT* load_dict(char* filename)
{
  FILE *godictfile;
  GODICT *d, *dp, *d_old;
  char line[MAXDICTLINE];
  int linenr = 0;

  dp = NULL;
  d = NULL;

#ifdef _DEBUG_DICT_
  dump = fopen("debug.dict","w");
#endif

  if ((godictfile = fopen(filename,"r")) == NULL)
    {
      return NULL;
    }

  while (fgets(line, MAXDICTLINE, godictfile) != NULL)
    {
      char *newline;

      linenr++;
      if ((newline = strchr(line, '\n')) != (char *)0) *newline = 0;
      if ((newline = strchr(line, '\r')) != (char *)0) *newline = 0;

      if ((*line == 0) || (*line == COMMENT)) continue;

      if (strlen(line) < strlen(RD_CD))
	{
	  char s[80];

	  sprintf(s, "There is a bad entry on line %d.", linenr);
#ifndef _TEST_COMPILE_
	  NXRunAlertPanel("NeXTGo Dictionary", s, "OK", 0, 0);
#endif
	}
      else if (strncmp(line, RD_CD, strlen(RD_CD)) == 0)
	{
	  d_old = d;
	  d = (GODICT *) malloc(sizeof(GODICT));
	  d->dct_jp = NULL;
	  d->dct_ch = NULL;
	  d->dct_rk = NULL;
	  d->dct_gb = NULL;
	  d->dct_nl = NULL;
	  d->dct_ge = NULL;
	  d->dct_fr = NULL;
	  d->dct_sv = NULL;
	  d->dct_dg = NULL;
	  d->dct_cp = NULL;

	  if (dp == NULL)
	    {
	      dp = d;
	    }
	  else
	    {
	      d_old->dct_next = d;
	    }

	  switch (*(line+strlen(RD_CD)))
	    {
	    case 'n':  d->dct_type = CD_NAME;
	      break;
	    case 'c':  d->dct_type = CD_CHAM;
	      break;
	    case 't':  d->dct_type = CD_TECH;
	      break;
	    case 'p':  d->dct_type = CD_POLI;
	      break;
	    case 'd':  d->dct_type = CD_DIGI;
	      break;
	    default:  d->dct_type = CD_MISC;
	      break;
	    }
	}
      else if LANGENTRY(line,RD_JP)
	{
	  store_dict(&(d->dct_jp), line+strlen(RD_JP));
	}
      else if LANGENTRY(line,RD_CH)
	{
	  store_dict(&(d->dct_ch), line+strlen(RD_CH));
	}
      else if LANGENTRY(line,RD_RK)
	{
	  store_dict(&(d->dct_rk), line+strlen(RD_RK));
	}
      else if LANGENTRY(line,RD_GB)
	{
	  store_dict(&(d->dct_gb), line+strlen(RD_GB));
	}
      else if LANGENTRY(line,RD_NL)
	{
	  store_dict(&(d->dct_nl), line+strlen(RD_NL));
	}
      else if LANGENTRY(line,RD_GE)
	{
	  store_dict(&(d->dct_ge), line+strlen(RD_GE));
	}
      else if LANGENTRY(line,RD_FR)
	{
	  store_dict(&(d->dct_fr), line+strlen(RD_FR));
	}
      else if LANGENTRY(line,RD_SV)
	{
	  store_dict(&(d->dct_sv), line+strlen(RD_SV));
	}
      else if LANGENTRY(line,RD_DG)
	{
	  store_dict(&(d->dct_dg), line+strlen(RD_DG));
	}
      else if LANGENTRY(line,RD_CP)
	{
	  store_dict(&(d->dct_cp), line+strlen(RD_CP));
	}

    }

  fclose(godictfile);
  return dp;
}

void store_dict(char **f, char *s)
{
  int more = (*f != NULL);
  long needed = strlen(s) + 1;

  if (!*s) return;

  if (more)
    {
      needed += strlen(*f) + 1;
      *f = (char *) realloc(*f, needed);
    }
  else
    {
      *f = (char *) malloc(needed);
    }

  if (more)
    {
      strcat(*f, "\n");
      strcat(*f, lstr(s));
    }
  else
    {
      strcpy(*f, lstr(s));
    }
#ifdef _DEBUG_DICT_
  fprintf(dump,"Added:  %s",s);
#endif
}

char* lstr(char *s)
{
  char *t;

  for (t = s; *t; t++)
    if (isupper(*t))
      *t = tolower(*t);

  return s;
}

int substr(char s[], char sub_s[])
{
  int i, j, k;

  if (s == NULL || sub_s == NULL)
    return 0;

  if (strlen(s) < strlen(sub_s))
    return 0;

  for (i = 0; i < strlen(s) - strlen(sub_s); i++)
    {
      k = 1;
      for (j = 0; (j < strlen(sub_s)) && k; j++)
	{
	  if (sub_s[j] != s[i+j]) k = 0;
	}
      if (k)
	{
	  return 1;
	}
    }

  return 0;
}

int termtypes, languages;

GODICT* search_dict(GODICT* gd, char* term)
{
  GODICT *d;
  char s[80];

  d = gd;
  term = lstr(term);
  sprintf(s,"Starting search for %s.",term);
  while (d != NULL)
    {
      if (d->dct_type & termtypes)
	{
	  if ((languages & (LANG_JP)) && d->dct_jp && strstr(d->dct_jp,term))
	    return d;
	  if ((languages & (LANG_CH)) && d->dct_ch && strstr(d->dct_ch,term))
	    return d;
	  if ((languages & (LANG_RK)) && d->dct_rk && strstr(d->dct_rk,term))
	    return d;
	  if ((languages & (LANG_GB)) && d->dct_gb && strstr(d->dct_gb,term))
	    return d;
	  if ((languages & (LANG_NL)) && d->dct_nl && strstr(d->dct_nl,term))
	    return d;
	  if ((languages & (LANG_GE)) && d->dct_ge && strstr(d->dct_ge,term))
	    return d;
	  if ((languages & (LANG_FR)) && d->dct_fr && strstr(d->dct_fr,term))
	    return d;
	  if ((languages & (LANG_SV)) && d->dct_sv && strstr(d->dct_sv,term))
	    return d;
	  if ((languages & (LANG_DG)) && d->dct_dg && strstr(d->dct_dg,term))
	    return d;
	  if ((languages & (LANG_CP)) && d->dct_cp && strstr(d->dct_cp,term))
	    return d;
	}
      d = d->dct_next;
    }

  return NULL;
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Marcel Waldvogel and Netfuture.ch.