#define _MAXTEAMS 10
#define _MAXGAMES 5
#define _MONTHS 13
#define _DAYS 32

#include <string>
#include <iostream>
#include <fstream>

using namespace std;
typedef ifstream team_schedules[_MAXTEAMS];
struct date{ int m;int d; int y;};
struct game{date d;
//            string h;
//            string v;};
            int h;
			int v;};

typedef game schedule[_MONTHS][_DAYS][_MAXGAMES];
typedef int sch_count[_MONTHS][_DAYS];


//***************Prototypes************************
bool isleap(date d);
int doy(date d);
int datediff(date a, date b);
string date2str(date d);
date str2date(string s);
date nextdate(date o);
void open_files(ifstream&, team_schedules, int&,      string[]);
//              inifile    files           team_count team_abbr
void print_sch(schedule, sch_count,ofstream& of);
//             s         s_c 
void load_ini(int&,      int&,        int&,     ifstream&, int&);
//            team_count gamesperteam leaguemax inifile    MAX_GM
void clr_s_c(sch_count s_c);
void chk_s_c(const sch_count);
//                 s_c
void clr_sch(schedule);
//           s
void load_sch(int, team_schedules, sch_count, int   ,int,  string[],schedule);
//        leaguemax files         s_c        MAX_GM team_count abbr s
//***************Prototypes************************

int main()
{
 ifstream inifile;
 ofstream of;
 of.open("10teams.out");
 schedule s;
 sch_count s_c;
 int team_count,leaguemax, MAX_GM, gamesperteam;
 team_schedules files;
 string team_abbr[_MAXTEAMS];

 load_ini(team_count,gamesperteam,leaguemax,inifile,MAX_GM);
 open_files(inifile,files,team_count,team_abbr);
 clr_sch(s);
 clr_s_c(s_c);
 chk_s_c(s_c);
 load_sch(leaguemax,files,s_c,MAX_GM,team_count,team_abbr,s);
 
 chk_s_c(s_c);

 print_sch(s,s_c,of);

 return 0;
} 

void load_ini(int &team_count,int &gamesperteam,int &leaguemax,
   ifstream& inifile,int& MAX_GM)
{
  inifile.open("games.ini");
  if (!inifile)
  {
	  cout<<"File error"<<endl;
  }
  inifile>>team_count; inifile.ignore(100,'\n');
  inifile>>gamesperteam;inifile.ignore(100,'\n');
  leaguemax=gamesperteam*team_count;
  cout<<"Teams: "<<team_count<<" Games: "<<gamesperteam<<" League: "
     <<leaguemax<<endl;
  cout<<"Team Count="<<team_count<<endl;
  MAX_GM = team_count/2;
  return;
}
void open_files(ifstream& inifile,team_schedules files,
                 int& team_count,string team_abbr[])
{int count;
 string fname;
 for (count=0;count<team_count;count++)
  {
   cout<<"File name #"<<count+1<<':';
   inifile>>fname;
   if (!inifile)
    cout<<"ERROR!!"<<endl;
   inifile.ignore(1000,'\n');
   cout<<fname<<endl;
   files[count].open(fname.c_str());
   if (!files[count])
    cout<<"file error"<<endl;
   else
   {
    getline(files[count],team_abbr[count]);
    cout<<count<<':'<<team_abbr[count]<<endl;
   }
  }
 return;
}

void clr_sch(schedule s)
{int mon, day, gm;
 game g;
 for (mon=0;mon<_MONTHS;mon++)
  for (day=0;day<_DAYS;day++)
   for (gm=0;gm<_MAXGAMES;gm++)
    {
     g.d=str2date("0/0/0");
//     g.h="nil";
     g.h=0;
     s[mon][day][gm]=g;
    }
 return;
}

void clr_s_c(sch_count s_c)
{int mon, day;
 cout<<"clearing s_c"<<endl;
 for (mon=0;mon<_MONTHS;mon++)
  {
   cout<<mon<<": ";
   for (day=0;day<_DAYS;day++)
    cout<<(s_c[mon][day]=0)<<' ';
   cout<<endl;
  }
 return;
}

void chk_s_c(const sch_count s_c)
{int mon, day;
 cout<<"checking s_c"<<endl;
 for (mon=0;mon<_MONTHS;mon++)
  {
   cout<<mon<<": ";
   for (day=0;day<_DAYS;day++)
    cout<<s_c[mon][day]<<' ';
   cout<<endl;
  }
 return;
}

