X-Git-Url: http://dolda2000.com/gitweb/?p=utils.git;a=blobdiff_plain;f=capitalize.c;fp=capitalize.c;h=abcd0d540254b389cfb517da525439afafd9b5ab;hp=0000000000000000000000000000000000000000;hb=1c2fdcc245551183bbddfaa80bd9328062fc4ed1;hpb=5011fbe0143d3a9961cd31b8fe39783d9abe9714

diff --git a/capitalize.c b/capitalize.c
new file mode 100644
index 0000000..abcd0d5
--- /dev/null
+++ b/capitalize.c
@@ -0,0 +1,89 @@
+#include <stdlib.h>
+#include <stdio.h>
+#include <wchar.h>
+#include <wctype.h>
+#include <locale.h>
+
+wchar_t *exclude[] = {
+    L"a",
+    L"an",
+    L"the",
+    L"in",
+    L"to",
+    L"from",
+    L"of",
+    L"and",
+    L"or",
+    NULL
+};
+
+wchar_t *seps = L"-.?!";
+wchar_t *nonseps = L"\'";
+
+void capitalize(wchar_t *str)
+{
+    wchar_t *p, *p2, **ce;
+    int f;
+    
+    p = str;
+    f = 1;
+    while(1) {
+	while(!iswalnum(*p)) {
+	    if(*p == L'\0')
+		return;
+	    if(wcschr(seps, *p) != NULL)
+		f = 1;
+	    p++;
+	}
+	p2 = p;
+	while(iswalnum(*p) || (wcschr(nonseps, *p) != NULL)) {
+	    *p = towlower(*p);
+	    p++;
+	}
+	if(f) {
+	    *p2 = towupper(*p2);
+	    f = 0;
+	} else {
+	    for(ce = exclude; *ce != NULL; ce++) {
+		if(!wcsncmp(*ce, p2, p - p2) && ((*ce)[p - p2] == L'\0'))
+		    break;
+	    }
+	    if(*ce == NULL)
+		*p2 = towupper(*p2);
+	}
+    }
+}
+
+int main(int argc, char **argv)
+{
+    int i;
+    wchar_t buf[256];
+    
+    setlocale(LC_ALL, "");
+    if(argc > 1) {
+	for(i = 1; i < argc; i++) {
+	    mbstowcs(buf, argv[i], sizeof(buf) / sizeof(*buf));
+	    capitalize(buf);
+	    fputws(buf, stdout);
+	    fputwc(L'\n', stdout);
+	}
+    } else {
+	while(1) {
+	    if(fgetws(buf, sizeof(buf) / sizeof(*buf), stdin) == NULL) {
+		if(feof(stdin))
+		    break;
+		perror("reading input");
+		return(1);
+	    }
+	    capitalize(buf);
+	    fputws(buf, stdout);
+	}
+    }
+    return(0);
+}
+
+/*
+ * Local Variables:
+ * compile-command: "gcc -Wall -g -o capitalize capitalize.c"
+ * End:
+ */