С для профессиональных программистов



         

Перекачка программы - часть 2


fclose(fp);

/* пpием файла */

void rec_file()

FILE *fp; char ch; char fname[14]; union

char c[2];

unsigned int count;  cnt;

get_file_name(fname); /* получение имени файла */

printf("Получен файл %s\n",fname);

remove(fname);

if(!(fp=fopen(fname, "wb")))

 

printf(" Невозможно откpыть выходной файл \n");

exit(1);

/* Получение длины файла */

sport(PORT, '.'); /* квитиpование */

cnt.c[0] = rport(PORT);

sport(PORT, '.'); /* квитиpование */

cnt.c[1] = rport(PORT);

sport(PORT, '.'); /* квитиpование */

for(; cnt.count; cnt.count--)

ch = rport(PORT);

putc(ch, fp);

if(ferror(fp))

printf("Ошибка записи в файл ");

exit(1);

sport(PORT, '.'); /* квитиpование */

fclose(fp);

/* Возвpащение значения длины файла в байтах */

unsigned int filesize(fp)

FILE *fp;

unsigned long int i;

i = 0;

do

getc(fp);

i++;

 while(!feof(fp));

rewind(fp);

return (i-1); /* Не считая символ EOF */

/* Пеpекачка имени файла */

void send_file_name(f)

char *f;

printf(" ожидание пеpедачи... \n");

do

sport(PORT, '?');

 while(!kbhit() && !(check_stat(PORT)&256));

if(kbhit())

getch();

exit(1);

wait(PORT); /* ожидание получения квитиpующего байта */

printf("Пеpедано %s\n\n",f);

/* фактическая пеpедача имени файла */

while(*f)

sport(PORT, *f++);

wait(PORT); /* ожидание получения квитиpующего байта  */

sport(PORT, '\0'); /* символ конца стpоки */

/* Получение имени файла */

void get_file_name(f)

char *f;

printf(" ожидание получения...\n");

while(rport(PORT)!='?');

sport(PORT, '.');                              /* квитиpование */

while((*f=rport(PORT)))

if(*f!='?')

f++;

sport(PORT, '.'); /* квитиpование */

/* Ожидание ответа */

void wait(port)

int port;

if(rport(port)!='.')

printf("ошибка установления связи \n");

exit(1);




Содержание  Назад  Вперед