Changed hatch long filename support a bit

This commit is contained in:
Michiel Broek
2002-03-02 21:25:12 +00:00
parent 8d1969771a
commit 4f5c7d9201
4 changed files with 36 additions and 10 deletions

View File

@@ -179,15 +179,19 @@ void ForwardFile(fidoaddr Node, fa_list *sbl)
subject = xstrcpy(TIC.RealName);
else
subject = xstrcpy(TIC.NewName);
/*
* Create 8.3 filename if this is a long filename. In normal
* cases mbcico will transmit the long filename to the other
* node. If they can't process the TIC files which has a short
* 8.3 filename and they have a long filename in the inbound
* then in mbsetup these nodes need to be set to 8.3 filenames.
* The mailer will then transmit the file with a 8.3 name.
* Thank the inventors of the 8.3 filenames for this.
*/
temp = xstrcpy(subject);
if (nodes.FNC) {
name_mangle(temp);
fprintf(fp, "File %s\r\n", temp); // mbcico will send the file with this name
fprintf(fp, "Fullname %s\r\n", subject);
} else {
fprintf(fp, "File %s\r\n", tu(temp));
fprintf(fp, "Fullname %s\r\n", subject);
}
name_mangle(temp);
fprintf(fp, "File %s\r\n", temp);
fprintf(fp, "Fullname %s\r\n", subject);
free(temp);
free(subject);

View File

@@ -398,6 +398,12 @@ int LoadTic(char *inb, char *tfn)
tidy_falist(&sbl);
return 1;
}
if (!strlen(TIC.TicIn.File)) {
strcpy(Temp, TIC.TicIn.FullName);
name_mangle(Temp);
strncpy(TIC.TicIn.File, Temp, 12);
Syslog('f', "Local hatch created 8.3 name %s", Temp);
}
} else {
/*
* Find out what the real name of the file is