1 // SoftEther UT-VPN SourceCode
\r
3 // Copyright (C) 2004-2010 SoftEther Corporation.
\r
4 // Copyright (C) 2004-2010 University of Tsukuba, Japan.
\r
5 // Copyright (C) 2003-2010 Daiyuu Nobori.
\r
6 // All Rights Reserved.
\r
8 // http://utvpn.tsukuba.ac.jp/
\r
10 // This program is free software; you can redistribute it and/or
\r
11 // modify it under the terms of the GNU General Public License
\r
12 // version 2 as published by the Free Software Foundation.
\r
14 // This program is distributed in the hope that it will be useful,
\r
15 // but WITHOUT ANY WARRANTY; without even the implied warranty of
\r
16 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
\r
17 // GNU General Public License for more details.
\r
19 // You should have received a copy of the GNU General Public License version 2
\r
20 // along with this program; if not, write to the Free Software
\r
21 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
\r
23 // このファイルは GPL バージョン 2 ライセンスで公開されています。
\r
24 // 誰でもこのファイルの内容を複製、改変したり、改変したバージョンを再配布
\r
25 // することができます。ただし、原著作物を改変した場合は、原著作物の著作権表示
\r
26 // を除去することはできません。改変した著作物を配布する場合は、改変実施者の
\r
27 // 著作権表示を原著作物の著作権表示に付随して記載するようにしてください。
\r
29 // この SoftEther UT-VPN オープンソース・プロジェクトは、日本国の
\r
30 // ソフトイーサ株式会社 (SoftEther Corporation, http://www.softether.co.jp/ )
\r
31 // および筑波大学 (University of Tsukuba, http://www.tsukuba.ac.jp/ ) によって
\r
33 // 本プログラムの配布者は、本プログラムを、業としての利用以外のため、
\r
34 // および、試験または研究のために利用が行われることを想定して配布
\r
36 // SoftEther UT-VPN プロジェクトの Web サイトは http://utvpn.tsukuba.ac.jp/ に
\r
38 // 本ソフトウェアの不具合の修正、機能改良、セキュリティホールの修復などのコード
\r
39 // の改変を行った場合で、その成果物を SoftEther UT-VPN プロジェクトに提出して
\r
40 // いただける場合は、 http://utvpn.tsukuba.ac.jp/ までソースコードを送付して
\r
41 // ください。SoftEther UT-VPN プロジェクトの本体リリースまたはブランチリリース
\r
44 // GPL に基づいて原著作物が提供される本ソフトウェアの改良版を配布、販売する
\r
45 // 場合は、そのソースコードを GPL に基づいて誰にでも開示する義務が生じます。
\r
47 // 本ソフトウェアに関連する著作権、特許権、商標権はソフトイーサ株式会社
\r
48 // (SoftEther Corporation) およびその他の著作権保持者が保有しています。
\r
49 // ソフトイーサ株式会社等はこれらの権利を放棄していません。本ソフトウェアの
\r
50 // 二次著作物を配布、販売する場合は、これらの権利を侵害しないようにご注意
\r
53 // お願い: どのような通信ソフトウェアにも通常は必ず未発見の
\r
54 // セキュリティホールが潜んでいます。本ソースコードをご覧いただいた結果、
\r
55 // UT-VPN にセキュリティホールを発見された場合は、当該セキュリティホールの
\r
56 // 情報を不特定多数に開示される前に、必ず、ソフトイーサ株式会社
\r
57 // および脆弱性情報の届出を受け付ける公的機関まで通報いただき、
\r
58 // 公益保護にご協力いただきますようお願い申し上げます。
\r
60 // ソフトイーサ株式会社は、当該セキュリティホールについて迅速に対処を
\r
61 // 行い、UT-VPN および UT-VPN に関連するソフトウェアのユーザー・顧客
\r
64 // ソフトイーサへの届出先: http://www.softether.co.jp/jp/contact/
\r
65 // 日本国内の脆弱性情報届出受付公的機関:
\r
67 // http://www.ipa.go.jp/security/vuln/report/
\r
69 // 上記各事項について不明な点は、ソフトイーサ株式会社までご連絡ください。
\r
70 // 連絡先: http://www.softether.co.jp/jp/contact/
\r
72 // -----------------------------------------------
\r
75 // 新規リリース by SoftEther
\r
76 // -----------------------------------------------
\r
88 #include <Mayaqua/Mayaqua.h>
\r
91 PACK *BufToPack(BUF *b)
\r
101 if (ReadPack(b, p) == false)
\r
111 BUF *PackToBuf(PACK *p)
\r
127 bool ReadPack(BUF *b, PACK *p)
\r
131 if (b == NULL || p == NULL)
\r
137 num = ReadBufInt(b);
\r
138 if (num > MAX_ELEMENT_NUM)
\r
145 for (i = 0;i < num;i++)
\r
148 e = ReadElement(b);
\r
149 if (AddElement(p, e) == false)
\r
160 void WritePack(BUF *b, PACK *p)
\r
164 if (b == NULL || p == NULL)
\r
170 WriteBufInt(b, LIST_NUM(p->elements));
\r
173 for (i = 0;i < LIST_NUM(p->elements);i++)
\r
175 ELEMENT *e = LIST_DATA(p->elements, i);
\r
176 WriteElement(b, e);
\r
181 ELEMENT *ReadElement(BUF *b)
\r
184 char name[MAX_ELEMENT_NAME_LEN + 1];
\r
185 UINT type, num_value;
\r
195 if (ReadBufStr(b, name, sizeof(name)) == false)
\r
201 type = ReadBufInt(b);
\r
204 num_value = ReadBufInt(b);
\r
205 if (num_value > MAX_VALUE_NUM)
\r
212 values = (VALUE **)Malloc(sizeof(VALUE *) * num_value);
\r
213 for (i = 0;i < num_value;i++)
\r
215 values[i] = ReadValue(b, type);
\r
219 e = NewElement(name, type, num_value, values);
\r
227 void WriteElement(BUF *b, ELEMENT *e)
\r
231 if (b == NULL || e == NULL)
\r
237 WriteBufStr(b, e->name);
\r
239 WriteBufInt(b, e->type);
\r
241 WriteBufInt(b, e->num_value);
\r
243 for (i = 0;i < e->num_value;i++)
\r
245 VALUE *v = e->values[i];
\r
246 WriteValue(b, v, e->type);
\r
251 VALUE *ReadValue(BUF *b, UINT type)
\r
271 case VALUE_INT: // 整数
\r
272 v = NewIntValue(ReadBufInt(b));
\r
275 v = NewInt64Value(ReadBufInt64(b));
\r
277 case VALUE_DATA: // データ
\r
278 size = ReadBufInt(b);
\r
279 if (size > MAX_VALUE_SIZE)
\r
284 data = Malloc(size);
\r
285 if (ReadBuf(b, data, size) != size)
\r
291 v = NewDataValue(data, size);
\r
294 case VALUE_STR: // ANSI 文字列
\r
295 len = ReadBufInt(b);
\r
296 if ((len + 1) > MAX_VALUE_SIZE)
\r
301 str = Malloc(len + 1);
\r
303 if (ReadBuf(b, str, len) != len)
\r
310 v = NewStrValue(str);
\r
313 case VALUE_UNISTR: // Unicode 文字列
\r
314 u_size = ReadBufInt(b);
\r
315 if (u_size > MAX_VALUE_SIZE)
\r
321 u = ZeroMalloc(u_size + 1);
\r
322 if (ReadBuf(b, u, u_size) != u_size)
\r
329 unistr_size = CalcUtf8ToUni(u, u_size);
\r
330 if (unistr_size == 0)
\r
335 unistr = Malloc(unistr_size);
\r
336 Utf8ToUni(unistr, unistr_size, u, u_size);
\r
338 v = NewUniStrValue(unistr);
\r
347 void WriteValue(BUF *b, VALUE *v, UINT type)
\r
353 if (b == NULL || v == NULL)
\r
361 case VALUE_INT: // 整数
\r
362 WriteBufInt(b, v->IntValue);
\r
364 case VALUE_INT64: // 64 bit 整数
\r
365 WriteBufInt64(b, v->Int64Value);
\r
367 case VALUE_DATA: // データ
\r
369 WriteBufInt(b, v->Size);
\r
371 WriteBuf(b, v->Data, v->Size);
\r
373 case VALUE_STR: // ANSI 文字列
\r
374 len = StrLen(v->Str);
\r
376 WriteBufInt(b, len);
\r
378 WriteBuf(b, v->Str, len);
\r
380 case VALUE_UNISTR: // Unicode 文字列
\r
382 u_size = CalcUniToUtf8(v->UniStr) + 1;
\r
383 u = ZeroMalloc(u_size);
\r
384 UniToUtf8(u, u_size, v->UniStr);
\r
386 WriteBufInt(b, u_size);
\r
388 WriteBuf(b, u, u_size);
\r
395 UINT GetDataValueSize(ELEMENT *e, UINT index)
\r
402 if (e->values == NULL)
\r
406 if (index >= e->num_value)
\r
410 if (e->values[index] == NULL)
\r
415 return e->values[index]->Size;
\r
419 void *GetDataValue(ELEMENT *e, UINT index)
\r
426 if (e->values == NULL)
\r
430 if (index >= e->num_value)
\r
434 if (e->values[index] == NULL)
\r
439 return e->values[index]->Data;
\r
443 wchar_t *GetUniStrValue(ELEMENT *e, UINT index)
\r
450 if (index >= e->num_value)
\r
455 return e->values[index]->UniStr;
\r
459 char *GetStrValue(ELEMENT *e, UINT index)
\r
466 if (index >= e->num_value)
\r
471 return e->values[index]->Str;
\r
475 UINT64 GetInt64Value(ELEMENT *e, UINT index)
\r
482 if (index >= e->num_value)
\r
487 return e->values[index]->Int64Value;
\r
491 UINT GetIntValue(ELEMENT *e, UINT index)
\r
498 if (index >= e->num_value)
\r
503 return e->values[index]->IntValue;
\r
507 int ComparePackName(void *p1, void *p2)
\r
510 if (p1 == NULL || p2 == NULL)
\r
514 o1 = *(ELEMENT **)p1;
\r
515 o2 = *(ELEMENT **)p2;
\r
516 if (o1 == NULL || o2 == NULL)
\r
521 return StrCmpi(o1->name, o2->name);
\r
525 void FreeValue(VALUE *v, UINT type)
\r
553 // Unicode 文字列型の VALUE の作成
\r
554 VALUE *NewUniStrValue(wchar_t *str)
\r
564 v = Malloc(sizeof(VALUE));
\r
567 v->Size = UniStrSize(str);
\r
568 v->UniStr = Malloc(v->Size);
\r
569 UniStrCpy(v->UniStr, v->Size, str);
\r
571 UniTrim(v->UniStr);
\r
576 // ANSI 文字列型の VALUE の作成
\r
577 VALUE *NewStrValue(char *str)
\r
587 v = Malloc(sizeof(VALUE));
\r
590 v->Size = StrLen(str) + 1;
\r
591 v->Str = Malloc(v->Size);
\r
592 StrCpy(v->Str, v->Size, str);
\r
600 VALUE *NewDataValue(void *data, UINT size)
\r
610 v = Malloc(sizeof(VALUE));
\r
614 v->Data = Malloc(v->Size);
\r
615 Copy(v->Data, data, size);
\r
620 // 64 bit 整数型の VALUE の作成
\r
621 VALUE *NewInt64Value(UINT64 i)
\r
625 v = Malloc(sizeof(VALUE));
\r
627 v->Size = sizeof(UINT64);
\r
633 VALUE *NewIntValue(UINT i)
\r
638 v = Malloc(sizeof(VALUE));
\r
640 v->Size = sizeof(UINT);
\r
646 void FreeElement(ELEMENT *e)
\r
655 for (i = 0;i < e->num_value;i++)
\r
657 FreeValue(e->values[i], e->type);
\r
665 ELEMENT *NewElement(char *name, UINT type, UINT num_value, VALUE **values)
\r
670 if (name == NULL || num_value == 0 || values == NULL)
\r
676 e = Malloc(sizeof(ELEMENT));
\r
677 StrCpy(e->name, sizeof(e->name), name);
\r
678 e->num_value = num_value;
\r
682 e->values = (VALUE **)Malloc(sizeof(VALUE *) * num_value);
\r
683 for (i = 0;i < e->num_value;i++)
\r
685 e->values[i] = values[i];
\r
691 // PACK から ELEMENT を検索して取得
\r
692 ELEMENT *GetElement(PACK *p, char *name, UINT type)
\r
697 if (p == NULL || name == NULL)
\r
703 StrCpy(t.name, sizeof(t.name), name);
\r
704 e = Search(p->elements, &t);
\r
712 if (type != INFINITE)
\r
714 if (e->type != type)
\r
723 // PACK から ELEMENT を削除
\r
724 void DelElement(PACK *p, char *name)
\r
728 if (p == NULL || name == NULL)
\r
733 e = GetElement(p, name, INFINITE);
\r
736 Delete(p->elements, e);
\r
742 // PACK に ELEMENT を追加
\r
743 bool AddElement(PACK *p, ELEMENT *e)
\r
746 if (p == NULL || e == NULL)
\r
752 if (LIST_NUM(p->elements) >= MAX_ELEMENT_NUM)
\r
759 // 同じ名前が存在しないかどうかチェック
\r
760 if (GetElement(p, e->name, INFINITE))
\r
767 if (e->num_value == 0)
\r
769 // 項目が 1 つも存在していない VALUE は追加できない
\r
775 Add(p->elements, e);
\r
780 void FreePack(PACK *p)
\r
783 ELEMENT **elements;
\r
790 elements = ToArray(p->elements);
\r
791 for (i = 0;i < LIST_NUM(p->elements);i++)
\r
793 FreeElement(elements[i]);
\r
797 ReleaseList(p->elements);
\r
807 p = MallocEx(sizeof(PACK), true);
\r
810 p->elements = NewListFast(ComparePackName);
\r