stcopy.c
上传用户:sddyfurun
上传日期:2007-01-04
资源大小:525k
文件大小:2k
源码类别:

代理服务器

开发平台:

Unix_Linux

  1. /*
  2.  * Copyright (c) 1989, 1990, 1991 by the University of Washington
  3.  *
  4.  * For copying and distribution information, please see the file
  5.  * <copyright.h>.
  6.  */
  7. #include <stdio.h>
  8. #include <pmachine.h>
  9. char *stcopyr();
  10. int string_count = 0;
  11. int string_max = 0;
  12. /*
  13.  * stcopy - allocate space for and copy a string
  14.  *
  15.  *     STCOPY takes a string as an argument, allocates space for
  16.  *     a copy of the string, copies the string to the allocated space,
  17.  *     and returns a pointer to the copy.
  18.  */
  19. char *
  20. stcopy(st)
  21.     char *st;
  22.     {
  23.       if (!st) return(NULL);
  24.       if (string_max < ++string_count) string_max = string_count;
  25.       return strcpy((char *)malloc(strlen(st) + 1), st);
  26.     }
  27. /*
  28.  * stcopyr - copy a string allocating space if necessary
  29.  *
  30.  *     STCOPYR takes a string, S, as an argument, and a pointer to a second
  31.  *     string, R, which is to be replaced by S.  If R is long enough to
  32.  *     hold S, S is copied.  Otherwise, new space is allocated, and R is
  33.  *     freed.  S is then copied to the newly allocated space.  If S is
  34.  *     NULL, then R is freed and NULL is returned.
  35.  *
  36.  *     In any event, STCOPYR returns a pointer to the new copy of S,
  37.  *     or a NULL pointer.
  38.  */
  39. char *
  40. stcopyr(s,r)
  41.     char *s;
  42.     char *r;
  43.     {
  44. int sl;
  45. if(!s && r) {
  46.     free(r);
  47.     string_count--;
  48.     return(NULL);
  49. }
  50. else if (!s) return(NULL);
  51. sl = strlen(s) + 1;
  52. if(r) {
  53.     if ((strlen(r) + 1) < sl) {
  54. free(r);
  55. r = (char *) malloc(sl);
  56.     }
  57. }
  58. else {
  59.     r = (char *) malloc(sl);
  60.     string_count++;
  61.     if(string_max < string_count) string_max = string_count;
  62. }
  63.     
  64. return strcpy(r,s);
  65.     }
  66. /*
  67.  * stfree - free space allocated by stcopy or stalloc
  68.  *
  69.  *     STFREE takes a string that was returned by stcopy or stalloc 
  70.  *     and frees the space that was allocated for the string.
  71.  */
  72. void
  73. stfree(st)
  74.     char *st;
  75.     {
  76. if(st) {
  77.     free(st);
  78.     string_count--;
  79. }
  80.     }