/*This program should program the SanDisk MMC
/*there is no bounds checking, so make sure that 
/*the size does not exceed the size of the MMC

/*The directory in which this program is run must contain
/*a file named tracks.lst
/*in addition to all of the files which are to be included on the MMC
/*tracks.lst will consist of the following format:
  <filename of track 1>
  <filename of track 2>
  <filename of track 3>
  			.
  			.
  			.
/******************************************************/

#include <iostream>
#include <stdio.h>
#include <stdlib.h>
#include <fstream>
#include <string.h>
#include "SPImaster.h"
#include "MMC.h"

using namespace std;


void main(void){
  char buffer[512];	//buffer of size BLOCK
  ifstream tracks("tracks.lst");	//track.lst  
  FILE *track, *tmp;
  char *file=new char(30);
  string filename;
  int address=512,size=0,count,MEMused,n;
  char temp;
  tmp=fopen("tmp.out","wb");
  
  if(!tracks.is_open()){
    cout<<"Could not open tracks.lst."<<endl;
    return;
  }
  cout<<"Opened tracks.lst."<<endl;
  for(int i=0;i<512;i++)	//clear buffer to start
    buffer[i]=0;
    
  count=0;//start by building table of contents
  while(!tracks.eof()){
    tracks>>filename;
    for(n=0;n<filename.length();n++)
      file[n]=filename[n];
    file[n]=0;
    size=0;
    track=fopen(file,"rb");	//open track i for input
    while(feof(track)==0){	//count the number of bytes
      temp=fgetc(track);
      size++;
    }
    size--;
    fclose(track);
    track=fopen(file,"rb");
    for(int i=0;i<size;i++){
      temp=fgetc(track);
      fputc(temp,tmp);
    }
    count++;
    for(int i=0;i<4;i++){
      buffer[(4*count-3)+i]=(char)(address>>(8*(3-i)));
      }
    address=address+size;    
  }
  buffer[0]=count;
  count++;
  for(int i=0;i<4;i++){
      buffer[(4*count-3)+i]=(char)(address>>(8*(3-i)));
      }
  MEMused=address;
  //TOC is completed
  track=fopen("TOC.txt","wb");
  for(int i=0;i<512;i++){
    fputc(buffer[i],track);
    }
  fclose(track);
  tracks.close();
  fclose(tmp);
  cout<<"TOC is complete."<<endl;
  
  //Initialize MMC so Data can be written  
  if(!InitMMC()){
    cout<<"Could not initialize MMC."<<endl;
    return;
  }
  //start by sending the TOC at address 0
  address=0;
  MMCwriteBlock(buffer,address);
 
  //now - get one block at a time from files
  //and send to MMC until we have expired data
  tmp=fopen("tmp.out","rb");
  while(address < MEMused-512){
    for(int i=0;i<512;i++){
      buffer[i]=fgetc(tmp);
      address++;
     }
  MMCwriteBlock(buffer,address);
  if(address%51200==0){
    cout<<".";
   }
 }
 fclose(tmp); 
 cout<<"DONE! SUCCESS!"<<endl;
}