diff --git a/mystic/mutil_echofix.pas b/mystic/mutil_echofix.pas new file mode 100644 index 0000000..b925738 --- /dev/null +++ b/mystic/mutil_echofix.pas @@ -0,0 +1,43 @@ +Unit MUTIL_EchoFix; + +{$I M_OPS.PAS} + +Interface + +Uses + mUtil_EchoCore; + +Function ProcessedByAreaFix (Var PKT: TPKTReader) : Boolean; + +Implementation + +Uses + m_Strings; + +Function ProcessedByAreaFix (Var PKT: TPKTReader) : Boolean; +Var + IsAreaFix : Boolean; + IsFileFix : Boolean; +Begin + Result := False; + IsAreaFix := strUpper(PKT.MsgTo) = 'AREAFIX'; + IsFileFix := strUpper(PKT.MsgTo) = 'FILEFIX'; + + If Not (IsAreaFix or IsFileFix) Then Exit; + + // find recechomailnode + // check subject against session password + // if bad password do we respond back or just ignore? + // if none found then do we toss to badmsgs? + + // commands (AREAFIX): + // %LIST + // %RESCAN optional can have ,R=100 where 100 is last X messages + // %HELP + // [+]ECHOTAG or -ECHOTAG to add/remove base + // =ECHOTAG to rescan a single base? optional ,R=100 same as RESCAN + // %COMPRESS or ? to list packers. + // %PWD +End; + +End.