/* char **split(char *string, char *sep);
   Coded by Binary_Death on 30/6/2011
*/
#include <stdlib.h>
#include <stdio.h>
typedef struct {
        char **substring_ptr;
        int number_of_substrings;
} split_struct;
split_struct* split(char*,char*);
int _strlen(char*);
int _cmp(char*,char*,int);
int main() {
    split_struct *str;
    str = split("STRING1#DLM#STRING2#DLM#STRING3","#DLM#");
    for(int y=0;y<str->number_of_substrings;y++) 
    {printf("%s\n", str->substring_ptr[y]);}
    getchar();
    return 0;
}
split_struct *split(char *string,char *sep) {
     split_struct *retvalue;
     retvalue = (split_struct*)malloc(sizeof(split_struct));
     int str_len=_strlen(string);
     int sep_len=_strlen(sep);
     int ptr_block=0, chr=0, bool_end=0;
     char **buffer = (char**)malloc(sizeof(char*));
     *buffer = (char*)malloc(sizeof(char*));**buffer=0;
     char *tok = (char*)malloc(sep_len*sizeof(char));
     for(int z=0;z<str_len;z++) {
             for(int n=0;n<sep_len&&!bool_end;n++)
             tok[n]=(z+n<str_len)?string[z+n]:bool_end=1;
             if(_cmp(tok,sep,sep_len)||bool_end) {
                                  buffer[ptr_block][chr++] = string[z];
                                  buffer[ptr_block] = (char*)realloc(buffer[ptr_block],chr*sizeof(char*));
                                  buffer[ptr_block][chr] = 0;
                                   } else {
                                          buffer = (char**)realloc(buffer,(++ptr_block+1)*sizeof(char*));
                                          buffer[ptr_block] = (char*)malloc(sizeof(char*));**(buffer+ptr_block)=0;
                                          chr=0;z+=sep_len-1;
                                   }                           
    }
free(tok);
retvalue->substring_ptr = buffer;
retvalue->number_of_substrings = ptr_block+1;
return retvalue;
}
int _strlen(char *pstr) {
    int i=0;
    while(*(pstr++)!='\0') i++;
    return i;
}
int _cmp(char *fstr,char *sstr, int len) {
    int bytes=0;
    while(bytes++<len) if(*(fstr++)!=*(sstr++)) return 1;
    return 0;
}
 

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
char **split(char const *linea, char const *sep);
 
int main(void)
{
   char **p;
   char **q;
 
   p = split("STRING1#DLM#STRING2#DLM#STRING3", "#DLM#");
 
   for (q = p; *q != NULL; q++){
      puts(*q);
      free(*q);
   }
   free(p);
 
   return EXIT_SUCCESS;
}
 
char **split(char const *linea, char const *sep)
{
   char **p;
   char const *a;
   char const *b;
   int i;
 
   p = malloc((strlen(linea) / 2 + 2) * sizeof *p);
 
   i = 0;
   a = linea;
   while ((b = strstr(a, sep)) != NULL){
      if (b != a){
         p[i] = malloc(b - a + 1);
         strncpy(p[i], a, b - a);
         i++;
      }
 
      a = b + strlen(sep);
   }
   if (*a != '\0'){
      p[i] = malloc(strlen(a) + 1);
      strcpy(p[i], a);
      i++;
   }
   p[i++] = NULL;
 
   p = realloc(p, i * sizeof *p);
   return p;
}