LeafOK_CVS/innwebd/BBS_fun.cpp

/*******************************************************/
/*                                                     */
/*  LeafOK Innd                                        */
/*  Copyright (C) LeafOK.com, 2003-2004                */
/*                                                     */
/*  Programmed by Leaf                                 */
/*  E-mail:leaf@leafok.com  QQ:6049044                 */
/*                                                     */
/*  http://bbs.leafok.com                              */
/*  http://bbs.leafok.net                              */
/*  http://bbs.fenglin.info                            */
/*                                                     */
/*******************************************************/

#include "StdAfx.h"
#include ".\bbs_fun.h"
#include "atlenc.h"

BBS_fun::BBS_fun(void)
{
}

BBS_fun::~BBS_fun(void)
{
}

CString BBS_fun::LML(const CString& source_str)
{
        bool lml;
        CString result_str,tag_str,tag_arg,tag_result;
        int pre,p_current,l_source,p_start,p_end,p_space,p_tag_end;

        lml=true;
        result_str="";
        pre=0;
        p_current=0;
        l_source=(int)strlen(source_str);

        while (p_current < l_source)
        {
                p_start=source_str.Find('[',p_current);
                if (p_start != -1)
                {
                        p_space=source_str.Find(' ',p_start+1);
                        p_end=source_str.Find(']',p_start+1);
                        if (p_end == -1)
                                p_end=l_source-1;
                        if ((p_space != -1) && (p_space < p_end))
                        {
                                p_tag_end=p_space;
                                if (p_end-p_tag_end>0)
                                {
                                        tag_arg=source_str.Mid(p_tag_end+1,p_end-p_tag_end-1);
                                        tag_arg.Trim();
                                }
                                else
                                        tag_arg="";
                        }
                        else
                        {
                                tag_arg="";
                                p_tag_end=p_end;
                        }
                        if (p_tag_end-p_start>0)
                        {
                                tag_str=source_str.Mid(p_start+1,p_tag_end-p_start-1);
                                tag_str.Trim();
                                tag_str.MakeLower();
                        }
                        else
                                tag_str="";
                        if (lml == true)
                        {
                                //Code for switch == true was omitted
                                tag_result="";
                                if (tag_str == "nolml")
                                {
                                        lml=false;
                                }
                                if (tag_str == "left")
                                {
                                        tag_result="[";
                                }
                                if (tag_str == "right")
                                {
                                        tag_result="]";
                                }
                                if (tag_str == "bwf")
                                {
                                        tag_result="****";
                                }
                        }
                        else
                        {
                                tag_result=source_str.Mid(p_start,p_end-p_start+1);
                                if (tag_str == "lml")
                                {
                                        lml=true;
                                        tag_result="";
                                }
                        }
                        if (p_start-p_current>0)
                                result_str = result_str + source_str.Mid(p_current,p_start-p_current) + tag_result;
                        else
                                result_str += tag_result;
                        p_current=p_end+1;
                }
                else
                {
                        if (l_source > p_current)
                        {
                                result_str += source_str.Mid(p_current);
                        }
                        p_current=l_source;
                }
        }

        return result_str;
}

CString BBS_fun::ip_mask(const CString& ip)
{
        int dot_pos;

        dot_pos=ip.Find('.');
        if (dot_pos == -1)
                return CString();

        dot_pos=ip.Find('.',dot_pos+1);
        if (dot_pos == -1)
                return CString();

        return (ip.Left(dot_pos+1) + "*.*");
}

CString BBS_fun::FB2TXT(CString source_str)
{
        CString result_str = "";
        int i,j,len;

        len = CString::StringLength(source_str);
        result_str = "";

        for (i=0;i<len;i++)
        {
                if (source_str[i]=='\033')
                {
                        for (j=i+1;j<len;j++)
                        {
                                if (source_str[j]=='m')
                                {
                                        j++;
                                        break;
                                }
                        }
                        i=j-1;
                }
                else
                {
                        result_str.AppendChar(source_str[i]);
                }
        }
                
        return result_str;
}

