/*

 * 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);

}