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

// Read in strings from file
//
// This reads in huffman codes that have been generated using 
//
//  ~mackay/bin/huffman.p informativeoutput=0 lengthonly=1  < probs > symbolcode
// (a few header lines have to be deleted from the output file first)

int read_it_and_allocate(FILE *,char **,char **, int );

int main( int argc , char *argv[]  ){
  char **s , **t ; 
  int N = 1024 , Nread ; // maximum number of strings to read
  FILE *fp ; 

  // create memory for the pointers to the strings
  s = (char **) malloc( (unsigned) N*sizeof(char *) ) ;
  t = (char **) malloc( (unsigned) N*sizeof(char *) ) ;
  fp = fopen( "/home/mackay/compress/octave/symbolcode" , "r" ) ;
  if(fp) {
    Nread = read_it_and_allocate( fp , s , t ,  N ) ;
  }
  fclose(fp);
  return(0);
}

int read_it_and_allocate( FILE *fp , char **s , char **t , int N ) {
  char st[800] ; // temporary storage string
  int ls, lt,i;
  
  for(i=0;i<N;i++) {
    // read in the source block and the length of the transmitted block
    if ( fscanf(fp,"%s %d", st ,  &lt) ) { 
      ls = strlen(st) ;    // find the length of the string.
                          // allocate right amount of memory for s
      s[i]=(char *)malloc((unsigned) (ls+1)*sizeof(char));
      strcpy( s[i] , st ) ;   // copy into permanent location.
                             // allocate right amount of memory for t
      t[i]=(char *)malloc((unsigned) (lt+1)*sizeof(char));
      fscanf(fp,"%s", t[i] ); // read in the transmitted block
                             // report what we have done.
      printf( "s[%d]=%s. encodes with l=%d: %s\n", i , s[i] , lt , t[i] ) ;
    }
  }
  return i ;
}