From:	MERC::"uunet!VM1.NODAK.EDU!owner-anu-news" 27-APR-1993 11:31:10.68
To:	Multiple recipients of list ANU-NEWS <ANU-NEWS@VM1.NoDak.EDU>
CC:	
Subj:	BUG-fixes / EXTENSION  SHARE 6/7

-+-+-+-+-+-+-+-+ START OF PART 6 -+-+-+-+-+-+-+-+
VAXY.GOV.BC.CA
X`20`20**`20`20`20`20`20`20`20`20-`20fixed`20typo`20in`20message
X`20`20**`20`20`20`20`20`20`20`20-`20fixed`20problem`20with`20FOLLOW/REPLY
X`20`20**--
X`20`20**/
X`20`20`0C
X---`2034,42`20-----
X`20`20**`20`20`20`20`20`20V6.1`20`20`20`2025-FEB-1993`20`20`20`20`20ewilts%GAL
VAXY.GOV.BC.CA
X`20`20**`20`20`20`20`20`20`20`20-`20fixed`20typo`20in`20message
X`20`20**`20`20`20`20`20`20`20`20-`20fixed`20problem`20with`20FOLLOW/REPLY
X+`20**`20`20`20`20`20`20V6.1`20`20`20`2026-APR-1993`20`20`20`20`20winter@visio
Vn.rs.ch
X+`20**`20`20`20`20`20`20`20`20-`20added`20/NEWSGROUPS=(list_of_newsgroups)`20t
Vo`20FOLLOWUP`20to`20avoid`20the
X+`20**`20`20`20`20`20`20`20`20`20`20newsgroup-prompt
X`20`20**--
X`20`20**/
X`20`20`0C
X**************
X***`20725,731
X`20`20`20`20`20`20`20`20fclose(fpr);
X`20`20`20`20`20`20`20`20`7D
X`20`20`20`20`20`20*infile`20=`20'\0';
X!`20`20`20`20`20if`20(crosspost)`20parse_newsgroups(ngroup,"",1,1,1);
X`20`20`20`20`20`20else`20`7B
X`20`20`20`20`20`20`20`20parse_newsgroups(ngroup,follow_groups,1,1,1);
X`20`20`20`20`20`20`20`20if`20((fpr`20=`20profile_sigfile(ngroup))`20!=`200)
V`20`7B
X---`20728,734`20-----
X`20`20`20`20`20`20`20`20fclose(fpr);
X`20`20`20`20`20`20`20`20`7D
X`20`20`20`20`20`20*infile`20=`20'\0';
X!`20`20`20`20`20if`20(crosspost)`20parse_newsgroups(ngroup,"",0,1,1);
X`20`20`20`20`20`20else`20`7B
X`20`20`20`20`20`20`20`20parse_newsgroups(ngroup,follow_groups,0,1,1);
X`20`20`20`20`20`20`20`20if`20((fpr`20=`20profile_sigfile(ngroup))`20!=`200)
V`20`7B
X**************
X***`20727,733
X`20`20`20`20`20`20*infile`20=`20'\0';
X`20`20`20`20`20`20if`20(crosspost)`20parse_newsgroups(ngroup,"",1,1,1);
X`20`20`20`20`20`20else`20`7B
X!`20`20`20`20`20`20`20parse_newsgroups(ngroup,follow_groups,1,1,1);
X`20`20`20`20`20`20`20`20if`20((fpr`20=`20profile_sigfile(ngroup))`20!=`200)
V`20`7B
X`20`20`20`20`20`20`20`20`20`20fputs("--`20\n",fpw);
X`20`20`20`20`20`20`20`20`20`20while`20(fgets(xfrbuf,512,fpr))`20fputs(xfrbuf,f
Vpw);
X---`20730,736`20-----
X`20`20`20`20`20`20*infile`20=`20'\0';
X`20`20`20`20`20`20if`20(crosspost)`20parse_newsgroups(ngroup,"",0,1,1);
X`20`20`20`20`20`20else`20`7B
X!`20`20`20`20`20`20`20parse_newsgroups(ngroup,follow_groups,0,1,1);
X`20`20`20`20`20`20`20`20if`20((fpr`20=`20profile_sigfile(ngroup))`20!=`200)
V`20`7B
X`20`20`20`20`20`20`20`20`20`20fputs("--`20\n",fpw);
X`20`20`20`20`20`20`20`20`20`20while`20(fgets(xfrbuf,512,fpr))`20fputs(xfrbuf,f
Vpw);
$ call unpack NEWSPOST.DIFF;1 1715445421 "FORMAT STREAM_LF"
$!
$ create 'f'
X***`20newsrtl.c;-1
X---`20newsrtl.c
X**************
X***`20240,250
X`20`20
X`20`20`20`20while`20(*s)`20`7B
X`20`20`20`20`20`20if`20(isgraph(*s))`20
X!`20#if`20vax11c
X!`20`20`20`20`20`20`20*r++`20=tolower(*s);
X!`20#else
X!`20`20`20`20`20`20`20`7B`20if`20(*s`20>=`20'A'`20`26`26`20*s`20<=`20'Z')`20*r
V++`20=`20*s`20-`20'A'`20+`20'a';`20else`20*r++`20=`20*s;`20`7D
X!`20#endif
X`20`20`20`20`20`20else`20if`20((r`20>`20start)`20`26`26`20(*(r-1)`20!=`20'`20'
V))`20*r++`20=`20'`20';
X`20`20`20`20`20`20s++;
X`20`20`20`20`20`20`7D
X---`20240,257`20-----
X`20`20
X`20`20`20`20while`20(*s)`20`7B
X`20`20`20`20`20`20if`20(isgraph(*s))`20
X!`20/*`205-SEP-1992,`20Martin`20Winter`20`20`20(winter@vision.rs.ch)
X!`20`20`20`20The`20tolower`20does`20not`20convert`20Umlaute,`20but`20the`20CLI
V-routines`20does`20it.
X!`20`20`20`20Because`20of`20that`20all`20Umlaute`20get`20wrong.`20We`20change
V`20that`20to`20the`20same
X!`20`20`20`20way`20as`20the`20CLI-routines`20do.
X!`20*/
X!`20`20`20`20`20`20`20if`20(((*s`20>=`20'A')`20`26`26`20(*s`20<=`20'Z'))`20
V`7C`7C
X!`20`20`20`20`20`20`20`20`20`20`20((*s`20>=`20'\xC0')`20`26`26`20(*s`20<=`20'\
VxCF'))`20`7C`7C
X!`20`20`20`20`20`20`20`20`20`20`20((*s`20>=`20'\xD1')`20`26`26`20(*s`20<=`20'\
VxDD')))
X!`20`20`20`20`20`20`20`20`20*r++`20=`20*s`20-`20'A'`20+`20'a';
X!`20`20`20`20`20`20`20else
X!`20`20`20`20`20`20`20`20`20*r++`20=`20*s;
X!`20
X`20`20`20`20`20`20else`20if`20((r`20>`20start)`20`26`26`20(*(r-1)`20!=`20'`20'
V))`20*r++`20=`20'`20';
X`20`20`20`20`20`20s++;
X`20`20`20`20`20`20`7D
X**************
X***`20300,306
X`20`20
X`20`20`20`20while`20(*p)`20`7B
X`20`20#if`20vax11c
X!`20`20`20`20`20*p`20=`20tolower(*p);
X`20`20#else`20`20`20`20
X`20`20`20`20`20`20if`20(*p`20>=`20'A'`20`26`26`20*p`20<=`20'Z')`20*p`20+=`20'a
V'`20-`20'A'`20;
X`20`20#endif
X---`20307,321`20-----
X`20`20
X`20`20`20`20while`20(*p)`20`7B
X`20`20#if`20vax11c
X!`20/*`205-SEP-1992,`20Martin`20Winter`20`20`20(winter@vision.rs.ch)
X!`20`20`20`20The`20tolower`20does`20not`20convert`20Umlaute,`20but`20the`20CLI
V-routines`20does`20it.
X!`20`20`20`20Because`20of`20that`20all`20Umlaute`20get`20wrong.`20We`20change
V`20that`20to`20the`20same
X!`20`20`20`20way`20as`20the`20CLI-routines`20do.
X!`20*/
X!`20`20`20`20`20if`20(((*p`20>=`20'A')`20`26`26`20(*p`20<=`20'Z'))`20`7C`7C
X!`20`20`20`20`20`20`20`20`20((*p`20>=`20'\xC0')`20`26`26`20(*p`20<=`20'\xCF'))
V`20`7C`7C
X!`20`20`20`20`20`20`20`20`20((*p`20>=`20'\xD1')`20`26`26`20(*p`20<=`20'\xDD'))
V)
X!`20`20`20`20`20`20`20*p`20=`20*p`20-`20'A'`20+`20'a';
X`20`20#else`20`20`20`20
X`20`20`20`20`20`20if`20(*p`20>=`20'A'`20`26`26`20*p`20<=`20'Z')`20*p`20+=`20'a
V'`20-`20'A'`20;
X`20`20#endif
$ call unpack NEWSRTL.DIFF;1 947220176 "FORMAT STREAM_LF"
$!
$ create 'f'
X***`20newssearch.c;-1
X---`20newssearch.c
X**************
X***`2040,46
X`20`20`20`20`20`20tl`5BMAXTARGETS`5D,
X`20`20`20`20`20`20tf`5BMAXTARGETS`5D,
X`20`20`20`20`20`20tc,
X!`20`20`20`20`20s_type`20=`200;
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20static
X`20`20char`20targets`5BMAXTARGETS`5D`5B512`5D,
X---`2040,47`20-----
X`20`20`20`20`20`20tl`5BMAXTARGETS`5D,
X`20`20`20`20`20`20tf`5BMAXTARGETS`5D,
X`20`20`20`20`20`20tc,
X!`20`20`20`20`20s_type`20=`200,
X!`20`20`20`20`20sea_dir;
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20static
X`20`20char`20targets`5BMAXTARGETS`5D`5B512`5D,
X**************
X***`20382,387
X`20`20`20`20unsigned`20int`20sflags;
X`20`20`20`20GRP_PTR`20gap;
X`20`20`20`20ITM_PTR`20iap;
X`20`20
X`20`20`20`20context`20=`201;
X`20`20`20`20g`20=`20cxtgrp;
X---`20383,389`20-----
X`20`20`20`20unsigned`20int`20sflags;
X`20`20`20`20GRP_PTR`20gap;
X`20`20`20`20ITM_PTR`20iap;
X+`20`20`20int`20sea_start,`20sea_end,`20sea_step;
X`20`20
X`20`20`20`20context`20=`201;
X`20`20`20`20g`20=`20cxtgrp;
X**************
X***`20392,399
X`20`20`20`20iap`20=`20gap->grp_ia;
X`20`20`20`20sflags`20=`20gap->grp_flags;
X`20`20`20`20gap->grp_flags`20`26=`20`7ENEWS_M_NNTPCACHE;`20`20`20`20`20`20/*
V`20turn`20off`20NNTP`20cache!`20*/
X!`20`20`20for`20(i`20=`201;`20i`20<=`20gap->grp_count;`20++i)`20`7B
X!`20`20`20`20`20if`20(`20`20`20(iap`5Bi`5D.itm_num`20<=`20cxtitm)
X`20`20`20`20`20`20`20`20`20`20`7C`7C`20(`20`20`20(d_itm`5Bsea_groups`5D.fitm
V`20>`200)
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20<`20d
V_itm`5Bsea_groups`5D.fitm)))`20continue;
X`20`20`20`20`20`20if`20(d_itm`5Bsea_groups`5D.litm
X---`20394,426`20-----
X`20`20`20`20iap`20=`20gap->grp_ia;
X`20`20`20`20sflags`20=`20gap->grp_flags;
X`20`20`20`20gap->grp_flags`20`26=`20`7ENEWS_M_NNTPCACHE;`20`20`20`20`20`20/*
V`20turn`20off`20NNTP`20cache!`20*/
X!`20/*`2021-April-1993,`20`20Martin`20Winter,`20`20winter@vision.rs.ch`20`20
V`20`20`20`20`20`20`20`20*/
X!`20/*`20added`20handling`20for`20searching`20backwards`20(qualifier`20/REVERS
VE)`20`20*/
X!`20`20`20if`20(sea_dir`20==`20SEARCH_BACKWARD)
X!`20`20`20`20`20`20`7B
X!`20`20`20`20`20`20sea_start`20=`20gap->grp_count;
X!`20`20`20`20`20`20sea_end`20=`201;
X!`20`20`20`20`20`20sea_step`20=`20-1;
X!`20`20`20`20`20`20if`20(cxtitm`20==`200)`20`7B
X!`20`20`20`20`20`20`20`20cxtitm`20=`20iap`5Bgap->grp_count`5D.itm_num;
X!`20`20`20`20`20`20`20`20/*`20if`20we`20have`20a`20range,`20then`20we`20need
V`20to`20swap`20the`20start`20and`20end-nbr:`20*/
X!`20`20`20`20`20`20`20`20if`20((d_itm`5Bsea_groups`5D.fitm`20>`200)`20`26`26
V`20(d_itm`5Bsea_groups`5D.litm`20>`200))`20`7B
X!`20`20`20`20`20`20`20`20`20`20i`20=`20d_itm`5Bsea_groups`5D.fitm;
X!`20`20`20`20`20`20`20`20`20`20d_itm`5Bsea_groups`5D.fitm`20=`20d_itm`5Bsea_gr
Voups`5D.litm;
X!`20`20`20`20`20`20`20`20`20`20d_itm`5Bsea_groups`5D.litm`20=`20i;
X!`20`20`20`20`20`20`20`20`20`20`7D
X!`20`20`20`20`20`20`20`20`7D
X!`20`20`20`20`20`20`7D
X!`20`20`20else
X!`20`20`20`20`20`20`7B
X!`20`20`20`20`20`20sea_start`20=`201;
X!`20`20`20`20`20`20sea_end`20=`20gap->grp_count;
X!`20`20`20`20`20`20sea_step`20=`201;
X!`20`20`20`20`20`20`7D
X!`20`20`20for`20(i`20=`20sea_start;`20((sea_dir`20==`20SEARCH_FORWARD)`20`26
V`26`20(i`20<=`20sea_end))`20`7C`7C
X!`20`20`20`20`20`20`20((sea_dir`20==`20SEARCH_BACKWARD)`20`26`26`20(i`20>=`20s
Vea_end));`20i`20=`20i+sea_step)`20`7B`20
X!`20`20`20`20`20if`20(sea_dir`20==`20SEARCH_FORWARD)`20`7B
X!`20`20`20`20`20`20`20if`20(`20(iap`5Bi`5D.itm_num`20<=`20cxtitm)
X`20`20`20`20`20`20`20`20`20`20`7C`7C`20(`20`20`20(d_itm`5Bsea_groups`5D.fitm
V`20>`200)
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20<`20d
V_itm`5Bsea_groups`5D.fitm)))`20continue;
X`20`20`20`20`20`20`20`20if`20(d_itm`5Bsea_groups`5D.litm
X**************
X***`20396,403
X`20`20`20`20`20`20if`20(`20`20`20(iap`5Bi`5D.itm_num`20<=`20cxtitm)
X`20`20`20`20`20`20`20`20`20`20`7C`7C`20(`20`20`20(d_itm`5Bsea_groups`5D.fitm
V`20>`200)
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20<`20d
V_itm`5Bsea_groups`5D.fitm)))`20continue;
X!`20`20`20`20`20if`20(d_itm`5Bsea_groups`5D.litm
X!`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20>`20d_itm`5Bsea_gro
Vups`5D.litm))`20break;
X`20`20
X`20`20`20`20`20`20cxtitm`20=`20iap`5Bi`5D.itm_num;
X`20`20`20`20`20`20if`20(stop_search`20`26`26`20get_break_str())`20`7B
X---`20423,439`20-----
X`20`20`20`20`20`20`20`20if`20(`20(iap`5Bi`5D.itm_num`20<=`20cxtitm)
X`20`20`20`20`20`20`20`20`20`20`7C`7C`20(`20`20`20(d_itm`5Bsea_groups`5D.fitm
V`20>`200)
X`20`20`20`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20<`20d
V_itm`5Bsea_groups`5D.fitm)))`20continue;
X!`20`20`20`20`20`20`20if`20(d_itm`5Bsea_groups`5D.litm
X!`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20>`20d_itm`5Bs
Vea_groups`5D.litm))`20break;
X!`20`20`20`20`20`20`20`7D
X!`20`20`20`20`20else`20`7B
X!`20`20`20`20`20`20`20if`20(`20(iap`5Bi`5D.itm_num`20>=`20cxtitm)`20
X!`20`20`20`20`20`20`20`20`20`7C`7C`20(`20`20`20(d_itm`5Bsea_groups`5D.fitm`20>
V`200)
X!`20`20`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20>`20d_i
Vtm`5Bsea_groups`5D.fitm)))`20continue;
X!`20`20`20`20`20`20`20if`20(d_itm`5Bsea_groups`5D.litm
X!`20`20`20`20`20`20`20`20`20`20`20`26`26`20(iap`5Bi`5D.itm_num`20<`20d_itm`5Bs
Vea_groups`5D.litm))`20break;
X!`20`20`20`20`20`20`20`7D
X!`20/*`20end`20of`20changes`20*/
X`20`20
X`20`20`20`20`20`20cxtitm`20=`20iap`5Bi`5D.itm_num;
X`20`20`20`20`20`20if`20(stop_search`20`26`26`20get_break_str())`20`7B
X**************
X***`20531,536
X`20`20`20`20if`20((status=cli$get_value(c$dsc("TARGET"),`26s_dsc,`26s_len))
V`20`26`201)`20`7B
X`20`20`20`20`20`20int`20g;
X`20`20`20`20`20`20cxtgrp`20=`200;
X`20`20`20`20`20`20cxtitm`20=`200;
X`20`20`20`20`20`20context`20=`200;`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20`20`20`20`20dheader`20=`20ldheader;
X---`20567,579`20-----
X`20`20`20`20if`20((status=cli$get_value(c$dsc("TARGET"),`26s_dsc,`26s_len))
V`20`26`201)`20`7B
X`20`20`20`20`20`20int`20g;
X`20`20`20`20`20`20cxtgrp`20=`200;
X+`20/*`2021-April-1993,`20`20Martin`20Winter,`20`20winter@vision.rs.ch`20`20
V`20`20`20`20`20`20`20`20*/
X+`20/*`20added`20handling`20for`20searching`20backwards`20(qualifier`20/REVERS
VE)`20`20*/
X+`20`20`20`20`20if`20(cli$present(c$dsc("REVERSE"))`20`26`201)
X+`20`20`20`20`20`20`20`20sea_dir`20=`20SEARCH_BACKWARD;
X+`20`20`20`20`20else
X+`20`20`20`20`20`20`20`20sea_dir`20=`20SEARCH_FORWARD;
X+`20/*`20end`20of`20enhancement`20*/
X`20`20`20`20`20`20cxtitm`20=`200;
X`20`20`20`20`20`20context`20=`200;`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20`20`20`20`20dheader`20=`20ldheader;
X**************
X***`20535,546
X`20`20`20`20`20`20context`20=`200;`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20`20`20`20`20dheader`20=`20ldheader;
X`20`20`20`20`20`20dtpu`20=`20ldtpu;
X!`20`20`20`20`20sea_groups`20=`20num_groups`20=`201;
X!`20`20`20`20`20d_itm`5B0`5D.fitm`20=`20-1;
X!`20`20`20`20`20d_itm`5B0`5D.ngrp`20=`20curr_g;
X!`20`20`20`20`20for`20(g`20=`201;`20g`20<`20NOTE_RANGE_MAX;`20++g)`20`7B
X!`20`20`20`20`20`20`20d_itm`5Bg`5D.fitm`20=`200`20`20`20`20/*`20reset`20items
V`20in`20table`20at`20/NEWGROUPS*/;
X!`20`20`20`20`20`20`20`7D
X`20`20`20`20`20`20s`5Bs_len`5D`20=`20'\0';
X`20`20`20`20`20`20`7D
X`20`20`20`20else`20if`20(!context)`20`7B
X---`20578,591`20-----
X`20`20`20`20`20`20context`20=`200;`20`20`20`20`20`20`20`20`20`20`20`20`20`20
X`20`20`20`20`20`20dheader`20=`20ldheader;
X`20`20`20`20`20`20dtpu`20=`20ldtpu;
X!`20/*`2022-April-1993,`20`20Martin`20Winter,`20`20winter@vision.rs.ch`20`20
V`20`20`20`20`20`20`20`20`20`20*/
X!`20/*`20SEARCH`20searched`20always`20the`20whole`20newsgroup`20instead`20(lik
Ve`20/ALL`20`20*/
X!`20/*`20was`20specified),`20instead`20of`20using`20the`20current`20position
V`20as`20start`20*/
X!`20/*`20Fixed`20to`20work`20as`20descibed`20in`20help`20and`20doc.`20`20`20
V`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20`20*/`20
X!`20`20`20`20`20getnoterange();
X!`20`20`20`20`20num_groups`20=`200;
X!`20`20`20`20`20while`20(d_itm`5Bnum_groups`5D.fitm)`20++`20num_groups;
X!`20/*`20end`20of`20fix`20*/
X`20`20`20`20`20`20s`5Bs_len`5D`20=`20'\0';
X`20`20`20`20`20`20`7D
X`20`20`20`20else`20if`20(!context)`20`7B
X**************
X***`20552,563
X`20`20`20`20`20`20if`20(!i)`20display_call`20=`201;
X`20`20`20`20`20`20dheader`20=`20ldheader;
X`20`20`20`20`20`20dtpu`20=`20ldtpu;
X!`20`20`20`20`20sea_groups`20=`20num_groups`20=`201;
X!`20`20`20`20`20d_itm`5B0`5D.fitm`20=`20-1;
X!`20`20`20`20`20d_itm`5B0`5D.ngrp`20=`20curr_g;
X!`20`20`20`20`20for`20(g`20=`201;`20g`20<`20NOTE_RANGE_MAX;`20++g)`20`7B
X!`20`20`20`20`20`20`20d_itm`5Bg`5D.fitm`20=`200`20`20`20`20/*`20reset`20items
V`20in`20table`20at`20/NEWGROUPS*/;
X!`20`20`20`20`20`20`20`7D
X`20`20`20`20`20`20`7D
X`20`20
X`20`20`20`20if`20(cli$present(c$dsc("NEWSGROUPS"))`20`26`201)`20`7B
X---`20597,610`20-----
X`20`20`20`20`20`20if`20(!i)`20display_call`20=`201;
X`20`20`20`20`20`20dheader`20=`20ldheader;
X`20`20`20`20`20`20dtpu`20=`20ldtpu;
X!`20/*`2022-April-1993,`20`20Martin`20Winter,`20`20winter@vision.rs.ch`20`20
V`20`20`20`20`20`20`20`20`20`20*/
X!`20/*`20SEARCH`20searched`20always`20the`20whole`20newsgroup`20instead`20(lik
Ve`20/ALL`20`20*/
+-+-+-+-+-+-+-+-  END  OF PART 6 +-+-+-+-+-+-+-+-
----------------------------------------------------------------------------
Radio Suisse Ltd,       Internet:  winter@vision.rs.ch
Laupenstrasse 18a                  postmaster@rs.ch
3008 Bern               PSI-Mail: +22846431062::WINTER     (public X.25)
Switzerland             X.400: C=CH; A=ARCOM; P=RS; O=DM; S=WINTER, G=MARTIN
----------------------------------------------------------------------------
