#include <stdio.h>
#include <stdlib.h>
#include <strings.h>

#define BSZ 256
#define MAXLINES 5000
#define READLEN 12


int *retData(int num, int offs, char *data, int delim, void *ptr) {
int *retarr = ptr;
char *read_d;

                    if (offs >= num) {return retarr;}
                    if (retarr == NULL) {retarr = malloc(num * sizeof(int)); bzero(retarr,num);}
 
                    
                    if ( (read_d = index(data,delim)) == NULL) {
                        sscanf(data,"%d",&retarr[offs]);
                        return retarr;
                    } else {
                        sscanf(data,"%d",&retarr[offs]);
                        data = read_d + 1;
                    }

                    printf("Debug: Returning data at %p = %d at iteration %d of %d\nData = %p = %s\n",&retarr[offs],retarr[offs],offs,num,data,data);
                    return retData(num,(offs + 1),data,delim,(void *)retarr);
}

int main(int argc, char **argv) {
int x = 0, n, g;
char buf[BSZ];
int *arr[MAXLINES];
FILE *fpt;

         if (argc != 2) {printf("Please specify a filename.\n"); return 1;}
         
         if ( (fpt = fopen(argv[1],"r")) == NULL) {
            printf("Could not access filename %s.\n",argv[1]);
            return 1;
         }

         while (fgets(buf,BSZ,fpt) != NULL) {
               arr[x++] = retData(READLEN,0,buf,',',NULL);
               printf("Node pointer at %p and returned pointer = %p\n",&arr[x],arr[x]);
               if (x == (MAXLINES - 1)) {break;}
         }
         fclose(fpt);

         for (n = 0 ; n < x ; n++) {
             printf("Array node pointer at %p.\n",&arr[n]);
                for (g = 0 ; g < READLEN ; g++) {
                     printf("Values stored at %p %d = %d\n",&arr[n],n,arr[n][g]);
                }
             free(arr[n]);
          }
          return 0;
}