Hash :
26db5e7a
Author :
Date :
2015-04-17T17:21:14
os400: implement CL command XMLLINT.
/ XMLLINT CL command. / / / / See Copyright for the status of this software. / / / / Author: Patrick Monnerat pm@datasphere.ch, DATASPHERE S.A. /
/ Interface to program XMLLINTCL /
CMD PROMPT('XML tool')
/* XML input file location. */
PARM KWD(STMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) MIN(1) +
CHOICE('Stream file path') +
PROMPT('XML Stream file')
/* DTD location. */
PARM KWD(DTD) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('ID, URL or stream file path') +
PROMPT('DTD id, URL or file path')
PARM KWD(DTDLOCATOR) TYPE(*CHAR) LEN(8) DFT(*DTDURL) +
SPCVAL(*DTDURL *DTDFPI) EXPR(*YES) RSTD(*YES) +
PROMPT('DTD locator is URL/FPI')
/* Schema location. */
PARM KWD(SCHEMA) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('URL or stream file path') +
PROMPT('Schema URL or stream file path')
PARM KWD(SCHEMAKIND) TYPE(*CHAR) LEN(12) VARY(*YES *INT2) +
RSTD(*YES) DFT(*XSD) +
PROMPT('Validating schema kind') +
CHOICE('Keyword') SPCVAL( +
(*XSD '--schema') +
(*RELAXNG '--relaxng') +
(*SCHEMATRON '--schematron') +
)
/* Output location. */
PARM KWD(OUTSTMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('Stream file path') +
PROMPT('Output stream file path')
/* Other parameters with arguments. */
PARM KWD(XPATH) TYPE(*CHAR) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('XPath expression') +
PROMPT('XPath filter')
PARM KWD(PATTERN) TYPE(*CHAR) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('Reader pattern') +
PROMPT('Reader node filter')
/* Paths for resources. */
PARM KWD(PATH) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) MAX(64) +
CHOICE('IFS directory path') +
PROMPT('Path for resources')
PARM KWD(PRETTY) TYPE(*CHAR) LEN(11) VARY(*YES *INT2) +
RSTD(*YES) DFT(*NONE) +
PROMPT('Pretty-print style') +
CHOICE('Keyword') SPCVAL( +
(*NONE '0') +
(*FORMAT '1') +
(*WHITESPACE '2') +
)
PARM KWD(MAXMEM) TYPE(*UINT4) EXPR(*YES) DFT(0) +
CHOICE('Number of bytes') +
PROMPT('Maximum dynamic memory')
PARM KWD(ENCODING) TYPE(*CHAR) LEN(32) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
PMTCTL(ENCODING) CHOICE('Encoding name') +
PROMPT('Output character encoding')
ENCODING: PMTCTL CTL(OUTSTMF) COND(*SPCFD)
/* Boolean options. */
/* --shell is not supported from command mode. */
PARM KWD(OPTIONS) TYPE(*CHAR) LEN(20) VARY(*YES *INT2) +
MAX(50) RSTD(*YES) PROMPT('Options') +
CHOICE('Keyword') SPCVAL( +
(*VERSION '--version') +
(*DEBUG '--debug') +
(*DEBUGENT '--debugent') +
(*COPY '--copy') +
(*RECOVER '--recover') +
(*HUGE '--huge') +
(*NOENT '--noent') +
(*NOENC '--noenc') +
(*NOOUT '--noout') +
(*LOADTRACE '--load-trace') +
(*NONET '--nonet') +
(*NOCOMPACT '--nocompact') +
(*HTMLOUT '--htmlout') +
(*NOWRAP '--nowrap') +
(*VALID '--valid') +
(*POSTVALID '--postvalid') +
(*TIMING '--timing') +
(*REPEAT '--repeat') +
(*INSERT '--insert') +
(*COMPRESS '--compress') +
(*HTML '--html') +
(*XMLOUT '--xmlout') +
(*NODEFDTD '--nodefdtd') +
(*PUSH '--push') +
(*PUSHSMALL '--pushsmall') +
(*MEMORY '--memory') +
(*NOWARNING '--nowarning') +
(*NOBLANKS '--noblanks') +
(*NOCDATA '--nocdata') +
(*FORMAT '--format') +
(*DROPDTD '--dropdtd') +
(*NSCLEAN '--nsclean') +
(*TESTIO '--testIO') +
(*CATALOGS '--catalogs') +
(*NOCATALOGS '--nocatalogs') +
(*AUTO '--auto') +
(*XINCLUDE '--xinclude') +
(*NOXINCLUDENODE '--noxincludenode') +
(*NOFIXUPBASEURIS '--nofixup-base-uris') +
(*LOADDTD '--loaddtd') +
(*DTDATTR '--dtdattr') +
(*STREAM '--stream') +
(*WALKER '--walker') +
(*CHKREGISTER '--chkregister') +
(*C14N '--c14n') +
(*C14N11 '--c14n11') +
(*EXCC14N '--exc-c14n') +
(*SAX1 '--sax1') +
(*SAX '--sax') +
(*OLDXML10 '--oldxml10') +
)
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
/* XMLLINT CL command. */
/* */
/* See Copyright for the status of this software. */
/* */
/* Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A. */
/* Interface to program XMLLINTCL */
CMD PROMPT('XML tool')
/* XML input file location. */
PARM KWD(STMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) MIN(1) +
CHOICE('Stream file path') +
PROMPT('XML Stream file')
/* DTD location. */
PARM KWD(DTD) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('ID, URL or stream file path') +
PROMPT('DTD id, URL or file path')
PARM KWD(DTDLOCATOR) TYPE(*CHAR) LEN(8) DFT(*DTDURL) +
SPCVAL(*DTDURL *DTDFPI) EXPR(*YES) RSTD(*YES) +
PROMPT('DTD locator is URL/FPI')
/* Schema location. */
PARM KWD(SCHEMA) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('URL or stream file path') +
PROMPT('Schema URL or stream file path')
PARM KWD(SCHEMAKIND) TYPE(*CHAR) LEN(12) VARY(*YES *INT2) +
RSTD(*YES) DFT(*XSD) +
PROMPT('Validating schema kind') +
CHOICE('Keyword') SPCVAL( +
(*XSD '--schema') +
(*RELAXNG '--relaxng') +
(*SCHEMATRON '--schematron') +
)
/* Output location. */
PARM KWD(OUTSTMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('Stream file path') +
PROMPT('Output stream file path')
/* Other parameters with arguments. */
PARM KWD(XPATH) TYPE(*CHAR) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('XPath expression') +
PROMPT('XPath filter')
PARM KWD(PATTERN) TYPE(*CHAR) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
CHOICE('Reader pattern') +
PROMPT('Reader node filter')
/* Paths for resources. */
PARM KWD(PATH) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) MAX(64) +
CHOICE('IFS directory path') +
PROMPT('Path for resources')
PARM KWD(PRETTY) TYPE(*CHAR) LEN(11) VARY(*YES *INT2) +
RSTD(*YES) DFT(*NONE) +
PROMPT('Pretty-print style') +
CHOICE('Keyword') SPCVAL( +
(*NONE '0') +
(*FORMAT '1') +
(*WHITESPACE '2') +
)
PARM KWD(MAXMEM) TYPE(*UINT4) EXPR(*YES) DFT(0) +
CHOICE('Number of bytes') +
PROMPT('Maximum dynamic memory')
PARM KWD(ENCODING) TYPE(*CHAR) LEN(32) VARY(*YES *INT2) +
CASE(*MIXED) EXPR(*YES) PASSVAL(*NULL) +
PMTCTL(ENCODING) CHOICE('Encoding name') +
PROMPT('Output character encoding')
ENCODING: PMTCTL CTL(OUTSTMF) COND(*SPCFD)
/* Boolean options. */
/* --shell is not supported from command mode. */
PARM KWD(OPTIONS) TYPE(*CHAR) LEN(20) VARY(*YES *INT2) +
MAX(50) RSTD(*YES) PROMPT('Options') +
CHOICE('Keyword') SPCVAL( +
(*VERSION '--version') +
(*DEBUG '--debug') +
(*DEBUGENT '--debugent') +
(*COPY '--copy') +
(*RECOVER '--recover') +
(*HUGE '--huge') +
(*NOENT '--noent') +
(*NOENC '--noenc') +
(*NOOUT '--noout') +
(*LOADTRACE '--load-trace') +
(*NONET '--nonet') +
(*NOCOMPACT '--nocompact') +
(*HTMLOUT '--htmlout') +
(*NOWRAP '--nowrap') +
(*VALID '--valid') +
(*POSTVALID '--postvalid') +
(*TIMING '--timing') +
(*REPEAT '--repeat') +
(*INSERT '--insert') +
(*COMPRESS '--compress') +
(*HTML '--html') +
(*XMLOUT '--xmlout') +
(*NODEFDTD '--nodefdtd') +
(*PUSH '--push') +
(*PUSHSMALL '--pushsmall') +
(*MEMORY '--memory') +
(*NOWARNING '--nowarning') +
(*NOBLANKS '--noblanks') +
(*NOCDATA '--nocdata') +
(*FORMAT '--format') +
(*DROPDTD '--dropdtd') +
(*NSCLEAN '--nsclean') +
(*TESTIO '--testIO') +
(*CATALOGS '--catalogs') +
(*NOCATALOGS '--nocatalogs') +
(*AUTO '--auto') +
(*XINCLUDE '--xinclude') +
(*NOXINCLUDENODE '--noxincludenode') +
(*NOFIXUPBASEURIS '--nofixup-base-uris') +
(*LOADDTD '--loaddtd') +
(*DTDATTR '--dtdattr') +
(*STREAM '--stream') +
(*WALKER '--walker') +
(*CHKREGISTER '--chkregister') +
(*C14N '--c14n') +
(*C14N11 '--c14n11') +
(*EXCC14N '--exc-c14n') +
(*SAX1 '--sax1') +
(*SAX '--sax') +
(*OLDXML10 '--oldxml10') +
)