cgiversion.c
上传用户:s81996212
上传日期:2007-01-04
资源大小:722k
文件大小:1k
源码类别:

WEB邮件程序

开发平台:

C/C++

  1. /*
  2. ** Copyright 1998 - 1999 Double Precision, Inc.
  3. ** See COPYING for distribution information.
  4. */
  5. /*
  6. ** $Id: cgiversion.c,v 1.2 1999/12/08 01:07:22 mrsam Exp $
  7. */
  8. #include <stdlib.h>
  9. #include <ctype.h>
  10. #include "cgi.h"
  11. void cgiversion(unsigned *major, unsigned *minor)
  12. {
  13. const char *p=getenv("SERVER_PROTOCOL");
  14. *major=0;
  15. *minor=0;
  16. if (!p) return;
  17. if ( toupper(*p++) != 'H' ||
  18. toupper(*p++) != 'T' ||
  19. toupper(*p++) != 'T' ||
  20. toupper(*p++) != 'P' ||
  21. *p++ != '/') return;
  22. while (isdigit(*p))
  23. *major= *major * 10 + (*p++ - '0');
  24. if (*p++ == '.')
  25. {
  26. while (isdigit(*p))
  27. *minor= *minor * 10 + (*p++ - '0');
  28. }
  29. }