43 #include "MagickCore/studio.h"
44 #include "MagickCore/exception.h"
45 #include "MagickCore/exception-private.h"
46 #include "MagickCore/image.h"
47 #include "MagickCore/image-private.h"
48 #include "MagickCore/locale-private.h"
49 #include "MagickCore/memory_.h"
50 #include "MagickCore/memory-private.h"
51 #include "MagickCore/string_.h"
52 #include "MagickCore/string-private.h"
53 #include "MagickCore/token.h"
54 #include "MagickCore/token-private.h"
55 #include "MagickCore/utility.h"
56 #include "MagickCore/utility-private.h"
97 MagickExport
TokenInfo *AcquireTokenInfo(
void)
102 token_info=(
TokenInfo *) AcquireCriticalMemory(
sizeof(*token_info));
103 token_info->signature=MagickCoreSignature;
132 assert(token_info != (
TokenInfo *) NULL);
133 assert(token_info->signature == MagickCoreSignature);
134 if (IsEventLogging() != MagickFalse)
135 (void) LogMagickEvent(TraceEvent,GetMagickModule(),
"...");
136 token_info->signature=(~MagickCoreSignature);
137 token_info=(
TokenInfo *) RelinquishMagickMemory(token_info);
176 MagickExport magick_hot_spot
size_t GetNextToken(
177 const char *magick_restrict start,
const char **magick_restrict end,
178 const size_t extent,
char *magick_restrict token)
192 assert(start != (
const char *) NULL);
193 assert(token != (
char *) NULL);
196 while ((isspace((
int) ((
unsigned char) *p)) != 0) && (*p !=
'\0'))
212 case '"': escape=
'"';
break;
213 case '\'': escape=
'\'';
break;
214 case '`': escape=
'\'';
break;
215 case '{': escape=
'}';
break;
216 default: escape=(*p);
break;
218 for (p++; *p !=
'\0'; p++)
220 if ((*p ==
'\\') && ((*(p+1) == escape) || (*(p+1) ==
'\\')))
228 if (i < (ssize_t) (extent-1))
230 if ((
size_t) (p-start) >= (extent-1))
237 if (i < (ssize_t) (extent-1))
240 if ((*p ==
'>') || (*p ==
'/'))
242 if (i < (ssize_t) (extent-1))
250 value=StringToDouble(p,&q);
252 if ((p != q) && (*p !=
','))
254 for ( ; (p < q) && (*p !=
','); p++)
256 if (i < (ssize_t) (extent-1))
258 if ((
size_t) (p-start) >= (extent-1))
263 if (i < (ssize_t) (extent-1))
269 if ((*p !=
'\0') && (isalpha((
int) ((
unsigned char) *p)) == 0) &&
270 (*p != *DirectorySeparator) && (*p !=
'#') && (*p !=
'<'))
272 if (i < (ssize_t) (extent-1))
277 for ( ; *p !=
'\0'; p++)
279 if (((isspace((
int) ((
unsigned char) *p)) != 0) || (*p ==
'=') ||
280 (*p ==
',') || (*p ==
':') || (*p ==
';')) && (*(p-1) !=
'\\'))
282 if ((i > 0) && (*p ==
'<'))
284 if (i < (ssize_t) (extent-1))
290 for (p++; *p !=
'\0'; p++)
292 if (i < (ssize_t) (extent-1))
294 if ((*p ==
')') && (*(p-1) !=
'\\'))
296 if ((
size_t) (p-start) >= (extent-1))
302 if ((
size_t) (p-start) >= (extent-1))
309 if (LocaleNCompare(token,
"url(#",5) == 0)
311 q=strrchr(token,
')');
312 if (q != (
char *) NULL)
315 (void) memmove(token,token+5,(
size_t) (q-token-4));
318 while (isspace((
int) ((
unsigned char) *p)) != 0)
320 if (end != (
const char **) NULL)
321 *end=(
const char *) p;
354 MagickExport MagickBooleanType GlobExpression(
355 const char *magick_restrict expression,
const char *magick_restrict pattern,
356 const MagickBooleanType case_insensitive)
365 if (pattern == (
char *) NULL)
367 if (GetUTFCode(pattern) == 0)
369 if (LocaleCompare(pattern,
"*") == 0)
371 if ((GetUTFCode(pattern+strlen(pattern)-1) ==
']') &&
372 (strchr(pattern,
'[') != (
char *) NULL))
383 image_info=AcquireImageInfo();
384 (void) CopyMagickString(image_info->filename,pattern,MagickPathExtent);
385 exception=AcquireExceptionInfo();
386 (void) SetImageInfo(image_info,0,exception);
387 exception=DestroyExceptionInfo(exception);
388 if (LocaleCompare(image_info->filename,pattern) != 0)
390 image_info=DestroyImageInfo(image_info);
393 image_info=DestroyImageInfo(image_info);
399 while ((GetUTFCode(pattern) != 0) && (done == MagickFalse))
401 if (GetUTFCode(expression) == 0)
402 if ((GetUTFCode(pattern) !=
'{') && (GetUTFCode(pattern) !=
'*'))
404 switch (GetUTFCode(pattern))
412 while (GetUTFCode(pattern) ==
'*')
413 pattern+=GetUTFOctets(pattern);
414 while ((GetUTFCode(expression) != 0) && (status == MagickFalse))
416 status=GlobExpression(expression,pattern,case_insensitive);
417 expression+=GetUTFOctets(expression);
419 if (status != MagickFalse)
421 while (GetUTFCode(expression) != 0)
422 expression+=GetUTFOctets(expression);
423 while (GetUTFCode(pattern) != 0)
424 pattern+=GetUTFOctets(pattern);
433 pattern+=GetUTFOctets(pattern);
436 if ((GetUTFCode(pattern) == 0) || (GetUTFCode(pattern) ==
']'))
441 if (GetUTFCode(pattern) ==
'\\')
443 pattern+=GetUTFOctets(pattern);
444 if (GetUTFCode(pattern) == 0)
450 if (GetUTFCode(pattern+GetUTFOctets(pattern)) ==
'-')
452 c=GetUTFCode(pattern);
453 pattern+=GetUTFOctets(pattern);
454 pattern+=GetUTFOctets(pattern);
455 if (GetUTFCode(pattern) ==
']')
460 if (GetUTFCode(pattern) ==
'\\')
462 pattern+=GetUTFOctets(pattern);
463 if (GetUTFCode(pattern) == 0)
469 if ((GetUTFCode(expression) < c) ||
470 (GetUTFCode(expression) > GetUTFCode(pattern)))
472 pattern+=GetUTFOctets(pattern);
477 if (GetUTFCode(pattern) != GetUTFCode(expression))
479 pattern+=GetUTFOctets(pattern);
482 pattern+=GetUTFOctets(pattern);
483 while ((GetUTFCode(pattern) !=
']') && (GetUTFCode(pattern) != 0))
485 if ((GetUTFCode(pattern) ==
'\\') &&
486 (GetUTFCode(pattern+GetUTFOctets(pattern)) > 0))
487 pattern+=GetUTFOctets(pattern);
488 pattern+=GetUTFOctets(pattern);
490 if (GetUTFCode(pattern) != 0)
492 pattern+=GetUTFOctets(pattern);
493 expression+=GetUTFOctets(expression);
501 pattern+=GetUTFOctets(pattern);
502 expression+=GetUTFOctets(expression);
513 target=AcquireString(pattern);
516 while ((GetUTFCode(pattern) !=
'}') && (GetUTFCode(pattern) != 0))
519 if ((GetUTFCode(pattern) ==
',') || (GetUTFCode(pattern) ==
'}'))
522 match=GlobExpression(expression,target,case_insensitive);
523 if (match != MagickFalse)
525 expression+=MagickMin(strlen(expression),strlen(target));
529 pattern+=GetUTFOctets(pattern);
532 while ((GetUTFCode(pattern) !=
'}') && (GetUTFCode(pattern) != 0))
533 pattern+=GetUTFOctets(pattern);
534 if (GetUTFCode(pattern) != 0)
535 pattern+=GetUTFOctets(pattern);
536 target=DestroyString(target);
541 pattern+=GetUTFOctets(pattern);
542 if (GetUTFCode(pattern) == 0)
547 if (case_insensitive != MagickFalse)
549 if (LocaleToLowercase((
int) GetUTFCode(expression)) != LocaleToLowercase((
int) GetUTFCode(pattern)))
556 if (GetUTFCode(expression) != GetUTFCode(pattern))
561 expression+=GetUTFOctets(expression);
562 pattern+=GetUTFOctets(pattern);
566 while (GetUTFCode(pattern) ==
'*')
567 pattern+=GetUTFOctets(pattern);
568 match=(GetUTFCode(expression) == 0) && (GetUTFCode(pattern) == 0) ?
569 MagickTrue : MagickFalse;
596 MagickPrivate MagickBooleanType IsGlob(
const char *path)
599 status = MagickFalse;
604 if (IsPathAccessible(path) != MagickFalse)
606 for (p=path; *p !=
'\0'; p++)
794 static ssize_t sindex(
int c,
const char *
string)
799 for (p=
string; *p !=
'\0'; p++)
801 return((ssize_t) (p-
string));
805 static void StoreToken(
TokenInfo *token_info,
char *
string,
806 size_t max_token_length,
int c)
811 if ((token_info->offset < 0) ||
812 ((
size_t) token_info->offset >= (max_token_length-1)))
814 i=token_info->offset++;
816 if (token_info->state == IN_QUOTE)
818 switch (token_info->flag & 0x03)
822 string[i]=(char) LocaleToUppercase(c);
827 string[i]=(char) LocaleToLowercase(c);
835 MagickExport
int Tokenizer(
TokenInfo *token_info,
const unsigned flag,
836 char *token,
const size_t max_token_length,
const char *line,
const char *white,
837 const char *break_set,
const char *quote,
const char escape,
char *breaker,
838 int *next,
char *quoted)
848 if (line[*next] ==
'\0')
850 token_info->state=IN_WHITE;
851 token_info->quote=(char) MagickFalse;
852 token_info->flag=flag;
853 for (token_info->offset=0; (
int) line[*next] != 0; (*next)++)
856 i=sindex(c,break_set);
859 switch (token_info->state)
866 *breaker=break_set[i];
867 token[token_info->offset]=
'\0';
872 StoreToken(token_info,token,max_token_length,c);
881 switch (token_info->state)
885 token_info->state=IN_QUOTE;
886 token_info->quote=quote[i];
887 *quoted=(char) MagickTrue;
892 if (quote[i] != token_info->quote)
893 StoreToken(token_info,token,max_token_length,c);
896 token_info->state=IN_OZONE;
897 token_info->quote=
'\0';
905 token[token_info->offset]=
'\0';
914 switch (token_info->state)
921 token_info->state=IN_OZONE;
926 StoreToken(token_info,token,max_token_length,c);
932 if (c == (
int) escape)
934 if (line[(*next)+1] ==
'\0')
937 StoreToken(token_info,token,max_token_length,c);
939 token[token_info->offset]=
'\0';
942 switch (token_info->state)
947 token_info->state=IN_TOKEN;
955 StoreToken(token_info,token,max_token_length,c);
960 token[token_info->offset]=
'\0';
966 switch (token_info->state)
970 token_info->state=IN_TOKEN;
971 StoreToken(token_info,token,max_token_length,c);
977 StoreToken(token_info,token,max_token_length,c);
982 token[token_info->offset]=
'\0';
987 token[token_info->offset]=
'\0';