/*

  * Copyright (C) 2009, 2014  J. Ali Harlow <ali@juiblex.co.uk>

  *

  * 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.,

  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

  */

 #include <stdlib.h>

 #include <string.h>

 #include "config.h"

 #include "plover.h"

 struct plover_vector *plover_vector_new(void)

 {

     struct plover_vector *vector;

     vector=malloc(sizeof(*vector));

     vector->len=0;

     vector->alloc=16;

     vector->strings=calloc(vector->alloc,sizeof(char *));

     return vector;

 }

 struct plover_vector *plover_vector_dup(struct plover_vector *old)

 {

     int i;

     struct plover_vector *vector;

     vector=malloc(sizeof(*vector));

     vector->len=old->len;

     vector->alloc=old->alloc;

     vector->strings=calloc(vector->alloc,sizeof(char *));

     for(i=0;i<old->len;i++)

 	vector->strings[i]=strdup(old->strings[i]);

     vector->strings[i]=NULL;

     return vector;

 }

 void plover_vector_append(struct plover_vector *vector,const char *str)

 {

     if (++(vector->len)>=vector->alloc)

     {

 	vector->alloc*=2;

 	vector->strings=realloc(vector->strings,vector->alloc*sizeof(char *));

     }

     vector->strings[vector->len-1]=strdup(str);

     vector->strings[vector->len]=NULL;

 }

 int plover_vector_contains(struct plover_vector *vector,const char *str)

 {

     int i;

     for(i=0;i<vector->len;i++)

 	if (!strcmp(vector->strings[i],str))

 	    return 1;

     return 0;

 }

 int plover_vector_remove(struct plover_vector *vector,const char *str)

 {

     int i;

     for(i=0;i<vector->len;i++)

 	if (!strcmp(vector->strings[i],str))

 	{

 	    free(vector->strings[i]);

 	    vector->len--;

 	    vector->strings[i]=vector->strings[vector->len];

 	    vector->strings[vector->len]=NULL;

 	    return 1;

 	}

     return 0;

 }

 static int string_compar(const void *p1,const void *p2)

 {

     return strcmp(*(char * const *)p1,*(char * const *)p2);

 }

 void plover_vector_sort(struct plover_vector *vector)

 {

     qsort(vector->strings,vector->len,sizeof(char *),string_compar);

 }

 char *plover_vector_format_for_display(struct plover_vector *vector)

 {

     int i,len;

     char *s,*p;

     if (!vector->len)

 	return strdup("none");

     else if (vector->len==1)

 	return strdup(vector->strings[0]);

     else

     {

 	len=(vector->len-1)*2+5+1;

 	for(i=0;i<vector->len;i++)

 	    len+=strlen(vector->strings[i]);

 	s=malloc(len);

 	strcpy(s,vector->strings[0]);

 	p=s+strlen(s);

 	for(i=1;i<vector->len-1;i++)

 	{

 	    *p++=',';

 	    *p++=' ';

 	    strcpy(p,vector->strings[i]);

 	    p+=strlen(p);

 	}

 	strcpy(p," and ");

 	p+=5;

 	strcpy(p,vector->strings[i]);

 	return s;

     }

 }

 void plover_vector_free(struct plover_vector *vector)

 {

     int i;

     for(i=0;i<vector->len;i++)

 	free(vector->strings[i]);

     free(vector->strings);

     free(vector);

 }