Common Lisp Package: HYPEROBJECT

README:

FUNCTION

Public

ALL-SUBOBJECTS (OBJ)

Returns a list of all subobjects in an object

LOAD-ALL-SUBOBJECTS (OBJS)

Load all subobjects if they have not already been loaded.

VIEW (OBJS &KEY (STREAM *STANDARD-OUTPUT*) VID VIEW FILTER SUBOBJECTS REFVARS FILE-WRAPPER LINK-PRINTER)

EXPORTED Function: prints hyperobject-class objects. Calls view-hyperobject

Undocumented

FMT-COMMA-INTEGER (I)

HYPEROBJECT-CLASS-USER-NAME (OBJ)

VIEW-SUBOBJECTS (OBJ STRM &OPTIONAL VID (INDENT 0) FILTER SUBOBJECTS REFVARS LINK-PRINTER)

Private

CREATABLE-VIEW-ID-P (OBJ-CL VID)

Returns T if a view id can be created for this class

DEFINE-INVERSE (CLASS ESD)

Define an inverse function for a slot

DELISTIFY (LIST)

Some MOPs, like openmcl 0.14.2, cons attribute values in a list.

FINALIZE-DOCUMENTATION (CL)

Calculate class documentation slot

FINALIZE-VIEWS (CL)

Finalize all views that are given on a objects initialization

FIND-VIEW-ID-IN-CLASS-PRECEDENCE (OBJ-CL VID)

Looks for a view in class and parent classes

FIRE-CLASS-RULES (CL OBJ SLOT)

Fire all class rules. Called after a slot is modified.

GET-VIEW-ID (OBJ VID &OPTIONAL SLOTS)

Find or make a category view for an object

INIT-HYPEROBJECT-CLASS (CL)

Initialize a hyperobject class. Calculates all class slots

INITIALIZE-VIEW (VIEW)

Calculate all view slots for a hyperobject class

INITIALIZE-VIEW-BY-ID (OBJ-CL VIEW)

Initialize a view based upon a preset vid

INITIALIZE-VIEW-BY-SOURCE-CODE (VIEW)

Initialize a view based upon a source code

LISP-NAME-TO-SQL-NAME (LISP)

Convert a lisp name (atom or list, string or symbol) into a canonical SQL name

MAKE-OBJECT-VIEW (CL VIEW-DEF)

Make an object view from a definition. Do nothing if a class is passed so that reinitialization will be a no-op

OBJ-DATA (OBJ VIEW)

Returns the objects data as a string. Used by common-graphics outline function

SQL-CONNECT

Connect to HO database, automatically used pooled connections

SQL-DISCONNECT (CONN)

Disconnect from HO database, but put connection back into pool

VALUE-TYPE-TO-SQL-TYPE (VALUE-TYPE)

Return two values, the sql type and field length.

VIEW-HYPEROBJECT (OBJS VIEW STRM &OPTIONAL VID (INDENT 0) FILTER SUBOBJECTS REFVARS LINK-PRINTER)

Display a single or list of hyperobject-class instances and their subobjects

Undocumented

BASE-VALUE-TYPE (VALUE-TYPE)

CANONICALIZE-VALUE-TYPE (VT)

CLASS-NAME-OF (OBJ)

COMPILE-RULE (SOURCE-CODE DEPENDANTS VOLATILE CL)

COMPUTE-HYPEROBJECT-ESD (ESD DSDS)

ENSURE-LAZY-READER (CL CLASS-NAME SLOT-NAME LAZY-CLASS READER &REST READER-KEYS)

FINALIZE-COMPUTE-CACHED (CL)

FINALIZE-RULES (CL)

FINALIZE-SQL (CL)

FINALIZE-SUBOBJECTS (CL)

FINALIZE-VIEW-BY-ID (VIEW)

FIND-SLOT-BY-NAME (CL NAME)

FMT-FILE-END (VIEW STRM)