CString BBS_fun::GB_decode(const CString& source_str)
{
        CString search_str,result_str;
        int pos,pos_f,len,len_b_str,len_decode;
        char p_buf_s[65536],p_buf_d[65536];
        bool found;

        search_str = source_str;
        search_str.MakeUpper();
        result_str = "";
        pos = 0;
        len = CString::StringLength(source_str);
        len_b_str = CString::StringLength("=?gb2312?Q?");

        while(pos<len)
        {
                found = false;

                //QPDecode
                if ((pos_f = search_str.Find("=?GB2312?Q?",pos))>=0)
                {
                        found = true;
                        result_str += source_str.Mid(pos,pos_f-pos);
                        pos = pos_f + len_b_str;
                        if ((pos_f = source_str.Find("?=",pos))>=0)
                        {
                                strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
                                pos = pos_f + 2;
                        }
                        else
                        {
                                strcpy(p_buf_s,source_str.Mid(pos));
                                pos = len;
                        }
                        len_decode = 65536;
                        if (QPDecode((BYTE *)p_buf_s,(int)strlen(p_buf_s),p_buf_d,&len_decode))
                        {
                                p_buf_d[len_decode]='\0';
                                result_str += p_buf_d;
                        }
                        else
                        {
                                result_str += p_buf_s;
                        }
                }

                //Base64Decode
                if ((pos_f = search_str.Find("=?GB2312?B?",pos))>=0)
                {
                        found = true;
                        result_str += source_str.Mid(pos,pos_f-pos);
                        pos = pos_f + len_b_str;
                        if ((pos_f = source_str.Find("=?=",pos))>=0)
                        {
                                strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
                                pos = pos_f + 3;
                        }
                        else
                        {
                                strcpy(p_buf_s,source_str.Mid(pos));
                                pos = len;
                        }
                        len_decode = 65536;
                        if (Base64Decode(p_buf_s,(int)strlen(p_buf_s),(BYTE *)p_buf_d,&len_decode))
                        {
                                p_buf_d[len_decode]='\0';
                                result_str += p_buf_d;
                        }
                        else
                        {
                                result_str += p_buf_s;
                        }
                }

                if (!found)
                {
                        result_str += source_str.Mid(pos);
                        pos = len;
                }
        }

        return result_str;
}
1	sysadm	1.1	/*******************************************************/
2			/* */
3			/* LeafOK Innd */
4			/* Copyright (C) LeafOK.com, 2003-2004 */
5			/* */
6			/* Programmed by Leaf */
7			/* E-mail:leaf@leafok.com QQ:6049044 */
8			/* */
9			/* http://bbs.leafok.com */
10			/* http://bbs.leafok.net */
11			/* http://bbs.fenglin.info */
12			/* */
13			/*******************************************************/
14
15			#include "StdAfx.h"
16			#include ".\bbs_fun.h"
17			#include "atlenc.h"
18
19			BBS_fun::BBS_fun(void)
20			{
21			}
22
23			BBS_fun::~BBS_fun(void)
24			{
25			}
26
27			CString BBS_fun::LML(const CString& source_str)
28			{
29			bool lml;
30			CString result_str,tag_str,tag_arg,tag_result;
31			int pre,p_current,l_source,p_start,p_end,p_space,p_tag_end;
32
33			lml=true;
34			result_str="";
35			pre=0;
36			p_current=0;
37			l_source=(int)strlen(source_str);
38
39			while (p_current < l_source)
40			{
41			p_start=source_str.Find('[',p_current);
42			if (p_start != -1)
43			{
44			p_space=source_str.Find(' ',p_start+1);
45			p_end=source_str.Find(']',p_start+1);
46			if (p_end == -1)
47			p_end=l_source-1;
48			if ((p_space != -1) && (p_space < p_end))
49			{
50			p_tag_end=p_space;
51			if (p_end-p_tag_end>0)
52			{
53			tag_arg=source_str.Mid(p_tag_end+1,p_end-p_tag_end-1);
54			tag_arg.Trim();
55			}
56			else
57			tag_arg="";
58			}
59			else
60			{
61			tag_arg="";
62			p_tag_end=p_end;
63			}
64			if (p_tag_end-p_start>0)
65			{
66			tag_str=source_str.Mid(p_start+1,p_tag_end-p_start-1);
67			tag_str.Trim();
68			tag_str.MakeLower();
69			}
70			else
71			tag_str="";
72			if (lml == true)
73			{
74			//Code for switch == true was omitted
75			tag_result="";
76			if (tag_str == "nolml")
77			{
78			lml=false;
79			}
80			if (tag_str == "left")
81			{
82			tag_result="[";
83			}
84			if (tag_str == "right")
85			{
86			tag_result="]";
87			}
88			if (tag_str == "bwf")
89			{
90			tag_result="****";
91			}
92			}
93			else
94			{
95			tag_result=source_str.Mid(p_start,p_end-p_start+1);
96			if (tag_str == "lml")
97			{
98			lml=true;
99			tag_result="";
100			}
101			}
102			if (p_start-p_current>0)
103			result_str = result_str + source_str.Mid(p_current,p_start-p_current) + tag_result;
104			else
105			result_str += tag_result;
106			p_current=p_end+1;
107			}
108			else
109			{
110			if (l_source > p_current)
111			{
112			result_str += source_str.Mid(p_current);
113			}
114			p_current=l_source;
115			}
116			}
117
118			return result_str;
119			}
120
121			CString BBS_fun::ip_mask(const CString& ip)
122			{
123			int dot_pos;
124
125			dot_pos=ip.Find('.');
126			if (dot_pos == -1)
127			return CString();
128
129			dot_pos=ip.Find('.',dot_pos+1);
130			if (dot_pos == -1)
131			return CString();
132
133			return (ip.Left(dot_pos+1) + ".");
134			}
135
136			CString BBS_fun::FB2TXT(CString source_str)
137			{
138			CString result_str = "";
139			int i,j,len;
140
141			len = CString::StringLength(source_str);
142			result_str = "";
143
144			for (i=0;i<len;i++)
145			{
146			if (source_str[i]=='\033')
147			{
148			for (j=i+1;j<len;j++)
149			{
150			if (source_str[j]=='m')
151			{
152			j++;
153			break;
154			}
155			}
156			i=j-1;
157			}
158			else
159			{
160			result_str.AppendChar(source_str[i]);
161			}
162			}
163
164			return result_str;
165			}
166
167			CString BBS_fun::GB_decode(const CString& source_str)
168			{
169			CString search_str,result_str;
170			int pos,pos_f,len,len_b_str,len_decode;
171			char p_buf_s[65536],p_buf_d[65536];
172			bool found;
173
174			search_str = source_str;
175			search_str.MakeUpper();
176			result_str = "";
177			pos = 0;
178			len = CString::StringLength(source_str);
179			len_b_str = CString::StringLength("=?gb2312?Q?");
180
181			while(pos<len)
182			{
183			found = false;
184
185			//QPDecode
186			if ((pos_f = search_str.Find("=?GB2312?Q?",pos))>=0)
187			{
188			found = true;
189			result_str += source_str.Mid(pos,pos_f-pos);
190			pos = pos_f + len_b_str;
191			if ((pos_f = source_str.Find("?=",pos))>=0)
192			{
193			strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
194			pos = pos_f + 2;
195			}
196			else
197			{
198			strcpy(p_buf_s,source_str.Mid(pos));
199			pos = len;
200			}
201			len_decode = 65536;
202			if (QPDecode((BYTE *)p_buf_s,(int)strlen(p_buf_s),p_buf_d,&len_decode))
203			{
204			p_buf_d[len_decode]='\0';
205			result_str += p_buf_d;
206			}
207			else
208			{
209			result_str += p_buf_s;
210			}
211			}
212
213			//Base64Decode
214			if ((pos_f = search_str.Find("=?GB2312?B?",pos))>=0)
215			{
216			found = true;
217			result_str += source_str.Mid(pos,pos_f-pos);
218			pos = pos_f + len_b_str;
219			if ((pos_f = source_str.Find("=?=",pos))>=0)
220			{
221			strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
222			pos = pos_f + 3;
223			}
224			else
225			{
226			strcpy(p_buf_s,source_str.Mid(pos));
227			pos = len;
228			}
229			len_decode = 65536;
230			if (Base64Decode(p_buf_s,(int)strlen(p_buf_s),(BYTE *)p_buf_d,&len_decode))
231			{
232			p_buf_d[len_decode]='\0';
233			result_str += p_buf_d;
234			}
235			else
236			{
237			result_str += p_buf_s;
238			}
239			}
240
241			if (!found)
242			{
243			result_str += source_str.Mid(pos);
244			pos = len;
245			}
246			}
247
248			return result_str;
249			}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1