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

typedef struct {
        int dia, mes, ano;
        int hora, min;
        char compr[100];
        char tipo;
        } t_compr;
        
t_compr *vet_compr;

int le_config(Max,D,M,A)
int  *Max;
int  *D,*M,*A;
{
  FILE *ptf;
  int  Maximo; 
  int  Dia,Mes,Ano;
  char nomarq[15]="config.txt";
  
  ptf=fopen(nomarq,"rt");
  if (ptf==NULL)
     return(-1);

  fscanf(ptf,"%d",&Maximo);  
  *Max=Maximo;
  fscanf(ptf,"%d %d %d",&Dia,&Mes,&Ano);  
  *D=Dia;
  *M=Mes;
  *A=Ano;
  fclose(ptf);
  return(1);
}

void cadastrar (total)
int *total;
{
   int  atual;
   char tipo[10];
   
   atual=*total;
   printf("\n");
   printf(">> Cadastrar Compromisso <<\n");
   printf("Data - Dia, Mes,Ano: ");
   scanf ("%d %d %d",&vet_compr[atual].dia,&vet_compr[atual].mes,&vet_compr[atual].ano);
   printf("Horario - Hora, Min : ");
   scanf ("%d %d",&vet_compr[atual].hora,&vet_compr[atual].min);
   printf("Compromisso: ");
   scanf ("%s",vet_compr[atual].compr);
   printf("Tipo do Compromisso: ");
   scanf ("%s",tipo);
   if (tipo[0]=='u' || tipo[0]=='U')
      vet_compr[atual].tipo='U';
   else
      vet_compr[atual].tipo='N';
   atual++;
   *total=atual;
}

void salvar (total)
int total;
{
  FILE *ptf;
  int i;
  char nomarq[30]="compromissos.txt";
  
  printf("\n");
  printf(">> Salvando Compromissos <<\n");
  
  ptf=fopen(nomarq,"wt");
  if (ptf==NULL)
     printf("\n\n# Erro de escrita no arquivo!\n\n");
  else
  {
    for (i=0; i<total; i++) 
    {
       fprintf(ptf,"%d\\%d\\%d\n",vet_compr[i].dia,vet_compr[i].mes,vet_compr[i].ano);
       fprintf(ptf,"%d:%d\n",vet_compr[i].hora,vet_compr[i].min);
       fprintf(ptf,"%s\n",vet_compr[i].compr);
       fprintf(ptf,"%c\n",vet_compr[i].tipo);
    }
    fclose(ptf);
  }
  
  printf("OK\n");
}

void listar(total,d,m,a)
int total;
int d,m,a;
{
    int dia=0,mes=0,ano=0;
    int i;
    
    for (i=0; i<total; i++)
    {
       dia=d;  mes=m; ano=a;

    	if (vet_compr[i].dia==dia && vet_compr[i].mes==mes && vet_compr[i].ano==ano)
        {
		   	if (vet_compr[i].tipo == 'U') printf("\x07");
		   	printf("Compromisso: %d\n",i);
			printf("%d\\%d\\%d\n",vet_compr[i].dia,vet_compr[i].mes,vet_compr[i].ano);
       		printf("%d:%d\n",vet_compr[i].hora,vet_compr[i].min);
       		printf("%s\n",vet_compr[i].compr);
       		printf("%c\n",vet_compr[i].tipo);
       		printf("\n");
		} 
    }
}

int main(int argc, char *argv[])
{
  int Max_Compr;      /* Maximo de compromissos */
  int Tot_Compr;      /* Total de compromissos ja cadastrados */
  int dd,mm,aaaa;
  int hr,mim;
  int opcao,ret;
    
  printf("\n");
  printf("\n<<  Agenda de Compromissos ACME Ver:0.01 >>\n");
  printf("\n");
  printf(">> Leitura do Arquivo de Configuracao <<\n");
  ret=le_config(&Max_Compr,&dd,&mm,&aaaa);
  if (ret > 0)
     printf("OK\n\n");
  else
  {
     printf("# Erro na leitura do arquivo de configuracao... programa abortado (%d)!\n\n",ret);
     system("Pause");
     exit(0);
  }  
  
  // Aloca Vetor
  vet_compr=(t_compr *)calloc(Max_Compr,sizeof(t_compr));
  Tot_Compr=0;
  printf("Alocados: %d\n",Max_Compr);

  while (1)  /* While do Menu */
  {
     printf("\n");
     printf(">> Menu:\n");
     printf("1 - Cadastrar Compromisso\n");
     printf("2 - Salvar Cadastro de Compromissos\n");
     printf("3 - Listar Compromissos do Dia\n");
     printf("4 - Sair do programa\n");
     printf("Digite sua opcao: ");
     scanf ("%d",&opcao);
     
     if (opcao==1)
        cadastrar(&Tot_Compr); 
     if (opcao==2)
        salvar(Tot_Compr);
     if (opcao==3)
        listar(Tot_Compr,dd,mm,aaaa);
     if (opcao==4)
        break;
  }
  
  system("PAUSE");	
  return 0;
}