FMT-FILE-START (VIEW STRM)

FMT-LIST-END (OBJ VIEW STRM INDENT NUM-ITEMS)

FMT-LIST-START (OBJ VIEW STRM INDENT NUM-ITEMS)

FMT-OBJ-DATA (OBJ VIEW STRM INDENT REFVARS LINK-PRINTER)

FMT-OBJ-DATA-PLAIN (OBJ VIEW STRM)

FMT-OBJ-END (OBJ VIEW STRM INDENT)

FMT-OBJ-START (OBJ VIEW STRM INDENT)

FMT-SUBOBJ-END (OBJ VIEW STRM INDENT)

FMT-SUBOBJ-START (OBJ VIEW STRM INDENT)

GENERATE-CREATE-INDICES-CMDS (TABLE-NAME SLOTS)

GENERATE-CREATE-TABLE-CMD (CL ESDS)

GENERATE-DROP-TABLE-CMD (TABLE-NAME)

GET-DEFAULT-VIEW-ID (OBJ-CL)

HO-SQL-DB

HO-SQL-DB! (DBNAME)

HO-SQL-HOST

HO-SQL-HOST! (H)

HO-SQL-PASSWD

HO-SQL-PASSWD! (P)

HO-SQL-TYPE

HO-SQL-TYPE! (H)

HO-SQL-USER

HO-SQL-USER! (U)

HTML-LIST-START-FUNC (OBJ NITEMS INDENT STRM)

HTML-OBJ-START (OBJ INDENT STRM)

HYPEROBJECT-CLASS-SLOTS (OBJ)

HYPEROBJECT-CLASS-SUBOBJECTS (OBJ)

HYPEROBJECT-CLASS-USER-NAME-PLURAL (OBJ)

INITIALIZE-HTML-VIEW (VIEW)

INITIALIZE-TABLE-VIEW (VIEW)

INITIALIZE-TEXT-VIEW (VIEW)

INITIALIZE-XHTML-VIEW (VIEW)

INITIALIZE-XML-VIEW (VIEW)

INTERN-IN-KEYWORD (OBJ)

LISP-TYPE-IS-A-STRING (TYPE)

MUTEX-SQL-EXECUTE (CMD)

MUTEX-SQL-QUERY (CMD &KEY (TYPES AUTO))

PPFC-DISPLAY-TABLE (TITLE NAME TYPE FORMATTER CDATA PRINT-FUNC)

PPFC-HTML (TITLE NAME TYPE FORMATTER CDATA PRINT-FUNC)

PPFC-HTML-LABELS (LABEL NAME TYPE FORMATTER CDATA PRINT-FUNC)

PPFC-XHTML-LABELS (LABEL TAG NAME TYPE FORMATTER CDATA PRINT-FUNC)

PPFC-XML (TAG NAME TYPE FORMATTER CDATA PRINT-FUNC)

PPFC-XML-LABELS (LABEL TAG NAME TYPE FORMATTER CDATA PRINT-FUNC)

PUSH-PRINT-FUN-CODE (VID SLOT NLINK PRINT-FUNC)

REMOVE-KEYWORD-ARG (ARGLIST AKEY)

REMOVE-KEYWORD-ARGS (ARGLIST AKEYS)

REMOVE-LAZY-READER (CLASS-NAME SLOT-NAME)

SQL-CMD-INDEX (TABLE FIELD UNIQUE)

SQL-DISCONNECT-POOLED

SQL-EXECUTE (CMD CONN)

SQL-INDEX-NAME (TABLE FIELD)

SQL-QUERY (CMD CONN &KEY (TYPES AUTO))

SQL-TYPE-TO-FIELD-STRING (TYPE LENGTH)

STORE-LAZILY-COMPUTED-OBJECTS (CL SLOT ESD-ACCESSOR OBJ-CLASS)

TABLE-LABEL-LIST-START-FUNC (OBJ NITEMS INDENT STRM)

