1 * Summary: implementation of XML Schema Datatypes 2 * Description: module providing the XML Schema Datatypes implementation 3 * both definition and validity checking 4 * 5 * Copy: See Copyright for the status of this software. 6 * 7 * Author: Patrick Monnerat <pm (a] datasphere.ch>, DATASPHERE S.A. 8 9 /if not defined(XML_SCHEMA_TYPES_H__) 10 /define XML_SCHEMA_TYPES_H__ 11 12 /include "libxmlrpg/xmlversion" 13 14 /if defined(LIBXML_SCHEMAS_ENABLED) 15 16 /include "libxmlrpg/schemasInternals" 17 /include "libxmlrpg/xmlschemas" 18 19 d xmlSchemaWhitespaceValueType... 20 d s 10i 0 based(######typedef######) enum 21 d XML_SCHEMA_WHITESPACE_UNKNOWN... 22 d c 0 23 d XML_SCHEMA_WHITESPACE_PRESERVE... 24 d c 1 25 d XML_SCHEMA_WHITESPACE_REPLACE... 26 d c 2 27 d XML_SCHEMA_WHITESPACE_COLLAPSE... 28 d c 3 29 30 d xmlSchemaInitTypes... 31 d pr extproc('xmlSchemaInitTypes') 32 33 d xmlSchemaCleanupTypes... 34 d pr extproc('xmlSchemaCleanupTypes') 35 36 d xmlSchemaGetPredefinedType... 37 d pr extproc('xmlSchemaGetPredefinedType') 38 d like(xmlSchemaTypePtr) 39 d name * value options(*string) const xmlChar * 40 d ns * value options(*string) const xmlChar * 41 42 d xmlSchemaValidatePredefinedType... 43 d pr 10i 0 extproc( 44 d 'xmlSchemaValidatePredefinedType') 45 d type value like(xmlSchemaTypePtr) 46 d value * value options(*string) const xmlChar * 47 d val * value xmlSchemaValPtr * 48 49 d xmlSchemaValPredefTypeNode... 50 d pr 10i 0 extproc('xmlSchemaValPredefTypeNode') 51 d type value like(xmlSchemaTypePtr) 52 d value * value options(*string) const xmlChar * 53 d val * value xmlSchemaValPtr * 54 d node value like(xmlNodePtr) 55 56 d xmlSchemaValidateFacet... 57 d pr 10i 0 extproc('xmlSchemaValidateFacet') 58 d base value like(xmlSchemaTypePtr) 59 d facet value like(xmlSchemaFacetPtr) 60 d value * value options(*string) const xmlChar * 61 d val value like(xmlSchemaValPtr) 62 63 d xmlSchemaValidateFacetWhtsp... 64 d pr 10i 0 extproc( 65 d 'xmlSchemaValidateFacetWhtsp') 66 d facet value like(xmlSchemaFacetPtr) 67 d fws value 68 d like(xmlSchemaWhitespaceValueType) 69 d valType value like(xmlSchemaValType) 70 d value * value options(*string) const xmlChar * 71 d val value like(xmlSchemaValPtr) 72 d ws value 73 d like(xmlSchemaWhitespaceValueType) 74 75 d xmlSchemaFreeValue... 76 d pr extproc('xmlSchemaFreeValue') 77 d val value like(xmlSchemaValPtr) 78 79 d xmlSchemaNewFacet... 80 d pr extproc('xmlSchemaNewFacet') 81 d like(xmlSchemaFacetPtr) 82 83 d xmlSchemaCheckFacet... 84 d pr 10i 0 extproc('xmlSchemaCheckFacet') 85 d facet value like(xmlSchemaFacetPtr) 86 d typeDecl value like(xmlSchemaTypePtr) 87 d ctxt value like(xmlSchemaParserCtxtPtr) 88 d name * value options(*string) const xmlChar * 89 90 d xmlSchemaFreeFacet... 91 d pr extproc('xmlSchemaFreeFacet') 92 d facet value like(xmlSchemaFacetPtr) 93 94 d xmlSchemaCompareValues... 95 d pr 10i 0 extproc('xmlSchemaCompareValues') 96 d x value like(xmlSchemaValPtr) 97 d y value like(xmlSchemaValPtr) 98 99 d xmlSchemaGetBuiltInListSimpleTypeItemType... 100 d pr extproc('xmlSchemaGetBuiltInListSimp- 101 d leTypeItemType') 102 d like(xmlSchemaTypePtr) 103 d type value like(xmlSchemaTypePtr) 104 105 d xmlSchemaValidateListSimpleTypeFacet... 106 d pr 10i 0 extproc('xmlSchemaValidateListSimple- 107 d TypeFacet') 108 d facet value like(xmlSchemaFacetPtr) 109 d value * value options(*string) const xmlChar * 110 d actualLen 20u 0 value 111 d expectedLen * value unsigned long * 112 113 d xmlSchemaGetBuiltInType... 114 d pr extproc('xmlSchemaGetBuiltInType') 115 d like(xmlSchemaTypePtr) 116 d type value like(xmlSchemaValType) 117 118 d xmlSchemaIsBuiltInTypeFacet... 119 d pr 10i 0 extproc( 120 d 'xmlSchemaIsBuiltInTypeFacet') 121 d type value like(xmlSchemaTypePtr) 122 d facetType 10i 0 value 123 124 d xmlSchemaCollapseString... 125 d pr * extproc('xmlSchemaCollapseString') xmlChar * 126 d value * value options(*string) const xmlChar * 127 128 d xmlSchemaWhiteSpaceReplace... 129 d pr * extproc('xmlSchemaWhiteSpaceReplace')xmlChar * 130 d value * value options(*string) const xmlChar * 131 132 d xmlSchemaGetFacetValueAsULong... 133 d pr 20u 0 extproc( 134 d 'xmlSchemaGetFacetValueAsULong') 135 d facet value like(xmlSchemaFacetPtr) 136 137 d xmlSchemaValidateLengthFacet... 138 d pr 10i 0 extproc( 139 d 'xmlSchemaValidateLengthFacet') 140 d type value like(xmlSchemaTypePtr) 141 d facet value like(xmlSchemaFacetPtr) 142 d value * value options(*string) const xmlChar * 143 d val value like(xmlSchemaValPtr) 144 d length 20u 0 145 146 d xmlSchemaValidateLengthFacetWhtsp... 147 d pr 10i 0 extproc( 148 d 'xmlSchemaValidateLengthFacetWhtsp') 149 d facet value like(xmlSchemaFacetPtr) 150 d valType value like(xmlSchemaValType) 151 d value * value options(*string) const xmlChar * 152 d val value like(xmlSchemaValPtr) 153 d length 20u 0 154 d ws value 155 d like(xmlSchemaWhitespaceValueType) 156 157 d xmlSchemaValPredefTypeNodeNoNorm... 158 d pr 10i 0 extproc( 159 d 'xmlSchemaValPredefTypeNodeNoNorm') 160 d type value like(xmlSchemaTypePtr) 161 d value * value options(*string) const xmlChar * 162 d val like(xmlSchemaValPtr) 163 d node value like(xmlNodePtr) 164 165 d xmlSchemaGetCanonValue... 166 d pr 10i 0 extproc('xmlSchemaGetCanonValue') 167 d val value like(xmlSchemaValPtr) 168 d retValue * value const xmlChar * * 169 170 d xmlSchemaGetCanonValueWhtsp... 171 d pr 10i 0 extproc( 172 d 'xmlSchemaGetCanonValueWhtsp') 173 d val value like(xmlSchemaValPtr) 174 d retValue * value const xmlChar * * 175 d ws value 176 d like(xmlSchemaWhitespaceValueType) 177 178 d xmlSchemaValueAppend... 179 d pr 10i 0 extproc('xmlSchemaValueAppend') 180 d prev value like(xmlSchemaValPtr) 181 d cur value like(xmlSchemaValPtr) 182 183 d xmlSchemaValueGetNext... 184 d pr extproc('xmlSchemaValueGetNext') 185 d like(xmlSchemaValPtr) 186 d cur value like(xmlSchemaValPtr) 187 188 d xmlSchemaValueGetAsString... 189 d pr * extproc('xmlSchemaValueGetAsString') const xmlChar * 190 d val value like(xmlSchemaValPtr) 191 192 d xmlSchemaValueGetAsBoolean... 193 d pr 10i 0 extproc('xmlSchemaValueGetAsBoolean') 194 d val value like(xmlSchemaValPtr) 195 196 d xmlSchemaNewStringValue... 197 d pr extproc('xmlSchemaNewStringValue') 198 d like(xmlSchemaValPtr) 199 d type value like(xmlSchemaValType) 200 d value * value options(*string) const xmlChar * 201 202 d xmlSchemaNewNOTATIONValue... 203 d pr extproc('xmlSchemaNewNOTATIONValue') 204 d like(xmlSchemaValPtr) 205 d name * value options(*string) const xmlChar * 206 d ns * value options(*string) const xmlChar * 207 208 d xmlSchemaNewQNameValue... 209 d pr extproc('xmlSchemaNewQNameValue') 210 d like(xmlSchemaValPtr) 211 d namespaceName * value options(*string) const xmlChar * 212 d localName * value options(*string) const xmlChar * 213 214 d xmlSchemaCompareValuesWhtsp... 215 d pr 10i 0 extproc( 216 d 'xmlSchemaCompareValuesWhtsp') 217 d x value like(xmlSchemaValPtr) 218 d xws value 219 d like(xmlSchemaWhitespaceValueType) 220 d y value like(xmlSchemaValPtr) 221 d yws value 222 d like(xmlSchemaWhitespaceValueType) 223 224 d xmlSchemaCopyValue... 225 d pr extproc('xmlSchemaCopyValue') 226 d like(xmlSchemaValPtr) 227 d val value like(xmlSchemaValPtr) 228 229 d xmlSchemaGetValType... 230 d pr extproc('xmlSchemaGetValType') 231 d like(xmlSchemaValType) 232 d val value like(xmlSchemaValPtr) 233 234 /endif LIBXML_SCHEMAS_ENBLD 235 /endif XML_SCHEMA_TYPES_H__ 236