source-git / libxml2

Clone
Source Code
GIT

Blame os400/xmlcatalog.cmd

c8 c8s master
  1.   c8
  2.   os400
  3.   xmlcatalog.cmd
Blob History Raw
Packit Service a31ea6 
/*      XMLCATALOG CL command.                                                */
Packit Service a31ea6 
/*                                                                            */
Packit Service a31ea6 
/*      See Copyright for the status of this software.                        */
Packit Service a31ea6 
/*                                                                            */
Packit Service a31ea6 
/*      Author: Patrick Monnerat <pm@datasphere.ch>, DATASPHERE S.A.          */
Packit Service a31ea6
Packit Service a31ea6 
/*      Interface to program XMLCATLGCL                                       */
Packit Service a31ea6
Packit Service a31ea6 
             CMD        PROMPT('XML/SGML catalog  tool')
Packit Service a31ea6
Packit Service a31ea6 
             /* Catalog file path. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(INSTMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2)    +
Packit Service a31ea6 
                          CASE(*MIXED) EXPR(*YES) MIN(1) SPCVAL((*NEW ''))     +
Packit Service a31ea6 
                          CHOICE('Stream file path')                           +
Packit Service a31ea6 
                          PROMPT('XML/SGML catalog file')
Packit Service a31ea6
Packit Service a31ea6 
             /* Catalog kind: XML/SGML. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(KIND) TYPE(*CHAR) LEN(7) VARY(*YES *INT2)          +
Packit Service a31ea6 
                          EXPR(*YES) RSTD(*YES) DFT(*XML)                      +
Packit Service a31ea6 
                          SPCVAL((*XML '') (*SGML '--sgml'))                   +
Packit Service a31ea6 
                          PROMPT('Catalog kind')
Packit Service a31ea6
Packit Service a31ea6 
             /* Output file. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(OUTSTMF) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2)   +
Packit Service a31ea6 
                          CASE(*MIXED) EXPR(*YES) DFT(*STDOUT)                 +
Packit Service a31ea6 
                          SPCVAL((*STDOUT '') (*INSTMF X'00'))                 +
Packit Service a31ea6 
                          CHOICE('*STDOUT, *INSTMF or file path')              +
Packit Service a31ea6 
                          PROMPT('Output stream file path')
Packit Service a31ea6
Packit Service a31ea6 
             /* Convert SGML to XML catalog. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(CONVERT) TYPE(*CHAR) LEN(10) VARY(*YES *INT2)      +
Packit Service a31ea6 
                          RSTD(*YES) SPCVAL((*YES '--convert') (*NO ''))       +
Packit Service a31ea6 
                          EXPR(*YES) DFT(*NO) PMTCTL(TYPEXML)                  +
Packit Service a31ea6 
                          PROMPT('Convert SGML to XML catalog')
Packit Service a31ea6
Packit Service a31ea6 
             /* SGML super catalog update. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(SUPERUPD) TYPE(*CHAR) LEN(17) VARY(*YES *INT2)     +
Packit Service a31ea6 
                          SPCVAL((*YES '') (*NO '--no-super-update'))          +
Packit Service a31ea6 
                          EXPR(*YES) DFT(*YES) RSTD(*YES) PMTCTL(TYPESGML)     +
Packit Service a31ea6 
                          PROMPT('Update the SGML super catalog')
Packit Service a31ea6
Packit Service a31ea6 
             /* Verbose/debug output. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(VERBOSE) TYPE(*CHAR) LEN(4) VARY(*YES *INT2)       +
Packit Service a31ea6 
                          RSTD(*YES) SPCVAL((*YES '-v') (*NO ''))              +
Packit Service a31ea6 
                          EXPR(*YES) DFT(*NO)                                  +
Packit Service a31ea6 
                          PROMPT('Output debugging information')
Packit Service a31ea6
Packit Service a31ea6 
             /* Interactive shell not supported. */