TABLE-LIST-START-FUNC (OBJ NITEMS INDENT STRM)

VALUE-TYPE-IS-A-STRING (TYPE)

VALUE-TYPE-TO-LISP-TYPE (VALUE-TYPE)

WRITE-HO-VALUE (OBJ NAME TYPE FORMATTER CDATA STRM)

WRITE-USER-NAME-MAYBE-PLURAL (OBJ NITEMS STRM)

XHTML-LIST-START-FUNC (OBJ NITEMS INDENT STRM)

XMLFORMAT-LIST-END-FUNC (X STRM)

XMLFORMAT-LIST-START-FUNC (X NITEMS INDENT STRM)

MACRO

Private

Undocumented

PROCESS-CLASS-OPTION (SLOT-NAME &OPTIONAL REQUIRED)

PROCESS-SLOT-OPTION (SLOT-NAME)

WITH-MUTEX-SQL ((CONN) &BODY BODY)

WITH-SQL-CONNECTION ((CONN) &BODY BODY)

WRITE-SIMPLE (V S)

GENERIC-FUNCTION

Private

Undocumented

COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS (CLASS DIRECT-SLOTDS)

SQL-CREATE (CL)

SQL-DROP (CL)

SLOT-ACCESSOR

Public

SUBOBJECTS (OBJECT)

List of fields that contain a list of subobjects objects.

SETFSUBOBJECTS (NEW-VALUE OBJECT)

List of fields that contain a list of subobjects objects.

Private

CLASS-ID (OBJECT)

Unique ID for the class

SETFCLASS-ID (NEW-VALUE OBJECT)

Unique ID for the class

CLOSURES (OBJECT)

Closures to call on slot chnages

SETFCLOSURES (NEW-VALUE OBJECT)

Closures to call on slot chnages

COMPUTE-CACHED-VALUES (OBJECT)

List of fields that contain a list of compute-cached-value objects.

SETFCOMPUTE-CACHED-VALUES (NEW-VALUE OBJECT)

List of fields that contain a list of compute-cached-value objects.

DEFAULT-PRINT-SLOTS (OBJECT)

Defaults slots for a view

SETFDEFAULT-PRINT-SLOTS (NEW-VALUE OBJECT)

Defaults slots for a view

DEFAULT-VIEW (OBJECT)

The default view for a class

SETFDEFAULT-VIEW (NEW-VALUE OBJECT)

The default view for a class

DESCRIPTION (OBJECT)

Class description

SETFDESCRIPTION (NEW-VALUE OBJECT)

Class description

DIRECT-RULES (OBJECT)

List of rules to fire on slot changes.

SETFDIRECT-RULES (NEW-VALUE OBJECT)

List of rules to fire on slot changes.

DIRECT-VIEWS (OBJECT)

List of views

SETFDIRECT-VIEWS (NEW-VALUE OBJECT)

List of views

GUID (OBJECT)

ID string for this class

SETFGUID (NEW-VALUE OBJECT)

ID string for this class

ID (OBJECT)

id for this view.

SETFID (NEW-VALUE OBJECT)

id for this view.

INDENTER (OBJECT)

Function that performs hierarchical indenting

SETFINDENTER (NEW-VALUE OBJECT)

Function that performs hierarchical indenting

OBJECT-CLASS (OBJECT)

Class of object to be viewed.

SETFOBJECT-CLASS (NEW-VALUE OBJECT)

Class of object to be viewed.

PRINTER (OBJECT)

default function that prints the object

SETFPRINTER (NEW-VALUE OBJECT)

default function that prints the object

RULES (OBJECT)

List of rules

SETFRULES (NEW-VALUE OBJECT)

List of rules

SLOTS (OBJECT)

List of effective slots for object to be viewed.

SETFSLOTS (NEW-VALUE OBJECT)

List of effective slots for object to be viewed.

