//Beta Version
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <dirent.h>
#include <time.h>
#define USERNAME "darkjoker" //mettete qui il vostro nickname...
int inizio ();
int view ();
int quit ();
int calc ();
int help ();
int aboutme ();
int hexdec ();
int dirx ();
int copia ();
main (){
    inizio ();
    while (1 == 1){
    char scelta;
    printf ("%s@shell: & ", USERNAME);
    scanf ("%c", &scelta);
    switch (scelta){
            case 'd':
                dirx ();
                break;
            case 'v':
                view ();
                break;
            case 'q':
                exit (1);
                break;
            case 'c':
                calc ();
                break;
            case 'h':
                help ();
                break;
            case 'a':
                aboutme ();
                break;
            case 'x':
                hexdec ();
                break;
            case 'p':
                copia ();
                break;
            default:
                break;
                }
}
}
int inizio (){
    printf ("\n\nBenvenuto %s\n\nVerra avviata una nuova sessione.\n\n\n", USERNAME);
}
int view (){
    FILE *toread;
    char file[20], txt[100];
    printf ("Inserire il nome del file da leggere: ");
    scanf ("%s", &file);
    toread = fopen (file, "r");
    if (toread == NULL){
              printf ("Impossibile leggere il file.\n");
    }
    while (!feof(toread)){
          fgets (txt, sizeof(txt), toread);
          printf ("%s", txt);
         
          }
}
int calc (){
    int scelta, ad1, ad2, sm, mn, st, df, ft1, ft2, pr, dv, ds, qu;
    printf ("Scegli che cosa fare:\n1. Addizione\n2. Sottrazione\n3. Prodotto\n4. Divisione\n");
    scanf ("%d", &scelta);
    switch (scelta){
          case 1:
                printf ("Inserire il primo addendo: ");
                scanf ("%d", &ad1);
                printf ("Inserire il secondo addendo: ");
                scanf ("%d", &ad2);
                sm = ad1 + ad2;
                printf ("Risultato: %d\n", sm);
                break;                       
          case 2:
                printf ("Inserire il minuendo: ");
                scanf ("%d", &mn);
                printf ("Inserire il sottraendo: ");
                scanf ("%d", &st);
                df = mn - st;
                printf ("Risultato: %d\n", df);
                break;
          case 3:
                printf ("Inserire il primo fattore: ");
                scanf ("%d", &ft1);
                printf ("Inserire il secondo fattore: ");
                scanf ("%d", &ft2);
                pr = ft1 * ft2;
                printf ("Risultato: %d\n", pr);
                break;
          case 4:
                printf ("Inserire il dividendo: ");
                scanf ("%d", &dv);
                printf ("Inserire il divisore: ");
                scanf ("%d", &ds);
                if (ds == 0){
                      printf ("Impossibile dividere per 0\n");
                      break;
                      }
                qu = dv / ds;
                printf ("Risultato: %d\n", qu); 
                break;
          default:
                  printf ("Comando non valido.\n");
                  break;
          }
}
int help (){
    printf ("\n\nHelp\n");
    printf ("\n");
    printf ("v : visualizza il contenuto di un file.\n");
    printf ("\n");
    printf ("c : apre una calcolatrice.\n");
    printf ("\n");
    printf ("q : esce dalla shell\n");     
    printf ("\n");
    printf ("a : mostra un messaggio riguardante l'autore\n");
    printf ("\n");
    printf ("h : visualizza questo messaggio\n");
    printf ("\n");
    printf ("x : apre un proramma per la conversione da decimale a esadecimale\n");
    printf ("\n");
    printf ("d : visualizza il contenuto di una directory\n");
    printf ("\n");
    printf ("p : copia un file.\n");
    printf ("\n\n");
}
int aboutme (){
    printf ("\n\nQuesto programma e stato creato da: darkjoker\nLa parte rigurdante le directory e stata fatta quasi completamente a cura di BlackLight.\n");
}
int hexdec (){
    int scelta, hexdec, dechex;
    printf ("Cosa vuoi fare?\n1. Decimale >> Esadecimale\n2. Esadecimale >> Decimale\n");
    scanf ("%d", &scelta);
    switch (scelta){
          case 1:
                printf ("Inserire valore decimale da trasformare: ");
                scanf ("%d", dechex);
                printf ("%d >> %x\n", dechex, dechex);
                break;
          case 2:
                printf ("Inserire valore esadecimale da trasformare: ");
                scanf ("%x", hexdec);
                printf ("%x >> %d\n", hexdec, hexdec);
          break;
          default:
                  printf ("Opzione non valida.\n");
          }
}


int dirx(){
        DIR *dy;
        struct dirent*info;
        int num=0;
        int max_fname=0;
        int i,rnd;
        char **names;
        char direct[20];
        printf ("Inserire il nome della directory da analizzare: ");
        scanf ("%s", &direct);
        dy = opendir(direct);
        while (info=readdir(dy))  {
                num++;

                if (strlen(info->d_name)>max_fname)
                        max_fname=strlen(info->d_name);
        }
        names = (char**) malloc(num*sizeof(char*));

        for (i=0; i<num; i++)
                names[i] = (char*) malloc(max_fname*sizeof(char));
               

        closedir(dy);
    dy = opendir(direct); 

        for (i=0; info=readdir(dy); i++)
                strncpy (names[i],info->d_name,max_fname);


        closedir(dy);
        i--;
        while (i >= 0){
    printf ("%s\n", names[i]);
    i--;
}
}
int copia (){
    FILE *orig;
    FILE *des;
    char origine[20], dest[20], linea[1000];
    printf ("Inserire il nome del file da copiare: ");
    scanf ("%s", &origine);
    printf ("Inserire il nome della destinazione: ");
    scanf ("%s", &dest);
    if (origine == NULL){
                printf ("Impossibile aprire il file di origine.\n");
    }
    if (dest == NULL){
                printf ("Impossibile aprire il file di destinazione.\n");
    }
    orig = fopen (origine, "r");
    des = fopen (dest, "w");
    while (!feof (orig)){
          fgets (linea, sizeof (linea), orig);
          fprintf (des, "%s", linea);
    }
}