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 #include "carddav/carddav.h"
  26 #include "common/dirs.h"
  27 #include "frmInvalidSSLCertificate.h"
  28
  29 frmNewAccount::frmNewAccount( wxWindow* parent )
  30 :
  31 frmNewAccountADT( parent )
  32 {
  33
  34         // Disable the previous button upon form creation.
  35
  36         btnPrevious->Disable();
  37
  38 }
  39
  40 void frmNewAccount::CheckAccountName( wxCommandEvent& event )
  41 {
  42
  43         // Check that the account name is valid.
  44
  45         wxString CheckAccName = txtAccountName->GetValue();
  46
  47         if ((txtAccountName->IsEmpty() && PageSeek == 2) || CheckAccName.Len() < 4){
  48
  49                 btnNext->Disable();
  50
  51         } else {
  52
  53                 btnNext->Enable();
  54
  55         }
  56
  57 }
  58
  59 void frmNewAccount::ProcessPrevious( wxCommandEvent& event )
  60 {
  61
  62         // Go to the previous page.
  63
  64         PageSeek--;
  65
  66         if (PageSeek == 0){
  67
  68                 // Currently at the Connection test screen.
  69
  70                 tabConn->Hide();
  71                 tabFinish->Hide();
  72                 tabType->Show();
  73                 szrNewAccount->RecalcSizes();
  74
  75                 btnPrevious->Disable();
  76                 btnNext->Enable();
  77
  78         } else if (PageSeek == 1){
  79
  80                 if (cmbServerType->GetCurrentSelection() == 0){
  81
  82                         tabConn->Hide();
  83                         tabFinish->Hide();
  84                         tabType->Show();
  85                         PageSeek = 0;
  86                         btnPrevious->Disable();
  87                         btnNext->Enable();
  88                         btnNext->SetLabel(_("Next >"));
  89                         return;
  90
  91                 }
  92
  93                 // Currently at the Finish screen.
  94
  95                 tabType->Hide();
  96                 tabConn->Show();
  97                 tabFinish->Hide();
  98                 szrNewAccount->RecalcSizes();
  99
 100                 btnNext->SetLabel(_("Next >"));
 101                 btnNext->Enable();
 102
 103         }
 104
 105 }
 106
 107 void frmNewAccount::ProcessNext( wxCommandEvent& event )
 108 {
 109
 110         // Go to the next page or setup the new account.
 111
 112         PageSeek++;
 113
 114         if (PageSeek == 1){
 115
 116                 if (cmbServerType->GetCurrentSelection() == 0){
 117
 118                         tabType->Hide();
 119                         tabConn->Hide();
 120                         tabFinish->Show();
 121                         PageSeek = 2;
 122                         btnPrevious->Enable();
 123                         szrNewAccount->RecalcSizes();
 124                         btnNext->Disable();
 125                         btnNext->SetLabel(_("Finish"));
 126                         return;
 127
 128                 }
 129
 130                 btnNext->Disable();
 131
 132                 bool ServerResult = FALSE;
 133                 bool ServerAction = FALSE;
 134                 bool UseSSL = TRUE;
 135                 wxString ServerMessage;
 136
 137                 // Connection test screen.
 138
 139                 tabType->Hide();
 140                 tabConn->Show();
 141                 tabFinish->Hide();
 142                 szrNewAccount->RecalcSizes();
 143                 btnPrevious->Enable();
 144
 145                 // Reset screen.
 146
 147                 lblServerConnResult->SetLabel(wxT(""));
 148                 lblServerResponse->SetLabel(wxT(""));
 149                 lblServerSSLResult->SetLabel(wxT(""));
 150                 lblServerSSLValid->SetLabel(wxT(""));
 151                 lblAbleToLoginResult->SetLabel(wxT(""));
 152                 lblCardDAVSupportResult->SetLabel(wxT(""));
 153
 154                 // Spawn a thread and check if server supports CardDAV.
 155
 156                 CardDAV CardDAVConn;
 157
 158                 lblServerConnResult->SetLabel(_("Testing..."));
 159
 160                 UseSSL = chkUseSSL->GetValue();
 161                 CardDAVConn.SetupConnection(txtServerAddress->GetValue(),
 162                         wxAtoi(txtServerPort->GetValue()),
 163                         txtUsername->GetValue(),
 164                         txtPassword->GetValue(),
 165                         UseSSL);
 166                 CardDAVConn.SetupResultBools(&ServerResult, &ServerAction);
 167
 168                 // Verify SSL trust first before doing anything.
 169
 170                 if (UseSSL == TRUE){
 171
 172                         CURLcode sslcode = CardDAVConn.SSLVerifyTest();
 173
 174                         if (sslcode == CURLE_OK){
 175
 176
 177
 178                         } else if (sslcode == CURLE_SSL_CACERT || sslcode == CURLE_SSL_CONNECT_ERROR){
 179
 180                                 // Certificate is more than likely a self-signed or
 181                                 // expired certificate so display the invalid
 182                                 // SSL certificate message.
 183
 184                                 // Setup the data to be sent in the wxPostEvent command.
 185
 186                                 int SSLResult;
 187
 188                                 frmInvalidSSLCertificate *frmICPtr = new frmInvalidSSLCertificate(this);
 189
 190                                 frmICPtr->LoadDataNew(CardDAVConn.GetSSLVerifyResults(), txtServerAddress->GetValue());
 191                                 frmICPtr->ShowModal();
 192
 193                                 SSLResult = frmICPtr->GetResult();
 194
 195                                 // Clean up before processing response.
 196
 197                                 delete frmICPtr;
 198                                 frmICPtr = NULL;
 199
 200                                 // Process the response from the user.
 201
 202                                 if (SSLResult == 1){
 203
 204                                         // Accept the Certificate.
 205
 206                                         CardDAVConn.AllowSelfSignTest(TRUE);
 207
 208                                 } else if (SSLResult == 2){
 209
 210                                         // Reject the certificate, abort the task and mark as failed.
 211
 212                                         lblServerConnResult->SetLabel(_("Failed"));
 213                                         lblConnectionResultText->SetLabel(_("An error occured whilst connnecting: ") + CardDAVConn.GetErrorMessage() + wxString::Format(wxT(" (%i)\n%s"), sslcode, CardDAVConn.GetErrorBuffer().mb_str()));
 214                                         return;
 215
 216                                 }
 217
 218                         } else {
 219
 220                                 // Something else happened. Stop the process and
 221                                 // display an error message instead.
 222
 223                                 lblServerConnResult->SetLabel(_("Failed"));
 224                                 lblConnectionResultText->SetLabel(_("An error occured whilst connnecting: ") + CardDAVConn.GetErrorMessage() + wxString::Format(wxT(" (%i)\n%s"), sslcode, CardDAVConn.GetErrorBuffer().mb_str()));
 225                                 return;
 226
 227                         }
 228
 229                 }
 230
 231                 std::thread ConnTest(&CardDAV::Connect, &CardDAVConn);
 232
 233                 ConnTest.join();
 234
 235                 if (ServerResult == FALSE){
 236
 237                         lblServerConnResult->SetLabel(_("Failed"));
 238                         return;
 239
 240                 } else {
 241
 242                         lblServerConnResult->SetLabel(_("Connected"));
 243
 244                 }
 245
 246                 if (CardDAVConn.CanDoSSL() == TRUE){
 247
 248                         lblServerSSLResult->SetLabel(_("Used"));
 249
 250                 } else {
 251
 252                         lblServerSSLResult->SetLabel(_("Not Used"));
 253                         lblServerSSLValid->SetLabel(_("Not Applicable"));
 254
 255                 }
 256
 257                 if (CardDAVConn.SSLVerify() == TRUE && CardDAVConn.CanDoSSL() == TRUE){
 258
 259                         lblServerSSLValid->SetLabel(_("Verified"));
 260
 261                 } else if (CardDAVConn.SSLVerify() == FALSE && CardDAVConn.CanDoSSL() == TRUE && CardDAVConn.IsSelfSigned() == TRUE){
 262
 263                         lblServerSSLValid->SetLabel(_("Verified (user)"));
 264
 265                 } else if (CardDAVConn.SSLVerify() == FALSE && CardDAVConn.CanDoSSL() == TRUE) {
 266
 267                         lblServerSSLValid->SetLabel(_("Unable to verify"));
 268
 269                 }
 270
 271                 if (CardDAVConn.CanDoCardDAV() == TRUE){
 272
 273                         lblCardDAVSupportResult->SetLabel(_("Supported"));
 274
 275                 } else {
 276
 277                         lblCardDAVSupportResult->SetLabel(_("Unsupported"));
 278
 279                 }
 280
 281                 if (CardDAVConn.AbleToLogin() == TRUE){
 282
 283                         lblAbleToLoginResult->SetLabel(_("Yes"));
 284
 285                 } else {
 286
 287                         lblAbleToLoginResult->SetLabel(_("No"));
 288
 289                 }
 290
 291                 // Get the address to process CardDAV requests.
 292
 293                 ServerPrefix = CardDAVConn.GetDefaultAddressBookURL();
 294
 295                 if (CardDAVConn.HasValidResponse() == TRUE){
 296
 297                         lblServerResponse->SetLabel(_("Yes"));
 298
 299                 } else {
 300
 301                         lblServerResponse->SetLabel(_("No"));
 302
 303                 }
 304
 305                 if (ServerResult == TRUE && CardDAVConn.HasValidResponse() == TRUE &&
 306
 307                         CardDAVConn.CanDoCardDAV() == TRUE && CardDAVConn.AbleToLogin() == TRUE){
 308
 309                         btnNext->Enable();
 310
 311                         lblConnectionResultText->SetLabel(_("Click on Next to set the account name."));
 312
 313                 } else {
 314
 315                         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)."));
 316
 317                 }
 318
 319         } else if (PageSeek == 2){
 320
 321                 // Finish screen.
 322
 323                 tabType->Hide();
 324                 tabConn->Hide();
 325                 tabFinish->Show();
 326                 szrNewAccount->RecalcSizes();
 327
 328                 btnNext->Disable();
 329                 btnNext->SetLabel(_("Finish"));
 330
 331                 if (txtAccountName->IsEmpty() && PageSeek == 2){
 332
 333                         btnNext->Disable();
 334
 335                 } else {
 336
 337                         btnNext->Enable();
 338
 339                 }
 340
 341         } else if (PageSeek == 3){
 342
 343                 // Finished.
 344
 345                 wxString XestiaABPrefDirectory;
 346                 wxString XestiaABDirectory;
 347                 wxString AccountSettingsFile;
 348                 //wxFile ASFile;
 349                 wxString RandomNumberSuffix = wxString::Format(wxT("%i"), rand() % 32767);
 350                 bool DirectoryCreated = FALSE;
 351
 352 #if defined(__HAIKU__)
 353
 354                 //preffilename = wxT("noo");
 355
 356 #elif defined(__WIN32__)
 357
 358                 XestiaABPrefDirectory = GetUserPrefDir();
 359                 XestiaABDirectory = GetUserDir();
 360
 361                 AccountSettingsFile = XestiaABPrefDirectory + wxT("accounts");
 362
 363                 // Open the file for writing.
 364
 365                 wxFileConfig *cfgfile = new wxFileConfig("", "", AccountSettingsFile);
 366
 367                 // Check if account name already exists and return an error message
 368                 // if this is the case.
 369
 370                 wxString AccountName;
 371                 long itemindex = 0;
 372                 bool ContinueAcc;
 373                 ContinueAcc = cfgfile->GetFirstGroup(AccountName, itemindex);
 374
 375                 while (ContinueAcc){
 376
 377                         if (txtAccountName->GetValue() == AccountName){
 378
 379                                 wxMessageBox(_("The selected account name is already used, please use another account name."), _("Account name already used"), wxICON_ERROR);
 380                                 return;
 381
 382                         }
 383
 384                         cfgfile->SetPath(wxT("/"));
 385                         ContinueAcc = cfgfile->GetNextGroup(AccountName, itemindex);
 386
 387                 }
 388
 389                 if (cmbServerType->GetCurrentSelection() == 1){
 390
 391                         // Create the account directory.
 392
 393                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 394
 395                         if (wxMkdir(XestiaABDirectory + wxT("\\accounts\\") + DirectoryName + wxT(".carddav"), 0740) == TRUE){
 396
 397                                 DirectoryCreated = TRUE;
 398
 399                         }
 400
 401                         if (DirectoryCreated == TRUE){
 402
 403                                 WriteAccountDetails(cfgfile, wxT("CardDAV"), DirectoryName);
 404
 405                         } else {
 406
 407                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 408                                 return;
 409
 410                         }
 411
 412                 } else if (cmbServerType->GetCurrentSelection() == 0){
 413
 414                         // Create the account directory.
 415
 416                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 417
 418                         if (wxMkdir(XestiaABDirectory + wxT("\\accounts\\") + DirectoryName + wxT(".local"), 0740) == TRUE){
 419
 420                                 DirectoryCreated = TRUE;
 421
 422                         }
 423
 424                         if (DirectoryCreated == TRUE){
 425
 426                                 WriteAccountDetails(cfgfile, wxT("Local"), DirectoryName);
 427
 428                         } else {
 429
 430                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 431                                 return;
 432
 433                         }
 434
 435                 }
 436
 437                 delete cfgfile;
 438                 cfgfile = NULL;
 439
 440                 *ReloadAccountConfig = TRUE;
 441
 442 #else
 443
 444                 XestiaABPrefDirectory = GetUserPrefDir();
 445                 XestiaABDirectory = GetUserDir();
 446
 447                 AccountSettingsFile = XestiaABPrefDirectory + wxT("accounts");
 448
 449                 // Open the file for writing.
 450
 451                 wxFileConfig *cfgfile = new wxFileConfig("", "", AccountSettingsFile);
 452
 453                 // Check if account name already exists and return an error message
 454                 // if this is the case.
 455
 456                 wxString AccountName;
 457                 long itemindex = 0;
 458                 bool ContinueAcc;
 459                 ContinueAcc = cfgfile->GetFirstGroup(AccountName, itemindex);
 460
 461                 while (ContinueAcc){
 462
 463                         if (txtAccountName->GetValue() == AccountName){
 464
 465                                 wxMessageBox(_("The selected account name is already used, please use another account name."), _("Account name already used"), wxICON_ERROR);
 466                                 return;
 467
 468                         }
 469
 470                         cfgfile->SetPath(wxT("/"));
 471                         ContinueAcc = cfgfile->GetNextGroup(AccountName, itemindex);
 472
 473                 }
 474
 475                 if (cmbServerType->GetCurrentSelection() == 1){
 476
 477                         // Create the account directory.
 478
 479                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 480
 481                         if (wxMkdir(XestiaABDirectory + wxT("/accounts/") + DirectoryName + wxT(".carddav"), 0740) == TRUE){
 482
 483                                 DirectoryCreated = TRUE;
 484
 485                         }
 486
 487                         if (DirectoryCreated == TRUE){
 488
 489                                 WriteAccountDetails(cfgfile, wxT("CardDAV"), DirectoryName);
 490
 491                         } else {
 492
 493                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 494                                 return;
 495
 496                         }
 497
 498                 } else if (cmbServerType->GetCurrentSelection() == 0){
 499
 500                         // Create the account directory.
 501
 502                         wxString DirectoryName = txtAccountName->GetValue().Mid(0, 30) + RandomNumberSuffix;
 503
 504                         if (wxMkdir(XestiaABDirectory + wxT("/accounts/") + DirectoryName + wxT(".local"), 0740) == TRUE){
 505
 506                                 DirectoryCreated = TRUE;
 507
 508                         }
 509
 510                         if (DirectoryCreated == TRUE){
 511
 512                                 WriteAccountDetails(cfgfile, wxT("Local"), DirectoryName);
 513
 514                         } else {
 515
 516                                 wxMessageBox(_("An error occured whilst creating the account directory."), _("Cannot create account directory"));
 517                                 return;
 518
 519                         }
 520
 521                 }
 522
 523                 delete cfgfile;
 524                 cfgfile = NULL;
 525
 526                 *ReloadAccountConfig = TRUE;
 527
 528 #endif
 529
 530                 this->Close();
 531
 532         }
 533
 534 }
 535
 536 void frmNewAccount::WriteAccountDetails(wxFileConfig *cfgfilein, wxString AccountType, wxString DirectoryName){
 537
 538         // Write the new account details.
 539
 540         cfgfilein->SetPath(txtAccountName->GetValue());
 541         cfgfilein->Write(wxT("address"), txtServerAddress->GetValue());
 542         cfgfilein->Write(wxT("port"), txtServerPort->GetValue());
 543         cfgfilein->Write(wxT("username"), txtUsername->GetValue());
 544         cfgfilein->Write(wxT("password"), txtPassword->GetValue());
 545         cfgfilein->Write(wxT("prefix"), ServerPrefix);
 546         cfgfilein->Write(wxT("accountdir"), DirectoryName);
 547
 548         if (chkUseSSL->GetValue() == TRUE){
 549
 550                 cfgfilein->Write(wxT("ssl"), wxT("true"));
 551
 552         } else {
 553
 554                 cfgfilein->Write(wxT("ssl"), wxT("false"));
 555
 556         }
 557
 558         cfgfilein->Write(wxT("refresh"), wxT("1800"));
 559         cfgfilein->Write(wxT("type"), AccountType);
 560
 561 }
 562
 563 void frmNewAccount::CloseWindow( wxCommandEvent& event )
 564 {
 565
 566         // Close the window.
 567
 568         *ReloadAccountConfig = FALSE;
 569         this->Close();
 570
 571 }
 572
 573 void frmNewAccount::UpdateRequirements( wxCommandEvent& event )
 574 {
 575
 576         // Update the options.
 577
 578         if (cmbServerType->GetCurrentSelection() == 1){
 579
 580                 txtServerAddress->Enable();
 581                 txtServerPort->Enable();
 582                 txtUsername->Enable();
 583                 txtPassword->Enable();
 584                 chkUseSSL->Enable();
 585
 586         } else if (cmbServerType->GetCurrentSelection() == 0){
 587
 588                 txtServerAddress->Disable();
 589                 txtServerPort->Disable();
 590                 txtUsername->Disable();
 591                 txtPassword->Disable();
 592                 chkUseSSL->Disable();
 593
 594         }
 595
 596 }
 597
 598 void frmNewAccount::SetupPointers(bool *ReloadAccountInc){
 599
 600         // Setup the pointers for the new account window.
 601
 602         ReloadAccountConfig = ReloadAccountInc;
 603
 604 }