SOURCE-CODE (OBJECT)

Source code for generating view.

SETFSOURCE-CODE (NEW-VALUE OBJECT)

Source code for generating view.

SQL-NAME (OBJECT)

SQL Name for this class

SETFSQL-NAME (NEW-VALUE OBJECT)

SQL Name for this class

USER-NAME (OBJECT)

User name for class

SETFUSER-NAME (NEW-VALUE OBJECT)

User name for class

USER-NAME-PLURAL (OBJECT)

Plural user name for class

SETFUSER-NAME-PLURAL (NEW-VALUE OBJECT)

Plural user name for class

VERSION (OBJECT)

Version number for class

SETFVERSION (NEW-VALUE OBJECT)

Version number for class

VIEWS (OBJECT)

List of views

SETFVIEWS (NEW-VALUE OBJECT)

List of views

Undocumented

ACCESS-SLOTS (OBJECT)

SETFACCESS-SLOTS (NEW-VALUE OBJECT)

CREATE-INDEX-CMDS (OBJECT)

CREATE-TABLE-CMD (OBJECT)

DEPENDANTS (OBJECT)

SETFDEPENDANTS (NEW-VALUE OBJECT)

DROP-TABLE-CMD (OBJECT)

DSD-COMPUTE-CACHED-VALUE (OBJECT)

SETFDSD-COMPUTE-CACHED-VALUE (NEW-VALUE OBJECT)

DSD-DESCRIPTION (OBJECT)

SETFDSD-DESCRIPTION (NEW-VALUE OBJECT)

DSD-DISABLE-PREDICATE (OBJECT)

SETFDSD-DISABLE-PREDICATE (NEW-VALUE OBJECT)

DSD-HIDDEN-GROUPS (OBJECT)

SETFDSD-HIDDEN-GROUPS (NEW-VALUE OBJECT)

DSD-INDEXED (OBJECT)

SETFDSD-INDEXED (NEW-VALUE OBJECT)

DSD-INPUT-FILTER (OBJECT)

SETFDSD-INPUT-FILTER (NEW-VALUE OBJECT)

DSD-INVERSE (OBJECT)

SETFDSD-INVERSE (NEW-VALUE OBJECT)

DSD-LIST-OF-VALUES (OBJECT)

SETFDSD-LIST-OF-VALUES (NEW-VALUE OBJECT)

DSD-NULL-ALLOWED (OBJECT)

SETFDSD-NULL-ALLOWED (NEW-VALUE OBJECT)

DSD-PRINT-FORMATTER (OBJECT)

SETFDSD-PRINT-FORMATTER (NEW-VALUE OBJECT)

DSD-READ-ONLY-GROUPS (OBJECT)

SETFDSD-READ-ONLY-GROUPS (NEW-VALUE OBJECT)

DSD-SHORT-DESCRIPTION (OBJECT)

SETFDSD-SHORT-DESCRIPTION (NEW-VALUE OBJECT)

DSD-SQL-NAME (OBJECT)

SETFDSD-SQL-NAME (NEW-VALUE OBJECT)

DSD-STORED (OBJECT)

SETFDSD-STORED (NEW-VALUE OBJECT)

DSD-SUBOBJECT (OBJECT)

SETFDSD-SUBOBJECT (NEW-VALUE OBJECT)

DSD-UNBOUND-LOOKUP (OBJECT)

SETFDSD-UNBOUND-LOOKUP (NEW-VALUE OBJECT)

DSD-UNIQUE (OBJECT)

SETFDSD-UNIQUE (NEW-VALUE OBJECT)

DSD-UNIT (OBJECT)

SETFDSD-UNIT (NEW-VALUE OBJECT)

DSD-USER-NAME (OBJECT)

SETFDSD-USER-NAME (NEW-VALUE OBJECT)

DSD-VALUE-CONSTRAINT (OBJECT)

