#include "commonheaders.h"

#define PSKSIZE (4096+1)
#define RSASIZE (4096+1)

BOOL bChangeSortOrder = false;
const char *szAdvancedIcons[] = {"None", "Email", "Protocol", "SMS", "Advanced 1", "Advanced 2", "Web", "Client", "VisMode", "Advanced 6", "Advanced 7", 0};


BOOL hasKey(pUinKey ptr) {
	BOOL ret = 0;
	if ( ptr->mode==MODE_NATIVE ) {
		LPSTR str = myDBGetString(ptr->hContact,szModuleName,"PSK");
		ret = (str!=NULL); SAFE_FREE(str);
	}
	else
	if ( ptr->mode==MODE_RSAAES ) {
		DBVARIANT dbv;
		dbv.type = DBVT_BLOB;
		if ( DBGetContactSetting(ptr->hContact,szModuleName,"rsa_pub",&dbv) == 0 ) {
			ret = 1;
			DBFreeVariant(&dbv);
		}
	}
	return ret;
}


void TC_InsertItem(HWND hwnd, WPARAM wparam, TCITEM *tci) {
	if ( bCoreUnicode ) {
		LPWSTR tmp = mir_a2u(tci->pszText);
		tci->pszText = (LPSTR)TranslateW(tmp);
		SNDMSG(hwnd, TCM_INSERTITEMW, wparam, (LPARAM)tci);
		mir_free(tmp);
	}
	else {
		tci->pszText = Translate(tci->pszText);
		SNDMSG(hwnd, TCM_INSERTITEMA, wparam, (LPARAM)tci);
	}
}


static void LV_InsertColumn(HWND hwnd, WPARAM wparam, LVCOLUMN *lvc) {
	if ( bCoreUnicode ) {
		LPWSTR tmp = mir_a2u(lvc->pszText);
		lvc->pszText = (LPSTR)TranslateW(tmp);
		SNDMSG(hwnd, LVM_INSERTCOLUMNW, wparam, (LPARAM)lvc);
		mir_free(tmp);
	}
	else {
		lvc->pszText = Translate(lvc->pszText);
		SNDMSG(hwnd, LVM_INSERTCOLUMNA, wparam, (LPARAM)lvc);
	}
}


int LV_InsertItem(HWND hwnd, LVITEM *lvi) {
	return SNDMSG(hwnd, bCoreUnicode ? LVM_INSERTITEMW : LVM_INSERTITEMA, 0, (LPARAM)lvi);
}


int LV_InsertItemA(HWND hwnd, LVITEM *lvi) {
	if ( bCoreUnicode ) lvi->pszText = (LPSTR) mir_a2u(lvi->pszText);
	int ret = LV_InsertItem(hwnd, lvi);
	if ( bCoreUnicode ) mir_free(lvi->pszText);
	return ret;
}


void LV_SetItemText(HWND hwnd, WPARAM wparam, int subitem, LPSTR text) {
	LV_ITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.iSubItem = subitem;
	lvi.pszText = text;
	SNDMSG(hwnd, bCoreUnicode ? LVM_SETITEMTEXTW : LVM_SETITEMTEXTA, wparam, (LPARAM)&lvi);
}


void LV_SetItemTextA(HWND hwnd, WPARAM wparam, int subitem, LPSTR text) {
	if ( bCoreUnicode ) text = (LPSTR) mir_a2u(text);
	LV_SetItemText(hwnd, wparam, subitem, text);
	if ( bCoreUnicode ) mir_free(text);
}


void LV_GetItemTextA(HWND hwnd, WPARAM wparam, int iSubItem, LPSTR text, int cchTextMax) {
	LV_ITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.iSubItem = iSubItem;
	lvi.cchTextMax = cchTextMax;
	lvi.pszText = text;
	SNDMSG(hwnd, bCoreUnicode ? LVM_GETITEMTEXTW : LVM_GETITEMTEXTA, wparam, (LPARAM)&lvi);
	if ( bCoreUnicode ) {
		lvi.pszText = mir_u2a((LPWSTR)text);
		strcpy(text, lvi.pszText);
		mir_free(lvi.pszText);
	}
}

/*
 * tabbed options dialog
 */

INT_PTR CALLBACK OptionsDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) {

   static int iInit = TRUE;
   TCITEM tci;

   switch(msg) {
      case WM_INITDIALOG: {
         RECT rcClient;
         GetClientRect(hwnd, &rcClient);

         iInit = TRUE;
         tci.mask = TCIF_PARAM|TCIF_TEXT;

         tci.lParam = (LPARAM)CreateDialog(g_hInst,MAKEINTRESOURCE(IDD_TAB_GENERAL),hwnd,DlgProcOptionsGeneral);
	 tci.pszText = (LPSTR)sim201;
         TC_InsertItem(GetDlgItem(hwnd, IDC_OPTIONSTAB), 0, &tci);
         MoveWindow((HWND)tci.lParam,5,26,rcClient.right-8,rcClient.bottom-29,1);

         tci.lParam = (LPARAM)CreateDialog(g_hInst,MAKEINTRESOURCE(IDD_TAB_PROTO),hwnd,DlgProcOptionsProto);
	 tci.pszText = (LPSTR)sim202;
         TC_InsertItem(GetDlgItem(hwnd, IDC_OPTIONSTAB), 2, &tci);
         MoveWindow((HWND)tci.lParam,5,26,rcClient.right-8,rcClient.bottom-29,1);
         ShowWindow((HWND)tci.lParam, SW_HIDE);

         if(bPGP && bPGPloaded) {
         tci.lParam = (LPARAM)CreateDialog(g_hInst,MAKEINTRESOURCE(IDD_TAB_PGP),hwnd,DlgProcOptionsPGP);
	 tci.pszText = (LPSTR)sim214;
         TC_InsertItem(GetDlgItem(hwnd, IDC_OPTIONSTAB), 3, &tci);
         MoveWindow((HWND)tci.lParam,5,26,rcClient.right-8,rcClient.bottom-29,1);
         ShowWindow((HWND)tci.lParam, SW_HIDE);
         }

         if(bGPG && bGPGloaded) {
         tci.lParam = (LPARAM)CreateDialog(g_hInst,MAKEINTRESOURCE(IDD_TAB_GPG),hwnd,DlgProcOptionsGPG);
	 tci.pszText = (LPSTR)sim226;
         TC_InsertItem(GetDlgItem(hwnd, IDC_OPTIONSTAB), 4, &tci);
         MoveWindow((HWND)tci.lParam,5,26,rcClient.right-8,rcClient.bottom-29,1);
         ShowWindow((HWND)tci.lParam, SW_HIDE);
         }

         // add more tabs here if needed
         // activate the final tab
         iInit = FALSE;
	 return TRUE;
      }
	  break;

      case PSM_CHANGED: // used so tabs dont have to call SendMessage(GetParent(GetParent(hwnd)), PSM_CHANGED, 0, 0);
         if (!iInit)
		SendMessage(GetParent(hwnd), PSM_CHANGED, 0, 0);
         break;

	  case WM_COMMAND: {
		  switch(LOWORD(wParam)) {
		  	case ID_UPDATE_CLIST: {
                tci.mask = TCIF_PARAM;
                TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),0,&tci);
                SendMessage((HWND)tci.lParam,WM_COMMAND,ID_UPDATE_CLIST,0);
			}
			break;
/*		  	case ID_UPDATE_PROTO: {
                tci.mask = TCIF_PARAM;
                TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),1,&tci);
                SendMessage((HWND)tci.lParam,WM_COMMAND,ID_UPDATE_PROTO,0);
			}
			break;*/
		  	case ID_UPDATE_PLIST: {
		  		if ( !bPGP ) break;
                tci.mask = TCIF_PARAM;
                TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),2,&tci);
                SendMessage((HWND)tci.lParam,WM_COMMAND,ID_UPDATE_CLIST,0);
			}
			break;
		  	case ID_UPDATE_GLIST: {
		  		if ( !bGPG ) break;
                tci.mask = TCIF_PARAM;
                TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),3,&tci);
                SendMessage((HWND)tci.lParam,WM_COMMAND,ID_UPDATE_GLIST,0);
			}
			break;
		  }	
	  }
	  break;
	  
	  case WM_NOTIFY: {
         switch(((LPNMHDR)lParam)->idFrom) {
            case 0: {
               switch (((LPNMHDR)lParam)->code) {
                  case PSN_APPLY: {
                        tci.mask = TCIF_PARAM;
                        int cnt = TabCtrl_GetItemCount(GetDlgItem(hwnd,IDC_OPTIONSTAB));
						for (int i=0;i<cnt;i++) {
							TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),i,&tci);
							SendMessage((HWND)tci.lParam,WM_NOTIFY,0,lParam);
						}
                  }
                  break;
               }
		    } // case 0
            break;

			case IDC_OPTIONSTAB: {
               switch (((LPNMHDR)lParam)->code) {
                  case TCN_SELCHANGING: {
                        tci.mask = TCIF_PARAM;
                        TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),TabCtrl_GetCurSel(GetDlgItem(hwnd,IDC_OPTIONSTAB)),&tci);
                        ShowWindow((HWND)tci.lParam,SW_HIDE);
                  }
                  break;
                  case TCN_SELCHANGE: {
                        tci.mask = TCIF_PARAM;
                        TabCtrl_GetItem(GetDlgItem(hwnd,IDC_OPTIONSTAB),TabCtrl_GetCurSel(GetDlgItem(hwnd,IDC_OPTIONSTAB)),&tci);
                        ShowWindow((HWND)tci.lParam,SW_SHOW);
                  }
                  break;
               }
			} // case IDC_OPTIONSTAB
            break;
         }
	  } // case WM_NOTIFY
      break;
   }
   return FALSE;
}


