OOIsNumberLiteral.m File Reference

import "OOIsNumberLiteral.h"

Include dependency graph for OOIsNumberLiteral.m:

Go to the source code of this file.

Macros
#define	FAIL(s)

Functions
BOOL	OOIsNumberLiteral (NSString *string, BOOL allowSpaces)

Macro Definition Documentation

FAIL

#define FAIL

(

s

)

Value:

do { return NO; } while (0)

Definition at line 31 of file OOIsNumberLiteral.m.

Referenced by OOIsNumberLiteral(), and OOScalePixMap().

Function Documentation

OOIsNumberLiteral()

BOOL OOIsNumberLiteral	(	NSString *	string,
		BOOL	allowSpaces )

Definition at line 35 of file OOIsNumberLiteral.m.

{
    BOOL                    leadingSpace = allowSpaces,
                            trailingSpace = NO,
                            allowSign = YES,
                            allowE = NO,
                            hadE = NO,
                            hadExp = NO,
                            allowDec = YES,
                            hadNumber = NO;
    NSUInteger              i, count;
    
    if (string == nil)  return NO;
    
    count = [string length];
    for (i = 0; i != count; ++i)
    {
        switch ([string characterAtIndex:i])
        {
            // <digit>
            case '0':
            case '1':
            case '2':
            case '3':
            case '4':
            case '5':
            case '6':
            case '7':
            case '8':
            case '9':
                leadingSpace = NO;
                if (trailingSpace)  FAIL("Digit after trailing whitespace");
                if (!hadE)  allowE = YES;
                else  hadExp = YES;
                allowSign = NO;
                hadNumber = YES;
                break;
            
            // <whitespaceChar>
            case ' ':
            case '\t':
                if (leadingSpace || trailingSpace)  break;
                if (hadNumber && allowSpaces)
                {
                    trailingSpace = YES;
                    allowSign = allowE = allowDec = NO;
                    break;
                }
                FAIL("Space in unpermitted position");
            
            // <sign>
            case '-':
            case '+':
                leadingSpace = NO;
                if (allowSign)
                {
                    allowSign = NO;
                    break;
                }
                FAIL("Sign (+ or -) in unpermitted position");
            
            // <decimalPoint>
            case '.':
                leadingSpace = NO;
                if (allowDec)
                {
                    allowDec = NO;
                    continue;
                }
                FAIL("Sign (+ or -) in unpermitted position");
            
            // <e>
            case 'e':
            case 'E':
                leadingSpace = NO;
                if (allowE)
                {
                    allowE = NO;
                    allowSign = YES;
                    allowDec = NO;
                    hadE = YES;
                    continue;
                }
                FAIL("E in unpermitted position");
            
            default:
                FAIL ("Unpermitted character");
        }
    }
    
    if (hadE && !hadExp)  FAIL("E with no exponent");
    if (!hadNumber)  FAIL("No digits in string");
    
    return YES;
}

References count, FAIL, and nil.

Referenced by MissionVariablesGetProperty(), and SystemInfoGetProperty().

Here is the caller graph for this function: