source/frmNewAccount.cpp

   1 // frmNewAccount.cpp - New Account form.
   2 //
   3 // (c) 2012-2015 Xestia Software Development.
   4 //
   5 // This file is part of Xestia Address Book.
   6 //
   7 // Xestia Address Book is free software: you can redistribute it and/or modify
   8 // it under the terms of the GNU General Public License as published by the
   9 // Free Software Foundation, version 3 of the license.
  10 //
  11 // Xestia Address Book is distributed in the hope that it will be useful,
  12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14 // GNU General Public License for more details.
  15 //
  16 // You should have received a copy of the GNU General Public License along
  17 // with Xestia Address Book. If not, see <http://www.gnu.org/licenses/>
  18
  19 #include "frmNewAccount.h"
  20 #include <thread>
  21 #include <cstdlib>
  22 #include <wx/filefn.h>
  23 #include <wx/fileconf.h>
  24
  25 #if defined(__WIN32__)
  26 #include <cryptuiapi.h>
  27 #include "common/win32ssl.h"
  28 #endif
  29
  30 #include "common/dirs.h"
  31 #include "common/svrblist.h"
  32 #include "frmInvalidSSLCertificate.h"
  33
  34 DEFINE_EVENT_TYPE(UPDATERESULTS);
  35 DEFINE_EVENT_TYPE(RUNCARDDAV2TEST);
  36
  37 BEGIN_EVENT_TABLE(frmNewAccount, wxDialog)
  38 EVT_COMMAND(wxID_ANY, UPDATERESULTS, frmNewAccount::UpdateResults)
  39 EVT_COMMAND(wxID_ANY, RUNCARDDAV2TEST, frmNewAccount::RunCardDAV2Test)
  40 END_EVENT_TABLE()
  41
  42 frmNewAccount::frmNewAccount( wxWindow* parent )
  43 :
  44 frmNewAccountADT( parent )
  45 {
  46
  47         // Disable the previous button upon form creation.
  48
  49         btnPrevious->Disable();
  50
  51 }
  52
  53 void frmNewAccount::CheckAccountName( wxCommandEvent& event )
  54 {
  55
  56         // Check that the account name is valid.
  57
  58         wxString CheckAccName = txtAccountName->GetValue();
  59
  60         if ((txtAccountName->IsEmpty() && PageSeek == 2) || CheckAccName.Len() < 4){
  61
  62                 btnNext->Disable();
  63
  64         } else {
  65
  66                 btnNext->Enable();
  67
  68         }
  69
  70 }
  71
  72 void frmNewAccount::ProcessPrevious( wxCommandEvent& event )
  73 {
  74
  75         // Go to the previous page.
  76
  77         PageSeek--;
  78
  79         if (PageSeek == 0){
  80
  81                 // Currently at the Connection test screen.
  82
  83                 tabConn->Hide();
  84                 tabFinish->Hide();
  85                 tabType->Show();
  86                 szrNewAccount->RecalcSizes();
  87
  88                 btnPrevious->Disable();
  89                 btnNext->Enable();
  90
  91         } else if (PageSeek == 1){
  92
  93                 if (cmbServerType->GetCurrentSelection() == 0){
  94
  95                         tabConn->Hide();
  96                         tabFinish->Hide();
  97                         tabType->Show();
  98                         PageSeek = 0;
  99                         btnPrevious->Disable();
 100                         btnNext->Enable();
 101                         btnNext->SetLabel(_("Next >"));
 102                         return;
 103
 104                 }
 105
 106                 // Currently at the Finish screen.
 107
 108                 tabType->Hide();
 109                 tabConn->Show();
 110                 tabFinish->Hide();
 111                 szrNewAccount->RecalcSizes();
 112
 113                 btnNext->SetLabel(_("Next >"));
 114                 btnNext->Enable();
 115
 116         }
 117
 118 }
 119
 120 void frmNewAccount::ProcessNext( wxCommandEvent& event )
 121 {
 122
 123         // Go to the next page or setup the new account.
 124
 125         PageSeek++;
 126
 127         if (PageSeek == 1){
 128
 129                 if (cmbServerType->GetCurrentSelection() == 0){
 130
 131                         tabType->Hide();
 132                         tabConn->Hide();
 133                         tabFinish->Show();
 134                         PageSeek = 2;
 135                         btnPrevious->Enable();
 136                         szrNewAccount->RecalcSizes();
 137                         btnNext->Disable();
 138                         btnNext->SetLabel(_("Finish"));
 139                         return;
 140
 141                 }
 142
 143                 // Check if server address matches against the blacklist.
 144                 // Bring up warning message if it does.
 145
 146                 if (CheckBlacklist(txtServerAddress->GetValue())){
 147
 148                         int MessageBoxResult = wxMessageBox(_("The server with the address given does not support the CardDAV protocol properly and shouldn't be used.\n\nData loss is very likely.\n\nDo you still want to continue using this server?"), _("Server warning"), wxYES_NO, this);
 149
 150                         if (MessageBoxResult == wxNO){
 151                                 PageSeek--;
 152                                 return;
 153                         }
 154
 155                 }
 156
 157                 btnNext->Disable();
 158
 159                 bool ServerResult = FALSE;
 160                 bool ServerAction = FALSE;
 161                 bool UseSSL = TRUE;
 162                 wxString ServerMessage;
 163
 164                 // Connection test screen.
 165
 166                 tabType->Hide();
 167                 tabConn->Show();
 168                 tabFinish->Hide();
 169                 szrNewAccount->RecalcSizes();
 170                 btnPrevious->Disable();
 171
 172                 // Reset screen.
 173
 174                 lblServerConnResult->SetLabel(wxT(""));
 175                 lblServerResponse->SetLabel(wxT(""));
 176                 lblServerSSLResult->SetLabel(wxT(""));
 177                 lblServerSSLValid->SetLabel(wxT(""));
 178                 lblAbleToLoginResult->SetLabel(wxT(""));
 179                 lblCardDAVSupportResult->SetLabel(wxT(""));
 180
 181                 // Depending on account type, run the test.
 182
 183                 if (cmbServerType->GetCurrentSelection() == 1){
 184                         wxCommandEvent RunTest(RUNCARDDAV2TEST);
 185                         wxPostEvent(this, RunTest);
 186                 }
 187
 188         } else if (PageSeek == 2){
 189
 190                 // Finish screen.
 191
 192                 tabType->Hide();
 193                 tabConn->Hide();
 194                 tabFinish->Show();
 195                 szrNewAccount->RecalcSizes();
 196
 197                 btnNext->Disable();
 198                 btnNext->SetLabel(_("Finish"));
 199
 200                 if (txtAccountName->IsEmpty() && PageSeek == 2){
 201
 202                         btnNext->Disable();
 203
 204                 } else {
 205
 206                         btnNext->Enable();
 207
 208                 }
 209
 210         } else if (PageSeek == 3){
 211
 212                 // Finished.
 213
 214                 wxString XestiaABPrefDirectory;
 215                 wxString XestiaABDirectory;
 216                 wxString AccountSettingsFile;
 217                 //wxFile ASFile;
 218
 219                 srand(time(0));
 220                 int RandomNumber = rand() % 32767;
 221                 wxString RandomNumberSuffix = wxString::Format(wxT("%i"), RandomNumber);
 222                 bool DirectoryCreated = FALSE;
 223
 224 #if defined(__HAIKU__)
 225
 226                 //preffilename = wxT("noo");
 227
 228 #elif defined(__WIN32__)
 229
 230                 XestiaABPrefDirectory = GetUserPrefDir();
 231                 XestiaABDirectory = GetUserDir();
 232
 233                 AccountSettingsFile = XestiaABPrefDirectory + wxT("accounts");
 234
 235                 // Open the file for writing.
 236
 237                 wxFileConfig *cfgfile = new wxFileConfig("", "", AccountSettingsFile);
 238
 239                 // Check if account name already exists and return an error message
 240                 // if this is the case.
 241
 242                 wxString AccountName;
 243                 long itemindex = 0;
 244                 bool ContinueAcc;
 245                 ContinueAcc = cfgfile->GetFirstGroup(AccountName, itemindex);
 246
 247                 while (ContinueAcc){
 248
 249                         if (txtAccountName->GetValue() == AccountName){
 250
 251                                 wxMessageBox(_("The selected account name is already used, please use another account name."), _("Account name already used"), wxICON_ERROR);
 252                                 return;
 253
 254                         }
 255
 256                         cfgfile->SetPath(wxT("/"));
 257                         ContinueAcc = cfgfile->GetNextGroup(AccountName, itemindex);
 258
 259                 }
 260
 261                 if (cmbServerType->GetCurrentSelection() == 1){
 262
 263                         // Create the account directory.
 264
 265                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 266
 267                         if (wxMkdir(XestiaABDirectory + wxT("\\accounts\\") + DirectoryName + wxT(".carddav"), 0740) == TRUE){
 268
 269                                 DirectoryCreated = TRUE;
 270
 271                         }
 272
 273                         if (DirectoryCreated == TRUE){
 274
 275                                 WriteAccountDetails(cfgfile, wxT("CardDAV"), DirectoryName);
 276
 277                         } else {
 278
 279                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 280                                 return;
 281
 282                         }
 283
 284                 } else if (cmbServerType->GetCurrentSelection() == 0){
 285
 286                         // Create the account directory.
 287
 288                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 289
 290                         if (wxMkdir(XestiaABDirectory + wxT("\\accounts\\") + DirectoryName + wxT(".local"), 0740) == TRUE){
 291
 292                                 DirectoryCreated = TRUE;
 293
 294                         }
 295
 296                         if (DirectoryCreated == TRUE){
 297
 298                                 WriteAccountDetails(cfgfile, wxT("Local"), DirectoryName);
 299
 300                         } else {
 301
 302                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 303                                 return;
 304
 305                         }
 306
 307                 }
 308
 309                 delete cfgfile;
 310                 cfgfile = NULL;
 311
 312                 *ReloadAccountConfig = TRUE;
 313
 314 #else
 315
 316                 XestiaABPrefDirectory = GetUserPrefDir();
 317                 XestiaABDirectory = GetUserDir();
 318
 319                 AccountSettingsFile = XestiaABPrefDirectory + wxT("accounts");
 320
 321                 // Open the file for writing.
 322
 323                 wxFileConfig *cfgfile = new wxFileConfig("", "", AccountSettingsFile);
 324
 325                 // Check if account name already exists and return an error message
 326                 // if this is the case.
 327
 328                 wxString AccountName;
 329                 long itemindex = 0;
 330                 bool ContinueAcc;
 331                 ContinueAcc = cfgfile->GetFirstGroup(AccountName, itemindex);
 332
 333                 while (ContinueAcc){
 334
 335                         if (txtAccountName->GetValue() == AccountName){
 336
 337                                 wxMessageBox(_("The selected account name is already used, please use another account name."), _("Account name already used"), wxICON_ERROR);
 338                                 return;
 339
 340                         }
 341
 342                         cfgfile->SetPath(wxT("/"));
 343                         ContinueAcc = cfgfile->GetNextGroup(AccountName, itemindex);
 344
 345                 }
 346
 347                 if (cmbServerType->GetCurrentSelection() == 1){
 348
 349                         // Create the account directory.
 350
 351                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 352
 353                         if (wxMkdir(XestiaABDirectory + wxT("/accounts/") + DirectoryName + wxT(".carddav"), 0740) == TRUE){
 354
 355                                 DirectoryCreated = TRUE;
 356
 357                         }
 358
 359                         if (DirectoryCreated == TRUE){
 360
 361                                 WriteAccountDetails(cfgfile, wxT("CardDAV"), DirectoryName);
 362
 363                         } else {
 364
 365                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 366                                 return;
 367
 368                         }
 369
 370                 } else if (cmbServerType->GetCurrentSelection() == 0){
 371
 372                         // Create the account directory.
 373
 374                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 375
 376                         if (wxMkdir(XestiaABDirectory + wxT("/accounts/") + DirectoryName + wxT(".local"), 0740) == TRUE){
 377
 378                                 DirectoryCreated = TRUE;
 379
 380                         }
 381
 382                         if (DirectoryCreated == TRUE){
 383
 384                                 WriteAccountDetails(cfgfile, wxT("Local"), DirectoryName);
 385
 386                         } else {
 387
 388                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 389                                 return;
 390
 391                         }
 392
 393                 }
 394
 395                 delete cfgfile;
 396                 cfgfile = NULL;
 397
 398                 *ReloadAccountConfig = TRUE;
 399
 400 #endif
 401
 402                 this->Close();
 403
 404         }
 405
 406 }
 407
 408 void frmNewAccount::WriteAccountDetails(wxFileConfig *cfgfilein, wxString AccountType, wxString DirectoryName){
 409
 410         // Write the new account details.
 411
 412         cfgfilein->SetPath(txtAccountName->GetValue());
 413         cfgfilein->Write(wxT("address"), txtServerAddress->GetValue());
 414         cfgfilein->Write(wxT("port"), txtServerPort->GetValue());
 415         cfgfilein->Write(wxT("username"), txtUsername->GetValue());
 416         cfgfilein->Write(wxT("password"), txtPassword->GetValue());
 417         cfgfilein->Write(wxT("prefix"), ServerPrefix);
 418         cfgfilein->Write(wxT("accountdir"), DirectoryName);
 419
 420         if (chkUseSSL->GetValue() == TRUE){
 421
 422                 cfgfilein->Write(wxT("ssl"), wxT("true"));
 423
 424         } else {
 425
 426                 cfgfilein->Write(wxT("ssl"), wxT("false"));
 427
 428         }
 429
 430         cfgfilein->Write(wxT("refresh"), wxT("1800"));
 431         cfgfilein->Write(wxT("type"), AccountType);
 432
 433 }
 434
 435 void frmNewAccount::CloseWindow( wxCommandEvent& event )
 436 {
 437
 438         // Close the window.
 439
 440         *ReloadAccountConfig = FALSE;
 441         this->Close();
 442
 443 }
 444
 445 void frmNewAccount::UpdateRequirements( wxCommandEvent& event )
 446 {
 447
 448         // Update the options.
 449
 450         if (cmbServerType->GetCurrentSelection() == 1){
 451
 452                 txtServerAddress->Enable();
 453                 txtServerPort->Enable();
 454                 txtUsername->Enable();
 455                 txtPassword->Enable();
 456                 chkUseSSL->Enable();
 457
 458         } else if (cmbServerType->GetCurrentSelection() == 0){
 459
 460                 txtServerAddress->Disable();
 461                 txtServerPort->Disable();
 462                 txtUsername->Disable();
 463                 txtPassword->Disable();
 464                 chkUseSSL->Disable();
 465
 466         }
 467
 468 }
 469
 470 void frmNewAccount::UpdateResults( wxCommandEvent& event )
 471 {
 472
 473         NewAccountResult *ResultDataPointer = static_cast<NewAccountResult*>(event.GetClientData());
 474         NewAccountResult ResultData = (*ResultDataPointer);
 475
 476         delete(ResultDataPointer);
 477         ResultDataPointer = nullptr;
 478         bool ServerResult = true;
 479
 480         // Process the result if the server connected.
 481
 482         if (ResultData.Connected == false){
 483                 lblServerConnResult->SetLabel(_("Failed"));
 484                 ServerResult = false;
 485         } else {
 486                 lblServerConnResult->SetLabel(_("Success"));
 487         }
 488
 489         // Check the result if the server gave a valid response.
 490
 491         if (ResultData.ValidResponse == false){
 492                 lblServerResponse->SetLabel(_("No"));
 493                 ServerResult = false;
 494         } else {
 495                 lblServerResponse->SetLabel(_("Yes"));
 496         }
 497
 498         // Check the result if the server uses SSL.
 499
 500         if (ResultData.SSLStatus == false){
 501                 lblServerSSLResult->SetLabel(_("No"));
 502         } else {
 503                 lblServerSSLResult->SetLabel(_("Yes"));
 504         }
 505
 506         // Check the server has a valid SSL certificate.
 507
 508         switch(ResultData.SSLVerified){
 509                 case COSSL_VERIFIED:
 510                         lblServerSSLValid->SetLabel(_("Verified"));
 511                         break;
 512                 case COSSL_VERIFIED_USER:
 513                         lblServerSSLValid->SetLabel(_("Verified (User)"));
 514                         break;
 515                 case COSSL_UNABLETOVERIFY:
 516                         lblServerSSLValid->SetLabel(_("Unable to verify"));
 517                         ServerResult = false;
 518                         break;
 519                 case COSSL_NOTAPPLICABLE:
 520                         lblServerSSLValid->SetLabel(_("Not applicable"));
 521                         break;
 522         }
 523
 524         // Check if able to log into the server.
 525
 526         if (ResultData.AuthPassed == false){
 527                 lblAbleToLoginResult->SetLabel(_("No"));
 528                 ServerResult = false;
 529         } else {
 530                 lblAbleToLoginResult->SetLabel(_("Yes"));
 531         }
 532
 533         // Check if server has CardDAV support.
 534
 535         if (ResultData.CanProcess == false){
 536                 lblCardDAVSupportResult->SetLabel(_("No"));
 537                 ServerResult = false;
 538         } else {
 539                 lblCardDAVSupportResult->SetLabel(_("Yes"));
 540         }
 541
 542         if (ServerResult == false){
 543                 lblConnectionResultText->SetLabel(wxString::Format(_("An error occured whilst connecting: %s"), ResultData.ErrorMessage));
 544         } else {
 545                 btnNext->Enable();
 546                 lblConnectionResultText->SetLabel(_("Click on Next to set the account name."));
 547         }
 548
 549         btnPrevious->Enable();
 550
 551 }
 552
 553 void frmNewAccount::SetupPointers(bool *ReloadAccountInc){
 554
 555         // Setup the pointers for the new account window.
 556
 557         ReloadAccountConfig = ReloadAccountInc;
 558
 559 }
 560
 561 void frmNewAccount::SetErrorMessageLabel(){
 562
 563         lblConnectionResultText->SetLabel(_("A problem has occured whilst connecting to the CardDAV server.\nPlease review the above information and change the server details if needed.\nIf there are still problems, please speak to your system administrator(s)."));
 564
 565 }