tabler Code

/* strregtok.c:  Implementation of regexp seperated string tokenizer.
 *
 * This file is part of tabler.
 * Copyright (C) 2007 Heath Caldwell
 *
 * 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; see the file COPYING.  If not, write to
 * The Free Software Foundation, Inc.
 * 59 Temple Place, Suite 330
 * Boston, MA 02111 USA
 *
 * You may contact the author by:
 * e-mail:  Heath Caldwell <hncaldwell@csupomona.edu>
 */

#include <stdlib.h>
#include <stdio.h>
#include <regex.h>
#include "conf.h"
#include "strregtok.h"

/* strregtok
 *
 * Breaks a string up into tokens seperated by a regex seperator.
 * Works just like strtok but you use a regex_t for the seperator
 * instead of a string of single character delimiters.
 *
 * Takes:  string:  Pointer to the string to be tokenized.
 *                  NOTE:  This string will get clobbered.
 *         seperator:  regex_t of a compiled regex to use
 *                     as the seperator.
 *
 * Returns:  Pointer to next token or null if there are no more.
 *           See documenation for strtok.
 *
 * Internal Variables:
 *     _strregtok_previous_end:  Stores end of previous token.
 */
char *
strregtok(char *string, const regex_t *seperator)
{
	char error_string[ERROR_STRING_LENGTH];
	regmatch_t match[1];  /* To store the matching part. */
	int error = 0;

	/* Return zero for the call after the last token. */
	if(!string && !_strregtok_previous_end) return 0;

	if(string)
		_strregtok_previous_end = string;
	else
		string = _strregtok_previous_end;

	error = regexec(seperator, string, 1, match, 0);

	if(!error) {
		_strregtok_previous_end = string + match[0].rm_eo;
		*(string + match[0].rm_so) = '\0';
		return string;
	} else if(error == REG_NOMATCH) {
		/* This is the last token. */
		_strregtok_previous_end = 0;
		return string;
	} else {
		regerror(error, seperator, error_string, ERROR_STRING_LENGTH);
		fprintf(stderr, "Error:  %s\n", error_string);
		exit(EXIT_FAILURE);
	}
}