nyctergatis.com Contact Projects Sysquake Remote Live NME PDF Hike Sudoku GifBuilder jpeglib for Palm OS MySQL Client Cross-GCC for Mac OS

NMEAutolink.c Go to the documentation of this file. /* License: new BSD license (see NME.h) */ #include "NMEAutolink.h" #define isBlank(c) ((c) == ' ' || (c) == '\t' || (c) == '\r' || (c) == '\n') #define isAlpha(c) ((c) >= 'a' && (c) <= 'z' || (c) >= 'A' && (c) <= 'Z') NMEBoolean NMEAutoconvertCamelCase(NMEConstText src, NMEInt srcLen, NMEInt *i, NMEContext *context, void *userData) { NMEInt i1, j; // no match if first character is not a blank if (*i == 0) i1 = isBlank(src[*i]) ? *i + 1 : *i; else if (!isBlank(src[*i])) return FALSE; else i1 = *i + 1; if (isAlpha(src[i1])) for (j = 1; i1 + j < srcLen && isAlpha(src[i1 + j]); j++) if (src[i1 + j] <= 'Z' && src[i1 + j - 1] >= 'a') { // lowercase followed by uppercase -> camelCase // find end of sequence of letters for (; i1 + j < srcLen && isAlpha(src[i1 + j]); j++) ; // copy link, including initial blank if any, if there is enough space NMEAddString(&src[*i], i1 - *i, '\0', context); // blank NMEAddString("[[", -1, '\0', context); NMEAddString(&src[i1], j, '\0', context); NMEAddString("]]", -1, '\0', context); *i = i1 + j; return TRUE; } return FALSE; } NMEBoolean NMEAutoconvertURL(NMEConstText src, NMEInt srcLen, NMEInt *i, NMEContext *context, void *userData) { NMEInt i1, j, k, p; static char const * const prefix[] = { "http://", "https://", "ftp://", "mailto:", NULL }; static char const punctuation[] = ",.?!:;'"; // no match if first character is not a blank if (*i == 0) i1 = isBlank(src[*i]) ? *i + 1 : *i; else if (!isBlank(src[*i])) return FALSE; else i1 = *i + 1; // find prefix for (j = 0; prefix[j]; j++) { for (k = 0; prefix[j][k] && i1 + k < srcLen && src[i1 + k] == prefix[j][k]; k++) ; if (prefix[j][k]) continue; // end of prefix not reached // continue until next blank/control or double-quote for (p = k; i1 + p < srcLen && src[i1 + p] != '"' && !(src[i1 + p] >= '\0' && src[i1 + p] <= ' '); p++) ; // give up if nothing more than prefix if (p == k) continue; // remove trailing punctuation character for (j = 0; punctuation[j]; j++) if (src[i1 + p - 1] == punctuation[j]) { p--; break; } // copy link, including blank src[*i] if any NMEAddString(&src[*i], i1 - *i, '\0', context); // blank NMEAddString("[[", -1, '\0', context); NMEAddString(&src[i1], p, '\0', context); NMEAddString("]]", -1, '\0', context); *i = i1 + p; return TRUE; } return FALSE; }