Packit Service a31ea6
Packit Service a31ea6 
             /* Values to delete. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(DELETE) TYPE(*PNAME) LEN(256) VARY(*YES *INT2)     +
Packit Service a31ea6 
                          CASE(*MIXED) MAX(64) EXPR(*YES)                      +
Packit Service a31ea6 
                          CHOICE('Identifier value')                           +
Packit Service a31ea6 
                          PROMPT('Delete System/URI identifier')
Packit Service a31ea6
Packit Service a31ea6 
             /* Values to add. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(ADD) TYPE(XMLELEM) MAX(10) PMTCTL(TYPEXML)         +
Packit Service a31ea6 
                          PROMPT('Add definition')
Packit Service a31ea6 
XMLELEM:     ELEM       TYPE(*CHAR) LEN(16) VARY(*YES *INT2) DFT(*PUBLIC)      +
Packit Service a31ea6 
                          PROMPT('Entry type')                                 +
Packit Service a31ea6 
                          EXPR(*YES) RSTD(*YES) SPCVAL(                        +
Packit Service a31ea6 
                            (*PUBLIC         'public')                         +
Packit Service a31ea6 
                            (*SYSTEM         'system')                         +
Packit Service a31ea6 
                            (*URI            'uri')                            +
Packit Service a31ea6 
                            (*REWRITESYSTEM  'rewriteSystem')                  +
Packit Service a31ea6 
                            (*REWRITEURI     'rewriteURI')                     +
Packit Service a31ea6 
                            (*DELEGATEPUBLIC 'delegatePublic')                 +
Packit Service a31ea6 
                            (*DELEGATESYSTEM 'delegateSystem')                 +
Packit Service a31ea6 
                            (*DELEGATEURI    'delegateURI')                    +
Packit Service a31ea6 
                            (*NEXTCATALOG    'nextCatalog')                    +
Packit Service a31ea6 
                          )
Packit Service a31ea6 
             ELEM       TYPE(*PNAME) LEN(256) VARY(*YES *INT2) EXPR(*YES)      +
Packit Service a31ea6 
                          CASE(*MIXED) PROMPT('Original reference/file name')
Packit Service a31ea6 
             ELEM       TYPE(*PNAME) LEN(256) VARY(*YES *INT2) EXPR(*YES)      +
Packit Service a31ea6 
                          CASE(*MIXED) PROMPT('Replacement entity URI')
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(SGMLADD) TYPE(SGMLELEM) MAX(10)                    +
Packit Service a31ea6 
                          PMTCTL(TYPESGML) PROMPT('Add SGML definition')
Packit Service a31ea6 
SGMLELEM:    ELEM       TYPE(*PNAME) LEN(256) VARY(*YES *INT2) EXPR(*YES)      +
Packit Service a31ea6 
                          CASE(*MIXED) PROMPT('SGML catalog file name')
Packit Service a31ea6 
             ELEM       TYPE(*PNAME) LEN(256) VARY(*YES *INT2) EXPR(*YES)      +
Packit Service a31ea6 
                          CASE(*MIXED) PROMPT('SGML definition')
Packit Service a31ea6
Packit Service a31ea6 
             /* Entities to resolve. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(ENTITY) TYPE(*PNAME) LEN(256) VARY(*YES *INT2)     +
Packit Service a31ea6 
                          CASE(*MIXED) EXPR(*YES) MAX(150)                     +
Packit Service a31ea6 
                          PROMPT('Resolve entity')
Packit Service a31ea6
Packit Service a31ea6 
             /* Additional catalog files. */
Packit Service a31ea6
Packit Service a31ea6 
             PARM       KWD(CATALOG) TYPE(*PNAME) LEN(5000) VARY(*YES *INT2)   +
Packit Service a31ea6 
                          CASE(*MIXED) EXPR(*YES) MAX(150) DFT(*DEFAULT)       +
Packit Service a31ea6 
                          CHOICE('Catalog stream file path')                   +
Packit Service a31ea6 
                          PROMPT('Additional catalog file') SPCVAL(            +
Packit Service a31ea6 
                            (*DEFAULT       '/etc/xml/catalog')                +
Packit Service a31ea6 
                            (*NONE          '')                                +
Packit Service a31ea6 
                          )
Packit Service a31ea6
Packit Service a31ea6
Packit Service a31ea6 
             /* Conditional prompting. */
Packit Service a31ea6
Packit Service a31ea6 
TYPEXML:     PMTCTL     CTL(KIND) COND((*EQ ''))
Packit Service a31ea6 
TYPESGML:    PMTCTL     CTL(KIND) COND((*NE ''))

Powered by Pagure 5.13.3

SSH Hostkey/Fingerprint | Documentation