char *myname
, *dest
, *keyfile
[128], line
[128];
char *maildir
= "/usr/spool/secretmail/";
MINT
*a
[42], *cd
[6][128];
main(argc
, argv
) char **argv
;
xfatal("mail to exactly one person");
p
= getpwuid(uid
)->pw_name
;
myname
= malloc(strlen(p
)+1);
strcpy(keyfile
, maildir
);
if(stat(keyfile
, &stbuf
) <0)
xfatal("addressee not enrolled");
destuid
= getpwnam(dest
)->pw_uid
;
if(destuid
!= stbuf
.st_uid
)
fprintf(stderr
, "warning: addressee's key file may be subverted\n");
kf
= fopen(keyfile
, "r");
xfatal("addressee's key weird");
df
= fopen(maildir
, "r");
{ fread(&dbuf
, sizeof(dbuf
), 1, df
);
if(dbuf
.d_ino
== 0) continue;
if(sscanf(dbuf
.d_name
, line
, &i
) != 1)
{ sprintf(line
, "%s%s.%d", maildir
, dest
, nmax
+i
);
if(creat(line
, 0666) >= 0) break;
if(i
==10) xfatal("cannot create mail file");
sprintf(buf
, "From %s %s", myname
, ctime(&now
) );
sprintf(buf
, "mail %s <%snotice", dest
, maildir
);
for(k
=j
, n
=0; k
>0 && n
<7; n
++, k
>>=1)
if(k
&01) madd(cd
[i
][j
], a
[7*i
+n
], cd
[i
][j
]);
madd(msg
, cd
[i
][s
[i
]&0177], msg
);
fgets(p
, sizeof(buf
)-6, stdin
);
if(strcmp(p
, ".\n") == 0 || feof(stdin
))
{ for(i
=0; i
<6; i
++) *p
++ = ' ';