INT_PTR CALLBACK DlgProcOptionsGeneral(HWND hDlg, UINT wMsg, WPARAM wParam, LPARAM lParam) {

	static int iInit = TRUE;
	static HIMAGELIST hLarge, hSmall;
	int i,idx; pUinKey ptr;

	HWND hLV = GetDlgItem(hDlg,IDC_STD_USERLIST);

	switch (wMsg) {
		case WM_INITDIALOG: {

		  TranslateDialogDefault(hDlg);

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("DlgProcOptionsGeneral(WN_INITDIALOG)");
#endif
  		  iInit = TRUE;
//		  SendMessage(hLV, WM_SETREDRAW, FALSE, 0);
		  ListView_SetExtendedListViewStyle(hLV, ListView_GetExtendedListViewStyle(hLV) | LVS_EX_FULLROWSELECT);

		  hLarge = ImageList_Create(GetSystemMetrics(SM_CXICON), GetSystemMetrics(SM_CYICON), iBmpDepth, 1, 1);
		  hSmall = ImageList_Create(GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON), iBmpDepth, 1, 1);
//		  COLORREF rgbTransparentColor;
		  for (i = 0; i < ICO_CNT; i++) {
//			  ImageList_AddMasked(himgl, hbmp, rgbTransparentColor);
			  ImageList_AddIcon(hSmall, g_hICO[i]);
			  ImageList_AddIcon(hLarge, g_hICO[i]);
		  }

		  ListView_SetImageList(hLV, hSmall, LVSIL_SMALL);
		  ListView_SetImageList(hLV, hLarge, LVSIL_NORMAL);

		  static const char *szColHdr[] = { sim203, sim204, sim230, sim205, "", sim234, 0 };
		  static int iColWidth[] = { 150, 110, 60, 55, 35, 330 };
		  LVCOLUMN lvc;
		  lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
		  lvc.fmt = LVCFMT_LEFT;
		  for (i = 0; szColHdr[i]; i++) {
			  lvc.iSubItem = i;
			  lvc.pszText = (LPSTR)szColHdr[i];
			  lvc.cx = iColWidth[i];
			  LV_InsertColumn(hLV, i, &lvc);
		  }
		  for (i = 0; szAdvancedIcons[i]; i++) {
			SendMessage(GetDlgItem(hDlg, IDC_ADVICON), CB_ADDSTRING, 0, (LPARAM) Translate(szAdvancedIcons[i]));
		  }

		  RefreshGeneralDlg(hDlg,TRUE);
		  EnableWindow(hLV, true);
//		  SendMessage(hLV, WM_SETREDRAW, TRUE, 0);

  		  iInit = FALSE;
		  return TRUE;
		} // WM_INITDIALOG
		break;

	 	case WM_DESTROY: {
			ImageList_Destroy(hSmall);
			ImageList_Destroy(hLarge);
		} // WM_DESTROY
		break;

	 	case WM_PAINT: {
			if (!iInit)
	 			InvalidateRect(hDlg,NULL,FALSE);
	 	} // WM_PAINT
		break;

		case WM_COMMAND: {
		  switch(LOWORD(wParam)) {
		  	case ID_ALWAYS:
		  	case ID_ENABLED:
		  	case ID_DISABLED: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
				if (ptr) {
					ptr->tstatus = LOWORD(wParam)-ID_DISABLED;
					setListViewStatus(hLV,idx,ptr->tstatus);
					setListViewIcon(hLV,idx,ptr);
				}
			}
			break;

		  	case ID_SIM_NATIVE:
		  	case ID_SIM_PGP:
		  	case ID_SIM_GPG:
		  	case ID_SIM_RSAAES:
		  	case ID_SIM_RSA: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
				if (ptr) {
					ptr->tmode = LOWORD(wParam)-ID_SIM_NATIVE;
					setListViewMode(hLV,idx,ptr->tmode);
					setListViewIcon(hLV,idx,ptr);
				}
			}
			break;

		  	case ID_SETPSK: {
				idx = ListView_GetSelectionMark(hLV);
				ptr = (pUinKey) getListViewParam(hLV,idx);
		  		if(ptr) {
					LPSTR buffer = (LPSTR)alloca(PSKSIZE+1);
					getContactName(ptr->hContact, buffer);
					int res = DialogBoxParam(g_hInst,MAKEINTRESOURCE(IDD_PSK),NULL,DlgProcSetPSK,(LPARAM)buffer);
					if(res == IDOK) {
					    setListViewPSK(hLV,idx,1);
					    DBWriteContactSettingString(ptr->hContact,szModuleName,"tPSK",buffer);
					}
				}
			}
			break;

		  	case ID_DELPSK: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
		  		if(ptr) {
					setListViewPSK(hLV,idx,0);
					DBDeleteContactSetting(ptr->hContact, szModuleName, "tPSK");
				}
		  	}
		  	break;

		  	case ID_DELPUBL: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
		  		if(ptr) {
					setListViewPUB(hLV,idx,0);
				}
		  	}
		  	break;

		  	case ID_EXPPUBL: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
		  		if(ptr) {
		  			if ( !ptr->keyLoaded ) {
		  				createRSAcntx(ptr);
		  				loadRSAkey(ptr);
		  			}
		  			if ( ptr->keyLoaded ) {
		  				LPSTR buffer = (LPSTR) alloca(RSASIZE);
		  				exp->rsa_export_pubkey(ptr->cntx,buffer);
						if ( !SaveExportRSAKeyDlg(hDlg,buffer,0))
							msgbox(hDlg,sim114,szModuleName,MB_OK|MB_ICONEXCLAMATION);
		  			}
				}
				return TRUE;
		  	}
		  	break;

		  	case ID_IMPPUBL: {
		  		idx = ListView_GetSelectionMark(hLV);
		  		ptr = (pUinKey) getListViewParam(hLV,idx);
		  		if(ptr) {
		  			createRSAcntx(ptr);
		  			LPSTR pub = (LPSTR) alloca(RSASIZE);
		  			if ( !LoadImportRSAKeyDlg(hDlg,pub,0)) return TRUE;
		  			if ( exp->rsa_import_pubkey(ptr->cntx,pub)) {
		  				int len;
		  				exp->rsa_get_pubkey(ptr->cntx,(PBYTE)pub,&len);

						DBCONTACTWRITESETTING cws;
						cws.szModule = szModuleName;
						cws.szSetting = "rsa_pub";
						cws.value.type = DBVT_BLOB;
						cws.value.pbVal = (PBYTE)pub;
						cws.value.cpbVal = len;
						CallService(MS_DB_CONTACT_WRITESETTING, (WPARAM)ptr->hContact, (LPARAM)&cws);

						setListViewPUB(hLV,idx,1);
		  			}
		  			else
						msgbox(hDlg,sim115,szModuleName,MB_OK|MB_ICONEXCLAMATION);
				}
				return TRUE;
		  	}
		  	break;

		  	case ID_UPDATE_CLIST: {
//				iInit = TRUE;
//				RefreshGeneralDlg(hDlg,FALSE);
//				iInit = FALSE;
				return TRUE;
			}
			break;

		  	case IDC_RESET: {
				if (!iInit)
					ResetGeneralDlg(hDlg);
			}
			break;

			case IDC_ADV8:
			case IDC_ADV7:
			case IDC_ADV6:
			case IDC_ADV5:
			case IDC_ADV4:
			case IDC_ADV3:
			case IDC_ADV2:
			case IDC_ADV1:
			case IDC_ADV0:
		  	case IDC_GPG:
		  	case IDC_PGP:
		  	case IDC_NO_PGP:
		  	case IDC_NOL:
		  	case IDC_AAK:
		  	case IDC_MCM:
		  	case IDC_AIP:
		  	case IDC_SOM:
		  	case IDC_SFT:
		  	case IDC_ASI:
		  	case IDC_MCD:
		  	case IDC_KET:
		  	case IDC_SCM:
		  	case IDC_DGP:
		  	case IDC_OKT:
		  	case IDC_ADVICON:
				break;

			default:
				return FALSE;
		  }
		  if (!iInit)
			SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
		} // WM_COMMAND
		break;	

		case WM_NOTIFY: {
			switch(((LPNMHDR)lParam)->idFrom) {
				case 0: {
					if (((LPNMHDR)lParam)->code == (UINT)PSN_APPLY) {
						iInit = TRUE;
						ApplyGeneralSettings(hDlg);
						RefreshContactListIcons();
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_PLIST,0);
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_GLIST,0);
						iInit = FALSE;
					}
				}
				break;

				case IDC_STD_USERLIST: {
                    switch(((LPNMHDR)lParam)->code) {
                    case NM_DBLCLK: {
				if(LPNMLISTVIEW(lParam)->iSubItem == 2) {
					idx = LPNMLISTVIEW(lParam)->iItem;
					ptr = (pUinKey) getListViewParam(hLV,idx);
					if (ptr) {
						ptr->tmode++;
						if ( !bPGP && ptr->tmode==MODE_PGP ) ptr->tmode++;
						if ( !bGPG && ptr->tmode==MODE_GPG ) ptr->tmode++;
						if ( ptr->tmode>=MODE_CNT ) ptr->tmode=MODE_NATIVE;
						setListViewMode(hLV,idx,ptr->tmode);
						setListViewIcon(hLV,idx,ptr);
						SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
					}
				}
				if(LPNMLISTVIEW(lParam)->iSubItem == 3) {
					idx = LPNMLISTVIEW(lParam)->iItem;
					ptr = (pUinKey) getListViewParam(hLV,idx);
					if (ptr) {
						ptr->tstatus++; if(ptr->tstatus>(ptr->tmode==MODE_RSAAES?1:2)) ptr->tstatus=0;
						setListViewStatus(hLV,idx,ptr->tstatus);
						setListViewIcon(hLV,idx,ptr);
						SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
					}
				}
                    } break;
                    case NM_RCLICK: {
//  				idx = ListView_GetSelectionMark(hLV);
				LPNMLISTVIEW lpLV = (LPNMLISTVIEW)lParam;
  				ptr = (pUinKey) getListViewParam(hLV,lpLV->iItem);
				if (ptr) {
					POINT p; GetCursorPos(&p);
					HMENU hMenu = NULL;
					if ( ptr->tmode==MODE_NATIVE || ptr->tmode==MODE_RSAAES ) {
						switch( lpLV->iSubItem ) {
						case 2: // mode
							hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE(IDM_CLIST2));
							break;
						case 3: // status
							hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE((ptr->tmode==MODE_NATIVE)?IDM_CLIST01:IDM_CLIST11));
							break;
						case 4: // PSK/PUB
						case 5: // SHA1
							hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE((ptr->tmode==MODE_NATIVE)?IDM_CLIST02:IDM_CLIST12));
							break;
						default: // full menu
							hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE((ptr->tmode==MODE_NATIVE)?IDM_CLIST0:IDM_CLIST1));
							break;
						}
						CheckMenuItem(hMenu, ID_DISABLED+ptr->tstatus, MF_CHECKED );
						if ( ptr->tmode==MODE_NATIVE ) {
							if ( !hasKey(ptr)) EnableMenuItem(hMenu, ID_DELPSK, MF_GRAYED );
						}
						else
						if ( ptr->tmode==MODE_RSAAES ) {
							if ( !hasKey(ptr)) {
								EnableMenuItem(hMenu, ID_EXPPUBL, MF_GRAYED );
								EnableMenuItem(hMenu, ID_DELPUBL, MF_GRAYED );
						 	}
						}
					}
					if ( !hMenu )
						hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE(IDM_CLIST2));
					TranslateMenu(hMenu);
					CheckMenuItem(hMenu, ID_SIM_NATIVE+ptr->tmode, MF_CHECKED );
					if ( !bPGP ) EnableMenuItem(hMenu, ID_SIM_PGP, MF_GRAYED );
					if ( !bGPG ) EnableMenuItem(hMenu, ID_SIM_GPG, MF_GRAYED );
