WebSVN – DevTools – Diff – /TxnTestManager/branches/Stockholm/src/ttm/GenerationProperties.cpp



		AnsiString	profile;
		AnsiString	securityServer;
		AnsiString	keyNumber;
		AnsiString	keyVersion;
		AnsiString	macAlgorithm;
		AnsiString	drainFilePrefix;
 
		profile = registry->ReadString( "Profile" );
		if ( profile.IsEmpty() )
		{
			profile = "Site Computer";
		}
 
		securityServer = registry->ReadString( "SecurityServerPipe" );
		if ( securityServer.IsEmpty() )
		{
			securityServer = "TsbCryptoServer";
		}
 
		keyNumber = registry->ReadString( "KeyNumber" );
		if ( keyNumber.IsEmpty() )
		{

		}
 
		SecurityServerPipeEdit->Text = securityServer;
		KeyNumberEdit->Text = keyNumber;
		KeyVersionEdit->Text = keyVersion;
		DrainFilePrefixEdit->Text = drainFilePrefix;
 
		macAlgorithm = registry->ReadString( "MacAlgorithm" );
		if ( macAlgorithm.IsEmpty() )
		{
			macAlgorithm = "MAC";

 
void __fastcall TGenerationPropertiesForm::readProfile( TRegistry & registry, const AnsiString & profile )
{
	if ( registry.OpenKey( profile, true ) )
	{
		AnsiString	folder            ="";
		bool		generateHeaders		= false;
		AnsiString	drainFilePrefix;
		AnsiString	drainFileSuffix   = ".devud";
		bool		buildManifest		   = true;
		AnsiString	manifestPrefix		= "udMan";
		AnsiString	manifestSuffix		= ".txt";
		AnsiString	pathmapTarget		= "";
 
 
 
 
 
 
 
 
		try
		{
			generateHeaders = registry.ReadBool( "GenerateHeaders" );
		}
		catch ( ... )
		{
			generateHeaders = false;
		}
		drainFilePrefix = registry.ReadString( "DrainFilePrefix" );
		if ( drainFilePrefix.IsEmpty() )
		{
			drainFilePrefix = "TSB";
		}
		
		drainFileSuffix = registry.ReadString( "DrainFileSuffix" );
		if ( drainFileSuffix.IsEmpty() )
		{
			drainFileSuffix = ".devud";
		}

			manifestSuffix = ".txt";
		}
		pathmapTarget = registry.ReadString( "PathmapTarget" );
		if ( pathmapTarget.IsEmpty() )
		{
			pathmapTarget = "";
		}
		folder = registry.ReadString( "Folder" );
		if ( folder.IsEmpty() )
		{
			folder = "";
		}
 
 
 
		GenerationFolderDirectoryEdit->Text = folder;
		GenerateHeadersCheckBox->Checked = generateHeaders;
		DrainFilePrefixEdit->Text = drainFilePrefix;
		DrainFileSuffixEdit->Text = drainFileSuffix;
 

Rev 2263	Rev 2265
Line 36...	Line 36...
36	`AnsiString profile;`	36	`AnsiString profile;`
37	`AnsiString securityServer;`	37	`AnsiString securityServer;`
38	`AnsiString keyNumber;`	38	`AnsiString keyNumber;`
39	`AnsiString keyVersion;`	39	`AnsiString keyVersion;`
40	`AnsiString macAlgorithm;`	40	`AnsiString macAlgorithm;`
-		41	`AnsiString drainFilePrefix;`
41		42
42	`profile = registry->ReadString( "Profile" );`	43	`profile = registry->ReadString( "Profile" );`
43	`if ( profile.IsEmpty() )`	44	`if ( profile.IsEmpty() )`
44	`{`	45	`{`
45	`profile = "TDS";`	46	`profile = "Site Computer";`
46	`}`	47	`}`
47		48
48	`securityServer = registry->ReadString( "SecurityServerPipe" );`	49	`securityServer = registry->ReadString( "SecurityServerPipe" );`
49	`if ( securityServer.IsEmpty() )`	50	`if ( securityServer.IsEmpty() )`
50	`{`	51	`{`
51	`securityServer = "CryptoServer";`	52	`securityServer = "TsbCryptoServer";`
52	`}`	53	`}`
53		54
54	`keyNumber = registry->ReadString( "KeyNumber" );`	55	`keyNumber = registry->ReadString( "KeyNumber" );`
55	`if ( keyNumber.IsEmpty() )`	56	`if ( keyNumber.IsEmpty() )`
56	`{`	57	`{`
Line 76...	Line 77...
76	`}`	77	`}`
77		78
78	`SecurityServerPipeEdit->Text = securityServer;`	79	`SecurityServerPipeEdit->Text = securityServer;`
79	`KeyNumberEdit->Text = keyNumber;`	80	`KeyNumberEdit->Text = keyNumber;`
80	`KeyVersionEdit->Text = keyVersion;`	81	`KeyVersionEdit->Text = keyVersion;`
-		82	`DrainFilePrefixEdit->Text = drainFilePrefix;`
81		83
82	`macAlgorithm = registry->ReadString( "MacAlgorithm" );`	84	`macAlgorithm = registry->ReadString( "MacAlgorithm" );`
83	`if ( macAlgorithm.IsEmpty() )`	85	`if ( macAlgorithm.IsEmpty() )`
84	`{`	86	`{`
85	`macAlgorithm = "MAC";`	87	`macAlgorithm = "MAC";`
Line 166...	Line 168...
166		168
167	`void __fastcall TGenerationPropertiesForm::readProfile( TRegistry & registry, const AnsiString & profile )`	169	`void __fastcall TGenerationPropertiesForm::readProfile( TRegistry & registry, const AnsiString & profile )`
168	`{`	170	`{`
169	`if ( registry.OpenKey( profile, true ) )`	171	`if ( registry.OpenKey( profile, true ) )`
170	`{`	172	`{`
171	`AnsiString folder;`	173	`AnsiString folder ="";`
172	`bool generateHeaders = true;`	174	`bool generateHeaders = false;`
173	`AnsiString drainFilePrefix;`	175	`AnsiString drainFilePrefix;`
174	`AnsiString drainFileSuffix = ".devud";`	176	`AnsiString drainFileSuffix = ".devud";`
175	`bool buildManifest = true;`	177	`bool buildManifest = true;`
176	`AnsiString manifestPrefix = "udMan";`	178	`AnsiString manifestPrefix = "udMan";`
177	`AnsiString manifestSuffix = ".txt";`	179	`AnsiString manifestSuffix = ".txt";`
178	`AnsiString pathmapTarget = "";`	180	`AnsiString pathmapTarget = "";`
179		181
180	`folder = registry.ReadString( "Folder" );`	-
181	`if ( folder.IsEmpty() )`	-
182	`{`	-
183	`folder = "../UD";`	-
184	`}`	-
185		-
186		182
187	`try`	183	`try`
188	`{`	184	`{`
189	`generateHeaders = registry.ReadBool( "GenerateHeaders" );`	185	`generateHeaders = registry.ReadBool( "GenerateHeaders" );`
190	`}`	186	`}`
191	`catch ( ... )`	187	`catch ( ... )`
192	`{`	188	`{`
193	`generateHeaders = true;`	189	`generateHeaders = false;`
194	`}`	190	`}`
195	`drainFilePrefix = registry.ReadString( "DrainFilePrefix" );`	191	`drainFilePrefix = registry.ReadString( "DrainFilePrefix" );`
-		192	`if ( drainFilePrefix.IsEmpty() )`
-		193	`{`
-		194	`drainFilePrefix = "TSB";`
-		195	`}`
-		196
196	`drainFileSuffix = registry.ReadString( "DrainFileSuffix" );`	197	`drainFileSuffix = registry.ReadString( "DrainFileSuffix" );`
197	`if ( drainFileSuffix.IsEmpty() )`	198	`if ( drainFileSuffix.IsEmpty() )`
198	`{`	199	`{`
199	`drainFileSuffix = ".devud";`	200	`drainFileSuffix = ".devud";`
200	`}`	201	`}`
Line 218...	Line 219...
218	`manifestSuffix = ".txt";`	219	`manifestSuffix = ".txt";`
219	`}`	220	`}`
220	`pathmapTarget = registry.ReadString( "PathmapTarget" );`	221	`pathmapTarget = registry.ReadString( "PathmapTarget" );`
221	`if ( pathmapTarget.IsEmpty() )`	222	`if ( pathmapTarget.IsEmpty() )`
222	`{`	223	`{`
223	`pathmapTarget = "../UD";`	224	`pathmapTarget = "";`
224	`}`	225	`}`
225	`folder = registry.ReadString( "Folder" );`	226	`folder = registry.ReadString( "Folder" );`
226	`if ( folder.IsEmpty() )`	227	`if ( folder.IsEmpty() )`
227	`{`	228	`{`
228	`folder = "../UD";`	229	`folder = "";`
229	`}`	230	`}`
230		231
231		-
232		-
233	`GenerationFolderDirectoryEdit->Text = folder;`	232	`GenerationFolderDirectoryEdit->Text = folder;`
234	`GenerateHeadersCheckBox->Checked = generateHeaders;`	233	`GenerateHeadersCheckBox->Checked = generateHeaders;`
235	`DrainFilePrefixEdit->Text = drainFilePrefix;`	234	`DrainFilePrefixEdit->Text = drainFilePrefix;`
236	`DrainFileSuffixEdit->Text = drainFileSuffix;`	235	`DrainFileSuffixEdit->Text = drainFileSuffix;`
237		236

Subversion Repositories DevTools

(root)/TxnTestManager/branches/Stockholm/src/ttm/GenerationProperties.cpp – Rev 2263 → 2265