diff options
Diffstat (limited to 'protocols/Tlen/src/tlen_userinfo.cpp')
| -rw-r--r-- | protocols/Tlen/src/tlen_userinfo.cpp | 328 |
1 files changed, 0 insertions, 328 deletions
diff --git a/protocols/Tlen/src/tlen_userinfo.cpp b/protocols/Tlen/src/tlen_userinfo.cpp deleted file mode 100644 index 8bf7c07045..0000000000 --- a/protocols/Tlen/src/tlen_userinfo.cpp +++ /dev/null @@ -1,328 +0,0 @@ -/*
-
-Jabber Protocol Plugin for Miranda IM
-Tlen Protocol Plugin for Miranda NG
-Copyright (C) 2002-2004 Santithorn Bunchua
-Copyright (C) 2004-2007 Piotr Piastucki
-
-This program is free software; you can redistribute it and/or
-modify it under the terms of the GNU General Public License
-as published by the Free Software Foundation; either version 2
-of the License, or (at your option) any later version.
-
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-GNU General Public License for more details.
-
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-
-*/
-
-#include "stdafx.h"
-#include <commctrl.h>
-#include <io.h>
-#include <fcntl.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include "tlen_list.h"
-#include "resource.h"
-#include "tlen_avatar.h"
-
-TLEN_FIELD_MAP tlenFieldGender[] = {
- { 1, L"Male" },
- { 2, L"Female" },
- { 0, nullptr }
-};
-TLEN_FIELD_MAP tlenFieldLookfor[] = {
- { 1, L"Somebody to talk" },
- { 2, L"Friendship" },
- { 3, L"Flirt/romance" },
- { 4, L"Love" },
- { 5, L"Nothing" },
- { 0, nullptr }
-};
-TLEN_FIELD_MAP tlenFieldStatus[] = {
- { 1, L"All" },
- { 2, L"Available" },
- { 3, L"Free for chat" },
- { 0, nullptr }
-};
-TLEN_FIELD_MAP tlenFieldOccupation[] = {
- { 1, L"Student" },
- { 2, L"College student" },
- { 3, L"Farmer" },
- { 4, L"Manager" },
- { 5, L"Specialist" },
- { 6, L"Clerk" },
- { 7, L"Unemployed" },
- { 8, L"Pensioner" },
- { 9, L"Housekeeper" },
- { 10, L"Teacher" },
- { 11, L"Doctor" },
- { 12, L"Other" },
- { 0, nullptr }
-};
-TLEN_FIELD_MAP tlenFieldPlan[] = {
- { 1, L"I'd like to go downtown" },
- { 2, L"I'd like to go to the cinema" },
- { 3, L"I'd like to take a walk" },
- { 4, L"I'd like to go to the disco" },
- { 5, L"I'd like to go on a blind date" },
- { 6, L"Waiting for suggestion" },
- { 0, nullptr }
-};
-
-static INT_PTR CALLBACK TlenUserInfoDlgProc(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
-
-static void InitComboBox(HWND hwndCombo, TLEN_FIELD_MAP *fieldMap)
-{
- int i, n;
-
- n = SendMessage(hwndCombo, CB_ADDSTRING, 0, (LPARAM)L"");
- SendMessage(hwndCombo, CB_SETITEMDATA, n, 0);
- SendMessage(hwndCombo, CB_SETCURSEL, n, 0);
- for (i=0;;i++) {
- if (fieldMap[i].name == nullptr)
- break;
- n = SendMessage(hwndCombo, CB_ADDSTRING, 0, (LPARAM) TranslateW(fieldMap[i].name));
- SendMessage(hwndCombo, CB_SETITEMDATA, n, fieldMap[i].id);
- }
-}
-
-static void FetchField(HWND hwndDlg, UINT idCtrl, char *fieldName, char **str, int *strSize)
-{
- char text[512];
- char *localFieldName, *localText;
-
- if (hwndDlg == nullptr || fieldName == nullptr || str == nullptr || strSize == nullptr)
- return;
- GetDlgItemTextA(hwndDlg, idCtrl, text, _countof(text));
- if (text[0]) {
- if ((localFieldName=TlenTextEncode(fieldName)) != nullptr) {
- if ((localText=TlenTextEncode(text)) != nullptr) {
- TlenStringAppend(str, strSize, "<%s>%s</%s>", localFieldName, localText, localFieldName);
- mir_free(localText);
- }
- mir_free(localFieldName);
- }
- }
-}
-
-static void FetchCombo(HWND hwndDlg, UINT idCtrl, char *fieldName, char **str, int *strSize)
-{
- if (hwndDlg == nullptr || fieldName == nullptr || str == nullptr || strSize == nullptr)
- return;
-
- int value = (int) SendDlgItemMessage(hwndDlg, idCtrl, CB_GETITEMDATA, SendDlgItemMessage(hwndDlg, idCtrl, CB_GETCURSEL, 0, 0), 0);
- if (value > 0) {
- if (char *localFieldName = TlenTextEncode(fieldName)) {
- TlenStringAppend(str, strSize, "<%s>%d</%s>", localFieldName, value, localFieldName);
- mir_free(localFieldName);
- }
- }
-}
-
-int TlenProtocol::UserInfoInit(WPARAM wParam, LPARAM lParam)
-{
- if (!Proto_GetAccount(m_szModuleName))
- return 0;
-
- MCONTACT hContact = (MCONTACT) lParam;
- char *szProto = GetContactProto(hContact);
- if ((szProto != nullptr && !mir_strcmp(szProto, m_szModuleName)) || !lParam) {
- OPTIONSDIALOGPAGE odp = { 0 };
- odp.hInstance = hInst;
- odp.flags = ODPF_UNICODE;
- odp.pfnDlgProc = TlenUserInfoDlgProc;
- odp.position = -2000000000;
- odp.pszTemplate = ((HANDLE)lParam != nullptr) ? MAKEINTRESOURCEA(IDD_USER_INFO):MAKEINTRESOURCEA(IDD_USER_VCARD);
- odp.szTitle.w = (hContact != NULL) ? LPGENW("Account") : m_tszUserName;
- odp.dwInitParam = (LPARAM)this;
- UserInfo_AddPage(wParam, &odp);
-
- }
- if (!lParam && isOnline) {
- CCSDATA ccs = {0};
- GetInfo(0, (LPARAM) &ccs);
- }
- return 0;
-}
-
-typedef struct {
- TlenProtocol *proto;
- MCONTACT hContact;
-}TLENUSERINFODLGDATA;
-
-
-static INT_PTR CALLBACK TlenUserInfoDlgProc(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam)
-{
- TLENUSERINFODLGDATA *data = (TLENUSERINFODLGDATA *) GetWindowLongPtr(hwndDlg, GWLP_USERDATA);
- switch (msg) {
- case WM_INITDIALOG:
-
- data = (TLENUSERINFODLGDATA*)mir_alloc(sizeof(TLENUSERINFODLGDATA));
- data->hContact = (MCONTACT) lParam;
- SetWindowLongPtr(hwndDlg, GWLP_USERDATA, (LONG_PTR)data);
- // lParam is hContact
- TranslateDialogDefault(hwndDlg);
- InitComboBox(GetDlgItem(hwndDlg, IDC_GENDER), tlenFieldGender);
- InitComboBox(GetDlgItem(hwndDlg, IDC_OCCUPATION), tlenFieldOccupation);
- InitComboBox(GetDlgItem(hwndDlg, IDC_LOOKFOR), tlenFieldLookfor);
-
- return TRUE;
- case WM_TLEN_REFRESH:
- {
- DBVARIANT dbv;
- char *jid;
- int i;
- TLEN_LIST_ITEM *item;
-
- SetDlgItemText(hwndDlg, IDC_INFO_JID, L"");
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, L"");
- SetFocus(GetDlgItem(hwndDlg, IDC_STATIC));
-
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "FirstName", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_FIRSTNAME, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_FIRSTNAME, L"");
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "LastName", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_LASTNAME, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_LASTNAME, L"");
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "Nick", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_NICKNAME, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_NICKNAME, L"");
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "e-mail", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_EMAIL, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_EMAIL, L"");
- if (!db_get(data->hContact, data->proto->m_szModuleName, "Age", &dbv)) {
- SetDlgItemInt(hwndDlg, IDC_AGE, dbv.wVal, FALSE);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_AGE, L"");
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "City", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_CITY, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_CITY, L"");
- if (!db_get_ws(data->hContact, data->proto->m_szModuleName, "School", &dbv)) {
- SetDlgItemText(hwndDlg, IDC_SCHOOL, dbv.ptszVal);
- db_free(&dbv);
- } else SetDlgItemText(hwndDlg, IDC_SCHOOL, L"");
- switch (db_get_b(data->hContact, data->proto->m_szModuleName, "Gender", '?')) {
- case 'M':
- SendDlgItemMessage(hwndDlg, IDC_GENDER, CB_SETCURSEL, 1, 0);
- SetDlgItemText(hwndDlg, IDC_GENDER_TEXT, TranslateW(tlenFieldGender[0].name));
- break;
- case 'F':
- SendDlgItemMessage(hwndDlg, IDC_GENDER, CB_SETCURSEL, 2, 0);
- SetDlgItemText(hwndDlg, IDC_GENDER_TEXT, TranslateW(tlenFieldGender[1].name));
- break;
- default:
- SendDlgItemMessage(hwndDlg, IDC_GENDER, CB_SETCURSEL, 0, 0);
- SetDlgItemText(hwndDlg, IDC_GENDER_TEXT, L"");
- break;
- }
- i = db_get_w(data->hContact, data->proto->m_szModuleName, "Occupation", 0);
- if (i>0 && i<13) {
- SetDlgItemText(hwndDlg, IDC_OCCUPATION_TEXT, TranslateW(tlenFieldOccupation[i-1].name));
- SendDlgItemMessage(hwndDlg, IDC_OCCUPATION, CB_SETCURSEL, i, 0);
- } else {
- SetDlgItemText(hwndDlg, IDC_OCCUPATION_TEXT, L"");
- SendDlgItemMessage(hwndDlg, IDC_OCCUPATION, CB_SETCURSEL, 0, 0);
- }
- i = db_get_w(data->hContact, data->proto->m_szModuleName, "LookingFor", 0);
- if (i>0 && i<6) {
- SetDlgItemText(hwndDlg, IDC_LOOKFOR_TEXT, TranslateW(tlenFieldLookfor[i-1].name));
- SendDlgItemMessage(hwndDlg, IDC_LOOKFOR, CB_SETCURSEL, i, 0);
- } else {
- SetDlgItemText(hwndDlg, IDC_LOOKFOR_TEXT, L"");
- SendDlgItemMessage(hwndDlg, IDC_LOOKFOR, CB_SETCURSEL, 0, 0);
- }
- i = db_get_w(data->hContact, data->proto->m_szModuleName, "VoiceChat", 0);
- CheckDlgButton(hwndDlg, IDC_VOICECONVERSATIONS, i ? BST_CHECKED : BST_UNCHECKED);
- i = db_get_w(data->hContact, data->proto->m_szModuleName, "PublicStatus", 0);
- CheckDlgButton(hwndDlg, IDC_PUBLICSTATUS, i ? BST_CHECKED : BST_UNCHECKED);
- if (!db_get(data->hContact, data->proto->m_szModuleName, "jid", &dbv)) {
- jid = TlenTextDecode(dbv.pszVal);
- SetDlgItemTextA(hwndDlg, IDC_INFO_JID, jid);
- mir_free(jid);
- jid = dbv.pszVal;
- if (data->proto->isOnline) {
- if ((item=TlenListGetItemPtr(data->proto, LIST_ROSTER, jid)) != nullptr) {
- switch (item->subscription) {
- case SUB_BOTH:
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, TranslateT("both"));
- break;
- case SUB_TO:
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, TranslateT("to"));
- break;
- case SUB_FROM:
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, TranslateT("from"));
- break;
- default:
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, TranslateT("none"));
- break;
- }
- SetDlgItemTextA(hwndDlg, IDC_SOFTWARE, item->software);
- SetDlgItemTextA(hwndDlg, IDC_VERSION, item->version);
- SetDlgItemTextA(hwndDlg, IDC_SYSTEM, item->system);
- } else {
- SetDlgItemText(hwndDlg, IDC_SUBSCRIPTION, TranslateT("not on roster"));
- }
- }
- db_free(&dbv);
- }
- }
- break;
- case WM_NOTIFY:
- switch (((LPNMHDR)lParam)->idFrom) {
- case 0:
- switch (((LPNMHDR)lParam)->code) {
- case PSN_INFOCHANGED:
- {
- MCONTACT hContact = (MCONTACT) ((LPPSHNOTIFY) lParam)->lParam;
- SendMessage(hwndDlg, WM_TLEN_REFRESH, 0, (LPARAM) hContact);
- }
- break;
- case PSN_PARAMCHANGED:
- {
- data->proto = ( TlenProtocol* )(( LPPSHNOTIFY )lParam )->lParam;
- SendMessage(hwndDlg, WM_TLEN_REFRESH, 0, 0);
- }
- }
- break;
- }
- break;
- case WM_COMMAND:
- if (LOWORD(wParam) == IDC_SAVE && HIWORD(wParam) == BN_CLICKED) {
- char *str = nullptr;
- int strSize;
- TlenStringAppend(&str, &strSize, "<iq type='set' id='" TLEN_IQID "%d' to='tuba'><query xmlns='jabber:iq:register'>", TlenSerialNext(data->proto));
- FetchField(hwndDlg, IDC_FIRSTNAME, "first", &str, &strSize);
- FetchField(hwndDlg, IDC_LASTNAME, "last", &str, &strSize);
- FetchField(hwndDlg, IDC_NICKNAME, "nick", &str, &strSize);
- FetchField(hwndDlg, IDC_EMAIL, "email", &str, &strSize);
- FetchCombo(hwndDlg, IDC_GENDER, "s", &str, &strSize);
- FetchField(hwndDlg, IDC_AGE, "b", &str, &strSize);
- FetchField(hwndDlg, IDC_CITY, "c", &str, &strSize);
- FetchCombo(hwndDlg, IDC_OCCUPATION, "j", &str, &strSize);
- FetchField(hwndDlg, IDC_SCHOOL, "e", &str, &strSize);
- FetchCombo(hwndDlg, IDC_LOOKFOR, "r", &str, &strSize);
- TlenStringAppend(&str, &strSize, "<g>%d</g>", IsDlgButtonChecked(hwndDlg, IDC_VOICECONVERSATIONS) ? 1 : 0);
- TlenStringAppend(&str, &strSize, "<v>%d</v>", IsDlgButtonChecked(hwndDlg, IDC_PUBLICSTATUS) ? 1 : 0);
- TlenStringAppend(&str, &strSize, "</query></iq>");
- TlenSend(data->proto, "%s", str);
- mir_free(str);
- data->proto->GetInfo(NULL, 0);
- }
- break;
- case WM_DESTROY:
- mir_free(data);
- break;
- }
- return FALSE;
-}
|