//					CheckMenuItem(hMenu, ID_ENCRYPTION, MF_BYCOMMAND );
					TrackPopupMenu(GetSubMenu(hMenu, 0), TPM_LEFTALIGN | TPM_TOPALIGN, p.x, p.y, 0, hDlg, 0);
					DestroyMenu(hMenu);
				}
			} break;
                    case LVN_COLUMNCLICK: {
		                        	bChangeSortOrder = true;
						ListView_Sort(hLV,(LPARAM)(LPNMLISTVIEW(lParam)->iSubItem+0x01));
						bChangeSortOrder = false;
				}
				}
			}
			break;
		  }
		} // WM_NOTIFY
		break;
	}
    return FALSE;
}


INT_PTR CALLBACK DlgProcOptionsProto(HWND hDlg, UINT wMsg, WPARAM wParam, LPARAM lParam) {

	static int iInit = TRUE;
	char buf[32];
	int idx;

	HWND hLV = GetDlgItem(hDlg,IDC_PROTO);

	switch (wMsg) {
		case WM_INITDIALOG: {

		  TranslateDialogDefault(hDlg);

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("DlgProcOptionsProto(WN_INITDIALOG)");
#endif
  		  iInit = TRUE;
		  ListView_SetExtendedListViewStyle(hLV, ListView_GetExtendedListViewStyle(hLV) | LVS_EX_FULLROWSELECT | LVS_EX_CHECKBOXES);

		  LVCOLUMN lvc;
		  lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
		  lvc.fmt = LVCFMT_LEFT;
		  lvc.pszText = (LPSTR)sim210;
		  lvc.cx = 150;
		  LV_InsertColumn(hLV, 0, &lvc);

		  RefreshProtoDlg(hDlg);
		  EnableWindow(hLV, true);

  		  iInit = FALSE;
		  return TRUE;
		} // WM_INITDIALOG
		break;

		case WM_PAINT: {
			if (!iInit)
	 			InvalidateRect(hDlg,NULL,FALSE);
	 	} // WM_PAINT
		break;

		case WM_COMMAND: {
			switch(LOWORD(wParam)) {
		  	case IDC_RSA_COPY: {
				char txt[128];
				GetDlgItemText(hDlg, IDC_RSA_SHA, txt, sizeof(txt));
		  	        CopyToClipboard(hDlg,txt);
		  	        return TRUE;
		  	} break;
			case IDC_RSA_EXP: {
		  		LPSTR pub = (LPSTR) alloca(RSASIZE);
		  		exp->rsa_export_keypair(CPP_MODE_RSA,NULL,pub,NULL);
				if ( !SaveExportRSAKeyDlg(hDlg,pub,0))
					msgbox(hDlg,sim114,szModuleName,MB_OK|MB_ICONEXCLAMATION);
		  	        return TRUE;
		  	} break;
		  	case IDC_RSA_EXPPRIV: {
				LPSTR passphrase = (LPSTR) alloca(RSASIZE);
				int res = DialogBoxParam(g_hInst,MAKEINTRESOURCE(IDD_PASSPHRASE),NULL,DlgProcSetPassphrase,(LPARAM)passphrase);
				if ( res==IDOK ) {
		  			LPSTR priv = (LPSTR) alloca(RSASIZE);
		  			exp->rsa_export_keypair(CPP_MODE_RSA,priv,NULL,passphrase);
					if ( !SaveExportRSAKeyDlg(hDlg,priv,1))
						msgbox(hDlg,sim112,szModuleName,MB_OK|MB_ICONEXCLAMATION);
				}
		  	        return TRUE;
		  	} break;
		  	case IDC_RSA_IMPPRIV: {
  				LPSTR priv = (LPSTR) alloca(RSASIZE);
				if ( !LoadImportRSAKeyDlg(hDlg,priv,1)) return TRUE;
				//
				LPSTR passphrase = (LPSTR) alloca(RSASIZE);
				int res = DialogBoxParam(g_hInst,MAKEINTRESOURCE(IDD_PASSPHRASE),NULL,DlgProcSetPassphrase,(LPARAM)passphrase);
				if ( res==IDOK ) {
	  				if ( !exp->rsa_import_keypair(CPP_MODE_RSA,priv,passphrase)) {
						msgbox(hDlg,sim113,szModuleName,MB_OK|MB_ICONEXCLAMATION);
	  				}
	  				else {
	  					// обновить SHA1 значение
						RefreshProtoDlg(hDlg);
					}
	  			}
		  	        return TRUE;
		  	} break;
			case IDC_SPLITON:
			case IDC_SPLITOFF: {
			    if ( HIWORD(wParam) == EN_CHANGE ) {
				idx = ListView_GetSelectionMark(hLV);
				if ( idx == -1 ) break;
				idx = (int) getListViewParam(hLV,idx);
				switch(LOWORD(wParam)) {
				case IDC_SPLITON:
					GetDlgItemText(hDlg,IDC_SPLITON,buf,5);
					proto[idx].tsplit_on = atoi(buf);
				break;
				case IDC_SPLITOFF:
					GetDlgItemText(hDlg,IDC_SPLITOFF,buf,5);
					proto[idx].tsplit_off = atoi(buf);
				break;
				}
			    }
			    if (!iInit)
				SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
			} break;
		  	}
		}
		break;

		case WM_NOTIFY: {
			switch(((LPNMHDR)lParam)->idFrom) {
				case 0: {
				     	if (((LPNMHDR)lParam)->code == (UINT)PSN_APPLY) {
						iInit = TRUE;
						ApplyProtoSettings(hDlg);
						RefreshProtoDlg(hDlg);
						RefreshContactListIcons();
		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_CLIST,0);
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_PLIST,0);
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_GLIST,0);
						iInit = FALSE;
					}
				}
				break;

				case IDC_PROTO: {
					if (((LPNMHDR)lParam)->code == (UINT)NM_CLICK) {
						idx = (int) getListViewParam(hLV,LPNMLISTVIEW(lParam)->iItem);
						if ( idx == -1 ) break;
						EnableWindow(GetDlgItem(hDlg,IDC_SPLITON), true);
						EnableWindow(GetDlgItem(hDlg,IDC_SPLITOFF), true);
						mir_itoa(proto[idx].tsplit_on,buf,10);	SetDlgItemText(hDlg,IDC_SPLITON,buf);
						mir_itoa(proto[idx].tsplit_off,buf,10);	SetDlgItemText(hDlg,IDC_SPLITOFF,buf);
						SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
					}
				}
				break;
		  }
		} // WM_NOTIFY
		break;
	}
	return FALSE;
}


static BOOL bPGP9;

