Crivello di Eratostene

#include <stdio.h>
#include <stdlib.h>
FILE *pfile;
/*prototipi funzioni*/
void creafile(void);
void crivello_eratostene(long int pvett[], long int *pn);
 
int main()
{
    long int N, *pvett;
 
    printf("Software che calcola i numeri primi usando:\nCRIVELLO DI ERATOSTENE\n\n");
    printf("Inserire N:\n");
    scanf("%ld", &N);
    if((pvett= (long int*)malloc(N*sizeof(long int))) == NULL)
        printf("Insufficient memory!\n\n");
    else
    {
        creafile();
        crivello_eratostene(pvett, &N);
        fclose(pfile);
        printf("esecuzione terminata con successo!\n\nFile creato\n\n");
        free(pvett);  /*distruzione dell'array*/
    }
 
    exit(EXIT_SUCCESS);
}
/*funzione che crea il file dove salvare i numeri primi*/
void creafile(void)
{
    char nomefile[20];
 
    printf("Nome da dare al file sul quale salvare i dati:\n");
    scanf("%s", nomefile);
    if((pfile= fopen(nomefile, "w")) == NULL)
    {
        printf("Errore creazione file!\n\n");
        exit(EXIT_FAILURE);
    }
}
/*funzione che calcola i numeri primi*/
void crivello_eratostene(long int pvett[], long int *pn)
{
    long int i, j;
 
    for(i=2; i< (*pn); i++) pvett[i]= 1;
    for(i=2; i< (*pn); i++)
        if(pvett[i])
           for(j=i+i; j< (*pn); j+=i) pvett[j]= 0;
        /*stampo su file*/
        for(i=2; i< (*pn); i++)
            if(pvett[i])
                fprintf(pfile,"%ld\n", i);
}

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
 
#define FPATH "prime_numbers.TXT"
 
char *allocate_memory(__int64 length);
void initialize(char *array, __int64 length);
void find_prime_numbers(char *array, __int64 length);
void strike_out_multiples(char *array, __int64 length, __int64 n);
void write_numbers_to_file(char *fpath, char *array, __int64 length);
 
int main()
{
     printf("\n\nCrivello di Eratostene by N0R81X\n\n");
 
     printf("Numero finale: ");
     __int64 n;
     scanf("%I64d", &n);
 
     char *array = allocate_memory(n);
     if(array == NULL)
     {
          printf("Impossibile allocare %I64d byte di memoria\n", n);
          getchar();
          return 0;
     }
 
     initialize(array, n);
     find_prime_numbers(array, n);
     write_numbers_to_file(FPATH, array, n);
 
     printf("Calcolo terminato\n");
     getchar();
     getchar();
 
     return 0;
}
 
char *allocate_memory(__int64 length)
{
     // tuoni e fulmini, un intero byte che verra' ulizzato solo come
     // flag, basterebbe un bit... in futuro bisogna provare a sistemare
 
     char *array = (char *)malloc(length);
     return array;
}
 
void initialize(char *array, __int64 length)
{
     // 1 sta ad indicare che il numero e' primo, 0 che non lo e'
     // inizialmente inizializzzo tutto a 1, poi i numeri non primi
     // verranno virtualmente eliminati impostando il valore a 0
 
     // i numeri non vengono memorizzati nell'array, viene memorizzato
     // solamente il fatto che essi siano o non siano primi, la posizione
     // di questa informazione corrisponde al numero
 
     memset(array, 1, length);
 
     // 0 ed 1 non sono numeri primi
     array[0] = 0;
     array[1] = 0;
}
 
void find_prime_numbers(char *array, __int64 length)
{
     __int64 i;
     for(i = 0; i < length; i++)
     {
          // se si pensa che i sia primo, allora i multipli di certo non lo sono,
          // quindi vanno eliminati (strike out)
          if(array[i] == 1) strike_out_multiples(array, length, i);
     }
}
 
void strike_out_multiples(char *array, __int64 length, __int64 n)
{
     __int64 i;
     for(i = n * 2; i < length; i += n)
     {
          array[i] = 0;
     }
}
 
void write_numbers_to_file(char *fpath, char *array, __int64 length)
{
     FILE *f = fopen(fpath, "w");
     if(f == NULL) return;
 
     __int64 i;
     for(i = 0; i < length; i++)
     {
          if(array[i] == 1)
          {
               fprintf(f, "%I64d\n", i);
          }
     }
 
     fclose(f);
}