void load_sch(int leaguemax,team_schedules files,sch_count s_c,
              int MAX_GM,int team_count,string team_abbr[],schedule s)
{
 int count=0, total=0;
//char ch;
 cout<<"Loading teams schedules"<<endl;
 while (total<leaguemax)
  {
   int t_count=0;
   string datestr;
   date d;
   game g;
   getline(files[count],datestr);
cout<<count<<':'<<team_abbr[count]<<':'<<datestr;
   d=str2date(datestr);
cout<<":Gm#"<<s_c[d.m][d.d];

   if (s_c[d.m][d.d]>=MAX_GM)
    {
     cout<<" FULL!"<<endl;
     continue;  //this day is full
    }
   else
    { cout<<" OK"<<endl;
      g.d=d;
//      g.h=abbr[count];
//      g.v="nil";
      g.h=count;
      g.v=0;
      s[d.m][d.d][s_c[d.m][d.d]]=g;
      s_c[d.m][d.d]++;
      count=(count+1)%team_count;
      total++;
    }
//cin>>ch;
  }
 cout<<"Games Scheduled ="<<total<<endl;
//cin>>ch;
 return;
}

void print_sch(schedule s, sch_count s_c,ofstream& of)
{int mon, day, gm;
date zilch={0,0,0};
#define cout of
 for (mon=_MONTHS/2;mon<_MONTHS;mon++)
  {
   cout<<"Mon="<<mon<<endl;
   for (day=1;day<_DAYS;day++)
   { 
	 if(!s_c[mon][day]) 
	 {
	  cout<<mon<<'/'<<day<<endl;
      continue;
	 }
     cout<<date2str(s[mon][day][0].d)<<'\t';
     for (gm=0;gm<(s_c[mon][day]);gm++)
       cout<<s[mon][day][gm].h;
	 cout<<endl;
   }
  }
 for (mon=1;mon<_MONTHS/2;mon++)
  {
   cout<<"Mon="<<mon<<endl;
   for (day=1;day<_DAYS;day++)
   { 
	 if(!s_c[mon][day]) 
	 {
	  cout<<mon<<'/'<<day<<endl;
      continue;
	 }
     cout<<date2str(s[mon][day][0].d)<<'\t';
     for (gm=0;gm<(s_c[mon][day]);gm++)
       cout<<s[mon][day][gm].h;
	 cout<<endl;
   }
  }
 return;
#undef cout
}


bool isleap(date d)
{if (d.y%4) return false;
 if (d.y%100) return true;
 if (d.y%400) return true;
 return false;}

int doy(date d)
{int temp=d.d;
 if (d.m>1) temp+=31; //Feb
 if (d.m>2) temp+=28; //Mar
 if (d.m>3) temp+=31; //Apr
 if (d.m>4) temp+=30; //May
 if (d.m>5) temp+=31; //Jun
 if (d.m>6) temp+=30; //Jul
 if (d.m>7) temp+=31; //Aug
 if (d.m>8) temp+=31; //Sep
 if (d.m>9) temp+=30; //Oct
 if (d.m>10) temp+=31; //Nov
 if (d.m>11) temp+=30; //Dec
 if (isleap(d)&&(d.m>2)) temp++;
 return temp;
}

int datediff(date a, date b)
{int temp;
 temp=doy(b)-doy(a);
 if (temp<0)
  {a.d=31;a.m=12;
   temp=temp+doy(a);
  }
 return temp;
}

string date2str(date d)
{
	string s;
 char temp[10];
 sprintf(temp,"%i/%i/%i",d.m,d.d,d.y);
 s=temp;
// return s;
 return temp;
}

date str2date(string s)
{date d;
 sscanf(s.c_str(),"%d/%d/%d",&d.m,&d.d,&d.y);
 return d;
}

date nextdate(date o)
{ date d=o;
  d.d++;
  if (
      (
       (d.d==32)&&
       ((d.m==1)||(d.m==3)||(d.m==5)||(d.m==7)||(d.m==8)||(d.m==10)||(d.m==12))
      )
     ||
      (
       (d.d==31)&&
       ((d.m==9)||(d.m==4)||(d.m==6)||(d.m==11))
      )
     )
    {d.d=1; d.m++;}
  if (d.m==2)
   {if ((d.d==30)&&isleap(d))
       {d.m++;d.d=1;}
    if ((d.d==29)&&(!(isleap(d))))
       {d.m++;d.d=1;}
   }
  if (d.m==13)
   {d.m=1;d.y++;};
 return d;
}