INT_PTR CALLBACK DlgProcOptionsPGP(HWND hDlg, UINT wMsg, WPARAM wParam, LPARAM lParam) {

    static int iInit = TRUE;
	static HIMAGELIST hLarge, hSmall;
	int i;

    HWND hLV = GetDlgItem(hDlg,IDC_PGP_USERLIST);

	switch (wMsg) {
		case WM_INITDIALOG: {

		  TranslateDialogDefault(hDlg);

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("DlgProcOptionsPGP(WN_INITDIALOG)");
#endif
  		  iInit = TRUE;
		  ListView_SetExtendedListViewStyle(hLV, ListView_GetExtendedListViewStyle(hLV) | LVS_EX_FULLROWSELECT);

		  hLarge = ImageList_Create(GetSystemMetrics(SM_CXICON), GetSystemMetrics(SM_CYICON), iBmpDepth, 1, 1);
		  hSmall = ImageList_Create(GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON), iBmpDepth, 1, 1);
		  for (i = ICO_ST_DIS; i <= ICO_ST_TRY; i++) {
			  ImageList_AddIcon(hSmall, g_hICO[i]);
			  ImageList_AddIcon(hLarge, g_hICO[i]);
		  }

		  ListView_SetImageList(hLV, hSmall, LVSIL_SMALL);
		  ListView_SetImageList(hLV, hLarge, LVSIL_NORMAL);

		  static const char *szColHdr[] = { sim203, sim204, sim215, 0 };
		  static int iColWidth[] = { 160, 150, 80 };
		  LVCOLUMN lvc;
		  lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
		  lvc.fmt = LVCFMT_LEFT;
		  for (i = 0; szColHdr[i]; i++) {
			  lvc.iSubItem = i;
			  lvc.pszText = (LPSTR)szColHdr[i];
			  lvc.cx = iColWidth[i];
			  LV_InsertColumn(hLV, i, &lvc);
		  }

		  RefreshPGPDlg(hDlg,TRUE);
//		  EnableWindow(hLV, bPGPkeyrings);

  		  iInit = FALSE;
		  return TRUE;
		} // WM_INITDIALOG
		break;

	 	case WM_DESTROY: {
			ImageList_Destroy(hSmall);
			ImageList_Destroy(hLarge);
		} // WM_DESTROY
		break;

		case WM_PAINT: {
			if (!iInit)
	 			InvalidateRect(hDlg,NULL,FALSE);
	 	} // WM_PAINT
		break;

		case WM_COMMAND: {
			switch(LOWORD(wParam)) {
		  	case IDC_SET_KEYRINGS: {
	  			char PubRingPath[MAX_PATH], SecRingPath[MAX_PATH];
				PubRingPath[0]='\0'; SecRingPath[0]='\0';
				bPGPkeyrings = pgp_open_keyrings(PubRingPath,SecRingPath);
				if(bPGPkeyrings && PubRingPath[0] && SecRingPath[0]) {
					DBWriteContactSettingString(0,szModuleName,"pgpPubRing",PubRingPath);
					DBWriteContactSettingString(0,szModuleName,"pgpSecRing",SecRingPath);
				}
				SetDlgItemText(hDlg, IDC_KEYRING_STATUS, bPGPkeyrings?Translate(sim216):Translate(sim217));
//				EnableWindow(hLV, bPGPkeyrings);
//				RefreshPGPDlg(hDlg);
				return FALSE;
		  	}
		  	break;
		  	case IDC_NO_KEYRINGS: {
		  		BOOL bNoKR = (SendMessage(GetDlgItem(hDlg, IDC_NO_KEYRINGS),BM_GETCHECK,0L,0L)==BST_CHECKED);
				EnableWindow(GetDlgItem(hDlg, IDC_SET_KEYRINGS), !bNoKR);
				EnableWindow(GetDlgItem(hDlg, IDC_LOAD_PRIVKEY), bNoKR);
				SetDlgItemText(hDlg, IDC_KEYRING_STATUS, bNoKR?Translate(sim225):((bPGP9)?Translate(sim220):(bPGPkeyrings?Translate(sim216):Translate(sim217))));
		  	}
		  	break;
		  	case IDC_LOAD_PRIVKEY: {
				char KeyPath[MAX_PATH]; KeyPath[0]='\0';
			  	if(ShowSelectKeyDlg(hDlg,KeyPath)) {
			  		char *priv = LoadKeys(KeyPath,true);
			  		if(priv) {
				  		DBWriteContactSettingString(0,szModuleName,"tpgpPrivKey",priv);
				  		mir_free(priv);
			  		}
			  		else {
				  		DBDeleteContactSetting(0,szModuleName,"tpgpPrivKey");
			  		}
			  	}
		  	}
		  	break;
		  	case ID_UPDATE_PLIST: {
				iInit = TRUE;
				RefreshPGPDlg(hDlg,FALSE);
				iInit = FALSE;
				return TRUE;
			}
			break;
			default:
			break;
		  	}
			if (!iInit)
				SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
		}
		break;

		case WM_NOTIFY: {
			switch(((LPNMHDR)lParam)->idFrom) {
				case 0: {
                    if (((LPNMHDR)lParam)->code == (UINT)PSN_APPLY) {
						iInit = TRUE;
						ApplyPGPSettings(hDlg);
						RefreshPGPDlg(hDlg,FALSE);
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_CLIST,0);
						iInit = FALSE;
					}
				}
				break;
				case IDC_PGP_USERLIST: {
                    switch(((LPNMHDR)lParam)->code) {
/*                    case NM_RCLICK: {
						POINT p;
						GetCursorPos(&p);
						HMENU hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE(IDM_CLIST));
						CheckMenuItem(hMenu, ID_ENCRYPTION, MF_BYCOMMAND );
						TranslateMenu(hMenu);
						TrackPopupMenu(GetSubMenu(hMenu, 0), TPM_LEFTALIGN | TPM_TOPALIGN, p.x, p.y, 0, hDlg, 0);
						DestroyMenu(hMenu);
					} break;*/
                    case LVN_COLUMNCLICK: {
                    	bChangeSortOrder = true;
						ListView_Sort(hLV,(LPARAM)(LPNMLISTVIEW(lParam)->iSubItem+0x11));
						bChangeSortOrder = false;
					}
					}
				}
				break;
		  }
		} // WM_NOTIFY
		break;
	}
	return FALSE;
}


INT_PTR CALLBACK DlgProcOptionsGPG(HWND hDlg, UINT wMsg, WPARAM wParam, LPARAM lParam) {

    static int iInit = TRUE;
	static HIMAGELIST hLarge, hSmall;
	int i, idx; pUinKey ptr;

    HWND hLV = GetDlgItem(hDlg,IDC_GPG_USERLIST);

	switch (wMsg) {
		case WM_INITDIALOG: {

		  TranslateDialogDefault(hDlg);

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("DlgProcOptionsGPG(WN_INITDIALOG)");
#endif
  		  iInit = TRUE;
		  ListView_SetExtendedListViewStyle(hLV, ListView_GetExtendedListViewStyle(hLV) | LVS_EX_FULLROWSELECT);

		  hLarge = ImageList_Create(GetSystemMetrics(SM_CXICON), GetSystemMetrics(SM_CYICON), iBmpDepth, 1, 1);
		  hSmall = ImageList_Create(GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON), iBmpDepth, 1, 1);
		  for (i = ICO_ST_DIS; i <= ICO_ST_TRY; i++) {
			  ImageList_AddIcon(hSmall, g_hICO[i]);
			  ImageList_AddIcon(hLarge, g_hICO[i]);
		  }

		  ListView_SetImageList(hLV, hSmall, LVSIL_SMALL);
		  ListView_SetImageList(hLV, hLarge, LVSIL_NORMAL);

		  static const char *szColHdr[] = { sim203, sim204, sim215, sim227, 0 };
		  static int iColWidth[] = { 140, 120, 120, 40 };
		  LVCOLUMN lvc;
		  lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
		  lvc.fmt = LVCFMT_LEFT;
		  for (i = 0; szColHdr[i]; i++) {
			  lvc.iSubItem = i;
			  lvc.pszText = (LPSTR)szColHdr[i];
			  lvc.cx = iColWidth[i];
			  LV_InsertColumn(hLV, i, &lvc);
		  }

		  RefreshGPGDlg(hDlg,TRUE);
//		  EnableWindow(hLV, bPGPkeyrings);

  		  iInit = FALSE;
		  return TRUE;
		} // WM_INITDIALOG
		break;

	 	case WM_DESTROY: {
			ImageList_Destroy(hSmall);
			ImageList_Destroy(hLarge);
		} // WM_DESTROY
		break;

		case WM_PAINT: {
			if (!iInit)
	 			InvalidateRect(hDlg,NULL,FALSE);
	 	} // WM_PAINT
		break;

		case WM_COMMAND: {
			switch(LOWORD(wParam)) {
/*		  	case IDC_LOAD_PRIVKEY: {
				char KeyPath[MAX_PATH] = {0};
			  	if(ShowSelectKeyDlg(hDlg,KeyPath)) {
			  		char *priv = LoadKeys(KeyPath,true);
			  		if(priv) {
				  		DBWriteContactSettingString(0,szModuleName,"tpgpPrivKey",priv);
				  		mir_free(priv);
			  		}
			  		else {
				  		DBDeleteContactSetting(0,szModuleName,"tpgpPrivKey");
			  		}
			  	}
		  	}
		  	break;*/
            case IDC_BROWSEEXECUTABLE_BTN: {
				char gpgexe[256];
				char filter[128];
				OPENFILENAME ofn;

    			GetDlgItemText(hDlg, IDC_GPGEXECUTABLE_EDIT, gpgexe, sizeof(gpgexe));
    			
				char *txtexecutablefiles="Executable Files"; /*lang*/
				char *txtselectexecutable="Select GnuPG Executable"; /*lang*/

    			// filter zusammensetzen
    			memset(&filter,0,sizeof(filter));
    			strcpy(filter, Translate(txtexecutablefiles));
    			strcat(filter, " (*.exe)");
    			strcpy(filter+strlen(filter)+1, "*.exe");

    			// OPENFILENAME initialisieren
    			memset(&ofn,0,sizeof(ofn));
    			ofn.lStructSize=sizeof(ofn);
    			ofn.hwndOwner=hDlg;
    			ofn.lpstrFilter=filter;
    			ofn.lpstrFile=gpgexe;
    			ofn.nMaxFile=sizeof(gpgexe);
    			ofn.lpstrTitle=Translate(txtselectexecutable);
    			ofn.Flags=OFN_FILEMUSTEXIST|OFN_LONGNAMES|OFN_HIDEREADONLY;

    			if (GetOpenFileName(&ofn))
    			{
    				SetDlgItemText(hDlg, IDC_GPGEXECUTABLE_EDIT, ofn.lpstrFile);
    			}
    		}
    		break;
		  	case ID_UPDATE_GLIST: {
				iInit = TRUE;
				RefreshGPGDlg(hDlg,FALSE);
				iInit = FALSE;
				return TRUE;
			}
			break;
			default:
			break;
		  	}
			if (!iInit)
				SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
		}
		break;

		case WM_NOTIFY: {
			switch(((LPNMHDR)lParam)->idFrom) {
				case 0: {
                    if (((LPNMHDR)lParam)->code == (UINT)PSN_APPLY) {
						iInit = TRUE;
						ApplyGPGSettings(hDlg);
						RefreshGPGDlg(hDlg,FALSE);
//		                SendMessage(GetParent(hDlg),WM_COMMAND,ID_UPDATE_CLIST,0);
						iInit = FALSE;
					}
				}
				break;
				case IDC_GPG_USERLIST: {
                    switch(((LPNMHDR)lParam)->code) {
                    case NM_DBLCLK: {
						if(LPNMLISTVIEW(lParam)->iSubItem == 3) {
							idx = LPNMLISTVIEW(lParam)->iItem;
		  					ptr = (pUinKey) getListViewParam(hLV,idx);
		  					if ( !ptr ) break;
		  					ptr->tgpgMode++; ptr->tgpgMode&=1;
							LV_SetItemTextA(hLV, LPNMLISTVIEW(lParam)->iItem, LPNMLISTVIEW(lParam)->iSubItem, (ptr->tgpgMode)?Translate(sim228):Translate(sim229));
							SendMessage(GetParent(hDlg), PSM_CHANGED, 0, 0);
						}
                    } break;
/*                    case NM_RCLICK: {
						POINT p;
						GetCursorPos(&p);
						HMENU hMenu = LoadMenu(g_hInst, MAKEINTRESOURCE(IDM_CLIST));
						CheckMenuItem(hMenu, ID_ENCRYPTION, MF_BYCOMMAND );
						TranslateMenu(hMenu);
						TrackPopupMenu(GetSubMenu(hMenu, 0), TPM_LEFTALIGN | TPM_TOPALIGN, p.x, p.y, 0, hDlg, 0);
						DestroyMenu(hMenu);
					} break;*/
                    case LVN_COLUMNCLICK: {
                    	bChangeSortOrder = true;
						ListView_Sort(hLV,(LPARAM)(LPNMLISTVIEW(lParam)->iSubItem+0x21));
						bChangeSortOrder = false;
					}
					}
				}
				break;
		  }
		} // WM_NOTIFY
		break;
	}
	return FALSE;
}


