Unit1.cpp

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <stdio.h>
#include <string.h>
#include <iostream>     // std::cout
#include <sstream>

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{

}

// Ïðåîáðàçîâàíèå íîìåðà â íóæíûé (PDU) è îáðàòíî (òåêñòîâûé)
String TForm1::workNumber(String number, String type){

	if(type == "uncode"){

		// Óäàëÿåì 1 ñèìâîë +
		number.Delete(1,1);

		// Åñëè ÷èñëî íå÷åòíîå, äî äîáàâëÿåì F â êîíöå
		if(number.Length() % 2 == 1)
			number = number + "F";
	}

	// Ìåíÿåì ÷èñëà ìåñòàìè
	int i = 1;
	char swap[1];

	while(i < number.Length()){

		swap[0] = number[i];
		number[i] = number[i+1];
		number[i+1] = swap[0];

		i = i + 2;
	}

	// Óäàëÿåì F, åñëè ÷èñëî íå÷åòíîå
	if(type == "decode")
		if(number[ number.Length() ] == 'F')
			number.Delete( number.Length() ,1);

	// Äîáàâëÿåì + â íà÷àëî, åñëè äåêîäèðóåì
	if(type == "decode")
		number = "+" + number;

	return number;

}


//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
	String text;
	String textNew;
	String fullStr;

	// Ïðîâåðêà íà ââîä äàííûõ
	if(Edit1->Text == "" || Edit1->Text.Length() < 12){
		Label4->Caption = "Íåâåðíûé ôîðìàò íîìåðà.";
		return;
	}

	// Ïðîâåðêà íà ââîä òåêñòà
	if(Edit2->Text == "" || Edit1->Text.Length() < 1){
		Label5->Caption = "Íå ââåäåí òåêñò.";
		return;
	}

	// Î÷èùàåì âñå
	Label4->Caption = "";
	Label5->Caption = "";
	text = "";
	textNew = "";
	fullStr = "";
	Memo2->Clear();
	String Recipient = "";

	// Ôîðìèðóåì íîìåð
	String EncodeNum = workNumber(Edit1->Text, "uncode");

	// Êîë-âî ñèìâîëîâ â íîìåðå
	if(EncodeNum[ EncodeNum.Length() -1 ] == 'F')
		Recipient = IntToHex( EncodeNum.Length()-1 , 2) + "91" + EncodeNum;
	else
		Recipient = IntToHex( EncodeNum.Length() , 2) + "91" + EncodeNum;

	// Òåêñò ñîîáùåíèÿ
	text = Edit2->Text;

	// Ìàññèâ ñ áàéòàìè ñèìâîëîâ
	TBytes FirstLine;
	FirstLine = TEncoding::Unicode->GetBytes(text);

	// Ôîðìèðóåì ìàññèâ áàéòîâ äëÿ PDU
	for(int i = 0; i < FirstLine.Length; i+=2)
		textNew = textNew + IntToHex(FirstLine[i+1], 2) + "" + IntToHex(FirstLine[i], 2);

	// Âûâîäèì ïîëíûé ðåçóëüòàò PDU ñòðîêè
	Memo2->Lines->Add("000100" + Recipient + "000812" + "" + textNew);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, System::WideChar &Key)
{
	// Ââîä òîëüêî ÷èñåë è backspace
	if( Key != 8 && ( (Key < '0' || Key > '9' ) ) ) Key = NULL;
	else if( Key == 8 && Edit1->Text.Length() == 1 && Edit1->Text[1] == '+')
		Key = NULL;

	return;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
	// Ïîëó÷àåì ñîäåðæàíèå
	String pduFull = Memo1->Lines->GetText();

	// Ïðîâåðêà íà ïóñòàòó è êîë-âî ñèìâîëîâ
	if(pduFull == ""){
		Label8->Caption = "Âû íå ââåëè PDU.";
		return;
	}
	else if(pduFull.Length() < 28){
		Label8->Caption = "Íåâåðíûé ôîðìàò PDU.";
		return;
	}

	Label8->Caption = "";
	Edit3->Text = "";
	Edit4->Text = "";
	int countNum = 0;

	// Óäàëÿåì ïåðâûå ñëóæåáíûå äàííûå
	pduFull.Delete(1,6);

	// Ïåðåìåííàÿ äëÿ íîìåðà
	String numberMob;

	// Ïåðåâîäèì 16 ðè÷íóþ â 10 ÷íóþ (êîë-âî ñèìâîëîâ â òåëåôîíå)
	AnsiString countNumber = pduFull.SubString(1,2);
	std::string hex;
	hex = countNumber.c_str();
	std::istringstream stream(hex);
	stream >> std::hex >> countNum;

	// Óäàëÿåì èíôîðìàöèþ îá êîë-âî ñèìâîëîâ è
	pduFull.Delete(1,4);

	// Åñëè
	if(countNum % 2 == 1)
		countNum = countNum + 1;

    // Âûòàñêèâàåò íîìåð
	for(int i = 1; i <= countNum; i++)
		numberMob = numberMob + pduFull[i];

	// Ïîëó÷àåì íîðìàëüíûé íîìåð è âñòàâëÿåì åãî
	Edit3->Text = workNumber(numberMob, "decode");

	// Âûðåçàåì íîìåð è îñòàâëÿåì òîëüêî òåêñò
	pduFull.Delete(1,6+countNum);

	// Ñòðîêà äëÿ ïåðåäåëûâàåíèÿ â ñèìâîë
	String textConv;

	// Ïåðåáèðàåì êîäû ñèìâîëîâ â ñàìè ñèìâîëû
	for(int i = 1; i <= pduFull.Length()-2; i+=4){
		textConv = (String)"0x" + (String)pduFull[i] + (String)pduFull[i+1] + (String)pduFull[i+2] + (String)pduFull[i+3];
		Edit4->Text = Edit4->Text + wchar_t( StrToInt(textConv) );
	}

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1Change(TObject *Sender)
{
	// Âñòàâëÿåì + â íà÷àëî (åñëè óäàëåíî)
	if(Edit1->Text.Length() == 0)
		Edit1->Text = '+';
	else if(Edit1->Text.Length() > 1 && Edit1->Text[1] != '+'){

		String textNumCheck = Edit1->Text;

		for(int i = 1; i <= textNumCheck.Length(); i++){

			if(textNumCheck[i] == '+'){
				textNumCheck.Delete(i,1);
				break;
			}
		}

		Edit1->Text = "+" + textNumCheck;
	}


}
//---------------------------------------------------------------------------