*** /tmp
/uux
.c
.old Sat Apr
2 20:16:45 1983
--- /tmp
/uux
.c
.new Sat Apr
2 20:16:54 1983
! #define GENSEND(f, a, b, c, d) {\
! fprintf(f, "S %s %s %s - %s 0666\n", a, b, c, d);\
#define GENRCV(f, a, b, c) {\
fprintf(f, "R %s %s %s - \n", a, b, c);\
! #define GENSEND(f, a, b, c, d, e) {\
! fprintf(f, "S %s %s %s -%s %s 0666\n", a, b, c, d, e);\
#define GENRCV(f, a, b, c) {\
fprintf(f, "R %s %s %s - \n", a, b, c);\
Debug
= atoi(&argv
[1][2]);
Debug
= atoi(&argv
[1][2]);
if (strcmp(local
, xsys
) != SAME
) {
! GENSEND(fpc
, dfile
, dfile
, User
, dfile
);
fprintf(fprx
, "%c %s\n", X_RQDFILE
, dfile
);
if (strcmp(local
, xsys
) != SAME
) {
! GENSEND(fpc
, dfile
, dfile
, User
, "", dfile
);
fprintf(fprx
, "%c %s\n", X_RQDFILE
, dfile
);
fprintf(stderr
, "permission denied %s\n", rest
);
! if (xcp(rest
, dfile
) != 0) {
! fprintf(stderr
, "can't copy %s to %s\n", rest
, dfile
);
! GENSEND(fpc
, rest
, dfile
, User
, dfile
);
fprintf(fprx
, "%c %s\n", X_STDIN
, dfile
);
fprintf(stderr
, "permission denied %s\n", rest
);
! if (xcp(rest
, dfile
) != 0) {
! fprintf(stderr
, "can't copy %s to %s\n", rest
, dfile
);
! GENSEND(fpc
, rest
, dfile
, User
, "", dfile
);
! GENSEND(fpc
, rest
, dfile
, User
, "c", dfile
);
fprintf(fprx
, "%c %s\n", X_STDIN
, dfile
);
gename(DATAPRE
, xsys
, 'T', t2file
);
GENRCV(fpd
, rest
, t2file
, User
);
! GENSEND(fpc
, dfile
, tfile
, User
, dfile
);
fprintf(fprx
, "%c %s\n", X_RQDFILE
, t2file
);
gename(DATAPRE
, xsys
, 'T', t2file
);
GENRCV(fpd
, rest
, t2file
, User
);
! GENSEND(fpc
, dfile
, tfile
, User
, "", dfile
);
fprintf(fprx
, "%c %s\n", X_RQDFILE
, t2file
);
! GENSEND(fpc
, rxfile
, tfile
, User
, rxfile
);
! GENSEND(fpc
, rxfile
, tfile
, User
, "", rxfile
);