/* * parser.c : an XML 1.0 non-verifying parser * * See Copyright for the status of this software. * * $Id: parser.c,v 1.38 1998/08/06 17:31:58 daniel Exp $ */ #ifdef WIN32 #define HAVE_FCNTL_H #include #else #include #endif #include #include #include /* for memset() only */ #include #include #ifdef HAVE_FCNTL_H #include #endif #ifdef HAVE_UNISTD_H #include #endif #ifdef HAVE_ZLIB_H #include #endif #include "tree.h" #include "parser.h" #include "entities.h" /* * A few macros needed to help building the parser. */ #define PUSH_AND_POP(type, name) \ int name##Push(type value) { \ if (ctxt->name##Nr >= ctxt->name##Max) { \ ctxt->name##Max *= 2; \ ctxt->name##tab = (void *) realloc(ctxt->name##tab, \ ctxt->name##Max * sizeof(ctxt->name##tab[0])); \ if (ctxt->name##tab == NULL) { \ fprintf(stderr, "realloc failed !\n"); \ exit(1); \ } \ } \ ctxt->name##tab[ctxt->name##Nr] = value; \ return(ctxt->type##Nr++); \ } \ type name##Pop() { \ if (ctxt->type##Nr <= 0) return(0); \ ctxt->type##Nr--; \ return(ctxt->name##tab[ctxt->name##Nr]); \ } \ #ifdef UNICODE /************************************************************************ * * * UNICODE version of the macros. * * * ************************************************************************/ /* * [2] Char ::= #x9 | #xA | #xD | [#x20-#xD7FF] | [#xE000-#xFFFD] * | [#x10000-#x10FFFF] * any Unicode character, excluding the surrogate blocks, FFFE, and FFFF. */ #define IS_CHAR(c) \ (((c) == 0x09) || ((c) == 0x0a) || ((c) == 0x0d) || \ (((c) >= 0x20) && ((c) != 0xFFFE) && ((c) != 0xFFFF))) /* * [3] S ::= (#x20 | #x9 | #xD | #xA)+ */ #define SKIP_BLANKS(p) \ while ((*(p) == 0x20) || (*(p) == 0x09) || (*(p) == 0xa) || \ (*(p) == 0xd) || (*(p) == 0x3000)) (p)++; /* * [85] BaseChar ::= ... long list see REC ... * * VI is your friend ! * :1,$ s/\[#x\([0-9A-Z]*\)-#x\([0-9A-Z]*\)\]/ (((c) >= 0x\1) \&\& ((c) <= 0x\2)) ||/ * and * :1,$ s/#x\([0-9A-Z]*\)/ ((c) == 0x\1) ||/ */ #define IS_BASECHAR(c) \ ((((c) >= 0x0041) && ((c) <= 0x005A)) || \ (((c) >= 0x0061) && ((c) <= 0x007A)) || \ (((c) >= 0x00C0) && ((c) <= 0x00D6)) || \ (((c) >= 0x00D8) && ((c) <= 0x00F6)) || \ (((c) >= 0x00F8) && ((c) <= 0x00FF)) || \ (((c) >= 0x0100) && ((c) <= 0x0131)) || \ (((c) >= 0x0134) && ((c) <= 0x013E)) || \ (((c) >= 0x0141) && ((c) <= 0x0148)) || \ (((c) >= 0x014A) && ((c) <= 0x017E)) || \ (((c) >= 0x0180) && ((c) <= 0x01C3)) || \ (((c) >= 0x01CD) && ((c) <= 0x01F0)) || \ (((c) >= 0x01F4) && ((c) <= 0x01F5)) || \ (((c) >= 0x01FA) && ((c) <= 0x0217)) || \ (((c) >= 0x0250) && ((c) <= 0x02A8)) || \ (((c) >= 0x02BB) && ((c) <= 0x02C1)) || \ ((c) == 0x0386) || \ (((c) >= 0x0388) && ((c) <= 0x038A)) || \ ((c) == 0x038C) || \ (((c) >= 0x038E) && ((c) <= 0x03A1)) || \ (((c) >= 0x03A3) && ((c) <= 0x03CE)) || \ (((c) >= 0x03D0) && ((c) <= 0x03D6)) || \ ((c) == 0x03DA) || \ ((c) == 0x03DC) || \ ((c) == 0x03DE) || \ ((c) == 0x03E0) || \ (((c) >= 0x03E2) && ((c) <= 0x03F3)) || \ (((c) >= 0x0401) && ((c) <= 0x040C)) || \ (((c) >= 0x040E) && ((c) <= 0x044F)) || \ (((c) >= 0x0451) && ((c) <= 0x045C)) || \ (((c) >= 0x045E) && ((c) <= 0x0481)) || \ (((c) >= 0x0490) && ((c) <= 0x04C4)) || \ (((c) >= 0x04C7) && ((c) <= 0x04C8)) || \ (((c) >= 0x04CB) && ((c) <= 0x04CC)) || \ (((c) >= 0x04D0) && ((c) <= 0x04EB)) || \ (((c) >= 0x04EE) && ((c) <= 0x04F5)) || \ (((c) >= 0x04F8) && ((c) <= 0x04F9)) || \ (((c) >= 0x0531) && ((c) <= 0x0556)) || \ ((c) == 0x0559) || \ (((c) >= 0x0561) && ((c) <= 0x0586)) || \ (((c) >= 0x05D0) && ((c) <= 0x05EA)) || \ (((c) >= 0x05F0) && ((c) <= 0x05F2)) || \ (((c) >= 0x0621) && ((c) <= 0x063A)) || \ (((c) >= 0x0641) && ((c) <= 0x064A)) || \ (((c) >= 0x0671) && ((c) <= 0x06B7)) || \ (((c) >= 0x06BA) && ((c) <= 0x06BE)) || \ (((c) >= 0x06C0) && ((c) <= 0x06CE)) || \ (((c) >= 0x06D0) && ((c) <= 0x06D3)) || \ ((c) == 0x06D5) || \ (((c) >= 0x06E5) && ((c) <= 0x06E6)) || \ (((c) >= 0x0905) && ((c) <= 0x0939)) || \ ((c) == 0x093D) || \ (((c) >= 0x0958) && ((c) <= 0x0961)) || \ (((c) >= 0x0985) && ((c) <= 0x098C)) || \ (((c) >= 0x098F) && ((c) <= 0x0990)) || \ (((c) >= 0x0993) && ((c) <= 0x09A8)) || \ (((c) >= 0x09AA) && ((c) <= 0x09B0)) || \ ((c) == 0x09B2) || \ (((c) >= 0x09B6) && ((c) <= 0x09B9)) || \ (((c) >= 0x09DC) && ((c) <= 0x09DD)) || \ (((c) >= 0x09DF) && ((c) <= 0x09E1)) || \ (((c) >= 0x09F0) && ((c) <= 0x09F1)) || \ (((c) >= 0x0A05) && ((c) <= 0x0A0A)) || \ (((c) >= 0x0A0F) && ((c) <= 0x0A10)) || \ (((c) >= 0x0A13) && ((c) <= 0x0A28)) || \ (((c) >= 0x0A2A) && ((c) <= 0x0A30)) || \ (((c) >= 0x0A32) && ((c) <= 0x0A33)) || \ (((c) >= 0x0A35) && ((c) <= 0x0A36)) || \ (((c) >= 0x0A38) && ((c) <= 0x0A39)) || \ (((c) >= 0x0A59) && ((c) <= 0x0A5C)) || \ ((c) == 0x0A5E) || \ (((c) >= 0x0A72) && ((c) <= 0x0A74)) || \ (((c) >= 0x0A85) && ((c) <= 0x0A8B)) || \ ((c) == 0x0A8D) || \ (((c) >= 0x0A8F) && ((c) <= 0x0A91)) || \ (((c) >= 0x0A93) && ((c) <= 0x0AA8)) || \ (((c) >= 0x0AAA) && ((c) <= 0x0AB0)) || \ (((c) >= 0x0AB2) && ((c) <= 0x0AB3)) || \ (((c) >= 0x0AB5) && ((c) <= 0x0AB9)) || \ ((c) == 0x0ABD) || \ ((c) == 0x0AE0) || \ (((c) >= 0x0B05) && ((c) <= 0x0B0C)) || \ (((c) >= 0x0B0F) && ((c) <= 0x0B10)) || \ (((c) >= 0x0B13) && ((c) <= 0x0B28)) || \ (((c) >= 0x0B2A) && ((c) <= 0x0B30)) || \ (((c) >= 0x0B32) && ((c) <= 0x0B33)) || \ (((c) >= 0x0B36) && ((c) <= 0x0B39)) || \ ((c) == 0x0B3D) || \ (((c) >= 0x0B5C) && ((c) <= 0x0B5D)) || \ (((c) >= 0x0B5F) && ((c) <= 0x0B61)) || \ (((c) >= 0x0B85) && ((c) <= 0x0B8A)) || \ (((c) >= 0x0B8E) && ((c) <= 0x0B90)) || \ (((c) >= 0x0B92) && ((c) <= 0x0B95)) || \ (((c) >= 0x0B99) && ((c) <= 0x0B9A)) || \ ((c) == 0x0B9C) || \ (((c) >= 0x0B9E) && ((c) <= 0x0B9F)) || \ (((c) >= 0x0BA3) && ((c) <= 0x0BA4)) || \ (((c) >= 0x0BA8) && ((c) <= 0x0BAA)) || \ (((c) >= 0x0BAE) && ((c) <= 0x0BB5)) || \ (((c) >= 0x0BB7) && ((c) <= 0x0BB9)) || \ (((c) >= 0x0C05) && ((c) <= 0x0C0C)) || \ (((c) >= 0x0C0E) && ((c) <= 0x0C10)) || \ (((c) >= 0x0C12) && ((c) <= 0x0C28)) || \ (((c) >= 0x0C2A) && ((c) <= 0x0C33)) || \ (((c) >= 0x0C35) && ((c) <= 0x0C39)) || \ (((c) >= 0x0C60) && ((c) <= 0x0C61)) || \ (((c) >= 0x0C85) && ((c) <= 0x0C8C)) || \ (((c) >= 0x0C8E) && ((c) <= 0x0C90)) || \ (((c) >= 0x0C92) && ((c) <= 0x0CA8)) || \ (((c) >= 0x0CAA) && ((c) <= 0x0CB3)) || \ (((c) >= 0x0CB5) && ((c) <= 0x0CB9)) || \ ((c) == 0x0CDE) || \ (((c) >= 0x0CE0) && ((c) <= 0x0CE1)) || \ (((c) >= 0x0D05) && ((c) <= 0x0D0C)) || \ (((c) >= 0x0D0E) && ((c) <= 0x0D10)) || \ (((c) >= 0x0D12) && ((c) <= 0x0D28)) || \ (((c) >= 0x0D2A) && ((c) <= 0x0D39)) || \ (((c) >= 0x0D60) && ((c) <= 0x0D61)) || \ (((c) >= 0x0E01) && ((c) <= 0x0E2E)) || \ ((c) == 0x0E30) || \ (((c) >= 0x0E32) && ((c) <= 0x0E33)) || \ (((c) >= 0x0E40) && ((c) <= 0x0E45)) || \ (((c) >= 0x0E81) && ((c) <= 0x0E82)) || \ ((c) == 0x0E84) || \ (((c) >= 0x0E87) && ((c) <= 0x0E88)) || \ ((c) == 0x0E8A) || \ ((c) == 0x0E8D) || \ (((c) >= 0x0E94) && ((c) <= 0x0E97)) || \ (((c) >= 0x0E99) && ((c) <= 0x0E9F)) || \ (((c) >= 0x0EA1) && ((c) <= 0x0EA3)) || \ ((c) == 0x0EA5) || \ ((c) == 0x0EA7) || \ (((c) >= 0x0EAA) && ((c) <= 0x0EAB)) || \ (((c) >= 0x0EAD) && ((c) <= 0x0EAE)) || \ ((c) == 0x0EB0) || \ (((c) >= 0x0EB2) && ((c) <= 0x0EB3)) || \ ((c) == 0x0EBD) || \ (((c) >= 0x0EC0) && ((c) <= 0x0EC4)) || \ (((c) >= 0x0F40) && ((c) <= 0x0F47)) || \ (((c) >= 0x0F49) && ((c) <= 0x0F69)) || \ (((c) >= 0x10A0) && ((c) <= 0x10C5)) || \ (((c) >= 0x10D0) && ((c) <= 0x10F6)) || \ ((c) == 0x1100) || \ (((c) >= 0x1102) && ((c) <= 0x1103)) || \ (((c) >= 0x1105) && ((c) <= 0x1107)) || \ ((c) == 0x1109) || \ (((c) >= 0x110B) && ((c) <= 0x110C)) || \ (((c) >= 0x110E) && ((c) <= 0x1112)) || \ ((c) == 0x113C) || \ ((c) == 0x113E) || \ ((c) == 0x1140) || \ ((c) == 0x114C) || \ ((c) == 0x114E) || \ ((c) == 0x1150) || \ (((c) >= 0x1154) && ((c) <= 0x1155)) || \ ((c) == 0x1159) || \ (((c) >= 0x115F) && ((c) <= 0x1161)) || \ ((c) == 0x1163) || \ ((c) == 0x1165) || \ ((c) == 0x1167) || \ ((c) == 0x1169) || \ (((c) >= 0x116D) && ((c) <= 0x116E)) || \ (((c) >= 0x1172) && ((c) <= 0x1173)) || \ ((c) == 0x1175) || \ ((c) == 0x119E) || \ ((c) == 0x11A8) || \ ((c) == 0x11AB) || \ (((c) >= 0x11AE) && ((c) <= 0x11AF)) || \ (((c) >= 0x11B7) && ((c) <= 0x11B8)) || \ ((c) == 0x11BA) || \ (((c) >= 0x11BC) && ((c) <= 0x11C2)) || \ ((c) == 0x11EB) || \ ((c) == 0x11F0) || \ ((c) == 0x11F9) || \ (((c) >= 0x1E00) && ((c) <= 0x1E9B)) || \ (((c) >= 0x1EA0) && ((c) <= 0x1EF9)) || \ (((c) >= 0x1F00) && ((c) <= 0x1F15)) || \ (((c) >= 0x1F18) && ((c) <= 0x1F1D)) || \ (((c) >= 0x1F20) && ((c) <= 0x1F45)) || \ (((c) >= 0x1F48) && ((c) <= 0x1F4D)) || \ (((c) >= 0x1F50) && ((c) <= 0x1F57)) || \ ((c) == 0x1F59) || \ ((c) == 0x1F5B) || \ ((c) == 0x1F5D) || \ (((c) >= 0x1F5F) && ((c) <= 0x1F7D)) || \ (((c) >= 0x1F80) && ((c) <= 0x1FB4)) || \ (((c) >= 0x1FB6) && ((c) <= 0x1FBC)) || \ ((c) == 0x1FBE) || \ (((c) >= 0x1FC2) && ((c) <= 0x1FC4)) || \ (((c) >= 0x1FC6) && ((c) <= 0x1FCC)) || \ (((c) >= 0x1FD0) && ((c) <= 0x1FD3)) || \ (((c) >= 0x1FD6) && ((c) <= 0x1FDB)) || \ (((c) >= 0x1FE0) && ((c) <= 0x1FEC)) || \ (((c) >= 0x1FF2) && ((c) <= 0x1FF4)) || \ (((c) >= 0x1FF6) && ((c) <= 0x1FFC)) || \ ((c) == 0x2126) || \ (((c) >= 0x212A) && ((c) <= 0x212B)) || \ ((c) == 0x212E) || \ (((c) >= 0x2180) && ((c) <= 0x2182)) || \ (((c) >= 0x3041) && ((c) <= 0x3094)) || \ (((c) >= 0x30A1) && ((c) <= 0x30FA)) || \ (((c) >= 0x3105) && ((c) <= 0x312C)) || \ (((c) >= 0xAC00) && ((c) <= 0xD7A3))) /* * [88] Digit ::= ... long list see REC ... */ #define IS_DIGIT(c) \ ((((c) >= 0x0030) && ((c) <= 0x0039)) || \ (((c) >= 0x0660) && ((c) <= 0x0669)) || \ (((c) >= 0x06F0) && ((c) <= 0x06F9)) || \ (((c) >= 0x0966) && ((c) <= 0x096F)) || \ (((c) >= 0x09E6) && ((c) <= 0x09EF)) || \ (((c) >= 0x0A66) && ((c) <= 0x0A6F)) || \ (((c) >= 0x0AE6) && ((c) <= 0x0AEF)) || \ (((c) >= 0x0B66) && ((c) <= 0x0B6F)) || \ (((c) >= 0x0BE7) && ((c) <= 0x0BEF)) || \ (((c) >= 0x0C66) && ((c) <= 0x0C6F)) || \ (((c) >= 0x0CE6) && ((c) <= 0x0CEF)) || \ (((c) >= 0x0D66) && ((c) <= 0x0D6F)) || \ (((c) >= 0x0E50) && ((c) <= 0x0E59)) || \ (((c) >= 0x0ED0) && ((c) <= 0x0ED9)) || \ (((c) >= 0x0F20) && ((c) <= 0x0F29))) /* * [87] CombiningChar ::= ... long list see REC ... */ #define IS_COMBINING(c) \ ((((c) >= 0x0300) && ((c) <= 0x0345)) || \ (((c) >= 0x0360) && ((c) <= 0x0361)) || \ (((c) >= 0x0483) && ((c) <= 0x0486)) || \ (((c) >= 0x0591) && ((c) <= 0x05A1)) || \ (((c) >= 0x05A3) && ((c) <= 0x05B9)) || \ (((c) >= 0x05BB) && ((c) <= 0x05BD)) || \ ((c) == 0x05BF) || \ (((c) >= 0x05C1) && ((c) <= 0x05C2)) || \ ((c) == 0x05C4) || \ (((c) >= 0x064B) && ((c) <= 0x0652)) || \ ((c) == 0x0670) || \ (((c) >= 0x06D6) && ((c) <= 0x06DC)) || \ (((c) >= 0x06DD) && ((c) <= 0x06DF)) || \ (((c) >= 0x06E0) && ((c) <= 0x06E4)) || \ (((c) >= 0x06E7) && ((c) <= 0x06E8)) || \ (((c) >= 0x06EA) && ((c) <= 0x06ED)) || \ (((c) >= 0x0901) && ((c) <= 0x0903)) || \ ((c) == 0x093C) || \ (((c) >= 0x093E) && ((c) <= 0x094C)) || \ ((c) == 0x094D) || \ (((c) >= 0x0951) && ((c) <= 0x0954)) || \ (((c) >= 0x0962) && ((c) <= 0x0963)) || \ (((c) >= 0x0981) && ((c) <= 0x0983)) || \ ((c) == 0x09BC) || \ ((c) == 0x09BE) || \ ((c) == 0x09BF) || \ (((c) >= 0x09C0) && ((c) <= 0x09C4)) || \ (((c) >= 0x09C7) && ((c) <= 0x09C8)) || \ (((c) >= 0x09CB) && ((c) <= 0x09CD)) || \ ((c) == 0x09D7) || \ (((c) >= 0x09E2) && ((c) <= 0x09E3)) || \ ((c) == 0x0A02) || \ ((c) == 0x0A3C) || \ ((c) == 0x0A3E) || \ ((c) == 0x0A3F) || \ (((c) >= 0x0A40) && ((c) <= 0x0A42)) || \ (((c) >= 0x0A47) && ((c) <= 0x0A48)) || \ (((c) >= 0x0A4B) && ((c) <= 0x0A4D)) || \ (((c) >= 0x0A70) && ((c) <= 0x0A71)) || \ (((c) >= 0x0A81) && ((c) <= 0x0A83)) || \ ((c) == 0x0ABC) || \ (((c) >= 0x0ABE) && ((c) <= 0x0AC5)) || \ (((c) >= 0x0AC7) && ((c) <= 0x0AC9)) || \ (((c) >= 0x0ACB) && ((c) <= 0x0ACD)) || \ (((c) >= 0x0B01) && ((c) <= 0x0B03)) || \ ((c) == 0x0B3C) || \ (((c) >= 0x0B3E) && ((c) <= 0x0B43)) || \ (((c) >= 0x0B47) && ((c) <= 0x0B48)) || \ (((c) >= 0x0B4B) && ((c) <= 0x0B4D)) || \ (((c) >= 0x0B56) && ((c) <= 0x0B57)) || \ (((c) >= 0x0B82) && ((c) <= 0x0B83)) || \ (((c) >= 0x0BBE) && ((c) <= 0x0BC2)) || \ (((c) >= 0x0BC6) && ((c) <= 0x0BC8)) || \ (((c) >= 0x0BCA) && ((c) <= 0x0BCD)) || \ ((c) == 0x0BD7) || \ (((c) >= 0x0C01) && ((c) <= 0x0C03)) || \ (((c) >= 0x0C3E) && ((c) <= 0x0C44)) || \ (((c) >= 0x0C46) && ((c) <= 0x0C48)) || \ (((c) >= 0x0C4A) && ((c) <= 0x0C4D)) || \ (((c) >= 0x0C55) && ((c) <= 0x0C56)) || \ (((c) >= 0x0C82) && ((c) <= 0x0C83)) || \ (((c) >= 0x0CBE) && ((c) <= 0x0CC4)) || \ (((c) >= 0x0CC6) && ((c) <= 0x0CC8)) || \ (((c) >= 0x0CCA) && ((c) <= 0x0CCD)) || \ (((c) >= 0x0CD5) && ((c) <= 0x0CD6)) || \ (((c) >= 0x0D02) && ((c) <= 0x0D03)) || \ (((c) >= 0x0D3E) && ((c) <= 0x0D43)) || \ (((c) >= 0x0D46) && ((c) <= 0x0D48)) || \ (((c) >= 0x0D4A) && ((c) <= 0x0D4D)) || \ ((c) == 0x0D57) || \ ((c) == 0x0E31) || \ (((c) >= 0x0E34) && ((c) <= 0x0E3A)) || \ (((c) >= 0x0E47) && ((c) <= 0x0E4E)) || \ ((c) == 0x0EB1) || \ (((c) >= 0x0EB4) && ((c) <= 0x0EB9)) || \ (((c) >= 0x0EBB) && ((c) <= 0x0EBC)) || \ (((c) >= 0x0EC8) && ((c) <= 0x0ECD)) || \ (((c) >= 0x0F18) && ((c) <= 0x0F19)) || \ ((c) == 0x0F35) || \ ((c) == 0x0F37) || \ ((c) == 0x0F39) || \ ((c) == 0x0F3E) || \ ((c) == 0x0F3F) || \ (((c) >= 0x0F71) && ((c) <= 0x0F84)) || \ (((c) >= 0x0F86) && ((c) <= 0x0F8B)) || \ (((c) >= 0x0F90) && ((c) <= 0x0F95)) || \ ((c) == 0x0F97) || \ (((c) >= 0x0F99) && ((c) <= 0x0FAD)) || \ (((c) >= 0x0FB1) && ((c) <= 0x0FB7)) || \ ((c) == 0x0FB9) || \ (((c) >= 0x20D0) && ((c) <= 0x20DC)) || \ ((c) == 0x20E1) || \ (((c) >= 0x302A) && ((c) <= 0x302F)) || \ ((c) == 0x3099) || \ ((c) == 0x309A)) /* * [89] Extender ::= #x00B7 | #x02D0 | #x02D1 | #x0387 | #x0640 | * #x0E46 | #x0EC6 | #x3005 | [#x3031-#x3035] | * [#x309D-#x309E] | [#x30FC-#x30FE] */ #define IS_EXTENDER(c) \ (((c) == 0xb7) || ((c) == 0x2d0) || ((c) == 0x2d1) || \ ((c) == 0x387) || ((c) == 0x640) || ((c) == 0xe46) || \ ((c) == 0xec6) || ((c) == 0x3005) \ (((c) >= 0x3031) && ((c) <= 0x3035)) || \ (((c) >= 0x309b) && ((c) <= 0x309e)) || \ (((c) >= 0x30fc) && ((c) <= 0x30fe))) /* * [86] Ideographic ::= [#x4E00-#x9FA5] | #x3007 | [#x3021-#x3029] */ #define IS_IDEOGRAPHIC(c) \ ((((c) >= 0x4e00) && ((c) <= 0x9fa5)) || \ (((c) >= 0xf900) && ((c) <= 0xfa2d)) || \ (((c) >= 0x3021) && ((c) <= 0x3029)) || \ ((c) == 0x3007)) /* * [84] Letter ::= BaseChar | Ideographic */ #define IS_LETTER(c) (IS_BASECHAR(c) || IS_IDEOGRAPHIC(c)) #else /************************************************************************ * * * 8bits / ASCII version of the macros. * * * ************************************************************************/ /* * [2] Char ::= #x9 | #xA | #xD | [#x20-#xD7FF] | [#xE000-#xFFFD] * | [#x10000-#x10FFFF] * any Unicode character, excluding the surrogate blocks, FFFE, and FFFF. */ #define IS_CHAR(c) \ (((c) == 0x09) || ((c) == 0x0a) || ((c) == 0x0d) || ((c) >= 0x20) ||\ ((c) == 0xa)) /* * [85] BaseChar ::= ... long list see REC ... */ #define IS_BASECHAR(c) \ ((((c) >= 0x41) && ((c) <= 0x5a)) || \ (((c) >= 0x61) && ((c) <= 0x7a)) || \ (((c) >= 0xaa) && ((c) <= 0x5b)) || \ (((c) >= 0xc0) && ((c) <= 0xd6)) || \ (((c) >= 0xd8) && ((c) <= 0xf6)) || \ (((c) >= 0xf8) && ((c) <= 0xff)) || \ ((c) == 0xba)) /* * [88] Digit ::= ... long list see REC ... */ #define IS_DIGIT(c) (((c) >= 0x30) && ((c) <= 0x39)) /* * [84] Letter ::= BaseChar | Ideographic */ #define IS_LETTER(c) IS_BASECHAR(c) /* * [87] CombiningChar ::= ... long list see REC ... */ #define IS_COMBINING(c) 0 /* * [89] Extender ::= #x00B7 | #x02D0 | #x02D1 | #x0387 | #x0640 | * #x0E46 | #x0EC6 | #x3005 | [#x3031-#x3035] | * [#x309D-#x309E] | [#x30FC-#x30FE] */ #define IS_EXTENDER(c) ((c) == 0xb7) #endif /* !UNICODE */ /* * Blank chars. * * [3] S ::= (#x20 | #x9 | #xD | #xA)+ */ #define IS_BLANK(c) (((c) == 0x20) || ((c) == 0x09) || ((c) == 0xa) || \ ((c) == 0x0D)) /* * [13] PubidChar ::= #x20 | #xD | #xA | [a-zA-Z0-9] | [-'()+,./:=?;!*#@$_%] */ #define IS_PUBIDCHAR(c) \ (((c) == 0x20) || ((c) == 0x0D) || ((c) == 0x0A) || \ (((c) >= 'a') && ((c) <= 'z')) || \ (((c) >= 'A') && ((c) <= 'Z')) || \ (((c) >= '0') && ((c) <= '9')) || \ ((c) == '-') || ((c) == '\'') || ((c) == '(') || ((c) == ')') || \ ((c) == '+') || ((c) == ',') || ((c) == '.') || ((c) == '/') || \ ((c) == ':') || ((c) == '=') || ((c) == '?') || ((c) == ';') || \ ((c) == '!') || ((c) == '*') || ((c) == '#') || ((c) == '@') || \ ((c) == '$') || ((c) == '_') || ((c) == '%')) #define SKIP_EOL(p) \ if (*(p) == 0x13) { p++ ; if (*(p) == 0x10) p++; } \ if (*(p) == 0x10) { p++ ; if (*(p) == 0x13) p++; } #define SKIP_BLANKS(p) \ while (IS_BLANK(*(p))) (p)++; #define MOVETO_ENDTAG(p) \ while (IS_CHAR(*p) && (*(p) != '>')) (p)++; #define MOVETO_STARTTAG(p) \ while (IS_CHAR(*p) && (*(p) != '<')) (p)++; /* * Forward definition for recusive behaviour. */ xmlNodePtr xmlParseElement(xmlParserCtxtPtr ctxt); /* * xmlHandleData : this routine represent's the specific application * behaviour when reading a piece of text. * * For example in WebDav, any piece made only of blanks is eliminated */ CHAR *xmlHandleData(CHAR *in) { CHAR *cur; if (in == NULL) return(NULL); cur = in; while (IS_CHAR(*cur)) { if (!IS_BLANK(*cur)) goto not_blank; cur++; } free(in); return(NULL); not_blank: return(in); } /************************************************************************ * * * Commodity functions to handle CHARs * * * ************************************************************************/ /* * xmlStrndup : a strdup for array of CHAR's */ CHAR *xmlStrndup(const CHAR *cur, int len) { CHAR *ret = malloc((len + 1) * sizeof(CHAR)); if (ret == NULL) { fprintf(stderr, "malloc of %d byte failed\n", (len + 1) * sizeof(CHAR)); return(NULL); } memcpy(ret, cur, len * sizeof(CHAR)); ret[len] = 0; return(ret); } /* * xmlStrdup : a strdup for CHAR's */ CHAR *xmlStrdup(const CHAR *cur) { const CHAR *p = cur; while (IS_CHAR(*p)) p++; return(xmlStrndup(cur, p - cur)); } /* * xmlStrcmp : a strcmp for CHAR's */ int xmlStrcmp(const CHAR *str1, const CHAR *str2) { register int tmp; do { tmp = *str1++ - *str2++; if (tmp != 0) return(tmp); } while ((*str1 != 0) && (*str2 != 0)); return (*str1 - *str2); } /* * xmlStrncmp : a strncmp for CHAR's */ int xmlStrncmp(const CHAR *str1, const CHAR *str2, int len) { register int tmp; if (len <= 0) return(0); do { tmp = *str1++ - *str2++; if (tmp != 0) return(tmp); len--; if (len <= 0) return(0); } while ((*str1 != 0) && (*str2 != 0)); return (*str1 - *str2); } /* * xmlStrchr : a strchr for CHAR's */ CHAR *xmlStrchr(const CHAR *str, CHAR val) { while (*str != 0) { if (*str == val) return((CHAR *) str); str++; } return(NULL); } /************************************************************************ * * * Extra stuff for namespace support * * Relates to http://www.w3.org/TR/WD-xml-names * * * ************************************************************************/ /* * xmlNamespaceParseNCName : parse an XML namespace name. * * [NS 3] NCName ::= (Letter | '_') (NCNameChar)* * * [NS 4] NCNameChar ::= Letter | Digit | '.' | '-' | '_' | * CombiningChar | Extender */ CHAR *xmlNamespaceParseNCName(xmlParserCtxtPtr ctxt) { const CHAR *q; CHAR *ret = NULL; if (!IS_LETTER(ctxt->cur[0]) && (ctxt->cur[0] != '_')) return(NULL); q = ctxt->cur++; while ((IS_LETTER(ctxt->cur[0])) || (IS_DIGIT(ctxt->cur[0])) || (ctxt->cur[0] == '.') || (ctxt->cur[0] == '-') || (ctxt->cur[0] == '_') || (IS_COMBINING(ctxt->cur[0])) || (IS_EXTENDER(ctxt->cur[0]))) ctxt->cur++; ret = xmlStrndup(q, ctxt->cur - q); return(ret); } /* * xmlNamespaceParseQName : parse an XML qualified name * * [NS 5] QName ::= (Prefix ':')? LocalPart * * [NS 6] Prefix ::= NCName * * [NS 7] LocalPart ::= NCName */ CHAR *xmlNamespaceParseQName(xmlParserCtxtPtr ctxt, CHAR **prefix) { CHAR *ret = NULL; *prefix = NULL; ret = xmlNamespaceParseNCName(ctxt); if (ctxt->cur[0] == ':') { *prefix = ret; ctxt->cur++; ret = xmlNamespaceParseNCName(ctxt); } return(ret); } /* * xmlNamespaceParseNSDef : parse a namespace prefix declaration * * [NS 1] NSDef ::= PrefixDef Eq SystemLiteral * * [NS 2] PrefixDef ::= 'xmlns' (':' NCName)? */ void xmlNamespaceParseNSDef(xmlParserCtxtPtr ctxt) { CHAR *name = NULL; if ((ctxt->cur[0] == 'x') && (ctxt->cur[1] == 'm') && (ctxt->cur[2] == 'l') && (ctxt->cur[3] == 'n') && (ctxt->cur[4] == 's')) { ctxt->cur += 5; if (ctxt->cur[0] == ':') { ctxt->cur++; name = xmlNamespaceParseNCName(ctxt); } } } /************************************************************************ * * * The parser itself * * Relates to http://www.w3.org/TR/REC-xml * * * ************************************************************************/ /* * xmlParseName : parse an XML name. * * [4] NameChar ::= Letter | Digit | '.' | '-' | '_' | ':' | * CombiningChar | Extender * * [5] Name ::= (Letter | '_' | ':') (NameChar)* * * [6] Names ::= Name (S Name)* */ CHAR *xmlParseName(xmlParserCtxtPtr ctxt) { const CHAR *q; CHAR *ret = NULL; if (!IS_LETTER(ctxt->cur[0]) && (ctxt->cur[0] != '_') && (ctxt->cur[0] != ':')) return(NULL); q = ctxt->cur++; while ((IS_LETTER(ctxt->cur[0])) || (IS_DIGIT(ctxt->cur[0])) || (ctxt->cur[0] == '.') || (ctxt->cur[0] == '-') || (ctxt->cur[0] == '_') || (ctxt->cur[0] == ':') || (IS_COMBINING(ctxt->cur[0])) || (IS_EXTENDER(ctxt->cur[0]))) ctxt->cur++; ret = xmlStrndup(q, ctxt->cur - q); return(ret); } /* * xmlParseNmtoken : parse an XML Nmtoken. * * [7] Nmtoken ::= (NameChar)+ * * [8] Nmtokens ::= Nmtoken (S Nmtoken)* */ CHAR *xmlParseNmtoken(xmlParserCtxtPtr ctxt) { const CHAR *q; CHAR *ret = NULL; q = ctxt->cur++; while ((IS_LETTER(ctxt->cur[0])) || (IS_DIGIT(ctxt->cur[0])) || (ctxt->cur[0] == '.') || (ctxt->cur[0] == '-') || (ctxt->cur[0] == '_') || (ctxt->cur[0] == ':') || (IS_COMBINING(ctxt->cur[0])) || (IS_EXTENDER(ctxt->cur[0]))) ctxt->cur++; ret = xmlStrndup(q, ctxt->cur - q); return(ret); } /* * xmlParseEntityValue : parse a value for ENTITY decl. * * [9] EntityValue ::= '"' ([^%&"] | PEReference | Reference)* '"' | * "'" ([^%&'] | PEReference | Reference)* "'" */ CHAR *xmlParseEntityValue(xmlParserCtxtPtr ctxt) { CHAR *ret = NULL; const CHAR *q; int needSubst; if (ctxt->cur[0] == '"') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '"')) { if (ctxt->cur[0] == '%') { needSubst = 1; /* TODO !!! */ ctxt->cur++; } else if (ctxt->cur[0] == '&') { needSubst = 1; /* TODO !!! */ ctxt->cur++; } else ctxt->cur++; } if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished EntityValue\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else if (ctxt->cur[0] == '\'') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '\'')) { if (ctxt->cur[0] == '%') { needSubst = 1; /* TODO !!! */ ctxt->cur++; } else if (ctxt->cur[0] == '&') { needSubst = 1; /* TODO !!! */ ctxt->cur++; } else ctxt->cur++; } if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished EntityValue\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else { xmlParserError(ctxt, "xmlParseEntityValue \" or ' expected\n"); } return(ret); } /* * xmlParseAttValue : parse a value for an attribute * * [10] AttValue ::= '"' ([^<&"] | Reference)* '"' | * "'" ([^<&'] | Reference)* "'" */ CHAR *xmlParseAttValue(xmlParserCtxtPtr ctxt) { CHAR *ret = NULL; const CHAR *q; int needSubst = 0; if (ctxt->cur[0] == '"') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '"')) { if (ctxt->cur[0] == '&') { needSubst = 1; ctxt->cur++; } else ctxt->cur++; } if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished AttValue\n"); } else { if (needSubst) ret = xmlStrdup( xmlDecodeEntities(ctxt->doc, q, ctxt->cur - q)); else ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else if (ctxt->cur[0] == '\'') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '\'')) { if (ctxt->cur[0] == '&') { needSubst = 1; ctxt->cur++; } else ctxt->cur++; } if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished AttValue\n"); } else { if (needSubst) ret = xmlStrdup( xmlDecodeEntities(ctxt->doc, q, ctxt->cur - q)); else ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else { xmlParserError(ctxt, "AttValue: \" or ' expected\n"); } return(ret); } /* * xmlParseSystemLiteral : parse an XML Literal * * [11] SystemLiteral ::= ('"' [^"]* '"') | ("'" [^']* "'") */ CHAR *xmlParseSystemLiteral(xmlParserCtxtPtr ctxt) { const CHAR *q; CHAR *ret = NULL; if (ctxt->cur[0] == '"') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '"')) ctxt->cur++; if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished SystemLiteral\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else if (ctxt->cur[0] == '\'') { ctxt->cur++; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '\'')) ctxt->cur++; if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished SystemLiteral\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else { xmlParserError(ctxt, "SystemLiteral \" or ' expected\n"); } return(ret); } /* * xmlParsePubidLiteral: parse an XML public literal * * [12] PubidLiteral ::= '"' PubidChar* '"' | "'" (PubidChar - "'")* "'" */ CHAR *xmlParsePubidLiteral(xmlParserCtxtPtr ctxt) { const CHAR *q; CHAR *ret = NULL; /* * Name ::= (Letter | '_') (NameChar)* */ if (ctxt->cur[0] == '"') { ctxt->cur++; q = ctxt->cur; while (IS_PUBIDCHAR(ctxt->cur[0])) ctxt->cur++; if (ctxt->cur[0] != '"') { xmlParserError(ctxt, "Unfinished PubidLiteral\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else if (ctxt->cur[0] == '\'') { ctxt->cur++; q = ctxt->cur; while ((IS_LETTER(ctxt->cur[0])) && (ctxt->cur[0] != '\'')) ctxt->cur++; if (!IS_LETTER(ctxt->cur[0])) { xmlParserError(ctxt, "Unfinished PubidLiteral\n"); } else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else { xmlParserError(ctxt, "SystemLiteral \" or ' expected\n"); } return(ret); } /* * xmlParseCharData: parse a CharData section. * if we are within a CDATA section ']]>' marks an end of section. * * [14] CharData ::= [^<&]* - ([^<&]* ']]>' [^<&]*) */ CHAR *xmlParseCharData(xmlParserCtxtPtr ctxt, int cdata) { const CHAR *q; CHAR *ret = NULL; q = ctxt->cur; while ((IS_CHAR(ctxt->cur[0])) && (ctxt->cur[0] != '<') && (ctxt->cur[0] != '&')) { ctxt->cur++; if ((cdata) && (ctxt->cur[0] == ']') && (ctxt->cur[1] == ']') && (ctxt->cur[2] == '>')) break; } if (q == ctxt->cur) return(NULL); ret = xmlStrndup(q, ctxt->cur - q); return(ret); } /* * xmlParseExternalID: Parse an External ID * * [75] ExternalID ::= 'SYSTEM' S SystemLiteral * | 'PUBLIC' S PubidLiteral S SystemLiteral */ CHAR *xmlParseExternalID(xmlParserCtxtPtr ctxt, CHAR **PubidLiteral) { CHAR *ExternalID = NULL; *PubidLiteral = NULL; if ((ctxt->cur[0] == 'S') && (ctxt->cur[1] == 'Y') && (ctxt->cur[2] == 'S') && (ctxt->cur[3] == 'T') && (ctxt->cur[4] == 'E') && (ctxt->cur[5] == 'M')) { ctxt->cur += 6; SKIP_BLANKS(ctxt->cur); ExternalID = xmlParseSystemLiteral(ctxt); if (ExternalID == NULL) xmlParserError(ctxt, "xmlParseExternalID: SYSTEM, no SystemLiteral\n"); } else if ((ctxt->cur[0] == 'P') && (ctxt->cur[1] == 'U') && (ctxt->cur[2] == 'B') && (ctxt->cur[3] == 'L') && (ctxt->cur[4] == 'I') && (ctxt->cur[5] == 'C')) { ctxt->cur += 6; SKIP_BLANKS(ctxt->cur); *PubidLiteral = xmlParsePubidLiteral(ctxt); if (*PubidLiteral == NULL) xmlParserError(ctxt, "xmlParseExternalID: PUBLIC, no PubidLiteral\n"); SKIP_BLANKS(ctxt->cur); ExternalID = xmlParseSystemLiteral(ctxt); if (ExternalID == NULL) xmlParserError(ctxt, "xmlParseExternalID: SYSTEM, no SystemLiteral\n"); } return(ExternalID); } /* * Parse and return a string between quotes or doublequotes */ CHAR *xmlParseQuotedString(xmlParserCtxtPtr ctxt) { CHAR *ret = NULL; const CHAR *q; if (ctxt->cur[0] == '"') { ctxt->cur++; q = ctxt->cur; while (IS_CHAR(ctxt->cur[0]) && (ctxt->cur[0] != '"')) ctxt->cur++; if (ctxt->cur[0] != '"') xmlParserError(ctxt, "String not closed\"%.50s\n", q); else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } else if (ctxt->cur[0] == '\''){ ctxt->cur++; q = ctxt->cur; while (IS_CHAR(ctxt->cur[0]) && (ctxt->cur[0] != '\'')) ctxt->cur++; if (ctxt->cur[0] != '\'') xmlParserError(ctxt, "String not closed\"%.50s\n", q); else { ret = xmlStrndup(q, ctxt->cur - q); ctxt->cur++; } } return(ret); } /* * Skip an XML (SGML) comment * This may or may not create a node (depending on the context) * The spec says that "For compatibility, the string "--" (double-hyphen) * must not occur within comments. " * * [15] Comment ::= '' */ xmlNodePtr xmlParseComment(xmlParserCtxtPtr ctxt, int create) { xmlNodePtr ret = NULL; const CHAR *q, *start; const CHAR *r; /* * Check that there is a comment right here. */ if ((ctxt->cur[0] != '<') || (ctxt->cur[1] != '!') || (ctxt->cur[2] != '-') || (ctxt->cur[3] != '-')) return(NULL); ctxt->cur += 4; start = q = ctxt->cur; ctxt->cur++; r = ctxt->cur; ctxt->cur++; while (IS_CHAR(ctxt->cur[0]) && ((ctxt->cur[0] == ':') || (ctxt->cur[0] != '>') || (*r != '-') || (*q != '-'))) { if ((*r == '-') && (*q == '-')) xmlParserError(ctxt, "Comment must not contain '--' (double-hyphen)`\n"); ctxt->cur++;r++;q++; } if (!IS_CHAR(ctxt->cur[0])) { xmlParserError(ctxt, "Comment not terminated \n