INT_PTR CALLBACK DlgProcSetPSK(HWND hDlg,UINT uMsg,WPARAM wParam,LPARAM lParam) {
    static char *buffer;
	switch(uMsg) {
	case WM_INITDIALOG: {
		TranslateDialogDefault(hDlg);
		SendDlgItemMessage(hDlg,IDC_EDIT1,EM_LIMITTEXT,PSKSIZE-1,0);
		if ( bCoreUnicode )	SetDlgItemTextW(hDlg,IDC_EDIT2,(LPWSTR)lParam);
		else			SetDlgItemTextA(hDlg,IDC_EDIT2,(LPCSTR)lParam);
		buffer = (LPSTR)lParam;
		return (TRUE);
	}
	case WM_COMMAND: {
		switch(LOWORD(wParam)) {
		case IDOK: {
			int len = GetDlgItemTextA(hDlg,IDC_EDIT1,buffer,PSKSIZE);
			if(len<8) {
				msgbox1(hDlg,sim211,szModuleName,MB_OK|MB_ICONEXCLAMATION);
				return TRUE;
			}
			else {
				EndDialog(hDlg,IDOK);
			}
		}
		break;
		case IDCANCEL: {
			EndDialog(hDlg,IDCANCEL);
		}
		break;
		}
	}
	break;
	default:
		return (FALSE);
	}
	return (TRUE);
}


INT_PTR CALLBACK DlgProcSetPassphrase(HWND hDlg,UINT uMsg,WPARAM wParam,LPARAM lParam) {
	static LPSTR buffer;
	switch(uMsg) {
	case WM_INITDIALOG: {
		TranslateDialogDefault(hDlg);
		SendDlgItemMessage(hDlg,IDC_PASSPHRASE,EM_LIMITTEXT,RSASIZE-1,0);
		buffer = (LPSTR)lParam;
		return (TRUE);
	}
	case WM_COMMAND: {
		switch(LOWORD(wParam)) {
		case IDOK: {
//			memset(buffer,0,RSASIZE);
			GetDlgItemTextA(hDlg,IDC_PASSPHRASE,buffer,RSASIZE);
			EndDialog(hDlg,IDOK);
		}
		break;
		case IDCANCEL: {
			EndDialog(hDlg,IDCANCEL);
		}
		break;
		}
	}
	break;
	default:
		return (FALSE);
	}
	return (TRUE);
}


///////////////////
// R E F R E S H //
///////////////////


void RefreshGeneralDlg(HWND hDlg, BOOL iInit) {

	char timeout[10];
	UINT data;

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("RefreshGeneralDlg");
#endif
	// Key Exchange Timeout
	data = DBGetContactSettingWord(0, szModuleName, "ket", 10);
	mir_itoa(data,timeout,10);
	SetDlgItemText(hDlg,IDC_KET,timeout);

	// Offline Key Timeout
	data = DBGetContactSettingWord(0, szModuleName, "okt", 2);
	mir_itoa(data,timeout,10);
	SetDlgItemText(hDlg,IDC_OKT,timeout);

	GetFlags();

	SendMessage(GetDlgItem(hDlg,IDC_SFT),BM_SETCHECK,(bSFT)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_SOM),BM_SETCHECK,(bSOM)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_ASI),BM_SETCHECK,(bASI)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_MCD),BM_SETCHECK,(bMCD)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_SCM),BM_SETCHECK,(bSCM)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_DGP),BM_SETCHECK,(bDGP)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_AIP),BM_SETCHECK,(bAIP)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_NOL),BM_SETCHECK,(bNOL)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_AAK),BM_SETCHECK,(bAAK)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_MCM),BM_SETCHECK,(bMCM)?BST_CHECKED:BST_UNCHECKED,0L);

	// Advanced
	SendMessage(GetDlgItem(hDlg, IDC_ADVICON), CB_SETCURSEL, bADV, 0);
	if ( g_hCLIcon ) {
		EnableWindow(GetDlgItem(hDlg, IDC_ADVICON), false);
	}

	// Select {OFF,PGP,GPG}
	SendMessage(GetDlgItem(hDlg,IDC_PGP),BM_SETCHECK,bPGP?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_GPG),BM_SETCHECK,bGPG?BST_CHECKED:BST_UNCHECKED,0L);

	// rebuild list of contacts
	HWND hLV = GetDlgItem(hDlg,IDC_STD_USERLIST);
	ListView_DeleteAllItems(hLV);

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM;

	HANDLE hContact = db_find_first();
	char tmp[NAMSIZE];

	while (hContact) {

		pUinKey ptr = getUinKey(hContact);
		if ( ptr && isSecureProtocol(hContact) /*&& !getMetaContact(hContact)*/ && !isChatRoom(hContact)) {

			if ( iInit ) {
				ptr->tmode = ptr->mode;
				ptr->tstatus = ptr->status;
			}

			lvi.iItem++;
			lvi.iImage = ptr->tstatus;
			lvi.lParam = (LPARAM)ptr;

			getContactName(hContact, tmp);
			lvi.pszText = (LPSTR)&tmp;
			int itemNum = LV_InsertItem(hLV, &lvi);

			getContactUin(hContact, tmp);
			LV_SetItemText(hLV, itemNum, 1, tmp);

			setListViewMode(hLV, itemNum, ptr->tmode);
			setListViewStatus(hLV, itemNum, ptr->tstatus);
			if ( ptr->mode==MODE_NATIVE )	setListViewPSK(hLV, itemNum, hasKey(ptr));
			else				setListViewPUB(hLV, itemNum, hasKey(ptr));
			setListViewIcon(hLV, itemNum, ptr);
		}
		hContact = db_find_next(hContact);
	}
	ListView_Sort(hLV,(LPARAM)0);
}


void RefreshProtoDlg(HWND hDlg) {

	int i;

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("RefreshProtoDlg");
#endif
	HWND hLV = GetDlgItem(hDlg,IDC_PROTO);
	ListView_DeleteAllItems(hLV);

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.mask = LVIF_TEXT | LVIF_PARAM;

	for(i=0;i<proto_cnt;i++) {
#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("LV_InsertItemA(%d,%s);",i,proto[i].name);
#endif
		lvi.iItem = i+1;
		lvi.pszText = proto[i].name;
		lvi.lParam = (LPARAM)i;
		int itemNum = LV_InsertItemA(hLV, &lvi);
		ListView_SetCheckState(hLV,itemNum,proto[i].inspecting);
	}

	SetDlgItemText(hDlg,IDC_SPLITON,_T("0"));
	SetDlgItemText(hDlg,IDC_SPLITOFF,_T("0"));
	EnableWindow(GetDlgItem(hDlg,IDC_SPLITON), false);
	EnableWindow(GetDlgItem(hDlg,IDC_SPLITOFF), false);

	BYTE sha[64]; int len; exp->rsa_get_keyhash(CPP_MODE_RSA,NULL,NULL,(PBYTE)&sha,&len);
	LPSTR txt = mir_strdup(to_hex(sha,len));
	SetDlgItemText(hDlg, IDC_RSA_SHA, txt);
	mir_free(txt);
}


