开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB邮件程序 > 查看源码
rfc2045appendurl.c
资源名称：sqwebmail-0.37a.38pre2.tar.gz　[点击查看]
上传用户：s81996212
上传日期：2007-01-04
资源大小：722k
文件大小：2k
源码类别：

WEB邮件程序

开发平台：

C/C++

rfc2045appendurl.c：源码内容
  1. /*
  2. ** Copyright 2000 Double Precision, Inc.  See COPYING for
  3. ** distribution information.
  4. */
  6. /*
  7. ** $Id: rfc2045appendurl.c,v 1.2 2000/03/28 01:07:21 mrsam Exp $
  8. */
  9. #if    HAVE_CONFIG_H
  10. #include       "config.h"
  11. #endif
  12. #include       <stdlib.h>
  13. #include       <stdio.h>
  14. #include       <string.h>
  15. #if    HAVE_STRINGS_H
  16. #include       <strings.h>
  17. #endif
  18. #include <ctype.h>
  19. #include "rfc2045.h"
  21. extern void rfc2045_enomem();
  23. /*
  24. ** ---------------------------------------------------------------------
  25. ** Attempt to parse Content-Base: and Content-Location:, and return the
  26. ** "base" of all the relative URLs in the section.
  27. ** ---------------------------------------------------------------------
  28. */
  30. static void get_method_path(const char *p,
  31. const char **method,
  32. unsigned *methodl,
  33. const char **path)
  34. {
  35. unsigned i;
  37. for (i=0; p && p[i]; i++)
  38. {
  39. if (p[i] == ':')
  40. {
  41. *method=p;
  42. *methodl= ++i;
  43. *path=p+i;
  44. return;
  45. }
  47. if (!isalpha( (int)(unsigned char)p[i]))
  48. break;
  49. }
  51. *method=0;
  52. *methodl=0;
  53. *path=p;
  54. }
  56. char *rfc2045_append_url(const char *base, const char *loc)
  57. {
  58. const char *base_method;
  59. unsigned base_method_l;
  60. const char *base_path;
  62. const char *loc_method;
  63. unsigned loc_method_l;
  64. const char *loc_path;
  65. char *buf, *q;
  67. get_method_path(base, &base_method, &base_method_l, &base_path);
  68. get_method_path(loc, &loc_method, &loc_method_l, &loc_path);
  70. if (loc_method_l)
  71. {
  72. buf=malloc(strlen(loc)+1);
  73. if (!buf) rfc2045_enomem();
  74. strcpy(buf, loc);
  75. return (buf);
  76. }
  78. loc_method=base_method;
  79. loc_method_l=base_method_l;
  81. if (!base_path) base_path="";
  82. if (!loc_path) loc_path="";
  84. buf=malloc(loc_method_l + strlen(base_path)+strlen(loc_path) + 3);
  86. if (!buf) rfc2045_enomem();
  88. if (loc_method_l)
  89. memcpy(buf, loc_method, loc_method_l);
  90. buf[loc_method_l]=0;
  92. q=buf + loc_method_l;
  94. strcat(strcpy(q, base_path), "/");
  96. if ( loc_path[0] == '/')
  97. {
  98. char *r;
  100. if (loc_path[1] == '/')
  101. /* Location is absolute */
  102. {
  103. *q=0;
  104. }
  106. /* Relative to top of base */
  108. else if ( q[0] == '/' && q[1] == '/' &&
  109. (r=strchr(q+2, '/')) != 0)
  110. {
  111. *r=0;
  112. }
  113. else
  114. *q=0; /* No sys in base, just start with / */
  115. }
  117. strcat(q, loc_path);
  119. return (buf);
  120. }
  122. char *rfc2045_content_base(struct rfc2045 *p)
  123. {
  124. return (rfc2045_append_url(p->content_base, p->content_location));
  125. }