1da2e3ebdSchin /*********************************************************************** 2da2e3ebdSchin * * 3da2e3ebdSchin * This software is part of the ast package * 4*b30d1939SAndy Fiddaman * Copyright (c) 1985-2011 AT&T Intellectual Property * 5da2e3ebdSchin * and is licensed under the * 6*b30d1939SAndy Fiddaman * Eclipse Public License, Version 1.0 * 77c2fbfb3SApril Chin * by AT&T Intellectual Property * 8da2e3ebdSchin * * 9da2e3ebdSchin * A copy of the License is available at * 10*b30d1939SAndy Fiddaman * http://www.eclipse.org/org/documents/epl-v10.html * 11*b30d1939SAndy Fiddaman * (with md5 checksum b35adb5213ca9657e911e9befb180842) * 12da2e3ebdSchin * * 13da2e3ebdSchin * Information and Software Systems Research * 14da2e3ebdSchin * AT&T Research * 15da2e3ebdSchin * Florham Park NJ * 16da2e3ebdSchin * * 17da2e3ebdSchin * Glenn Fowler <gsf@research.att.com> * 18da2e3ebdSchin * David Korn <dgk@research.att.com> * 19da2e3ebdSchin * Phong Vo <kpv@research.att.com> * 20da2e3ebdSchin * * 21da2e3ebdSchin ***********************************************************************/ 22da2e3ebdSchin #pragma prototyped 23da2e3ebdSchin 2434f9b3eeSRoland Mainz #include <ast.h> 2534f9b3eeSRoland Mainz #include <ctype.h> 2634f9b3eeSRoland Mainz 27da2e3ebdSchin /* 2834f9b3eeSRoland Mainz * version strcmp(3) 29da2e3ebdSchin */ 30da2e3ebdSchin 31da2e3ebdSchin int strvcmp(register const char * a,register const char * b)3234f9b3eeSRoland Mainzstrvcmp(register const char* a, register const char* b) 33da2e3ebdSchin { 3434f9b3eeSRoland Mainz register unsigned long na; 3534f9b3eeSRoland Mainz register unsigned long nb; 36da2e3ebdSchin 3734f9b3eeSRoland Mainz for (;;) 38da2e3ebdSchin { 3934f9b3eeSRoland Mainz if (isdigit(*a) && isdigit(*b)) 4034f9b3eeSRoland Mainz { 4134f9b3eeSRoland Mainz na = nb = 0; 4234f9b3eeSRoland Mainz while (isdigit(*a)) 4334f9b3eeSRoland Mainz na = na * 10 + *a++ - '0'; 4434f9b3eeSRoland Mainz while (isdigit(*b)) 4534f9b3eeSRoland Mainz nb = nb * 10 + *b++ - '0'; 4634f9b3eeSRoland Mainz if (na < nb) 4734f9b3eeSRoland Mainz return -1; 4834f9b3eeSRoland Mainz if (na > nb) 4934f9b3eeSRoland Mainz return 1; 5034f9b3eeSRoland Mainz } 5134f9b3eeSRoland Mainz else if (*a != *b) 5234f9b3eeSRoland Mainz break; 5334f9b3eeSRoland Mainz else if (!*a) 5434f9b3eeSRoland Mainz return 0; 5534f9b3eeSRoland Mainz else 5634f9b3eeSRoland Mainz { 5734f9b3eeSRoland Mainz a++; 5834f9b3eeSRoland Mainz b++; 5934f9b3eeSRoland Mainz } 60da2e3ebdSchin } 6134f9b3eeSRoland Mainz if (*a == 0) 6234f9b3eeSRoland Mainz return -1; 6334f9b3eeSRoland Mainz if (*b == 0) 6434f9b3eeSRoland Mainz return 1; 6534f9b3eeSRoland Mainz if (*a == '.') 6634f9b3eeSRoland Mainz return -1; 6734f9b3eeSRoland Mainz if (*b == '.') 6834f9b3eeSRoland Mainz return 1; 6934f9b3eeSRoland Mainz if (*a == '-') 7034f9b3eeSRoland Mainz return -1; 7134f9b3eeSRoland Mainz if (*b == '-') 7234f9b3eeSRoland Mainz return 1; 7334f9b3eeSRoland Mainz return *a < *b ? -1 : 1; 74da2e3ebdSchin } 75