ref: 94443daf8e248e65afc8d3f17f26efea22748b51
dir: /module/pop3.m/
# pop3 protocol independent access to an email server.
Pop3: module
{
PATH: con "/dis/lib/pop3.dis";
# all functions return status (-ve when error)
# open a connection with the pop3 server
# requires the email server's name or address or nil if a default server is to be used
# returns (status, errror string)
open: fn(user, password, server: string) : (int, string);
# stat the user's mailbox
# returns (status, error string, no. messages, total no. bytes)
stat: fn(): (int, string, int, int);
# list the user's mailbox
# returns (status, error string, list of (message no., bytes in message))
msglist: fn(): (int, string, list of (int, int));
# list as above but return (status, error string, list of message nos.)
msgnolist: fn(): (int, string, list of int);
# top of a message given it's no.
# returns (status, error string, message top)
top: fn(m: int) : (int, string, string);
# full text of a message given it's no.
# returns (status, error string, message)
get: fn(m: int) : (int, string, string);
# delete a message given it's no.
# returns (status, error string)
delete: fn(m: int) : (int, string);
# close the connection
# returns (status, error string)
close: fn(): (int, string);
};