diff options
author | Tobias Klauser <tklauser@distanz.ch> | 2008-01-27 11:37:44 +0100 |
---|---|---|
committer | Tobias Klauser <tklauser@xenon.tklauser.home> | 2008-01-27 11:37:44 +0100 |
commit | 7e0f021a9aec35fd8e6725e87e3313b101d26f5e (patch) | |
tree | b1cacc4b24393f517aeb4610e9e1021f954307a8 /reference/C/CONTRIB/SNIP/soundex.c |
Initial import (2.0.2-6)2.0.2-6
Diffstat (limited to 'reference/C/CONTRIB/SNIP/soundex.c')
-rwxr-xr-x | reference/C/CONTRIB/SNIP/soundex.c | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/reference/C/CONTRIB/SNIP/soundex.c b/reference/C/CONTRIB/SNIP/soundex.c new file mode 100755 index 0000000..b9685f8 --- /dev/null +++ b/reference/C/CONTRIB/SNIP/soundex.c @@ -0,0 +1,43 @@ +/*
+** from Bob Jarvis
+*/
+
+#include <stdio.h>
+#include <ctype.h>
+
+char *soundex(char *instr, char *outstr)
+{ /* ABCDEFGHIJKLMNOPQRSTUVWXYZ */
+ char *table = "01230120022455012623010202";
+ int count = 0;
+
+ while(!isalpha(instr[0]) && instr[0])
+ ++instr;
+
+ if(!instr[0]) /* Hey! Where'd the string go? */
+ return(NULL);
+
+ if(toupper(instr[0]) == 'P' && toupper(instr[1]) == 'H')
+ {
+ instr[0] = 'F';
+ instr[1] = 'A';
+ }
+
+ *outstr++ = (char)toupper(*instr++);
+
+ while(*instr && count < 5)
+ {
+ if(isalpha(*instr) && *instr != *(instr-1))
+ {
+ *outstr = table[toupper(instr[0]) - 'A'];
+ if(*outstr != '0')
+ {
+ ++outstr;
+ ++count;
+ }
+ }
+ ++instr;
+ }
+
+ *outstr = '\0';
+ return(outstr);
+}
|