xtdbglog.c
上传用户:duobangkj
上传日期:2007-01-07
资源大小:70k
文件大小:1k
源码类别:

Telnet客户端

开发平台:

Unix_Linux

  1. /* xtdbglog.c -- debug logging module for XT
  2. This file uses 4-character tabstops
  3. */
  4. #include <stdio.h>
  5. #include <sys/types.h>
  6. #include <sys/timeb.h>
  7. #include <time.h>
  8. #define NOREDEF 1 /* prevents xt.h from redefining fprint, fputc, fputs */
  9. #include "xt.h"
  10. #if LOG
  11. static FILE *dfp;
  12. void
  13. dbglog()
  14. {
  15. time_t todnow;
  16. time(&todnow);
  17. if (!access("xt.log",0) && (dfp=fopen("xt.log","w")))
  18. setbuf(dfp, NIL(char)),
  19. fprintf(dfp,(char*)asctime(localtime(&todnow)));
  20. return;
  21. }
  22. Fputc(c, stream)
  23. register int c;
  24. FILE *stream;
  25. {
  26. if (!capture && dfp && c != 'r')
  27. fputc(c,dfp);
  28. return(fputc(c,stream));
  29. }
  30. Fputs(s, stream)
  31. register char *s;
  32. FILE *stream;
  33. {
  34. if (!capture && dfp)
  35. fputs(s,dfp);
  36. return(fputs(s,stream));
  37. }
  38. Fprintf(stream, format, a, b, c, d, e, f, g)
  39. FILE *stream;
  40. char *format;
  41. long a, b, c, d, e, f, g;
  42. {
  43. if (!capture && dfp)
  44. fprintf(dfp,format,a,b,c,d,e,f,g);
  45. return(fprintf(stream,format,a,b,c,d,e,f,g));
  46. }
  47. #endif