学习、研究库函数的实现，能使你考虑问题更加严谨、全面，培养良好的编程风格和习惯
最近想学习一下C语言库函数的内部实现，于是自己简单地写了几个
贴出以下代码，希望大家能够帮忙指正、优化、完善，
特别是考虑不周和执行效率上给出指导意见
阅读本文前，可以先参考本博客的上一篇文章 C语言函数小集合
调试环境： VS2008（C）
// sysFunc.cpp : Defines the entry point for the console application. // #include "stdafx.h" #include <ctype.h> /**************************************/ /********** isalnum() *********/ /**************************************/ int m_isalnum(char ch) { return ((ch<='9'&&ch>='0') ||(ch<='z'&&ch>='a') ||(ch<='Z'&&ch>='A')); } void fun_isalnum() { char str[]="A12a;D*s06"; int i; printf("Test isalnum.: %s/n", str); for(i=0; str[i]!=NULL; i++) /* #define NULL 0 */ { if(m_isalnum(str[i])) /* isalnum(str[i]) */ printf("%c is a number or character./n", str[i]); } } /**************************************/ /********** isalpha() *********/ /**************************************/ int m_isalpha(char ch) { return ((ch<='z'&&ch>='a') ||(ch<='Z'&&ch>='A')); } void fun_isalpha() { char str[]="A12a;D*s06"; int i; printf("/nTest isalpha: %s/n", str); for(i=0; str[i]!='/0'; i++) { if(m_isalpha(str[i])) /* isalpha(str[i]) */ printf("%c is a character./n", str[i]); } } /**************************************/ /********** islower() *********/ /**************************************/ int m_islower(char ch) { return (ch<='z'&&ch>='a'); } void fun_islower() { char str[]="A12a;D*s06"; int i; printf("/nTest islower: %s/n", str); for(i=0; str[i]!='/0'; i++) { if(m_islower(str[i])) /* isalpha(str[i]) */ printf("%c is a lower character./n", str[i]); } } /**************************************/ /********** isupper() *********/ /**************************************/ int m_isupper(char ch) { return (ch<='Z'&&ch>='A'); } void fun_isupper() { char str[]="A12a;D*s06"; int i; printf("/nTest isupper: %s/n", str); for(i=0; str[i]!='/0'; i++) { if(m_isupper(str[i])) /* isalpha(str[i]) */ printf("%c is a isupper character./n", str[i]); } } /**************************************/ /********** isxdigit() *********/ /**************************************/ int m_isxdigit(char ch) { return (ch<='9'&&ch>='0'); } void fun_isxdigit() { char str[]="A12a;D*s06"; int i; printf("/nTest isxdigit: %s/n", str); for(i=0; str[i]!='/0'; i++) { if(m_isxdigit(str[i])) /* isalpha(str[i]) */ printf("%c is a isxdigit character./n", str[i]); } } /**************************************/ /********** tolower() *********/ /**************************************/ char m_tolower(char ch) { if(ch<='Z'&&ch>='A') return (ch+'a'-'A'); return '0'; } void fun_tolower() { char str[]="A12a;D*s06"; int i; char ch; printf("/nTest tolower: %s/n", str); for(i=0; str[i]!='/0'; i++) { ch=str[i]; if(m_isalpha(ch)) /* isalpha(str[i]) */ { if(ch<='Z'&&ch>='A') ch=m_tolower(ch); printf("%c is a tolower character./n", ch); } } } /**************************************/ /********** toupper() *********/ /**************************************/ char m_toupper(char ch) { if(ch<='z'&&ch>='a') return (ch+'A'-'a'); return '0'; } void fun_toupper() { char str[]="A12a;D*s06"; int i; char ch; printf("/nTest toupper: %s/n", str); for(i=0; str[i]!='/0'; i++) { ch=str[i]; if(m_isalpha(ch)) /* isalpha(str[i]) */ { if(ch<='z'&&ch>='a') ch=m_toupper(ch); printf("%c is a toupper character./n", ch); } } } /**************************************/ /********** atoi() *********/ /**************************************/ int m_atoi(char *str) { char *s=str; int sum=0, flag=1; if(*s==NULL) return 0; while(*s==' ') /* skip space */ s++; if(*s=='-') { flag=-1; s++; } while(*s!='/0' && m_isxdigit(*s)) { sum=*s-'0'+sum*10; s++; } return flag*sum; } void fun_atoi() { char str[]=" -123.456def"; printf("/nTest atoi.../n"); printf("%s char to int: %d/n", str, m_atoi(str)); } /**************************************/ /********** itoa() *********/ /**************************************/ void m_itoa(int n) { char *s=NULL; int i, j, mod, flag=0; char num[20]; if(n<0) { flag=1; n=-n; } i=0; do { mod=n%10; n=n/10; num[i++]=mod+'0'; } while (n>0); if(flag) /* print '-' */ printf("-"); for(j=i-1; j>=0; j--) /* print reverse char */ { printf("%c", num[j]); } } void fun_itoa() { int n=1234; printf("/nTest itoa.../n"); printf("%d char to int: ", n); m_itoa(n); printf("/n"); } /**************************************/ /********** atof() *********/ /**************************************/ float m_atof(char *str) { char *s=str; if(*s=='/0') return 0.0; float sum=0.0; int flag=1, pow=0; if(*s=='-') { flag=-1; s++; } while(*s!='/0') { if(*s=='.') /* dot */ { pow=1; s++; continue; } sum=*s-'0'+sum*10; pow*=10; s++; } return flag*sum/pow; } void fun_atof() { char str[]="-123.345"; printf("/nTest atof.../n"); printf("%s char to int: %f/n", str, m_atof(str)); } /**************************************/ /********** ftoa() *********/ /**************************************/ void m_ftoa(float n) { char num[20]; int i, j, val, mod, flag, pow; float dot; if(n<-1e-6) { flag=1; n=-n; } i=0; val=(int)n; /* integer */ dot=n-val; /* decimal */ do { mod=val%10; val=val/10; num[i++]=mod+'0'; }while(val>0); if(dot>1e-6) { num[i]='.'; pow=10; } do { dot=dot*pow; mod=(int)dot; num[i++]=mod+'0'; dot=dot-mod; /* error, why, float... help me */ } while (dot>1e-6); if(flag) printf("-"); for(j=i-1; j>=0; j--) printf("%c", num[j]); } void fun_ftoa() { float n=-1234.5678; printf("/nTest ftoa.../n"); printf("%d char to int: ", n); m_ftoa(n); printf("/n"); } /**************************************/ /********** main() *********/ /**************************************/ int _tmain(int argc, _TCHAR* argv[]) { fun_isalnum(); fun_isalpha(); fun_islower(); fun_isupper(); fun_isxdigit(); fun_tolower(); fun_toupper(); fun_atof(); fun_atoi(); fun_itoa(); fun_ftoa(); return 0; }
运行结果：
