#include <stdio.h>
#include <conio.h>
#include <string.h>
struct film
{
char nazvanie[20];
char rejisser[20];
char strana[10];
char god_vipuska[4];
char stoimost[10];
char dohod[10];

}
 av[100];
const int M=100;

int init(void)
{
int i,j,l;
for(i=0;i<M-1;i++)
{printf("Vvedite nazvanie filma\n");
scanf("%s",av[i].nazvanie);
printf("Vvedite god vipuska filma\n");
scanf("%s",av[i].god_vipuska);
printf("Vvedite stoimost filma v tisachax rublei\n");
scanf("%s",av[i].stoimost);
printf("Vvedite rejissera avtomobilia\n");
scanf("%s",av[i].rejisser);
printf("Vvedite stranu proizvoditelya filma \n");
scanf("%s",av[i].strana);
printf("Vvedite dohod filma \n");
scanf("%s",av[i].dohod);
printf("\nEsli vi zakonchili vvodit nazmite 1, inache 0\n");
scanf("%d",&l);
printf("l ravno %i\n",l);
if(l==1){break;}
}
return i;
}
void sortirovka(int r, int w)
{int  i,j,obmen;i=0;
struct film buf;
switch (w)
{ case 1:
do
{i=i+1;
obmen=1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].nazvanie,av[j-1].nazvanie)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
case 2:
do
{i=i+1;
obmen=1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].rejisser,av[j-1].rejisser)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
case 3:
do
{i=i+1;
obmen=1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].strana,av[j-1].strana)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
case 4:
do
{i=i+1;
obmen=1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].god_vipuska,av[j-1].god_vipuska)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
case 5:
do
{i=i+1;
obmen=1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].stoimost,av[j-1].stoimost)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
case 6:
do
{i=i+1;
obmen= 1;
for (j=r;j>=i;j--)
{if (strcmp(av[j].dohod,av[j-1].dohod)<0) {buf=av[j];av[j]=av[j-1];av[j-1]=buf; obmen=0;}}}
while ((obmen==0) || (i==r));
break;
default: printf("Massiv ne otsortirovan\n");}}

void print(int k)
{ int i,l;
while( 1){
printf("esli vi xotite otsortirovat po:\n");
printf("nazvaniy filma nazmite 1\n");
printf("familii rejissera filma nazmite 2\n");
printf("strane proizvoditelya filma nazmite 3\n");
printf("godu vipuska filma nazmite 4\n");
printf("stoimosti filma nazmite 5\n");
printf("dohodu filma nazmite 6\n");
printf("esli vi ne xotite sortirovat nazmite 8:\n");
scanf("%i",&l);
if (l==8){break;};
sortirovka(k,l);
getch();
for(i=0;i<=k;i++)
{printf("\nFilm nomer %i\n",i+1) ;
printf("\n nazvanie_filma  \n%s",av[i].nazvanie);
printf("\n rejisser_filma\n %s",av[i].rejisser);
printf("\n strana_proizvoditel' filma \n %s",av[i].strana);
printf("\n god_vipuska_filma\n %s",av[i].god_vipuska);
printf("\n stoimost_filma\n %s",av[i].stoimost);
printf("\n dohod_filma\n %s",av[i].dohod);
 }
  }
}

void main()
{clrscr();
int i,j;
printf("Inicializacia bazi\n");
i=init();
printf("Kolichestvo filmov v baze =%i\n",i+1)  ;
printf("\nIznacalni spisok\n");
for(j=0;j<=i;j++)
{printf("\n Film nomer %i\n",j+1) ;
printf("\n nazvanie_filma \n%s",av[j].nazvanie);
printf("\n rejisser_filma %s",av[j].rejisser);
printf("\n strana_proizvoditel' filma\n %s",av[j].strana);
printf("\n god_vipuska_filma\n %s",av[j].god_vipuska);
printf("\n stoimost'_filma\n %s",av[j].stoimost);
printf("\n dohod filma\n %s",av[j].dohod);
getch();  }

printf("\nVivod s sortirovkoi\n");
print(i);
getch();}

bool update_file_data( const char * filename )
{

    // n - 4 байта - кол - во структур в файле
    // далее n структур по sizeof( film ) байт


    FILE * f = fopen( filename, "rb" );
    if( !f ) return false;

  
    int n;
    if( fread( &n, 1, sizeof( int ), f ) != sizeof( int ) )
    {
        fclose(f);
        return false;
    }
    film * s = ( film * ) malloc( n * sizeof( film ) );
    if( !s )
    {
        fclose( f );
        return false;
    }

    memset( s, 0, n * sizeof( film ) );

   
    int k = 0; // суда - сколко прочитали, на случай если в
    // файле меньше структур окажется
    for( int i = 0; i < n; i++ )
    {
        if( ( fread( &s[ i ], 1, sizeof( film ), f ) != sizeof( film ) ) || feof( f ) )
            break;
        else
            k++;
    }

    fclose( f );
 

    f = fopen( filename, "wb" );
    if( !f )
    {
        free( s );
        return false;
    }

    
    if( fwrite( &k, 1, sizeof( int ), f ) != sizeof( int ) )
    {
        free( s );
        fclose( f );
        return false;
    }

    // пишем структуры
    for( int i = 0; i < k; i++ )
    {
        if( fwrite( &s[ i ], 1, sizeof( film ), f ) != sizeof( film ) )
            break;
    }

    fclose( f );
    free( s );
    return true;
}