#include <stdint.h>
#include <stdio.h>
#include <unistd.h>
#include <fcntl.h>
#include <stdlib.h>
#include <string.h>

int main( int argc, char **args ) {
  char table[64], f[1024*1024];
  int  outfiles[64], i, base = 0, fixed_columns = 0;
  uint32_t *p = (uint32_t*)f;

  if( argc > 1 ) base = atoi( args[1] );
  if( argc > 2 ) fixed_columns = atoi( args[2] );

  /* No output file yet valid */
  for( i=0; i<64; ++i ) outfiles[i] = -1;

  while( fgets( table, sizeof(table), stdin ) ) {
    int file, strnr, columns, count;

    table[strlen(table)-1] = 0;

    {
      int f_in = open( table, O_RDONLY );
      if( f_in < 0  || read( f_in, f, sizeof(f)) <= 0 ) {
        fprintf( stderr, "Can not read file %s\n", table );
        exit(1);
      }
      close(f_in);
    }

    count = (int)*p,
    columns = fixed_columns ? fixed_columns : (int)p[1] / 4 - 1;

    for( file=0; file<columns; ++file ) {
      uint32_t off;

      /* Create outfile, if it is not yet there */
      if( outfiles[file] == -1 ) {
        sprintf( table, "%02d_unknown", file + base );
        outfiles[file] = open( table, O_WRONLY | O_APPEND | O_CREAT, 0644 );
        if ( outfiles[file] == -1 ) {
          fprintf( stderr, "Can not create output file %s\n", table );
          exit(1);
        }
      }

      off = p[file+1];
      /* Look for end of this chunk, which is <count> strings long */
      for( strnr=0; strnr < count; ++strnr ) { while( f[off++] ) {}; f[off-1] = '\n'; }
      write( outfiles[file], f + p[file+1], off - p[file+1] );
    }
  }

  for( i=0; i<64; ++i ) close( outfiles[i] );
  return 0;
}