SETFDSD-VALUE-CONSTRAINT (NEW-VALUE OBJECT)

DSD-VALUE-TYPE (OBJECT)

SETFDSD-VALUE-TYPE (NEW-VALUE OBJECT)

DSD-VIEW-TYPE (OBJECT)

SETFDSD-VIEW-TYPE (NEW-VALUE OBJECT)

DSD-VOID-TEXT (OBJECT)

SETFDSD-VOID-TEXT (NEW-VALUE OBJECT)

ESD-COMPUTE-CACHED-VALUE (OBJECT)

SETFESD-COMPUTE-CACHED-VALUE (NEW-VALUE OBJECT)

ESD-DESCRIPTION (OBJECT)

SETFESD-DESCRIPTION (NEW-VALUE OBJECT)

ESD-DISABLE-PREDICATE (OBJECT)

SETFESD-DISABLE-PREDICATE (NEW-VALUE OBJECT)

ESD-HIDDEN-GROUPS (OBJECT)

SETFESD-HIDDEN-GROUPS (NEW-VALUE OBJECT)

ESD-HO-TYPE (OBJECT)

SETFESD-HO-TYPE (NEW-VALUE OBJECT)

ESD-INDEXED (OBJECT)

SETFESD-INDEXED (NEW-VALUE OBJECT)

ESD-INPUT-FILTER (OBJECT)

SETFESD-INPUT-FILTER (NEW-VALUE OBJECT)

ESD-INVERSE (OBJECT)

SETFESD-INVERSE (NEW-VALUE OBJECT)

ESD-LIST-OF-VALUES (OBJECT)

SETFESD-LIST-OF-VALUES (NEW-VALUE OBJECT)

ESD-NULL-ALLOWED (OBJECT)

SETFESD-NULL-ALLOWED (NEW-VALUE OBJECT)

ESD-PRINT-FORMATTER (OBJECT)

SETFESD-PRINT-FORMATTER (NEW-VALUE OBJECT)

ESD-READ-ONLY-GROUPS (OBJECT)

SETFESD-READ-ONLY-GROUPS (NEW-VALUE OBJECT)

ESD-SHORT-DESCRIPTION (OBJECT)

SETFESD-SHORT-DESCRIPTION (NEW-VALUE OBJECT)

ESD-SQL-LENGTH (OBJECT)

SETFESD-SQL-LENGTH (NEW-VALUE OBJECT)

ESD-SQL-NAME (OBJECT)

SETFESD-SQL-NAME (NEW-VALUE OBJECT)

ESD-SQL-TYPE (OBJECT)

SETFESD-SQL-TYPE (NEW-VALUE OBJECT)

ESD-STORED (OBJECT)

SETFESD-STORED (NEW-VALUE OBJECT)

ESD-SUBOBJECT (OBJECT)

SETFESD-SUBOBJECT (NEW-VALUE OBJECT)

ESD-UNBOUND-LOOKUP (OBJECT)

SETFESD-UNBOUND-LOOKUP (NEW-VALUE OBJECT)

ESD-UNIQUE (OBJECT)

SETFESD-UNIQUE (NEW-VALUE OBJECT)

ESD-UNIT (OBJECT)

SETFESD-UNIT (NEW-VALUE OBJECT)

ESD-USER-NAME (OBJECT)

SETFESD-USER-NAME (NEW-VALUE OBJECT)

ESD-VALUE-CONSTRAINT (OBJECT)

SETFESD-VALUE-CONSTRAINT (NEW-VALUE OBJECT)

ESD-VALUE-TYPE (OBJECT)

SETFESD-VALUE-TYPE (NEW-VALUE OBJECT)

ESD-VIEW-TYPE (OBJECT)

SETFESD-VIEW-TYPE (NEW-VALUE OBJECT)

ESD-VOID-TEXT (OBJECT)

SETFESD-VOID-TEXT (NEW-VALUE OBJECT)

