43 #include "magick/studio.h"
44 #include "magick/exception.h"
45 #include "magick/exception-private.h"
46 #include "magick/image.h"
47 #include "magick/image-private.h"
48 #include "magick/locale-private.h"
49 #include "magick/memory_.h"
50 #include "magick/string_.h"
51 #include "magick/string-private.h"
52 #include "magick/token.h"
53 #include "magick/token-private.h"
54 #include "magick/utility.h"
95 MagickExport
TokenInfo *AcquireTokenInfo(
void)
100 token_info=(
TokenInfo *) AcquireMagickMemory(
sizeof(*token_info));
102 ThrowFatalException(ResourceLimitFatalError,
"MemoryAllocationFailed");
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))
253 value=StringToDouble(p,&q);
255 if ((p != q) && (*p !=
','))
257 for ( ; (p < q) && (*p !=
','); p++)
259 if (i < (ssize_t) (extent-1))
261 if ((
size_t) (p-start) >= (extent-1))
266 if (i < (ssize_t) (extent-1))
272 if ((*p !=
'\0') && (isalpha((
int) ((
unsigned char) *p)) == 0) &&
273 (*p != *DirectorySeparator) && (*p !=
'#') && (*p !=
'<'))
275 if (i < (ssize_t) (extent-1))
280 for ( ; *p !=
'\0'; p++)
282 if (((isspace((
int) ((
unsigned char) *p)) != 0) || (*p ==
'=') ||
283 (*p ==
',') || (*p ==
':') || (*p ==
';')) && (*(p-1) !=
'\\'))
285 if ((i > 0) && (*p ==
'<'))
287 if (i < (ssize_t) (extent-1))
293 for (p++; *p !=
'\0'; p++)
295 if (i < (ssize_t) (extent-1))
297 if ((*p ==
')') && (*(p-1) !=
'\\'))
299 if ((
size_t) (p-start) >= (extent-1))
305 if ((
size_t) (p-start) >= (extent-1))
312 if (LocaleNCompare(token,
"url(#",5) == 0)
314 q=strrchr(token,
')');
315 if (q != (
char *) NULL)
318 (void) memmove(token,token+5,(
size_t) (q-token-4));
321 while (isspace((
int) ((
unsigned char) *p)) != 0)
323 if (end != (
const char **) NULL)
324 *end=(
const char *) p;
357 MagickExport MagickBooleanType GlobExpression(
358 const char *magick_restrict expression,
const char *magick_restrict pattern,
359 const MagickBooleanType case_insensitive)
362 path[MagickPathExtent];
371 if (pattern == (
char *) NULL)
373 if (GetUTFCode(pattern) == 0)
375 if (LocaleCompare(pattern,
"*") == 0)
377 GetPathComponent(pattern,SubimagePath,path);
384 while ((GetUTFCode(pattern) != 0) && (done == MagickFalse))
386 if (GetUTFCode(expression) == 0)
387 if ((GetUTFCode(pattern) !=
'{') && (GetUTFCode(pattern) !=
'*'))
389 switch (GetUTFCode(pattern))
397 while (GetUTFCode(pattern) ==
'*')
398 pattern+=GetUTFOctets(pattern);
399 while ((GetUTFCode(expression) != 0) && (status == MagickFalse))
401 status=GlobExpression(expression,pattern,case_insensitive);
402 expression+=GetUTFOctets(expression);
404 if (status != MagickFalse)
406 while (GetUTFCode(expression) != 0)
407 expression+=GetUTFOctets(expression);
408 while (GetUTFCode(pattern) != 0)
409 pattern+=GetUTFOctets(pattern);
418 pattern+=GetUTFOctets(pattern);
421 if ((GetUTFCode(pattern) == 0) || (GetUTFCode(pattern) ==
']'))
426 if (GetUTFCode(pattern) ==
'\\')
428 pattern+=GetUTFOctets(pattern);
429 if (GetUTFCode(pattern) == 0)
435 if (GetUTFCode(pattern+GetUTFOctets(pattern)) ==
'-')
437 c=GetUTFCode(pattern);
438 pattern+=GetUTFOctets(pattern);
439 pattern+=GetUTFOctets(pattern);
440 if (GetUTFCode(pattern) ==
']')
445 if (GetUTFCode(pattern) ==
'\\')
447 pattern+=GetUTFOctets(pattern);
448 if (GetUTFCode(pattern) == 0)
454 if ((GetUTFCode(expression) < c) ||
455 (GetUTFCode(expression) > GetUTFCode(pattern)))
457 pattern+=GetUTFOctets(pattern);
462 if (GetUTFCode(pattern) != GetUTFCode(expression))
464 pattern+=GetUTFOctets(pattern);
467 pattern+=GetUTFOctets(pattern);
468 while ((GetUTFCode(pattern) !=
']') && (GetUTFCode(pattern) != 0))
470 if ((GetUTFCode(pattern) ==
'\\') &&
471 (GetUTFCode(pattern+GetUTFOctets(pattern)) > 0))
472 pattern+=GetUTFOctets(pattern);
473 pattern+=GetUTFOctets(pattern);
475 if (GetUTFCode(pattern) != 0)
477 pattern+=GetUTFOctets(pattern);
478 expression+=GetUTFOctets(expression);
486 pattern+=GetUTFOctets(pattern);
487 expression+=GetUTFOctets(expression);
498 target=AcquireString(pattern);
501 while ((GetUTFCode(pattern) !=
'}') && (GetUTFCode(pattern) != 0))
504 if ((GetUTFCode(pattern) ==
',') || (GetUTFCode(pattern) ==
'}'))
507 match=GlobExpression(expression,target,case_insensitive);
508 if (match != MagickFalse)
510 expression+=MagickMin(strlen(expression),strlen(target));
514 pattern+=GetUTFOctets(pattern);
517 while ((GetUTFCode(pattern) !=
'}') && (GetUTFCode(pattern) != 0))
518 pattern+=GetUTFOctets(pattern);
519 if (GetUTFCode(pattern) != 0)
520 pattern+=GetUTFOctets(pattern);
521 target=DestroyString(target);
526 pattern+=GetUTFOctets(pattern);
527 if (GetUTFCode(pattern) == 0)
532 if (case_insensitive != MagickFalse)
534 if (LocaleToLowercase((
int) GetUTFCode(expression)) != LocaleToLowercase((
int) GetUTFCode(pattern)))
541 if (GetUTFCode(expression) != GetUTFCode(pattern))
546 expression+=GetUTFOctets(expression);
547 pattern+=GetUTFOctets(pattern);
551 while (GetUTFCode(pattern) ==
'*')
552 pattern+=GetUTFOctets(pattern);
553 match=(GetUTFCode(expression) == 0) && (GetUTFCode(pattern) == 0) ?
554 MagickTrue : MagickFalse;
581 MagickExport MagickBooleanType IsGlob(
const char *path)
584 status = MagickFalse;
589 if (IsPathAccessible(path) != MagickFalse)
591 for (p=path; *p !=
'\0'; p++)
638 MagickExport MagickBooleanType IsMagickTrue(
const char *value)
640 if (value == (
const char *) NULL)
642 if (LocaleCompare(value,
"true") == 0)
644 if (LocaleCompare(value,
"on") == 0)
646 if (LocaleCompare(value,
"yes") == 0)
648 if (LocaleCompare(value,
"1") == 0)
820 static ssize_t sindex(
int c,
const char *
string)
825 for (p=
string; *p !=
'\0'; p++)
827 return((ssize_t) (p-
string));
831 static void StoreToken(
TokenInfo *token_info,
char *
string,
832 size_t max_token_length,
int c)
837 if ((token_info->offset < 0) ||
838 ((
size_t) token_info->offset >= (max_token_length-1)))
840 i=token_info->offset++;
842 if (token_info->state == IN_QUOTE)
844 switch (token_info->flag & 0x03)
848 string[i]=(char) LocaleToUppercase(c);
853 string[i]=(char) LocaleToLowercase(c);
861 MagickExport
int Tokenizer(
TokenInfo *token_info,
const unsigned flag,
862 char *token,
const size_t max_token_length,
const char *line,
const char *white,
863 const char *break_set,
const char *quote,
const char escape,
char *breaker,
864 int *next,
char *quoted)
874 if (line[*next] ==
'\0')
876 token_info->state=IN_WHITE;
877 token_info->quote=(char) MagickFalse;
878 token_info->flag=flag;
879 for (token_info->offset=0; (
int) line[*next] != 0; (*next)++)
882 i=sindex(c,break_set);
885 switch (token_info->state)
892 *breaker=break_set[i];
893 token[token_info->offset]=
'\0';
898 StoreToken(token_info,token,max_token_length,c);
907 switch (token_info->state)
911 token_info->state=IN_QUOTE;
912 token_info->quote=quote[i];
913 *quoted=(char) MagickTrue;
918 if (quote[i] != token_info->quote)
919 StoreToken(token_info,token,max_token_length,c);
922 token_info->state=IN_OZONE;
923 token_info->quote=
'\0';
931 token[token_info->offset]=
'\0';
940 switch (token_info->state)
947 token_info->state=IN_OZONE;
952 StoreToken(token_info,token,max_token_length,c);
958 if (c == (
int) escape)
960 if (line[(*next)+1] ==
'\0')
963 StoreToken(token_info,token,max_token_length,c);
965 token[token_info->offset]=
'\0';
968 switch (token_info->state)
973 token_info->state=IN_TOKEN;
981 StoreToken(token_info,token,max_token_length,c);
986 token[token_info->offset]=
'\0';
992 switch (token_info->state)
996 token_info->state=IN_TOKEN;
997 StoreToken(token_info,token,max_token_length,c);
1003 StoreToken(token_info,token,max_token_length,c);
1008 token[token_info->offset]=
'\0';
1013 token[token_info->offset]=
'\0';