Changed hatch long filename support a bit
This commit is contained in:
parent
8d1969771a
commit
4f5c7d9201
@ -4642,6 +4642,8 @@ v0.33.20 10-Feb-2002
|
||||
the first aka is not the aka in the areas.
|
||||
In mgr result reports, lines with connected areas do now also
|
||||
display the aka to which they are connected.
|
||||
The file forward function now always puts a 8.3 filename in
|
||||
the outgoing ticfile. For most files nothing is changed.
|
||||
|
||||
mball:
|
||||
Will not crash anymore when it needs more then 10 minutes to
|
||||
|
@ -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);
|
||||
|
||||
|
@ -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
|
||||
|
18
script/hatch
18
script/hatch
@ -49,12 +49,26 @@ cat <<EOF
|
||||
group 'bbs'. They will be removed when they are hatched, so
|
||||
this should be a temporary copy of all those files.
|
||||
These files must be real files, no symlinks.
|
||||
Long filenames are allowed as long as there are no spaces in
|
||||
the filename. The mbfido program will build the 8.3 filenames
|
||||
when needed.
|
||||
When hatching long filenames and downlinks complain about this,
|
||||
then with mbsetup set these nodes to 8.3 names.
|
||||
|
||||
EOF
|
||||
echo -n "Enter TIC group to hatch files in (Control-C = stop) "
|
||||
|
||||
echo -n "Enter TIC group to hatch files in (Control-C = stop) : "
|
||||
read GROUP
|
||||
echo -n "Enter the Fidonet aka for this TIC group, ie. 2:280/2802 "
|
||||
if [ -z "$GROUP" ]; then
|
||||
exit 0
|
||||
fi
|
||||
|
||||
echo -n "Enter the Fidonet aka for this TIC group, ie. 2:280/2802 : "
|
||||
read AKA
|
||||
if [ -z "$AKA" ]; then
|
||||
exit 0
|
||||
fi
|
||||
|
||||
echo -e "Now scanning directory, add a oneline description for each file\n"
|
||||
|
||||
i=0;
|
||||
|
Reference in New Issue
Block a user