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/isisbn.c |
Initial import (2.0.2-6)2.0.2-6
Diffstat (limited to 'reference/C/CONTRIB/SNIP/isisbn.c')
-rwxr-xr-x | reference/C/CONTRIB/SNIP/isisbn.c | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/reference/C/CONTRIB/SNIP/isisbn.c b/reference/C/CONTRIB/SNIP/isisbn.c new file mode 100755 index 0000000..6fccee7 --- /dev/null +++ b/reference/C/CONTRIB/SNIP/isisbn.c @@ -0,0 +1,25 @@ +/*
+** ISISBN.C - Validate International Standard Book Numbers (ISBNs)
+**
+** public domain by Maynard Hogg
+*/
+
+#include <ctype.h>
+
+int isbn2(char *str)
+{
+ int i = 0;
+ int test = 0;
+ int c;
+
+ while ('\0' != (c = *str++))
+ {
+ if (isdigit(c))
+ c -= '0';
+ else if (i == 9 && 'X' == c)
+ c = 10;
+ else continue;
+ test += c * ++i;
+ }
+ return (i == 10 && test % 11 == 0);
+}
|