static int wcreceive(int argc, char **argp)
{
int c;
if (Batch || argc == 0) {
Crcflg = 1;
if (!Quiet)
fprintf(stderr, rbmsg, Progname, "sz");
if ((c = tryz())) {
if (c == ZCOMPL)
return OK;
if (c == ERROR)
goto fubar;
c = rzfiles();
if (c)
goto fubar;
} else {
for (;;) {
if (wcrxpn(secbuf) == ERROR)
goto fubar;
if (secbuf[0] == 0)
return OK;
if (procheader(secbuf) == ERROR)
goto fubar;
if (wcrx() == ERROR)
goto fubar;
}
}
} else {
Bytesleft = DEFBYTL;
Filemode = 0;
Modtime = 0L;
procheader("");
strcpy(Pathname, *argp);
checkpath(Pathname);
fprintf(stderr, "\n%s: ready to receive %s\r\n", Progname,
Pathname);
if ((fout = fopen(Pathname, "w")) == NULL)
return ERROR;
if (wcrx() == ERROR)
goto fubar;
timing(1);
}
return OK;
fubar:
canit();
if (Topipe && fout) {
pclose(fout);
return ERROR;
}
if (fout)
closeit();
return ERROR;
}
/*
* Receive a file with ZMODEM protocol
* Assumes file name frame is in secbuf
*/
static int rzfile(void)
{
int c, n;
long last_rxbytes = 0;
long not_printed = 0;
last_bps = 0;
Eofseen = FALSE;
n = 20;
rxbytes = 0l;
if (procheader(secbuf) == ERROR) {
return (tryzhdrtype = ZSKIP);
}
for (;;) {
stohdr(rxbytes);
zshhdr(ZRPOS, Txhdr);
nxthdr:
switch (c = zgethdr(Rxhdr, 0)) {
default:
vfile("lrzfile: zgethdr returned %d", c);
return ERROR;
case ZNAK:
case TIMEOUT:
if (--n < 0) {
vfile("lrzfile: zgethdr returned %d", c);
return ERROR;
}
case ZFILE:
zrdata(secbuf, MAX_BLOCK);
continue;
case ZEOF:
if (rclhdr(Rxhdr) != rxbytes) {
/*
* Ignore eof if it's at wrong place - force
* a timeout because the eof might have gone
* out before we sent our zrpos.
*/
errors = 0;
goto nxthdr;
}
if (Verbose > 1) {
int minleft = 0;
int secleft = 0;
last_bps = (rxbytes / timing(0));
if (last_bps > 0) {
minleft =
(Bytesleft -
rxbytes) / last_bps / 60;
secleft =
((Bytesleft - rxbytes) /
last_bps) % 60;
}
fprintf(stderr,
"\rBytes Received: %7ld/%7ld BPS:%-6d \r\n",
rxbytes, Bytesleft, last_bps);
}
closeok = 1;
if (closeit()) {
tryzhdrtype = ZFERR;
vfile("lrzfile: closeit returned <> 0");
return ERROR;
}
vfile("lrzfile: normal EOF");
return c;
case ERROR: /* Too much garbage in header search error */
if (--n < 0) {
vfile("lrzfile: zgethdr returned %d", c);
return ERROR;
}
zmputs(Attn);
continue;
case ZSKIP:
closeit();
vfile("lrzfile: Sender SKIPPED file");
return c;
case ZDATA:
if (rclhdr(Rxhdr) != rxbytes) {
if (--n < 0) {
return ERROR;
}
zmputs(Attn);
continue;
}
moredata:
if (Verbose > 1
&& (not_printed > 7
|| rxbytes >
last_bps / 2 + last_rxbytes)) {
int minleft = 0;
int secleft = 0;
last_bps = (rxbytes / timing(0));
if (last_bps > 0) {
minleft =
(Bytesleft -
rxbytes) / last_bps / 60;
secleft =
((Bytesleft - rxbytes) /
last_bps) % 60;
}
fprintf(stderr,
"\rBytes Received: %7ld/%7ld BPS:%-6d ETA %02d:%02d ",
rxbytes, Bytesleft, last_bps,
minleft, secleft);
last_rxbytes = rxbytes;
not_printed = 0;
if (nodeinf != -1 && ((time(0) - lup) > 5)) {
lseek(nodeinf, 0, SEEK_SET);
nin.ddn_bpsrate = last_bps;
sprintf(nin.ddn_activity,
"UL: %-34.34s", myname);
write(nodeinf, &nin,
sizeof(struct
DayDream_NodeInfo));
lup = time(0);
}
} else if (Verbose)
not_printed++;
switch (c = zrdata(secbuf, MAX_BLOCK)) {
case ZCAN:
vfile("lrzfile: zgethdr returned %d", c);
return ERROR;
case ERROR: /* CRC error */
if (--n < 0) {
vfile
("lrzfile: zgethdr returned %d",
c);
return ERROR;
}
zmputs(Attn);
continue;
case TIMEOUT:
if (--n < 0) {
vfile
("lrzfile: zgethdr returned %d",
c);
return ERROR;
}
continue;
case GOTCRCW:
n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
stohdr(rxbytes);
zshhdr(ZACK, Txhdr);
xsendline(XON);
goto nxthdr;
case GOTCRCQ:
n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
stohdr(rxbytes);
zshhdr(ZACK, Txhdr);
goto moredata;
case GOTCRCG:
n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
goto moredata;
case GOTCRCE:
n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
goto nxthdr;
}
}
}
}
/*
* Receive a file with ZMODEM protocol
* Assumes file name frame is in secbuf
*/
int rzfile(void)
{
int c, n;
Eofseen=FALSE;
rxbytes = 0l;
if ((c = procheader(secbuf))) {
return (tryzhdrtype = c);
}
n = 20;
for (;;) {
stohdr(rxbytes);
zshhdr(ZRPOS, Txhdr);
nxthdr:
switch (c = zgethdr(Rxhdr)) {
default: Syslog('z', "rzfile: Wrong header %d", c);
if ( --n < 0) {
Syslog('+', "Zmodem: wrong header %d", c);
return TERROR;
}
continue;
case ZCAN: Syslog('+', "Zmodem: sender CANcelled");
return TERROR;
case ZNAK: if ( --n < 0) {
Syslog('+', "Zmodem: Got ZNAK");
return TERROR;
}
continue;
case TIMEOUT: if ( --n < 0) {
Syslog('z', "Zmodem: TIMEOUT");
return TERROR;
}
continue;
case ZFILE: zrdata(secbuf, MAXBLOCK);
continue;
case ZEOF: if (rclhdr(Rxhdr) != rxbytes) {
/*
* Ignore eof if it's at wrong place - force
* a timeout because the eof might have gone
* out before we sent our zrpos.
*/
errors = 0;
goto nxthdr;
}
if (closeit(1)) {
tryzhdrtype = ZFERR;
Syslog('+', "Zmodem: error closing file");
return TERROR;
}
fout = NULL;
Syslog('z', "rzfile: normal EOF");
return c;
case HANGUP: Syslog('+', "Zmodem: Lost Carrier");
return TERROR;
case TERROR: /* Too much garbage in header search error */
if (--n < 0) {
Syslog('+', "Zmodem: Too many errors");
return TERROR;
}
zmputs(Attn);
continue;
case ZSKIP: Modtime = 1;
closeit(1);
Syslog('+', "Zmodem: Sender SKIPPED file");
return c;
case ZDATA: if (rclhdr(Rxhdr) != rxbytes) {
if ( --n < 0) {
Syslog('+', "Zmodem: Data has bad address");
return TERROR;
}
zmputs(Attn);
continue;
}
moredata:
Nopper();
alarm_on();
switch (c = zrdata(secbuf, MAXBLOCK)) {
case ZCAN: Syslog('+', "Zmodem: sender CANcelled");
return TERROR;
case HANGUP: Syslog('+', "Zmodem: Lost Carrier");
return TERROR;
case TERROR: /* CRC error */
if (--n < 0) {
Syslog('+', "Zmodem: Too many errors");
return TERROR;
}
zmputs(Attn);
continue;
case TIMEOUT: if ( --n < 0) {
Syslog('+', "Zmodem: TIMEOUT");
return TERROR;
}
continue;
case GOTCRCW: n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
stohdr(rxbytes);
PUTCHAR(XON);
zshhdr(ZACK, Txhdr);
goto nxthdr;
case GOTCRCQ: n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
stohdr(rxbytes);
zshhdr(ZACK, Txhdr);
goto moredata;
case GOTCRCG: n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
goto moredata;
case GOTCRCE: n = 20;
putsec(secbuf, Rxcount);
rxbytes += Rxcount;
goto nxthdr;
}
}
}
}
