5a2a287752
* *
* partial sync with the 3.4 fork codebase. These are the things
synces for the most part:
- copyright headers
- grammar/typos in comments and some readmes
- comment/whitespace/decorations
- variable scoping in C files
- DO CASE/SWITCH and some other alternate syntax usage
- minimal amount of human readable text in strings
- minor code updates
- HB_TRACE() void * casts for pointers and few other changes to
avoid C compiler warnings
- various other, minor code cleanups
- only Harbour/C code/headers were touched in src, utils, contrib,
include. No 3rd party code, no make files, and with just a few
exceptions, no 'tests' code was touched.
- certain components were not touched were 3.4 diverged too much
already, like f.e. hbmk2, hbssl, hbcurl, hbexpat
- the goal was that no actual program logic should be altered by
these changes. Except some possible minor exceptions, any such
change is probably a bug in this patch.
It's a massive patch, if you find anything broken after it, please
open an Issue with the details. Build test was done on macOS.
The goal is make it easier to see what actual code/logic was changed
in 3.4 compared to 3.2 and to make patches easier to apply in both
ways.
95 lines
4.1 KiB
Plaintext
95 lines
4.1 KiB
Plaintext
Short description of Harbour functions:
|
|
|
|
cAMF := amf3_Encode( xVal, symConvOut, lBinaryStrings )
|
|
xVal - any supported datatype:
|
|
Character (String/MEMO), Numeric (Integer/Double), NIL, Logical, Date (encoded as DateTime),
|
|
DateTime, Array, Hash (String and Integer keys only),
|
|
Object (anonymous hash-like, externalizable, class-mapped)
|
|
|
|
AMF supports references, so this example a1 value will be serialized correctly.
|
|
a1 := { NIL }
|
|
a2 := { a1 }
|
|
a1[ 1 ] := a2
|
|
|
|
symConvOut - function symbol for outbound conversion
|
|
Acts recursively, so if xVal is array,
|
|
all of it's values will be passed to this
|
|
function.
|
|
|
|
lBinaryStrings - treat strings as binary, resulting AMF
|
|
datatype will be ByteArray. Normally
|
|
a string is encoded to UTF-8.
|
|
|
|
xVal := amf3_Decode( cAMF, symConvIn )
|
|
cAMF - AMF3 serialized binary string
|
|
symConvIn - function symbol for inbound conversion
|
|
|
|
cAMF := amf3_FromWA( [ <bWhile> ], [ <bFor> ], [ <aFields> ], [ <nCount> ], [ <lStrTrim> ], [ <nPackage> ], [ pContext ] )
|
|
|
|
Function to convert current workarea to AMF3 Array.
|
|
|
|
bWhile - COPY TO like WHILE codeblock
|
|
bFor - COPY TO like FOR codeblock
|
|
aFields - array of field names (codeblocks are going to be supported here too)
|
|
nCount - NEXT like, process only specified count of records
|
|
lStrTrim - RTrim() strings, default is .T.
|
|
|
|
nPackage - determine the exact output AMF format
|
|
0 - Array of records contains Arrays of fields (default)
|
|
1 - Array of records contains Anonymous objects
|
|
2 - ArrayCollection object
|
|
Lower number means lesser packet size on the network.
|
|
|
|
pContext - when this function is used inside AMF3_ENCODE specified
|
|
outbound conversion function, you must pass pointer to
|
|
encoding context, otherwise AMF3 references will encoded
|
|
incorrectly. Example code of such case:
|
|
|
|
STATIC FUNCTION ConvOut( xVal, pOuterContext )
|
|
|
|
LOCAL lClose
|
|
|
|
IF HB_ISOBJECT( xVal ) .AND. xVal:className() == "WORKAREAEXPORT"
|
|
lClose := xVal:lCloseWA
|
|
dbSelectArea( xVal:nWorkArea )
|
|
|
|
xVal := amf_Raw():New( amf3_FromWA( xVal:bWhile, xVal:bFor, xVal:aFields, xVal:nCount, xVal:lStrTrim, 1, pOuterContext ) )
|
|
IF lClose
|
|
dbCloseArea()
|
|
ENDIF
|
|
ENDIF
|
|
|
|
RETURN xVal
|
|
|
|
Issues
|
|
======
|
|
|
|
; amf3_Encode(), amf3_Decode()
|
|
- there is no real serialization class-mapping included at the moment,
|
|
due to lack of time to make a concept of it complete.
|
|
Only anonymous (emulated on Harbour side using ObjAMF class)
|
|
and externalizable objects are supported.
|
|
|
|
- context->positon-- decrements should be removed from the .c code,
|
|
before we make the functions able to work on real streams without
|
|
buffering. There is no rewind in such situations.
|
|
|
|
; amf3_FromWA() - generates AMF3 array from current workarea,
|
|
but the function doesn't have an idea of SET DELETED switch!
|
|
It should have, because it tries to predict the number of records.
|
|
As a workaround <bFor> parameter could be used, because it switches
|
|
off the prediction. Another option could be creating temporary INDEX FOR,
|
|
it should have correct ordKeyCount().
|
|
|
|
; amf3_Decode() - really doesn't need a hash for references, because
|
|
reference id in AMF increase sequentially. It could be okay and faster
|
|
to use some array with decent resize schema. Other than that benchmarks (in
|
|
ST mode) showed that decoding speed is a little bit faster in this
|
|
implementation than with Flash's built-in.
|
|
|
|
; .c function amf3_encode_string() does string hb_strRTrimLen()
|
|
on a UTF-8 values. so far i haven't found a string that was broken
|
|
by this, but i have a feeling that it is possible...
|
|
|
|
Note your issues too!
|