From f7c7fe46770374ddc27e346d8ecb1ae041569a97 Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Tue, 21 May 2013 07:28:04 -0400
Subject: [PATCH] Initial import

---
 mystic/mutil_echofix.pas | 43 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 43 insertions(+)
 create mode 100644 mystic/mutil_echofix.pas

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 <NAME> or ? to list packers.
+  // %PWD <pw>
+End;
+
+End.