--- freem/doc/freem.texi 2025/04/18 01:23:05 1.25 +++ freem/doc/freem.texi 2025/04/20 15:43:32 1.33 @@ -4,7 +4,7 @@ @settitle The FreeM Manual @copying -This manual is for FreeM, (version 0.64.0-rc0), which is a free and open-source implementation of the M programming language. +This manual is for FreeM, (version 0.64.0-rc1), which is a free and open-source implementation of the M programming language. Copyright @copyright{} 2014-2025 Coherent Logic Development LLC @@ -18,7 +18,7 @@ Permission is granted to copy, distribut @title The FreeM Manual @subtitle @sc{The Official Manual of FreeM} -@subtitle Version 0.64.0-rc0 +@subtitle Version 0.64.0-rc1 @c@vskip 10pt @c@center @image{freem-logo-sm,,,,.png} @author Serena Willis @@ -73,7 +73,6 @@ This is the official manual for the Free * Global Aliasing:: Defining alternate names for globals. * Global Mappings:: Mapping global names to non-default namespaces. -* Transaction Processing:: Transactions in FreeM. * Asynchronous Event Handling:: Handling asynchronous events in FreeM. * Global Triggers:: Responding to global accesses in M code. * Synchronous Event Handling:: Synchronous events in FreeM. @@ -235,15 +234,15 @@ Steve Zeck (Code) $ @command{./freem} [@emph{OPTIONS}...] [[-r ] | [--routine=]] @end example -When FreeM loads, it searches the @code{SYSTEM} namespace for the @code{^%SYSINIT} routine, and begins executing it. +When FreeM loads, it searches the @code{SYSTEM} namespace for the @code{%SYSINIT} routine, and begins executing it. -When @code{-r} or @code{--routine} are passed on the command line, FreeM will load and run the specified routine after running @code{^%SYSINIT}. Beginning with FreeM 0.1.7, routines invoked in this manner are no longer required to perform their own namespace setup with @code{VIEW} commands. +When @code{-r} or @code{--routine} are passed on the command line, FreeM will load and run the specified routine after running @code{%SYSINIT}. Beginning with FreeM 0.1.7, routines invoked in this manner are no longer required to perform their own namespace setup with @code{VIEW} commands. @section %SYSINIT Routine -The @code{^%SYSINIT} routine runs every time a FreeM interpreter process starts. This routine defines some useful constants, enables handling of @code{TRIGGER} events, and handles the execution of code passed via the @code{-x\--execute} or routines passed via @code{-r|--routine}. +The @code{%SYSINIT} routine runs every time a FreeM interpreter process starts. This routine defines some useful constants, enables handling of @code{TRIGGER} events, and handles the execution of code passed via the @code{-x\--execute} or routines passed via @code{-r|--routine}. -Do not modify the supplied @code{^%SYSINIT} routine to add site-specific startup items. Instead, create a @code{^LCLINIT} routine in the @code{USER} namespace of one or more environments. @code{^%SYSINIT} will automatically run @code{^LCLINIT} each time it starts. +Do not modify the supplied @code{%SYSINIT} routine to add site-specific startup items. Instead, create a @code{LCLINIT} routine in the @code{USER} namespace of one or more environments. @code{%SYSINIT} will automatically run @code{LCLINIT} each time it starts. @section Command-Line Options @cindex options, command-line @@ -278,7 +277,7 @@ Allows your M routines to be used as UNI Selects the FreeM namespace to be entered on startup. Must be defined in @file{/etc//freem.conf}. @item @option{-r @emph{}}, @option{--routine=@emph{}} -Causes @code{} to be executed at load, instead of @code{^%SYSINIT}. +Causes @code{} to be executed at load, instead of @code{%SYSINIT}. @item @option{--standard=@emph{}} Sets the default FreeM dialect to use for new routine buffers. @@ -371,7 +370,7 @@ Attempting to start a FreeM interpreter The FreeM direct-mode environment is the mode entered when FreeM is invoked without the use of @option{-r @emph{}} or @option{--routine=@emph{}}: @example -Coherent Logic Development FreeM version 0.64.0-rc0 (x86_64-pc-linux-gnu) +Coherent Logic Development FreeM version 0.64.0-rc1 (x86_64-pc-linux-gnu) Copyright (C) 2014, 2020, 2021 Coherent Logic Development LLC @@ -435,10 +434,6 @@ Displays a list of @code{LOCK}s held in @item @command{rbuf} Lists the status of all FreeM routine buffers. -@anchor{dbstats} -@item @command{dbstats} -Shows statistics for the BerkeleyDB global handler. - @anchor{wh} @item @command{wh} Forces an immediate flush of this process's @code{readline} history buffer to disk. @@ -474,7 +469,7 @@ DEFAULT.USER> @end example @item @command{!@emph{}} -Invokes a shell to run @emph{} from within FreeM. This temporarily disables @command{SIGALRM} handling in FreeM, which may interrupt the use of event-driven M programming commands including @command{ESTART} and @command{ESTOP}. +Invokes a shell to run @emph{} from within FreeM. This temporarily disables @command{SIGALRM} handling in FreeM, which may interrupt the use of event-driven M programming commands including @command{ASTART} and @command{ASTOP}. If the @command{>} character is supplied immediately preceding @emph{}, FreeM will append the contents of an M local or global variable referenced in @code{^$JOB($JOB,"PIPE_GLVN")} to the standard input stream of @emph{}. @@ -663,6 +658,8 @@ Please note that FreeM is not entirely s Returns a comma-delimited list of error conditions currently present, and is writable. An empty @code{$ECODE} indicates no errors. +Writing a value in the format @code{,,} into @code{$ECODE} will raise that error condition. + @node $ESTACK @section $ESTACK @cindex $ESTACK @@ -1242,8 +1239,8 @@ The optional fourth argument is the fina Can be used on the left-hand side of an expression in order to @code{@ref{SET}} a value into a @code{d}-delimited piece of @code{s}, as in: @example -; ^jpw="this^is^a^piece" -SET $PIECE(^jpw,"^",2)="isn't" ; => "this^isn't^a^piece" +; ^snw="this^is^a^piece" +SET $PIECE(^snw,"^",2)="isn't" ; => "this^isn't^a^piece" @end example @node $QLENGTH() @@ -1275,7 +1272,7 @@ Returns the number of subscripts in @emp @code{$QSUBSCRIPT(@emph{expr V glvn},@emph{expr V n})} @end example -Returns the @emph{n}th subscript of @emph{glvn}. +In the RHS form, returns the @emph{n}th subscript of @emph{glvn}. @emph{Example} @@ -1283,6 +1280,14 @@ Returns the @emph{n}th subscript of @emp @code{SET SUB=$QSUBSCRIPT("^GBL(1,2,3)",2) ; => 2} @end example +@emph{Syntax} + +@example +@code{SET $QSUBSCRIPT(@emph{expr V glvn},@emph{expr V n})=@emph{expr} ; => ^GBL(1,4,3)} +@end example + +In the LHS form, sets the @emph{n}th subscript of @emph{glvn} to @emph{expr}. + @node $QUERY() @section $QUERY @cindex $QUERY @@ -1300,16 +1305,16 @@ Returns the next subscripted reference i We will assume the following data structure exists: @example -^jpw(1)=1 -^jpw(1,2)="foo" -^jpw(2)=3 -^jpw(3)="" +^snw(1)=1 +^snw(1,2)="foo" +^snw(2)=3 +^snw(3)="" @end example -The following code will retrieve the next subscripted name after @code{^jpw(1)}: +The following code will retrieve the next subscripted name after @code{^snw(1)}: @example -@code{SET NEXTNAM=$QUERY(^jpw(1)) ; => ^jpw(1,2)} +@code{SET NEXTNAM=$QUERY(^snw(1)) ; => ^snw(1,2)} @end example @node $RANDOM() @@ -1494,6 +1499,8 @@ Always @emph{true} @cindex intrinsic functions, $ZCALL @cindex intrinsic functions, implementation-specific +Purpose unknown. + @node $ZCRC() @section $ZCRC @cindex $ZCRC @@ -1514,6 +1521,8 @@ Returns a checksum of @code{arg1}. @cindex intrinsic functions, $ZDATA @cindex intrinsic functions, implementation-specific +Purpose unknown. + @node $ZDATE() @section $ZDATE @cindex $ZDATE @@ -1538,6 +1547,8 @@ The optional @emph{} foll @cindex intrinsic functions, $ZEDIT @cindex intrinsic functions, implementation-specific +Purpose unknown. + @node $ZHOROLOG() @section $ZHOROLOG @cindex $ZHOROLOG @@ -1562,12 +1573,16 @@ $ZHOROLOG(@emph{},@emph{ WATCH Watchpoints enabled. -DEFAULT.USER> WATCH +^JPW(1) +DEFAULT.USER> WATCH +^SNW(1) -Added '^JPW("1")' to the watchlist. +Added '^SNW("1")' to the watchlist. -DEFAULT.USER> SET ^JPW(1)="new value" +DEFAULT.USER> SET ^SNW(1)="new value" ->> WATCHPOINT: ^JPW("1") => 'new value' (changed 1 times) +>> WATCHPOINT: ^SNW("1") => 'new value' (changed 1 times) @end example The following example will remove that watchpoint: @example -DEFAULT.USER> WATCH -^JPW(1) +DEFAULT.USER> WATCH -^SNW(1) -Removed '^JPW("1")' from the watchlist. +Removed '^SNW("1")' from the watchlist. -DEFAULT.USER> WATCH ?^JPW(1) +DEFAULT.USER> WATCH ?^SNW(1) -'^JPW("1")' is not being watched. +'^SNW("1")' is not being watched. @end example @node WITH @@ -3343,6 +3341,8 @@ DEFAULT.USER> WATCH ?^JPW(1) @cindex commands, non-standard @emph{FreeM Extension} +NOTE: This command may be deprecated and removed in future FreeM releases. + Sets a prefix to be applied to all subsequent local variable or constant references. @emph{Syntax} @@ -3372,14 +3372,6 @@ In the above argumentless form, clears t @cindex XECUTE @cindex commands, XECUTE -@node ZALLOCATE -@section ZALLOCATE -@cindex ZALLOCATE -@cindex commands, ZALLOCATE -@cindex commands, implementation-specific -@cindex commands, non-standard -@emph{FreeM Extension} - @node ZBREAK @section ZBREAK @cindex ZBREAK @@ -3389,14 +3381,6 @@ In the above argumentless form, clears t @cindex commands, non-standard @emph{FreeM Extension} -@node ZDEALLOCATE -@section ZDEALLOCATE -@cindex ZDEALLOCATE -@cindex commands, ZDEALLOCATE -@cindex commands, implementation-specific -@cindex commands, non-standard -@emph{FreeM Extension} - @node ZGO @section ZGO @cindex ZGO @@ -3885,9 +3869,9 @@ Returns or sets the maximum number of ch Returns or sets the maximum number of characters of a single global subscript, from 1-255. @item @code{SINGLE_USER} +R +U -D -If set to @code{1}, FreeM will skip all file locking operations on globals, as well as the @code{LOCK} and @code{ZALLOCATE} tables. If set to @code{0}, FreeM will enforce file locking on both. +If set to @code{1}, FreeM will skip all file locking operations on globals. If set to @code{0}, FreeM will enforce file locking on both. -Setting @code{SINGLE_USER} to @code{1} will improve FreeM performance, but you must @emph{ONLY} use this on systems where you are absolutely sure that only one FreeM process will run at any given time, as running multiple instances of FreeM concurrently when any of them are set to @code{SINGLE_USER} mode @emph{will} cause global data and @code{LOCK}/@code{ZALLOCATE} table corruption! +Setting @code{SINGLE_USER} to @code{1} will improve FreeM performance, but you must @emph{ONLY} use this on systems where you are absolutely sure that only one FreeM process will run at any given time, as running multiple instances of FreeM concurrently when any of them are set to @code{SINGLE_USER} mode @emph{will} cause global data corruption. @item @code{CHARACTER} +R -U -D Returns the character set of the job. @@ -4187,38 +4171,76 @@ Forces a number to positive, whether pos @section Unary - @cindex operators, unary - +Forces a number to negative, whether positive or negative. Also forces numeric coercion of strings. + @node + @section + (Add) @cindex operators, + +@emph{Syntax} + +@example +S X=1+2 ; => 3 +@end example + +Adds numbers together. + @node += @section += (Add/Assign) @cindex operators, += +@emph{Syntax} + +@example +S X=5 +S X+=3 ; => 8 +@end example + +Increments the variable on the LHS by the value on the RHS. + @node ++ @section ++ (Postfix Increment) @cindex operators, ++ +Increments a variable by 1. + @node - @section - (Subtract) @cindex operators, - +Subtracts one number from another. + @node -= @section -= (Subtract/Assign) @cindex operators, -= +@emph{Syntax} + +@example +S X=5 +S X-=3 ; => 2 +@end example + +Decrements the variable on the LHS by the value on the RHS. + @node -- @section -- (Postfix Decrement) @cindex operators, -- +Decrements the variable by one. + @node * @section * (Multiply) @cindex operators, * +Multiplies one number by another. + @node *= @section *= (Multiply/Assign) @cindex operators, *= + + @node / @section / (Divide) @cindex operators, / @@ -4382,11 +4404,15 @@ An @code{INTEGER} is an interpretation o @cindex data types, REAL @cindex types, REAL +A @code{REAL} is a numeric interpretation of data including a fractional part. + @node STRING @section STRING @cindex data types, STRING @cindex types, STRING +A @code{STRING} is any data in FreeM. + @node Custom Types (Classes) @section Custom Types (Classes) @cindex data types, custom @@ -4401,12 +4427,190 @@ See @ref{Classes}. @cindex variables, global @cindex data +@menu +* Globals Overview:: Basics of FreeM persistent storage. +* Creating Globals:: How to create globals. +* Removing Globals:: How to remove globals. +* Global Storage:: How globals are stored. +@end menu + +@node Globals Overview +@section Globals Overview + +FreeM supports typical M globals, which are often described as persistent, hierachical sparse arrays. Globals make it relatively simple to include persistent data in an application without requiring the developer to use an external database management system, and offer syntax and semantics so similar to M local variables and structured system variables that moving from one to the other is seamless. + +Each global comprises three elements: + +@itemize @bullet +@item +An alphabetic name beginning with a caret (@code{^}) or a caret and a percent sign (@code{^%}) +@item +Optionally, one or more comma-delimited subscripts, enclosed in parentheses +@item +A value of up to 255 characters in length +@end itemize + +The percent sign will force the named global into the @code{SYSTEM} namespace of the current FreeM environment. + +@node Creating Globals +@section Creating Globals +@cindex globals, creating + +To create a global, you can use the @code{SET} command: + +@example +SET ^MYGLOBAL("foo","bar")="this is the data value" +@end example + +@node Removing Globals +@section Removing Globals +@cindex globals, removing + +To remove an entire global, you can use the @code{KILL} command with the unsubscripted name of the global: + +@example +KILL ^MYGLOBAL +@end example + +If you only want to remove part of a global, i.e., beginning at a certain subscript level, use the @code{KILL} command with a subscripted name: + +@example +KILL ^MYGLOBAL("foo") +@end example + +This will remove only the @code{"foo"} subscript and all of its children. + +If you only want to remove the data value at a specific subscript level, leaving the subscript itself intact, use @code{KVALUE}: + +@example +KVALUE ^MYGLOBAL("foo") +@end example + +@node Global Storage +@section Global Storage +@cindex globals, storage + +FreeM globals are stored in @code{$PREFIX/var/freem/@emph{}/@emph{}/globals} in a binary format. + +Global files have a header of the following format: + +@verbatim +typedef struct global_header { + + char magic[5]; /* FRMGL */ + int format_version; + char host_triplet[40]; + char host_id[256]; + + unsigned long block_size; + unsigned long last_transaction_id; + + long created; + long last_backup; + +} global_header; +@end verbatim + @node Concurrency Control @chapter Concurrency Control @cindex concurrency control @cindex locking @cindex transaction processing +@menu +* Concurrency Control Overview:: Basics of concurrency control. +* Advisory Locks:: Coordinating access voluntarily. +* Transaction Processing:: Ensuring logical consistency. +@end menu + +@node Concurrency Control Overview +@section Concurrency Control Overview + +Multitasking, multi-user FreeM applications must concern themselves with concurrent access to globals in order to maintain logical consistency and prevent concurrent writes from interleaving. + +In FreeM, there are two mechanisms provided for managing concurrent global access: advisory locks, and transaction processing. + +@node Advisory Locks +@section Advisory Locks + +@node Transaction Processing +@section Transaction Processing +@cindex transaction processing + +FreeM implements a significant subset of the transaction processing features from @emph{ANSI X11.1-1995}. This allows a series of global operations to be conducted all at once, either in batch mode (where concurrency is not disturbed), or in serial mode (where writes are guaranteed to be atomic, consistent, isolated, and durable). + +@subsection Theory of Operation + +FreeM uses a pessimistic concurrency control mechanism for @code{SERIAL} transactions, meaning that any @code{TSTART} command that includes the @code{SERIAL} transaction parameter will cause the process to acquire the transaction processing mutex, which prevents any process but the one holding the mutex from performing any data access (read or write) until either @code{TCOMMIT} or @code{TROLLBACK} is called, either committing or rolling back the transaction, respectively. + +Any transaction in between its @code{TSTART} and @code{TCOMMIT}/@code{TROLLBACK} is said to be @emph{in-flight}. During the in-flight stage, pending global operations are held only in memory and after-image journals. + +FreeM maintains a list of all globals affected during a transaction in-flight. When a @code{TCOMMIT} is reached, FreeM will generate a @emph{checkpoint} of each global data file to be changed by the transaction. These checkpoints allow all FreeM globals to be restored to their pre-transaction state if a @code{TCOMMIT} should fail part of the way through its operation. + +Checkpoints can have one of two modes: + +@table @asis + +@item @code{CP_REMOVE} +Used for globals that did not exist prior to the beginning of this transaction. Simply marks the entire global data file for deletion in case of @code{TCOMMIT} failure. + +@item @code{CP_RESTORE} +Used for globals that @emph{did} exist prior to the beginning of this transaction. In this case, the entire global data file is copied to a new file with a @code{.chk} extension. In cases of @code{TCOMMIT} failure, @code{CP_RESTORE} checkpoint files will be restored over the partially-modified live data file. + +@end table + +The below example shows a few global operations and checkpoints for a transaction in-flight using the @code{trantab} direct-mode command: + +@verbatim +TL1:DEFAULT.USER> trantab + $TLEVEL 1* + Operations for Transaction ID: 6ea14aad-b8f1-47f9-9f52-4f513f892bc0 [RESTARTABLE SERIAL] + + OP. NO. ACTION KEY/DATA + ------- ------ -------- + 1 SET ^FOO=3 + 2 KILL ^FOO + 3 SET ^snw=10 + 4 SET ^BRANDNEW=6 + + Global checkpoints: + + GLOBAL MODE FILES + ------ ---- ----- + ^BRANDNEW CP_REMOVE IN: /usr/local/var/freem/USER/globals/^BRANDNEW + ^snw CP_RESTORE IN: /usr/local/var/freem/USER/globals/^snw + OUT: /usr/local/var/freem/USER/globals/^snw.23390.1.chk + ^FOO CP_RESTORE IN: /usr/local/var/freem/USER/globals/^FOO + OUT: /usr/local/var/freem/USER/globals/^FOO.23390.1.chk +@end verbatim + +In the above example, @code{IN} files are the live data file that will be overwritten or removed, and @code{OUT} files are the checkpoints themselves. Note that @code{OUT} files are only used for @code{CP_RESTORE} checkpoints. + +@subsection Using Transaction Processing + +To use transactions in FreeM, you need to be familiar with three commands: + +@itemize @bullet +@item +@code{TSTART} +@item +@code{TCOMMIT} +@item +@code{TROLLBACK} +@end itemize + +With transaction processing, global variable operations occurring between @code{TSTART} and @code{TCOMMIT} commands will be contained within the transaction. + +The atomicity, consistency, isolation, and durability facets of FreeM transaction hinge on the transaction mode. + +@subsubsection BATCH Transactions +@code{BATCH} transactions offer higher performance, and allow other applications aside from the one doing the transaction to continue normal operations until the transaction is committed with @code{TCOMMIT}. In batch mode, other processes are only locked out of normal operation during the commit phase of the transaction. + +The effect of this is that the operations within the batch transaction will not be interleaved with global writes from other applications, but the entire lifetime of the transaction is not guaranteed to be serialized with respect to the transaction processing activities of other running applications in the environment. + +@subsubsection SERIAL Transactions +@code{SERIAL} transactions offer full ACID compliance at the expense of multiprocessing performance. In serial mode, a @code{TSTART} blocks all activity from all other FreeM processes in the environment, and this blocking effect is not released until the transaction is committed with @code{TCOMMIT} or rolled back with @code{TROLLBACK} (or due to abnormal conditions in the environment that preclude the successful completion of the transaction). + @node Local Variables @chapter Local Variables @cindex variables, local @@ -4459,30 +4663,169 @@ See @ref{Classes}. @cindex programming, object-oriented @menu -* Classes:: The basis of object-oriented programming. +* Classes:: The basis of object-oriented programming. +* Inheritance:: Basing one class upon another. +* Methods:: Attaching code to a class. +* Public and Private Variables:: Managing class member access. +* Instantiating Objects:: Creating instances of classes. +* Determining Object Class:: Getting object information at runtime. @end menu @node Classes @section Classes @menu -* Inheritance:: Basing one class upon another. -* Methods:: Attaching code to a class. -* Public Variables:: Variables visible outside of a class. -* Private Variables:: Variables only visible within a class. +* Class Overview:: Class basics. +* Constructors:: Managing object creation. +* Destructors:: Cleaning up. +* Runtime Polymorphism:: Selecting methods at runtime. @end menu +@node Class Overview +@subsection Class Overview + +A @emph{class} is the primary organizing concept of FreeM support for object-oriented programming, and in FreeM, is simply an M routine with a few special properties: + +@example +MYCLASS(THIS,INIT):OBJECT ; Constructor for MYCLASS, inherits OBJECT + ; two private variables + S THIS("NUMERATOR"):PRIVATE=$P(INIT,"/",1) + S THIS("DENOMINATOR"):PRIVATE=$P(INIT,"/",2) + Q + ; +DESTROY(THIS) ; This is the destructor + Q +@end example + +The above example demonstrates general class syntax. + +@node Constructors +@subsection Constructors + +A @emph{constructor} is an M entry point that is called when a new instance of a class is created. + +A constructor must be the first entry point in a class routine, its tag must match the class/routine name, and it must take two arguments, @code{THIS} and @code{INIT}. + +@code{THIS} represents the instance of the object being accessed, and @code{INIT} represents an initializer that can be used to assign an initial value to the object when instantiating the class. + +A constructor looks like this: + +@example +%FRACTION(THIS,INIT):OBJECT ; + S THIS("NUMERATOR"):PRIVATE=$P(INIT,"/",1) + S THIS("DENOMINATOR"):PRIVATE=$P(INIT,"/",2) + Q +@end example + +@emph{Syntax} +@example +@emph{}(THIS,INIT)[:@emph{}] +@end example + +In the above example, @emph{} represents the name of a class from which this class should inherit. In this case, the @code{FRACTION} class inherits from the @code{OBJECT} class. Note that this is not strictly necessary in this case, as all classes in FreeM automatically inherit from @code{OBJECT}. + +@node Destructors +@subsection Destructors +A @code{destructor} is called when you @code{KILL} an instance variable. Its tag must be @code{DESTROY}, and it must take one argument (@code{THIS}). + +The destructor should be used to clean up any resources used by class methods. + +A destructor looks like this: + +@example +DESTROY(THIS) ; + ; free any resources that should be freed at the end of the object's lifetime + Q +@end example + @node Inheritance -@subsection Inheritance +@section Inheritance + +Every class you create will automatically inherit the methods and functionality of the @code{OBJECT} class, supplied with FreeM. + +When attempting to call a method, FreeM will first search the class routine for a matching entry point, and then follow the inheritance chain upwards until a matching entry point is found. If the final class in the chain does not have a matching entry point, FreeM will try to find a matching entry point in the @code{OBJECT} class. + +Inheritance is achieved by specifying the name of the superclass in the constructor: + +@example +CLASS(THIS,INIT):SUPERCLASS +@end example + +@node Runtime Polymorphism +@subsection Runtime Polymorphism + +You can achieve runtime polymorphism by subclassing, and defining methods in the subclass that match the names of existing methods in the superclass. Following FreeM inheritance rules, the overridden method in the subclass will be called, and the method in the superclass will not. + +Note that the overridden method in the subclass can take a different set or number of arguments than the @emph{formallist} of the superclass method would specify. @node Methods -@subsection Methods +@section Methods +Class methods are defined as tags with @emph{formallist}s in a class routine, and per the typical FreeM object pattern, must take at least one argument, being @code{THIS} (representing a reference to the object instance being accessed). + +The following class (@code{MYCLASS}) has a constructor, a destructor, and a method called @code{MYMETHOD}: -@node Public Variables -@subsection Public Variables +@example +%MYCLASS(THIS,INIT) ; + Q THIS +DESTROY(THIS) ; + Q +MYMETHOD(THIS) ; + Q "VALUE" +@end example -@node Private Variables -@subsection Private Variables +The dot operator is used to invoke class methods: + +@example +DEFAULT.USER> N MYOBJ=$#^%MYCLASS("") +DEFAULT.USER> W MYOBJ.MYMETHOD() +VALUE +@end example + +@node Public and Private Variables +@section Public and Private Variables + +FreeM supports private fields with the @code{:PRIVATE} specifier in the @code{SET} command, enforcing classical object-oriented data encapsulation. The @code{:PUBLIC} specifier is provided for completeness, and is the default. + +The below constructor for a @code{FRACTION} class defines two private fields: + +@example +%FRACTION(THIS,INIT):OBJECT ; + S THIS("NUMERATOR"):PRIVATE=$P(INIT,"/",1) + S THIS("DENOMINATOR"):PRIVATE=$P(INIT,"/",2) + Q +@end example + +Either of the following commands will create a public field: + +@example + S THIS("VARNAM")="Initial Value" + S THIS("VARNAM"):PUBLIC="Initial Value" +@end example + +Attempting to access private fields from outside of the class will raise error condition @code{ZOBJFLDACCV}. + +@node Instantiating Objects +@section Instantiating Objects + +To instantiate an object (i.e., create an object from a certain class), you will use the @code{NEW} command as follows: + +@example +NEW MYSTR=$#^%STRING("myString") +@end example + +This will create a local variable called MYSTR of type STRING, and initialize it with the value myString. + +@node Determining Object Class +@section Determining Object Class + +To determine the class of any FreeM local variable, you will use the @code{$$TYPE()} method: + +@example +USER> W MYSTR.$$TYPE() +^%STRING +@end example + +The @code{$$TYPE()} method is a member of the @code{OBJECT} class. @node Libraries @chapter Libraries @@ -4590,58 +4933,6 @@ To remove the above mapping, any of the KILL ^$SYSTEM("MAPPINGS","GLOBAL","^FOO") @end example -@node Transaction Processing -@chapter Transaction Processing -@cindex transaction processing - -FreeM implements a significant subset of the transaction processing features from @emph{ANSI X11.1-1995}. This allows a series of global operations to be conducted all at once, either in batch mode (where concurrency is not disturbed), or in serial mode (where writes are guaranteed to be atomic, consistent, isolated, and durable). - -@section Theory of Operation - -FreeM uses a pessimistic concurrency control mechanism for @code{SERIAL} transactions, meaning that any @code{TSTART} command that includes the @code{SERIAL} transaction parameter will cause the process to acquire the transaction processing mutex, which prevents any process but the one holding the mutex from performing any data access (read or write) until either @code{TCOMMIT} or @code{TROLLBACK} is called, either committing or rolling back the transaction, respectively. - -Any transaction in between its @code{TSTART} and @code{TCOMMIT}/@code{TROLLBACK} is said to be @emph{in-flight}. During the in-flight stage, pending global operations are held only in memory and after-image journals. - -FreeM maintains a list of all globals affected during a transaction in-flight. When a @code{TCOMMIT} is reached, FreeM will generate a @emph{checkpoint} of each global data file to be changed by the transaction. These checkpoints allow all FreeM globals to be restored to their pre-transaction state if a @code{TCOMMIT} should fail part of the way through its operation. - -Checkpoints can have one of two modes: - -@table @asis - -@item @code{CP_REMOVE} -Used for globals that did not exist prior to the beginning of this transaction. Simply marks the entire global data file for deletion in case of @code{TCOMMIT} failure. - -@item @code{CP_RESTORE} -Used for globals that @emph{did} exist prior to the beginning of this transaction. In this case, the entire global data file is copied to a new file with a @code{.chk} extension. In cases of @code{TCOMMIT} failure, @code{CP_RESTORE} checkpoint files will be restored over the partially-modified live data file. - -@end table - -The below example shows a few global operations and checkpoints for a transaction in-flight using the @code{trantab} direct-mode command: - -@verbatim -TL1:DEFAULT.USER> trantab - $TLEVEL 1* - Operations for Transaction ID: 6ea14aad-b8f1-47f9-9f52-4f513f892bc0 [RESTARTABLE SERIAL] - - OP. NO. ACTION KEY/DATA - ------- ------ -------- - 1 SET ^FOO=3 - 2 KILL ^FOO - 3 SET ^jpw=10 - 4 SET ^BRANDNEW=6 - - Global checkpoints: - - GLOBAL MODE FILES - ------ ---- ----- - ^BRANDNEW CP_REMOVE IN: /usr/local/var/freem/USER/globals/^BRANDNEW - ^jpw CP_RESTORE IN: /usr/local/var/freem/USER/globals/^jpw - OUT: /usr/local/var/freem/USER/globals/^jpw.23390.1.chk - ^FOO CP_RESTORE IN: /usr/local/var/freem/USER/globals/^FOO - OUT: /usr/local/var/freem/USER/globals/^FOO.23390.1.chk -@end verbatim - -In the above example, @code{IN} files are the live data file that will be overwritten or removed, and @code{OUT} files are the checkpoints themselves. Note that @code{OUT} files are only used for @code{CP_RESTORE} checkpoints. @node Asynchronous Event Handling @@ -4855,9 +5146,9 @@ You can also set up a trigger that appli This routine is the implementation of the @code{$ZCOLUMNS} intrinsic special variable. -@section ^%SYSINIT -@cindex ^%SYSINIT -@cindex system library routines, ^%SYSINIT +@section %SYSINIT +@cindex %SYSINIT +@cindex system library routines, %SYSINIT This routine is the default startup routine for FreeM running in direct mode. @@ -5859,11 +6150,6 @@ The FreeM @code{LOCK} table. Supported actions are @code{list} and @code{remove}. -@item zallocate -The FreeM @code{ZALLOCATE} table. - -No actions yet implemented. - @item journal FreeM after-image journaling. @@ -6085,7 +6371,7 @@ Module headers should adhere to the foll * binding library * * - * Author: Serena Willis + * Author: Serena Willis * Copyright (C) 1998 MUG Deutschland * Copyright (C) Coherent Logic Development LLC *