void RefreshPGPDlg(HWND hDlg, BOOL iInit) {

	int ver = pgp_get_version();
	bPGP9 = (ver>=0x03050000);

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("RefreshPGPDlg");
#endif
	EnableWindow(GetDlgItem(hDlg, IDC_SET_KEYRINGS), bUseKeyrings && !bPGP9);
	EnableWindow(GetDlgItem(hDlg, IDC_LOAD_PRIVKEY), !bUseKeyrings);
	SetDlgItemText(hDlg, IDC_PGP_PRIVKEY, bPGPprivkey?Translate(sim222):Translate(sim223));

	if(bPGPloaded && ver) {
		char pgpVerStr[64];
		sprintf(pgpVerStr, Translate(sim218), ver >> 24, (ver >> 16) & 255, (ver >> 8) & 255);
		SetDlgItemText(hDlg, IDC_PGP_SDK, pgpVerStr);
	}
	else {
		SetDlgItemText(hDlg, IDC_PGP_SDK, Translate(sim219));
	}
	SetDlgItemText(hDlg, IDC_KEYRING_STATUS, !bUseKeyrings?Translate(sim225):((bPGP9)?Translate(sim220):(bPGPkeyrings?Translate(sim216):Translate(sim217))));

	// Disable keyrings use
	SendMessage(GetDlgItem(hDlg,IDC_NO_KEYRINGS),BM_SETCHECK,(bUseKeyrings)?BST_UNCHECKED:BST_CHECKED,0L);

	// rebuild list of contacts
	HWND hLV = GetDlgItem(hDlg,IDC_PGP_USERLIST);
	ListView_DeleteAllItems(hLV);

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM;

	HANDLE hContact = db_find_first();
	char tmp[NAMSIZE];

	while (hContact) {

		pUinKey ptr = getUinKey(hContact);
		if (ptr && ptr->mode==MODE_PGP && isSecureProtocol(hContact) /*&& !getMetaContact(hContact)*/ && !isChatRoom(hContact)) {

			LPSTR szKeyID = myDBGetString(hContact,szModuleName,"pgp_abbr");

			lvi.iItem++;
			lvi.iImage = (szKeyID!=0);
			lvi.lParam = (LPARAM)ptr;

			getContactName(hContact, tmp);
			lvi.pszText = (LPSTR)&tmp;
			int itemNum = LV_InsertItem(hLV, &lvi);

			getContactUin(hContact, tmp);
			LV_SetItemText(hLV, itemNum, 1, tmp);

			LV_SetItemTextA(hLV, itemNum, 2, (szKeyID)?szKeyID:Translate(sim221));
			SAFE_FREE(szKeyID);
		}
		hContact = db_find_next(hContact);
	}
	ListView_Sort(hLV,(LPARAM)0x10);
}


void RefreshGPGDlg(HWND hDlg, BOOL iInit) {

	LPSTR path;

#if defined(_DEBUG) || defined(NETLIB_LOG)
	Sent_NetLog("RefreshGPGDlg");
#endif
	path = myDBGetString(0,szModuleName,"gpgExec");
	if(path) {
		SetDlgItemText(hDlg, IDC_GPGEXECUTABLE_EDIT, path);
		mir_free(path);
	}
	path = myDBGetString(0,szModuleName,"gpgHome");
	if(path) {
		SetDlgItemText(hDlg, IDC_GPGHOME_EDIT, path);
		mir_free(path);
	}
	BOOL bGPGLogFlag = DBGetContactSettingByte(0, szModuleName, "gpgLogFlag",0);
	SendMessage(GetDlgItem(hDlg,IDC_LOGGINGON_CBOX),BM_SETCHECK,(bGPGLogFlag)?BST_CHECKED:BST_UNCHECKED,0L);
	path = myDBGetString(0,szModuleName,"gpgLog");
	if(path) {
		SetDlgItemText(hDlg, IDC_GPGLOGFILE_EDIT, path);
		mir_free(path);
	}
	SendMessage(GetDlgItem(hDlg,IDC_SAVEPASS_CBOX),BM_SETCHECK,(bSavePass)?BST_CHECKED:BST_UNCHECKED,0L);
	BOOL bGPGTmpFlag = DBGetContactSettingByte(0, szModuleName, "gpgTmpFlag",0);
	SendMessage(GetDlgItem(hDlg,IDC_TMPPATHON_CBOX),BM_SETCHECK,(bGPGTmpFlag)?BST_CHECKED:BST_UNCHECKED,0L);
	path = myDBGetString(0,szModuleName,"gpgTmp");
	if(path) {
		SetDlgItemText(hDlg, IDC_GPGTMPPATH_EDIT, path);
		mir_free(path);
	}

	// rebuild list of contacts
	HWND hLV = GetDlgItem(hDlg,IDC_GPG_USERLIST);
	ListView_DeleteAllItems(hLV);

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM;

	HANDLE hContact = db_find_first();
	char tmp[NAMSIZE];

	while (hContact) {

		pUinKey ptr = getUinKey(hContact);
		if (ptr && ptr->mode==MODE_GPG && isSecureProtocol(hContact) /*&& !getMetaContact(hContact)*/ && !isChatRoom(hContact)) {

			if ( iInit ) {
				ptr->tgpgMode = ptr->gpgMode;
			}

			LPSTR szKeyID = myDBGetString(hContact,szModuleName,"gpg");

			lvi.iItem++;
			lvi.iImage = (szKeyID!=0);
			lvi.lParam = (LPARAM)ptr;

			getContactName(hContact, tmp);
			lvi.pszText = (LPSTR)&tmp;
			int itemNum = LV_InsertItem(hLV, &lvi);

			getContactUin(hContact, tmp);
			LV_SetItemText(hLV, itemNum, 1, tmp);

			LV_SetItemTextA(hLV, itemNum, 2, (szKeyID)?szKeyID:Translate(sim221));
			LV_SetItemTextA(hLV, itemNum, 3, (ptr->tgpgMode)?Translate(sim228):Translate(sim229));
			SAFE_FREE(szKeyID);
		}
		hContact = db_find_next(hContact);
	}
	ListView_Sort(hLV,(LPARAM)0x20);
}


///////////////
// R E S E T //
///////////////


void ResetGeneralDlg(HWND hDlg) {

	SetDlgItemText(hDlg,IDC_KET,_T("10"));
	SetDlgItemText(hDlg,IDC_OKT,_T("2"));

	SendMessage(GetDlgItem(hDlg,IDC_SFT),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_SOM),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_ASI),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_MCD),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_SCM),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_DGP),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_AIP),BM_SETCHECK,BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg,IDC_MCM),BM_SETCHECK,BST_UNCHECKED,0L);

//	for(int i=0;i<ADV_CNT;i++)
//		SendMessage(GetDlgItem(hDlg,IDC_ADV1+i),BM_SETCHECK,(i==0)?BST_CHECKED:BST_UNCHECKED,0L);
	SendMessage(GetDlgItem(hDlg, IDC_ADVICON), CB_SETCURSEL, 0, 0);

	// rebuild list of contacts
	HWND hLV = GetDlgItem(hDlg,IDC_STD_USERLIST);
	ListView_DeleteAllItems(hLV);

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM;

	HANDLE hContact = db_find_first();
	char tmp[NAMSIZE];

	while (hContact) {

		if (isSecureProtocol(hContact) /*&& !getMetaContact(hContact)*/ && !isChatRoom(hContact)) {

			pUinKey ptr = getUinKey(hContact);
			if (!ptr) continue;

			ptr->tmode=MODE_NATIVE;
			ptr->tstatus=STATUS_ENABLED;

			lvi.iItem++;
			lvi.iImage = ptr->tstatus;
			lvi.lParam = (LPARAM)ptr;

			getContactName(hContact, tmp);
			lvi.pszText = (LPSTR)&tmp;
			int itemNum = LV_InsertItem(hLV, &lvi);

			getContactUin(hContact, tmp);
			LV_SetItemText(hLV, itemNum, 1, tmp);

			setListViewMode(hLV, itemNum, ptr->tmode);
			setListViewStatus(hLV, itemNum, ptr->tstatus);
			if ( ptr->mode==MODE_NATIVE )	setListViewPSK(hLV, itemNum, 0);
			else				setListViewPUB(hLV, itemNum, 0);
			setListViewIcon(hLV, itemNum, ptr);
		}
		hContact = db_find_next(hContact);
	}
}


void ResetProtoDlg(HWND hDlg) {
}


///////////////
// A P P L Y //
///////////////