FILE-END-STR (OBJECT)

SETFFILE-END-STR (NEW-VALUE OBJECT)

FILE-START-STR (OBJECT)

SETFFILE-START-STR (NEW-VALUE OBJECT)

FUNC (OBJECT)

SETFFUNC (NEW-VALUE OBJECT)

LAZY-CLASS (OBJECT)

LIST-END-INDENT (OBJECT)

SETFLIST-END-INDENT (NEW-VALUE OBJECT)

LIST-END-PRINTER (OBJECT)

SETFLIST-END-PRINTER (NEW-VALUE OBJECT)

LIST-START-INDENT (OBJECT)

SETFLIST-START-INDENT (NEW-VALUE OBJECT)

LIST-START-PRINTER (OBJECT)

SETFLIST-START-PRINTER (NEW-VALUE OBJECT)

LOOKUP (OBJECT)

LOOKUP-KEYS (OBJECT)

NAME (OBJECT)

SETFNAME (NEW-VALUE OBJECT)

NAME-CLASS (OBJECT)

NAME-SLOT (OBJECT)

OBJ-DATA-END-PRINTER (OBJECT)

SETFOBJ-DATA-END-PRINTER (NEW-VALUE OBJECT)

OBJ-DATA-INDENT (OBJECT)

SETFOBJ-DATA-INDENT (NEW-VALUE OBJECT)

OBJ-DATA-PRINT-CODE (OBJECT)

SETFOBJ-DATA-PRINT-CODE (NEW-VALUE OBJECT)

OBJ-DATA-PRINTER (OBJECT)

SETFOBJ-DATA-PRINTER (NEW-VALUE OBJECT)

OBJ-DATA-START-PRINTER (OBJECT)

SETFOBJ-DATA-START-PRINTER (NEW-VALUE OBJECT)

OBJ-END-INDENT (OBJECT)

SETFOBJ-END-INDENT (NEW-VALUE OBJECT)

OBJ-END-PRINTER (OBJECT)

SETFOBJ-END-PRINTER (NEW-VALUE OBJECT)

OBJ-START-INDENT (OBJECT)

SETFOBJ-START-INDENT (NEW-VALUE OBJECT)

OBJ-START-PRINTER (OBJECT)

SETFOBJ-START-PRINTER (NEW-VALUE OBJECT)

SUBOBJ-END-INDENT (OBJECT)

SETFSUBOBJ-END-INDENT (NEW-VALUE OBJECT)

SUBOBJ-END-PRINTER (OBJECT)

SETFSUBOBJ-END-PRINTER (NEW-VALUE OBJECT)

SUBOBJ-START-INDENT (OBJECT)

SETFSUBOBJ-START-INDENT (NEW-VALUE OBJECT)

SUBOBJ-START-PRINTER (OBJECT)

SETFSUBOBJ-START-PRINTER (NEW-VALUE OBJECT)

VOLATILE (OBJECT)

SETFVOLATILE (NEW-VALUE OBJECT)

VARIABLE

Private

*CLASS-OPTIONS*

List of class options for hyperobjects.

*SLOT-OPTIONS*

Slot options that can appear as an initarg

*SLOT-OPTIONS-NO-INITARG*

Slot options that do not have an initarg

Undocumented

*HO-SQL-DB*

*HO-SQL-HOST*

*HO-SQL-PASSWD*

*HO-SQL-TYPE*

*HO-SQL-USER*

*LAZY-READERS*

+NEWLINE-STRING+

CLASS

Public

HYPEROBJECT-CLASS

Metaclass for Markup Language classes.

PACKAGE

the standard structure for the description of a package

Undocumented

HYPEROBJECT

Private

COMPUTE-CACHED-VALUE

subobject information

OBJECT-VIEW

View class for a hyperobject

SUBOBJECT

subobject information

Undocumented

HYPEROBJECT-DSD

HYPEROBJECT-ESD

RULE