VMS below version 7 doesn't have strcasecmp, so let's roll our own on VMS.

PR: 184
This commit is contained in:
Richard Levitte
2002-10-10 09:05:05 +00:00
parent ef0baf60aa
commit ca80756c70
2 changed files with 22 additions and 0 deletions

View File

@@ -354,6 +354,22 @@ int WIN32_rename(char *from, char *to)
}
#endif
#ifdef OPENSSL_SYS_VMS
int VMS_strcasecmp(const char *str1, const char *str2)
{
while (*str1 && *str2)
{
int res = toupper(*str1) - toupper(*str2);
if (res) return res < 0 ? -1 : 1;
}
if (*str1)
return 1;
if (*str2)
return -1;
return 0;
}
#endif
int chopup_args(ARGS *arg, char *buf, int *argc, char **argv[])
{
int num,len,i;