lib/pcre/pcre_internal.h

595 #define UCHAR21(eptr)        (*(eptr))
596 #define UCHAR21TEST(eptr)    (*(eptr))
597 #define UCHAR21INC(eptr)     (*(eptr)++)
598 #define UCHAR21INCTEST(eptr) (*(eptr)++)
613 #define GETCHAR(c, eptr) c = *eptr;
614 #define GETCHARTEST(c, eptr) c = *eptr;
615 #define GETCHARINC(c, eptr) c = *eptr++;
616 #define GETCHARINCTEST(c, eptr) c = *eptr++;
617 #define GETCHARLEN(c, eptr, len) c = *eptr;
618 /* #define GETCHARLENTEST(c, eptr, len) */
619 /* #define BACKCHAR(eptr) */
620 /* #define FORWARDCHAR(eptr) */
621 /* #define ACROSSCHAR(condition, eptr, action) */
632 #define GETUTF8(c, eptr) \
635       c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \
637       c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
639       c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \
640       ((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \
642       c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \
643           ((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \
644           (eptr[4] & 0x3f); \
646       c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \
647           ((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \
648           ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \
654 #define GETUTF8INC(c, eptr) \
657       c = ((c & 0x1f) << 6) | (*eptr++ & 0x3f); \
660       c = ((c & 0x0f) << 12) | ((*eptr & 0x3f) << 6) | (eptr[1] & 0x3f); \
661       eptr += 2; \
665       c = ((c & 0x07) << 18) | ((*eptr & 0x3f) << 12) | \
666           ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
667       eptr += 3; \
671       c = ((c & 0x03) << 24) | ((*eptr & 0x3f) << 18) | \
672           ((eptr[1] & 0x3f) << 12) | ((eptr[2] & 0x3f) << 6) | \
673           (eptr[3] & 0x3f); \
674       eptr += 4; \
678       c = ((c & 0x01) << 30) | ((*eptr & 0x3f) << 24) | \
679           ((eptr[1] & 0x3f) << 18) | ((eptr[2] & 0x3f) << 12) | \
680           ((eptr[3] & 0x3f) << 6) | (eptr[4] & 0x3f); \
681       eptr += 5; \
713 #define GETCHAR(c, eptr) \
714   c = *eptr; \
715   if (c >= 0xc0) GETUTF8(c, eptr);
720 #define GETCHARTEST(c, eptr) \
721   c = *eptr; \
722   if (utf && c >= 0xc0) GETUTF8(c, eptr);
727 #define GETCHARINC(c, eptr) \
728   c = *eptr++; \
729   if (c >= 0xc0) GETUTF8INC(c, eptr);
734 #define GETCHARINCTEST(c, eptr) \
735   c = *eptr++; \
736   if (utf && c >= 0xc0) GETUTF8INC(c, eptr);
741 #define GETUTF8LEN(c, eptr, len) \
745       c = ((c & 0x1f) << 6) | (eptr[1] & 0x3f); \
750       c = ((c & 0x0f) << 12) | ((eptr[1] & 0x3f) << 6) | (eptr[2] & 0x3f); \
755       c = ((c & 0x07) << 18) | ((eptr[1] & 0x3f) << 12) | \
756           ((eptr[2] & 0x3f) << 6) | (eptr[3] & 0x3f); \
761       c = ((c & 0x03) << 24) | ((eptr[1] & 0x3f) << 18) | \
762           ((eptr[2] & 0x3f) << 12) | ((eptr[3] & 0x3f) << 6) | \
763           (eptr[4] & 0x3f); \
768       c = ((c & 0x01) << 30) | ((eptr[1] & 0x3f) << 24) | \
769           ((eptr[2] & 0x3f) << 18) | ((eptr[3] & 0x3f) << 12) | \
770           ((eptr[4] & 0x3f) << 6) | (eptr[5] & 0x3f); \
778 #define GETCHARLEN(c, eptr, len) \
779   c = *eptr; \
780   if (c >= 0xc0) GETUTF8LEN(c, eptr, len);
786 #define GETCHARLENTEST(c, eptr, len) \
787   c = *eptr; \
788   if (utf && c >= 0xc0) GETUTF8LEN(c, eptr, len);
794 #define BACKCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr--
797 #define FORWARDCHAR(eptr) while((*eptr & 0xc0) == 0x80) eptr++
800 #define ACROSSCHAR(condition, eptr, action) \
801   while((condition) && ((eptr) & 0xc0) == 0x80) action
826 #define GETUTF16(c, eptr) \
827    { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; }
832 #define GETCHAR(c, eptr) \
833   c = *eptr; \
834   if ((c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
839 #define GETCHARTEST(c, eptr) \
840   c = *eptr; \
841   if (utf && (c & 0xfc00) == 0xd800) GETUTF16(c, eptr);
846 #define GETUTF16INC(c, eptr) \
847    { c = (((c & 0x3ff) << 10) | (*eptr++ & 0x3ff)) + 0x10000; }
852 #define GETCHARINC(c, eptr) \
853   c = *eptr++; \
854   if ((c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
859 #define GETCHARINCTEST(c, eptr) \
860   c = *eptr++; \
861   if (utf && (c & 0xfc00) == 0xd800) GETUTF16INC(c, eptr);
866 #define GETUTF16LEN(c, eptr, len) \
867    { c = (((c & 0x3ff) << 10) | (eptr[1] & 0x3ff)) + 0x10000; len++; }
873 #define GETCHARLEN(c, eptr, len) \
874   c = *eptr; \
875   if ((c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
881 #define GETCHARLENTEST(c, eptr, len) \
882   c = *eptr; \
883   if (utf && (c & 0xfc00) == 0xd800) GETUTF16LEN(c, eptr, len);
890 #define BACKCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr--
893 #define FORWARDCHAR(eptr) if ((*eptr & 0xfc00) == 0xdc00) eptr++
896 #define ACROSSCHAR(condition, eptr, action) \
897   if ((condition) && ((eptr) & 0xfc00) == 0xdc00) action
911 #define GETCHAR(c, eptr) \
912   c = *(eptr);
917 #define GETCHARTEST(c, eptr) \
918   c = *(eptr);
923 #define GETCHARINC(c, eptr) \
924   c = *((eptr)++);
929 #define GETCHARINCTEST(c, eptr) \
930   c = *((eptr)++);
936 #define GETCHARLEN(c, eptr, len) \
937   GETCHAR(c, eptr)
943 #define GETCHARLENTEST(c, eptr, len) \
944   GETCHARTEST(c, eptr)
952 #define BACKCHAR(eptr) do { } while (0)
955 #define FORWARDCHAR(eptr) do { } while (0)
958 #define ACROSSCHAR(condition, eptr, action) do { } while (0)