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 == "image")
                                {
                                        tag_result=tag_arg;
                                }
                                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);
                        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 level)
{
        int dot_pos;

        switch(level)
        {
                case 0:
                        return ip;
                case 1:
                        dot_pos=ip.Find('.');
                        if (dot_pos == -1)
                                return CString();
                        return (ip.Left(dot_pos+1) + "*");
                case 2:
                        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) + "*.*");
        }
        return ip;
}

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	sysadm	1.2	if (tag_str == "image")
89			{
90			tag_result=tag_arg;
91			}
92	sysadm	1.1	if (tag_str == "bwf")
93			{
94			tag_result="****";
95			}
96			}
97			else
98			{
99			tag_result=source_str.Mid(p_start,p_end-p_start+1);
100			if (tag_str == "lml")
101			{
102			lml=true;
103			tag_result="";
104			}
105			}
106			if (p_start-p_current>0)
107	sysadm	1.2	result_str = result_str + source_str.Mid(p_current,p_start-p_current);
108			result_str += tag_result;
109	sysadm	1.1	p_current=p_end+1;
110			}
111			else
112			{
113			if (l_source > p_current)
114			{
115			result_str += source_str.Mid(p_current);
116			}
117			p_current=l_source;
118			}
119			}
120
121			return result_str;
122			}
123
124	sysadm	1.2	CString BBS_fun::ip_mask(const CString& ip, int level)
125	sysadm	1.1	{
126			int dot_pos;
127
128	sysadm	1.2	switch(level)
129			{
130			case 0:
131			return ip;
132			case 1:
133			dot_pos=ip.Find('.');
134			if (dot_pos == -1)
135			return CString();
136			return (ip.Left(dot_pos+1) + "*");
137			case 2:
138			dot_pos=ip.Find('.');
139			if (dot_pos == -1)
140			return CString();
141			dot_pos=ip.Find('.',dot_pos+1);
142			if (dot_pos == -1)
143			return CString();
144			return (ip.Left(dot_pos+1) + ".");
145			}
146			return ip;
147	sysadm	1.1	}
148
149			CString BBS_fun::FB2TXT(CString source_str)
150			{
151			CString result_str = "";
152			int i,j,len;
153
154			len = CString::StringLength(source_str);
155			result_str = "";
156
157			for (i=0;i<len;i++)
158			{
159			if (source_str[i]=='\033')
160			{
161			for (j=i+1;j<len;j++)
162			{
163			if (source_str[j]=='m')
164			{
165			j++;
166			break;
167			}
168			}
169			i=j-1;
170			}
171			else
172			{
173			result_str.AppendChar(source_str[i]);
174			}
175			}
176
177			return result_str;
178			}
179
180			CString BBS_fun::GB_decode(const CString& source_str)
181			{
182			CString search_str,result_str;
183			int pos,pos_f,len,len_b_str,len_decode;
184			char p_buf_s[65536],p_buf_d[65536];
185			bool found;
186
187			search_str = source_str;
188			search_str.MakeUpper();
189			result_str = "";
190			pos = 0;
191			len = CString::StringLength(source_str);
192			len_b_str = CString::StringLength("=?gb2312?Q?");
193
194			while(pos<len)
195			{
196			found = false;
197
198			//QPDecode
199			if ((pos_f = search_str.Find("=?GB2312?Q?",pos))>=0)
200			{
201			found = true;
202			result_str += source_str.Mid(pos,pos_f-pos);
203			pos = pos_f + len_b_str;
204			if ((pos_f = source_str.Find("?=",pos))>=0)
205			{
206			strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
207			pos = pos_f + 2;
208			}
209			else
210			{
211			strcpy(p_buf_s,source_str.Mid(pos));
212			pos = len;
213			}
214			len_decode = 65536;
215			if (QPDecode((BYTE *)p_buf_s,(int)strlen(p_buf_s),p_buf_d,&len_decode))
216			{
217			p_buf_d[len_decode]='\0';
218			result_str += p_buf_d;
219			}
220			else
221			{
222			result_str += p_buf_s;
223			}
224			}
225
226			//Base64Decode
227			if ((pos_f = search_str.Find("=?GB2312?B?",pos))>=0)
228			{
229			found = true;
230			result_str += source_str.Mid(pos,pos_f-pos);
231			pos = pos_f + len_b_str;
232			if ((pos_f = source_str.Find("=?=",pos))>=0)
233			{
234			strcpy(p_buf_s,source_str.Mid(pos,pos_f-pos));
235			pos = pos_f + 3;
236			}
237			else
238			{
239			strcpy(p_buf_s,source_str.Mid(pos));
240			pos = len;
241			}
242			len_decode = 65536;
243			if (Base64Decode(p_buf_s,(int)strlen(p_buf_s),(BYTE *)p_buf_d,&len_decode))
244			{
245			p_buf_d[len_decode]='\0';
246			result_str += p_buf_d;
247			}
248			else
249			{
250			result_str += p_buf_s;
251			}
252			}
253
254			if (!found)
255			{
256			result_str += source_str.Mid(pos);
257			pos = len;
258			}
259			}
260
261			return result_str;
262			}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1