void ApplyGeneralSettings(HWND hDlg) {

	char timeout[5];
	int tmp,i;

	// Key Exchange Timeout
	GetDlgItemText(hDlg,IDC_KET,timeout,5);
	tmp = atoi(timeout); if(tmp > 65535) tmp = 65535;
	DBWriteContactSettingWord(0,szModuleName,"ket",tmp);
	exp->rsa_set_timeout( DBGetContactSettingWord(0,szModuleName,"ket",10));
	mir_itoa(tmp,timeout,10);
	SetDlgItemText(hDlg,IDC_KET,timeout);

	// Offline Key Timeout
	GetDlgItemText(hDlg,IDC_OKT,timeout,5);
	tmp = atoi(timeout); if(tmp > 65535) tmp = 65535;
	DBWriteContactSettingWord(0,szModuleName,"okt",tmp);
	mir_itoa(tmp,timeout,10);
	SetDlgItemText(hDlg,IDC_OKT,timeout);

	bSFT = (SendMessage(GetDlgItem(hDlg, IDC_SFT),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bSOM = (SendMessage(GetDlgItem(hDlg, IDC_SOM),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bASI = (SendMessage(GetDlgItem(hDlg, IDC_ASI),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bMCD = (SendMessage(GetDlgItem(hDlg, IDC_MCD),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bSCM = (SendMessage(GetDlgItem(hDlg, IDC_SCM),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bDGP = (SendMessage(GetDlgItem(hDlg, IDC_DGP),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bAIP = (SendMessage(GetDlgItem(hDlg, IDC_AIP),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bNOL = (SendMessage(GetDlgItem(hDlg, IDC_NOL),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bAAK = (SendMessage(GetDlgItem(hDlg, IDC_AAK),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bMCM = (SendMessage(GetDlgItem(hDlg, IDC_MCM),BM_GETCHECK,0L,0L)==BST_CHECKED);
	bADV = (BYTE)SendMessage(GetDlgItem(hDlg, IDC_ADVICON), CB_GETCURSEL, 0, 0);

	SetFlags();

	// PGP &| GPG flags
	{
	tmp = 0;
	i = SendMessage(GetDlgItem(hDlg, IDC_PGP),BM_GETCHECK,0L,0L)==BST_CHECKED;
	if(i!=bPGP) {
		bPGP = i; tmp++;
		DBWriteContactSettingByte(0, szModuleName, "pgp", bPGP);
	}
	i = SendMessage(GetDlgItem(hDlg, IDC_GPG),BM_GETCHECK,0L,0L)==BST_CHECKED;
	if(i!=bGPG) {
		bGPG = i; tmp++;
		DBWriteContactSettingByte(0, szModuleName, "gpg", bGPG);
	}
	if(tmp) msgbox1(hDlg, sim224, szModuleName, MB_OK|MB_ICONINFORMATION);
	}

	HWND hLV = GetDlgItem(hDlg,IDC_STD_USERLIST);
	i = ListView_GetNextItem(hLV,(UINT)-1,LVNI_ALL);
	while(i!=-1) {
		pUinKey ptr = (pUinKey)getListViewParam(hLV,i);
		if ( !ptr ) continue;
		if ( ptr->mode!=ptr->tmode ) {
			ptr->mode = ptr->tmode;
			DBWriteContactSettingByte(ptr->hContact, szModuleName, "mode", ptr->mode);
		}
		if ( ptr->status!=ptr->tstatus ) {
			ptr->status = ptr->tstatus;
			if(ptr->status==STATUS_ENABLED)	DBDeleteContactSetting(ptr->hContact, szModuleName, "StatusID");
			else 				DBWriteContactSettingByte(ptr->hContact, szModuleName, "StatusID", ptr->status);
		}
		if ( ptr->mode==MODE_NATIVE ) {
			if ( getListViewPSK(hLV,i)) {
			    LPSTR tmp = myDBGetString(ptr->hContact,szModuleName,"tPSK");
			    DBWriteContactSettingString(ptr->hContact, szModuleName, "PSK", tmp);
			    mir_free(tmp);
			}
			else {
			    DBDeleteContactSetting(ptr->hContact, szModuleName, "PSK");
			}
			DBDeleteContactSetting(ptr->hContact, szModuleName, "tPSK");
		}
		else
		if ( ptr->mode==MODE_RSAAES ) {
			if ( !getListViewPUB(hLV,i)) {
			    DBDeleteContactSetting(ptr->hContact, szModuleName, "rsa_pub");
			}
		}
		i = ListView_GetNextItem(hLV,i,LVNI_ALL);
	}
}


void ApplyProtoSettings(HWND hDlg) {

	LPSTR szNames = (LPSTR) alloca(2048); *szNames = '\0';

	HWND hLV = GetDlgItem(hDlg,IDC_PROTO);
	int i = ListView_GetNextItem(hLV,(UINT)-1,LVNI_ALL);
	while(i!=-1) {
		int j = getListViewProto(hLV,i);
		proto[j].inspecting = ListView_GetCheckState(hLV,i);
		char tmp[128];
		sprintf(tmp,"%s:%d:%d:%d;",proto[j].name,proto[j].inspecting,proto[j].tsplit_on,proto[j].tsplit_off);
		strcat(szNames,tmp);
		proto[j].split_on = proto[j].tsplit_on;
		proto[j].split_off = proto[j].tsplit_off;
		i = ListView_GetNextItem(hLV,i,LVNI_ALL);
	}

	DBWriteContactSettingString(0,szModuleName,"protos",szNames);
}


void ApplyPGPSettings(HWND hDlg) {

	bUseKeyrings = !(SendMessage(GetDlgItem(hDlg, IDC_NO_KEYRINGS),BM_GETCHECK,0L,0L)==BST_CHECKED);
	DBWriteContactSettingByte(0,szModuleName,"ukr",bUseKeyrings);

	char *priv = myDBGetString(0,szModuleName,"tpgpPrivKey");
	if(priv) {
   	    bPGPprivkey = true;
	    pgp_set_priv_key(priv);
		myDBWriteStringEncode(0,szModuleName,"pgpPrivKey",priv);
		mir_free(priv);
  		DBDeleteContactSetting(0,szModuleName,"tpgpPrivKey");
	}
}


void ApplyGPGSettings(HWND hDlg) {

	char tmp[256];

	GetDlgItemText(hDlg, IDC_GPGEXECUTABLE_EDIT, tmp, sizeof(tmp));
	DBWriteContactSettingString(0,szModuleName,"gpgExec",tmp);
	GetDlgItemText(hDlg, IDC_GPGHOME_EDIT, tmp, sizeof(tmp));
	DBWriteContactSettingString(0,szModuleName,"gpgHome",tmp);

	bSavePass = (SendMessage(GetDlgItem(hDlg, IDC_SAVEPASS_CBOX),BM_GETCHECK,0L,0L)==BST_CHECKED);
	DBWriteContactSettingByte(0,szModuleName,"gpgSaveFlag",bSavePass);

	BOOL bgpgLogFlag = (SendMessage(GetDlgItem(hDlg, IDC_LOGGINGON_CBOX),BM_GETCHECK,0L,0L)==BST_CHECKED);
	DBWriteContactSettingByte(0,szModuleName,"gpgLogFlag",bgpgLogFlag);
	GetDlgItemText(hDlg, IDC_GPGLOGFILE_EDIT, tmp, sizeof(tmp));
	DBWriteContactSettingString(0,szModuleName,"gpgLog",tmp);
	if(bgpgLogFlag)	gpg_set_log(tmp);
	else gpg_set_log(0);

	BOOL bgpgTmpFlag = (SendMessage(GetDlgItem(hDlg, IDC_TMPPATHON_CBOX),BM_GETCHECK,0L,0L)==BST_CHECKED);
	DBWriteContactSettingByte(0,szModuleName,"gpgTmpFlag",bgpgTmpFlag);
	GetDlgItemText(hDlg, IDC_GPGTMPPATH_EDIT, tmp, sizeof(tmp));
	DBWriteContactSettingString(0,szModuleName,"gpgTmp",tmp);
	if(bgpgTmpFlag)	gpg_set_tmp(tmp);
	else gpg_set_tmp(0);

	HWND hLV = GetDlgItem(hDlg,IDC_GPG_USERLIST);
	int i = ListView_GetNextItem(hLV,(UINT)-1,LVNI_ALL);
	while(i!=-1) {
		pUinKey ptr = (pUinKey)getListViewParam(hLV,i);
		if ( !ptr ) continue;
		if ( ptr->gpgMode != ptr->tgpgMode ) {
			ptr->gpgMode = ptr->tgpgMode;
			if ( ptr->gpgMode )	DBWriteContactSettingByte(ptr->hContact,szModuleName,"gpgANSI",1);
			else              	DBDeleteContactSetting(ptr->hContact,szModuleName,"gpgANSI");
		}			

		i = ListView_GetNextItem(hLV,i,LVNI_ALL);
	}
}


///////////////
// O T H E R //
///////////////


LPARAM getListViewParam(HWND hLV, UINT iItem) {

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.iItem = iItem;
	lvi.mask = LVIF_PARAM;
	ListView_GetItem(hLV, &lvi);
	return lvi.lParam;
}


void setListViewIcon(HWND hLV, UINT iItem, pUinKey ptr) {

	LVITEM lvi; memset(&lvi,0,sizeof(lvi));
	lvi.iItem = iItem;
	switch(ptr->tmode) {
	case MODE_NATIVE:
	case MODE_RSAAES:
		lvi.iImage = ICO_ST_DIS+ptr->tstatus;
		break;
	case MODE_PGP:
		lvi.iImage = ICO_OV_PGP;
		break;
	case MODE_GPG:
		lvi.iImage = ICO_OV_GPG;
		break;
	}
	lvi.mask = LVIF_IMAGE;
	ListView_SetItem(hLV, &lvi);
}


void setListViewMode(HWND hLV, UINT iItem, UINT iMode) {

	char tmp[256];
	strncpy(tmp, Translate(sim231[iMode]), sizeof(tmp));
	LV_SetItemTextA(hLV, iItem, 2, tmp);
}


void setListViewStatus(HWND hLV, UINT iItem, UINT iStatus) {

	char tmp[128];
	strncpy(tmp, Translate(sim232[iStatus]), sizeof(tmp));
	LV_SetItemTextA(hLV, iItem, 3, tmp);
}


UINT getListViewPSK(HWND hLV, UINT iItem) {

	char str[128];
	LV_GetItemTextA(hLV, iItem, 4, str, sizeof(str));
	return strncmp(str, Translate(sim206), sizeof(str))==0;
}


void setListViewPSK(HWND hLV, UINT iItem, UINT iStatus) {

	char str[128];
	strncpy(str, (iStatus)?Translate(sim206):"-", sizeof(str));
	LV_SetItemTextA(hLV, iItem, 4, str);
}


UINT getListViewPUB(HWND hLV, UINT iItem) {

	char str[128];
	LV_GetItemTextA(hLV, iItem, 4, str, sizeof(str));
	return strncmp(str, Translate(sim233), sizeof(str))==0;
}


void setListViewPUB(HWND hLV, UINT iItem, UINT iStatus) {

	char str[128];
	strncpy(str, (iStatus)?Translate(sim233):"-", sizeof(str));
	LV_SetItemTextA(hLV, iItem, 4, str);

	LPSTR sha = NULL;
	if ( iStatus ) {
		DBVARIANT dbv;
		dbv.type = DBVT_BLOB;
		pUinKey ptr = (pUinKey) getListViewParam(hLV, iItem);
		if ( DBGetContactSetting(ptr->hContact,szModuleName,"rsa_pub",&dbv) == 0 ) {
			int len;
			exp->rsa_get_hash((PBYTE)dbv.pbVal,dbv.cpbVal,(PBYTE)str,&len);
			sha = mir_strdup(to_hex((PBYTE)str,len));
			DBFreeVariant(&dbv);
		}
	}
	if ( sha ) {
		LV_SetItemTextA(hLV, iItem, 5, sha);
		mir_free(sha);
	}
	else	LV_SetItemTextA(hLV, iItem, 5, "");
}


int CALLBACK CompareFunc(LPARAM lParam1, LPARAM lParam2, LPARAM lParamSort) {
    char t1[NAMSIZE], t2[NAMSIZE];
    int s,d,m=1;
	DBVARIANT dbv1,dbv2;

	if(lParamSort&0x100) {
		lParamSort&=0xFF;
		m=-1;
	}

	switch(lParamSort){
	case 0x01:
	case 0x11:
	case 0x21: {
		getContactNameA(pUinKey(lParam1)->hContact, t1);
		getContactNameA(pUinKey(lParam2)->hContact, t2);
		return strncmp(t1,t2,NAMSIZE)*m;
	} break;
	case 0x02:
	case 0x12:
	case 0x22: {
		getContactUinA(pUinKey(lParam1)->hContact, t1);
		getContactUinA(pUinKey(lParam2)->hContact, t2);
		return strncmp(t1,t2,NAMSIZE)*m;
	} break;
	case 0x03: {
		s = pUinKey(lParam1)->tmode;
		d = pUinKey(lParam2)->tmode;
		return (s-d)*m;
	} break;
	case 0x13: {
		DBGetContactSetting(pUinKey(lParam1)->hContact,szModuleName,"pgp_abbr",&dbv1);
		DBGetContactSetting(pUinKey(lParam2)->hContact,szModuleName,"pgp_abbr",&dbv2);
		s=(dbv1.type==DBVT_ASCIIZ);
		d=(dbv2.type==DBVT_ASCIIZ);
		if(s && d) {
			s=strcmp(dbv1.pszVal,dbv2.pszVal);
			d=0;
		}
		DBFreeVariant(&dbv1);
		DBFreeVariant(&dbv2);
		return (s-d)*m;
	} break;
	case 0x23: {
		DBGetContactSetting(pUinKey(lParam1)->hContact,szModuleName,"gpg",&dbv1);
		DBGetContactSetting(pUinKey(lParam2)->hContact,szModuleName,"gpg",&dbv2);
		s=(dbv1.type==DBVT_ASCIIZ);
		d=(dbv2.type==DBVT_ASCIIZ);
		if(s && d) {
			s=strcmp(dbv1.pszVal,dbv2.pszVal);
			d=0;
		}
		DBFreeVariant(&dbv1);
		DBFreeVariant(&dbv2);
		return (s-d)*m;
	} break;
	case 0x04: {
		s = pUinKey(lParam1)->tstatus;
		d = pUinKey(lParam2)->tstatus;
		return (s-d)*m;
	} break;
	case 0x05: {
		DBGetContactSetting(pUinKey(lParam1)->hContact,szModuleName,"PSK",&dbv1);
		s=(dbv1.type==DBVT_ASCIIZ);
		DBFreeVariant(&dbv1);
		DBGetContactSetting(pUinKey(lParam2)->hContact,szModuleName,"PSK",&dbv2);
		d=(dbv2.type==DBVT_ASCIIZ);
		DBFreeVariant(&dbv2);
		return (s-d)*m;
	} break;
	}
	return 0;
}


void ListView_Sort(HWND hLV, LPARAM lParamSort) {
    char t[32];

	// restore sort column
	sprintf(t,"os%02x",(UINT)lParamSort&0xF0);
	if ((lParamSort&0x0F)==0) {
		lParamSort=(int)DBGetContactSettingByte(0, szModuleName, t, lParamSort+1);
	}
	DBWriteContactSettingByte(0, szModuleName, t, (BYTE)lParamSort);

	// restore sort order
	sprintf(t,"os%02x",(UINT)lParamSort);
	int m=DBGetContactSettingByte(0, szModuleName, t, 0);
	if(bChangeSortOrder){ m=!m; DBWriteContactSettingByte(0, szModuleName, t, m); }

	ListView_SortItems(hLV,&CompareFunc,lParamSort|(m<<8));
}


BOOL ShowSelectKeyDlg(HWND hParent, LPSTR KeyPath)
{
   OPENFILENAME ofn; memset(&ofn, 0, sizeof(ofn));
   ofn.lStructSize = sizeof(ofn);
   ofn.hwndOwner = hParent;
   ofn.nMaxFile = MAX_PATH;
   ofn.Flags = OFN_EXPLORER | OFN_FILEMUSTEXIST | OFN_NONETWORKBUTTON;

   ofn.lpstrFile = KeyPath;
   ofn.lpstrFilter = _T("ASC files\0*.asc\0All files (*.*)\0*.*\0");
   ofn.lpstrTitle = _T("Open Key File");
   if (!GetOpenFileName(&ofn)) return FALSE;

   return TRUE;
}


LPCSTR priv_beg = "-----BEGIN PGP PRIVATE KEY BLOCK-----";
LPCSTR priv_end = "-----END PGP PRIVATE KEY BLOCK-----";
LPCSTR publ_beg = "-----BEGIN PGP PUBLIC KEY BLOCK-----";
LPCSTR publ_end = "-----END PGP PUBLIC KEY BLOCK-----";

LPSTR LoadKeys(LPCSTR file,BOOL priv) {
	FILE *f=fopen(file,"r");
	if (!f) return NULL;

	fseek(f,0,SEEK_END);
	int flen = ftell(f);
	fseek(f,0,SEEK_SET);

	LPCSTR beg,end;
	if(priv) {
		beg = priv_beg;
		end = priv_end;
	}
	else {
		beg = publ_beg;
		end = publ_end;
	}

	LPSTR keys = (LPSTR)mir_alloc(flen+1);
	int i=0; BOOL b=false;
	while(fgets(keys+i,128,f)) {
		if (!b && strncmp(keys+i,beg,strlen(beg))==0) {
			b=true;
		}
		else
		if(b && strncmp(keys+i,end,strlen(end))==0) {
			i+=(int)strlen(keys+i);
			b=false;
		}
		if(b) {
			i+=(int)strlen(keys+i);
		}
	}
	*(keys+i)='\0';
/*	while(flen) {
		int block = (flen>32768)?32768:flen;
		fread(keys+i,block,1,f);
		i+=block;
		flen-=block;
	}*/
	fclose(f);
	return keys;
}


BOOL SaveExportRSAKeyDlg(HWND hParent, LPSTR key, BOOL priv)
{
   TCHAR szFile[MAX_PATH] = _T("rsa_pub.asc"); 
   if ( priv ) _tcscpy(szFile,_T("rsa_priv.asc"));

   OPENFILENAME ofn; memset(&ofn, 0, sizeof(ofn));
   ofn.lStructSize = sizeof(ofn);
   ofn.hwndOwner = hParent;
   ofn.nMaxFile = MAX_PATH;
   ofn.Flags = OFN_EXPLORER | OFN_FILEMUSTEXIST | OFN_NONETWORKBUTTON;
   ofn.lpstrFile = szFile;
   ofn.lpstrFilter = _T("ASC files\0*.asc\0All files (*.*)\0*.*\0");
   ofn.lpstrTitle = (priv)?_T("Save Private Key File"):_T("Save Public Key File");
   if (!GetSaveFileName(&ofn)) return FALSE;

   FILE *f=_tfopen(szFile,_T("wb"));
   if ( !f ) return FALSE;
   fwrite(key,strlen(key),1,f);
   fclose(f);

   return TRUE;
}


BOOL LoadImportRSAKeyDlg(HWND hParent, LPSTR key, BOOL priv)
{
   TCHAR szFile[MAX_PATH] = _T("rsa_pub.asc"); 
   if ( priv ) _tcscpy(szFile,_T("rsa_priv.asc"));

   OPENFILENAME ofn; memset(&ofn, 0, sizeof(ofn));
   ofn.lStructSize = sizeof(ofn);
   ofn.hwndOwner = hParent;
   ofn.nMaxFile = MAX_PATH;
   ofn.Flags = OFN_EXPLORER | OFN_CREATEPROMPT | OFN_OVERWRITEPROMPT | OFN_NOREADONLYRETURN;
   ofn.lpstrFile = szFile;
   ofn.lpstrFilter = _T("ASC files\0*.asc\0All files (*.*)\0*.*\0");
   ofn.lpstrTitle = (priv)?_T("Load Private Key File"):_T("Load Public Key File");
   if (!GetOpenFileName(&ofn)) return FALSE;

   FILE *f=_tfopen(szFile,_T("rb"));
   if ( !f ) return FALSE;

   fseek(f,0,SEEK_END);
   int flen = ftell(f); if(flen>RSASIZE) { fclose(f); return FALSE; }
   fseek(f,0,SEEK_SET);

   fread(key,flen,1,f);
   fclose(f);

   return TRUE;
}


int onRegisterOptions(WPARAM wParam, LPARAM)
{
	OPTIONSDIALOGPAGE odp = { 0 };
	odp.cbSize = sizeof(odp);
	odp.hInstance = g_hInst;
	odp.pszTemplate = MAKEINTRESOURCEA(IDD_OPTIONSTAB);
	odp.pszTitle = (char*)szModuleName;
	odp.pszGroup = LPGEN("Services");
	odp.pfnDlgProc = OptionsDlgProc;
	Options_AddPage(wParam, &odp);
	return 0;
}

// EOF