Common Lisp Package: BKNR.USER

README:

FUNCTION

Public

Undocumented

ALL-USER-FLAGS

ALL-USERS

DEFINE-USER-FLAG (KEYWORD)

FIND-USER (KEY)

GET-FLAG-USERS (KEY)

MAKE-USER (LOGIN &KEY PASSWORD FULL-NAME EMAIL FLAGS (CLASS 'USER))

SET-USER-LAST-LOGIN (USER TIME)

SET-USER-PREFERENCE (USER KEY VALUE)

USER-ADD-FLAGS (USER FLAGS)

USER-REMOVE-FLAGS (USER FLAGS)

Private

CRYPT (PASSWORD &OPTIONAL (SALT (MAKE-SALT)))

Return string containing md5 encrypted password prepended by the salt. The salt string may be longer, so an encrytped password string can be used as salt to verify a given cleartext password against an encrypted one.

QUOTE-META-CHARS (STRING &KEY (START 0) (END (LENGTH STRING)))

Quote, i.e. prefix with #\\, all non-word characters in STRING.

Undocumented

MAKE-SALT

PRINT-USER-PASSWD-ENTRY (USER &KEY (UID 1) (GID 1) (SHELL /bin/false) HOME (BASE /home/))

SET-USER-CRYPTED-PASSWORD (USER CRYPTED-PASSWORD)

SET-USER-FULL-NAME (USER FULL-NAME)

STORE-OBJECT-OWNER (KEY)

TX-SET-USER-CRYPTED-PASSWORD (USER CRYPTED-PASSWORD)

TX-SET-USER-FULL-NAME (USER FULL-NAME)

TX-SET-USER-LAST-LOGIN (USER TIME)

TX-SET-USER-PREFERENCE (USER KEY VALUE)

TX-USER-ADD-FLAGS (USER FLAGS)

TX-USER-REMOVE-FLAGS (USER FLAGS)

WRITE-PASSWD-FILE (PATHNAME &KEY (BASE /home/) (UID 1) (GID 1))

GENERIC-FUNCTION

Public

USER-EDITABLE-P (USER)

Return non-nil if the given user can be edited through the administration interface. The USER class is frequently subclassed to implement special user accounts that are self-registered and that cannot be edited through the standard user administration interface. It would be better if the ``real'' system users would live in a seperate base class that would be editable and have the USER class be non-editable.

Undocumented

ADMIN-P (USER)

ANONYMOUS-P (USER)

DELETE-USER (USER)

SET-USER-PASSWORD (USER PASSWORD)

USER-DISABLED (USER)

USER-HAS-FLAG (USER FLAG)

USER-MAIL-ERROR-P (USER)

USER-PREFERENCE (USER KEY &OPTIONAL DEFAULT)

USER-PREFERENCES (OBJECT)

USER-REACHABLE-BY-MAIL-P (USER)

VERIFY-PASSWORD (USER PASSWORD)

Private

Undocumented

AS-XML (EVENT)

INITIATES-ROLLBACK (ERROR)

MESSAGE-EVENT-FROM-NAME (EVENT)

USER-OWNS-OBJECT-P (USER OBJECT)

SLOT-ACCESSOR

Public

USER-EMAIL (OBJECT)

Email Address, must be unique

SETFUSER-EMAIL (NEW-VALUE OBJECT)

Email Address, must be unique

USER-LOGIN (OBJECT)

Unique login name

SETFUSER-LOGIN (NEW-VALUE OBJECT)

Unique login name

Undocumented

OWNED-OBJECT-OWNER (OBJECT)

SETFOWNED-OBJECT-OWNER (NEW-VALUE OBJECT)

USER-FLAGS (OBJECT)

SETFUSER-FLAGS (NEW-VALUE OBJECT)

USER-FULL-NAME (OBJECT)

SETFUSER-FULL-NAME (NEW-VALUE OBJECT)

USER-LAST-LOGIN (OBJECT)

SETFUSER-LAST-LOGIN (NEW-VALUE OBJECT)

USER-PASSWORD (OBJECT)

SETFUSER-PASSWORD (NEW-VALUE OBJECT)

USER-SUBSCRIPTIONS (OBJECT)

SETFUSER-SUBSCRIPTIONS (NEW-VALUE OBJECT)

Private

USER-MAIL-ERROR (OBJECT)

mail problem the user's mail address - presence indicates that the user is unreachable by mail

SETFUSER-MAIL-ERROR (NEW-VALUE OBJECT)

mail problem the user's mail address - presence indicates that the user is unreachable by mail

Undocumented

MESSAGE-EVENT-FROM (OBJECT)

MESSAGE-EVENT-TEXT (OBJECT)

VARIABLE

Private

Undocumented

*USER-FLAGS*

CLASS

Public

MESSAGE-EVENT

informational message entered by the system or an operator

Undocumented

OWNED-OBJECT

USER

Private

Undocumented

SMB-USER

CONSTANT

Private

Undocumented

+SALT-LENGTH+