home *** CD-ROM | disk | FTP | other *** search
- (*---------------------------------------------------------------------------*)
- (* InterMail *)
- (* *)
- (* Copyright 1987-1994 Peter Stewart & InterZone Software, Inc. *)
- (* *)
- (* Folder File Structure *)
- (* *)
- (*---------------------------------------------------------------------------*)
- (* Used in file IMFolder.Cfg (C structs in FOLDER.H) *)
- (*---------------------------------------------------------------------------*)
-
- CONST
- F_RESTRICT = $00000001;
- F_ECHO_INFO = $00000002;
- F_EXPORT_OK = $00000004;
- F_USE_XLAT = $00000008;
- F_PRIVATE = $00000010;
- F_READONLY = $00000020;
- F_NETMAIL = $08000000;
- F_QBBS = $10000000;
- F_DELETED = $20000000;
- F_LOCAL = $40000000;
- F_ECHOMAIL = $80000000;
-
- F_USER1 = $00000001;
- F_USER2 = $00000002;
- F_USER3 = $00000004;
- F_USER4 = $00000008;
- F_USER5 = $00000010;
- F_USER6 = $00000020;
- F_USER7 = $00000040;
- F_USER8 = $00000080;
- F_USER9 = $00000100;
- F_USER10 = $00000200;
-
- F_MSG = 0; { Folder types }
- F_HUDSON = 1;
- F_WC35 = 2;
- F_PCB15 = 3;
-
- TYPE
- foldrec = record
- path : array[1..65] of char; { Pathname or path }
- ftype : byte; { Folder type }
- areatag : array[1..39] of char;
- origin : byte; { origin line number }
- title : array[1..41] of char; { conference name }
- useaka : byte; { 0 = primary network address }
- board : word; { board number, in Hudson/WC fmts }
- upzone : word; { Uplink zone }
- upnet : word; { Uplink net }
- upnode : word; { Uplink node }
- uppoint : word; { Uplink point }
- behave : longint; { behavior flags, see above }
- highwtr : longint; { highwater mark for echomail }
- pwdcrc : longint; { crc32 of password }
- users : longint; { bitmask, users allowed in conference }
- accflags: longint; { access flags, for network environment}
- timestamp : longint; { time stamp for detecting updates }
- reserved: array[1..4] of byte { for future expansion }
- end;
-
-
- (* The following structure was used for IM 2.00-2.25, file name FOLDER.CFG:
-
- oldfoldrec = record
- path : array[1..65] of char; { path for *.msg conferences }
- title : array[1..41] of char; { conference name }
- origin : byte; { origin line number }
- behave : longint; { behavior flags, see above }
- pwdcrc : longint; { crc32 of password }
- users : longint; { bitmask, users allowed in conference }
- useaka : byte; { 0 = primary network address }
- board : word; { board number, in Hudson/WC fmts }
- end;
- *)