kc3-lang/libxml2/os400/libxmlrpg/xmlstring.rpgle
-
Show log
Commit
-
Hash : d1f90624
Author :
Date : 2017-07-27T11:20:02
small changes for OS/400 OS/400 version V5R3 is not supported by IBM anymore. In addition, the iSeries system I have here for development has been changed and the new system is not able to compile for an OS version lower than V6R1. Thus I made some updates to the libxml2 os400 scripts accordingly: - Oldest supported OS version is now V6R1. - Adjust ILE/RPG wrappers comments. - Update copyright year range. - Do not log compiler informational messages.
-
os400/libxmlrpg/xmlstring.rpgle
-
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180
* Summary: set of routines to process strings * Description: type and interfaces needed for the internal string * handling of the library, especially UTF8 processing. * * Copy: See Copyright for the status of this software. * * Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A. /if not defined(XML_STRING_H__) /define XML_STRING_H__ /include "libxmlrpg/xmlversion" /include "libxmlrpg/xmlTypesC" /include "libxmlrpg/xmlstdarg" * xmlChar: * * This is a basic byte in an UTF-8 encoded string. * It's unsigned allowing to pinpoint case where char * are assigned * to xmlChar * (possibly making serialization back impossible). d xmlChar s based(######typedef######) d like(xmlCuchar) * xmlChar handling d xmlStrdup pr * extproc('xmlStrdup') xmlChar * d cur * value options(*string) const xmlChar * d xmlStrndup pr * extproc('xmlStrndup') xmlChar * d cur * value options(*string) const xmlChar * d len value like(xmlCint) d xmlCharStrndup pr * extproc('xmlCharStrndup') xmlChar * d cur * value options(*string) const char * d len value like(xmlCint) d xmlCharStrdup pr * extproc('xmlCharStrdup') xmlChar * d cur * value options(*string) const char * d xmlStrsub pr * extproc('xmlStrsub') const xmlChar * d str * value options(*string) const xmlChar * d start value like(xmlCint) d len value like(xmlCint) d xmlStrchr pr * extproc('xmlStrchr') const xmlChar * d str * value options(*string) const xmlChar * d val value like(xmlChar) d xmlStrstr pr * extproc('xmlStrstr') const xmlChar * d str * value options(*string) const xmlChar * d val * value options(*string) const xmlChar * d xmlStrcasestr pr * extproc('xmlStrcasestr') const xmlChar * d str * value options(*string) const xmlChar * d val * value options(*string) const xmlChar * d xmlStrcmp pr extproc('xmlStrcmp') d like(xmlCint) d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d xmlStrncmp pr extproc('xmlStrncmp') d like(xmlCint) d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d len value like(xmlCint) d xmlStrcasecmp pr extproc('xmlStrcasecmp') d like(xmlCint) d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d xmlStrncasecmp pr extproc('xmlStrncasecmp') d like(xmlCint) d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d len value like(xmlCint) d xmlStrEqual pr extproc('xmlStrEqual') d like(xmlCint) d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d xmlStrQEqual pr extproc('xmlStrQEqual') d like(xmlCint) d pref * value options(*string) const xmlChar * d name * value options(*string) const xmlChar * d stre * value options(*string) const xmlChar * d xmlStrlen pr extproc('xmlStrlen') d like(xmlCint) d str * value options(*string) const xmlChar * d xmlStrcat pr * extproc('xmlStrcat') xmlChar * d cur * value options(*string) xmlChar * d add * value options(*string) const xmlChar * d xmlStrncat pr * extproc('xmlStrncat') xmlChar * d cur * value options(*string) xmlChar * d add * value options(*string) const xmlChar * d len value like(xmlCint) d xmlStrncatNew pr * extproc('xmlStrncatNew') xmlChar * d str1 * value options(*string) const xmlChar * d str2 * value options(*string) const xmlChar * d len value like(xmlCint) * xmlStrPrintf() is a vararg function. * The following prototype supports up to 8 pointer arguments. * Other argument signature can be achieved by defining alternate * prototypes redirected to the same function. d xmlStrPrintf pr extproc('xmlStrPrintf') d like(xmlCint) d buf * value options(*string) xmlChar * d len value like(xmlCint) d msg * value options(*string) const char * d arg1 * value options(*string: *nopass) d arg2 * value options(*string: *nopass) d arg3 * value options(*string: *nopass) d arg4 * value options(*string: *nopass) d arg5 * value options(*string: *nopass) d arg6 * value options(*string: *nopass) d arg7 * value options(*string: *nopass) d arg8 * value options(*string: *nopass) d xmlStrVPrintf pr extproc('xmlStrVPrintf') d like(xmlCint) d buf * value options(*string) xmlChar * d len value like(xmlCint) d msg * value options(*string) const char * d ap likeds(xmlVaList) d xmlGetUTF8Char pr extproc('xmlGetUTF8Char') d like(xmlCint) d utf * value options(*string) const uns. char * d len like(xmlCint) d xmlCheckUTF8 pr extproc('xmlCheckUTF8') d like(xmlCint) d utf * value options(*string) const uns. char * d xmlUTF8Strsize pr extproc('xmlUTF8Strsize') d like(xmlCint) d utf * value options(*string) const xmlChar * d len value like(xmlCint) d xmlUTF8Strndup pr * extproc('xmlUTF8Strndup') xmlChar * d utf * value options(*string) const xmlChar * d len value like(xmlCint) d xmlUTF8Strpos pr * extproc('xmlUTF8Strpos') const xmlChar * d utf * value options(*string) const xmlChar * d pos value like(xmlCint) d xmlUTF8Strloc pr extproc('xmlUTF8Strloc') d like(xmlCint) d utf * value options(*string) const xmlChar * d utfchar * value options(*string) const xmlChar * d xmlUTF8Strsub pr * extproc('xmlUTF8Strsub') xmlChar * d utf * value options(*string) const xmlChar * d start value like(xmlCint) d len value like(xmlCint) d xmlUTF8Strlen pr extproc('xmlUTF8Strlen') d like(xmlCint) d utf * value options(*string) const xmlChar * d xmlUTF8Size pr extproc('xmlUTF8Size') d like(xmlCint) d utf * value options(*string) const xmlChar * d xmlUTF8Charcmp pr extproc('xmlUTF8Charcmp') d like(xmlCint) d utf1 * value options(*string) const xmlChar * d utf2 * value options(*string) const xmlChar * /endif XML_STRING_H__