Develop and Download Open Source Software

Browse Subversion Repository

Annotation of /branches/ttcomtester/teraterm/teraterm/ftdlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 9048 - (hide annotations) (download) (as text)
Wed Dec 16 12:24:13 2020 UTC (3 years, 3 months ago) by nmaya
Original Path: trunk/teraterm/teraterm/ftdlg.cpp
File MIME type: text/x-c++src
File size: 9458 byte(s)
ソースファイルの著作権表記の "最後の発行の年" を削除

ticket #40996
1 doda 6806 /*
2     * Copyright (C) 1994-1998 T. Teranishi
3 nmaya 9048 * (C) 2007- TeraTerm Project
4 doda 6806 * All rights reserved.
5     *
6 doda 6841 * Redistribution and use in source and binary forms, with or without
7     * modification, are permitted provided that the following conditions
8     * are met:
9 doda 6806 *
10 doda 6841 * 1. Redistributions of source code must retain the above copyright
11     * notice, this list of conditions and the following disclaimer.
12     * 2. Redistributions in binary form must reproduce the above copyright
13     * notice, this list of conditions and the following disclaimer in the
14     * documentation and/or other materials provided with the distribution.
15     * 3. The name of the author may not be used to endorse or promote products
16     * derived from this software without specific prior written permission.
17 doda 6806 *
18 doda 6841 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
19     * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20     * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21     * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
22     * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23     * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24     * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25     * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26     * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27     * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 doda 6806 */
29 maya 3227
30     /* TERATERM.EXE, file transfer dialog box */
31 zmatsuo 7554 #include "teraterm_conf.h"
32    
33 zmatsuo 7526 #include <stdio.h>
34     #include <windows.h>
35     #include <commctrl.h>
36 zmatsuo 7554
37 maya 3227 #include "teraterm.h"
38     #include "tttypes.h"
39     #include "ttftypes.h"
40     #include "ttlib.h"
41 zmatsuo 7526 #include "dlglib.h"
42 maya 3227 #include "tt_res.h"
43     #include "ftdlg.h"
44 zmatsuo 7528 #include "teraterml.h"
45 zmatsuo 8225 #include "helpid.h"
46 zmatsuo 8857 #include "filesys.h"
47 zmatsuo 8899 #include "codeconv.h"
48 maya 3227
49     /////////////////////////////////////////////////////////////////////////////
50     // CFileTransDlg dialog
51    
52 zmatsuo 8895 CFileTransDlg::CFileTransDlg()
53 maya 3227 {
54 zmatsuo 8895 SmallIcon = NULL;
55     BigIcon = NULL;
56     DlgCaption = NULL;
57     FileName = NULL;
58     FullName = NULL;
59     ProgStat = 0;
60     }
61    
62     CFileTransDlg::~CFileTransDlg()
63     {
64     free(DlgCaption);
65     free(FileName);
66     free(FullName);
67     }
68    
69     BOOL CFileTransDlg::Create(HINSTANCE hInstance, CFileTransDlgInfo *info)
70     {
71 maya 3392 BOOL Ok;
72     int fuLoad = LR_DEFAULTCOLOR;
73 maya 4822 HWND hwnd;
74 maya 3227
75 zmatsuo 8895 UILanguageFile = info->UILanguageFile;
76     OpId = info->OpId;
77 zmatsuo 8899 DlgCaption = _wcsdup(info->DlgCaption);
78     FullName = _wcsdup(info->FullName);
79 zmatsuo 8902 if (info->FileName != NULL) {
80     FileName = _wcsdup(info->FileName);
81     }
82     else {
83     const wchar_t *fullname = info->FullName;
84     const wchar_t *p = wcsrchr(fullname, L'\\');
85     if (p == NULL) {
86     p = wcsrchr(fullname, L'/');
87     }
88     if (p == NULL) {
89     FileName = _wcsdup(fullname);
90     }
91     else {
92     FileName = _wcsdup(p + 1);
93     }
94     }
95 zmatsuo 8895 HideDialog = info->HideDialog;
96     HMainWin = info->HMainWin;
97 maya 3227
98 maya 3392 Pause = FALSE;
99 zmatsuo 7526 hwnd = GetForegroundWindow();
100 zmatsuo 8895 if (OpId == OpLog) { // parent window is desktop
101 zmatsuo 8850 Ok = TTCDialog::Create(hInstance, GetDesktopWindow(), IDD_FILETRANSDLG);
102 maya 3392 }
103     else { // parent window is VT window
104 zmatsuo 8850 Ok = TTCDialog::Create(hInstance, NULL, IDD_FILETRANSDLG);
105 maya 3392 }
106 zmatsuo 8895 if (OpId == OpSendFile) {
107     HWND HProg = ::GetDlgItem(m_hWnd, IDC_TRANSPROGRESS);
108    
109     ProgStat = 0;
110    
111     ::SendMessage(HProg, PBM_SETRANGE, (WPARAM)0, MAKELPARAM(0, 100));
112     ::SendMessage(HProg, PBM_SETSTEP, (WPARAM)1, 0);
113     ::SendMessage(HProg, PBM_SETPOS, (WPARAM)0, 0);
114    
115     ::ShowWindow(HProg, SW_SHOW);
116    
117 zmatsuo 8857 ::ShowWindow(GetDlgItem(IDC_TRANS_ELAPSED), SW_SHOW);
118     }
119 maya 3227
120 zmatsuo 8895 if (!HideDialog) {
121 maya 4818 // Visible = False ���_�C�A���O���\������
122 maya 3709 ShowWindow(SW_SHOWNORMAL);
123 zmatsuo 8895 if (OpId == OpLog) {
124 maya 3392 ShowWindow(SW_MINIMIZE);
125     }
126     }
127 maya 3596 else {
128 maya 4822 // ���O���t�H�A�O���E���h�������E�B���h�E���t�H�[�J�X�������B
129     // ���j���[�������O���X�^�[�g�������� VTWin ���t�H�[�J�X���������������K�v�������B
130 maya 3600 ::SetForegroundWindow(hwnd);
131 maya 3596 }
132 maya 3227
133 maya 3392 return Ok;
134 maya 3227 }
135    
136 zmatsuo 8895 BOOL CFileTransDlg::Create(HINSTANCE hInstance, HWND hParent, PFileVar fv, PComVar pcv, PTTSet pts)
137     {
138     CFileTransDlgInfo info;
139    
140     info.UILanguageFile = pts->UILanguageFile;
141     info.OpId = fv->OpId;
142 zmatsuo 8899 info.DlgCaption = ToWcharA(fv->DlgCaption);
143     info.FileName = ToWcharA(&fv->FullName[fv->DirLen]);
144     info.FullName = ToWcharA(fv->FullName);
145 zmatsuo 8895 info.HideDialog = fv->HideDialog;
146     info.HMainWin = fv->HMainWin;
147     BOOL r = Create(hInstance, &info);
148     fv->HWin = m_hWnd;
149     fv->ProgStat = ProgStat;
150 zmatsuo 8899 free(info.DlgCaption);
151     free(info.FileName);
152     free(info.FullName);
153 zmatsuo 8895 return r;
154     }
155    
156 zmatsuo 8857 /**
157     * �e�L�X�g�����X����
158     */
159 maya 3227 void CFileTransDlg::ChangeButton(BOOL PauseFlag)
160     {
161 maya 3392 Pause = PauseFlag;
162     if (Pause) {
163 zmatsuo 8857 static const DlgTextInfo TextInfos[] = {
164     { IDC_TRANSPAUSESTART, "DLG_FILETRANS_START" },
165     };
166     SetDlgTexts(m_hWnd, TextInfos, _countof(TextInfos), UILanguageFile);
167 maya 3392 }
168     else {
169 zmatsuo 8857 static const DlgTextInfo TextInfos[] = {
170     { IDC_TRANSPAUSESTART, "DLG_FILETRANS_PAUSE" },
171     };
172     SetDlgTexts(m_hWnd, TextInfos, _countof(TextInfos), UILanguageFile);
173 maya 3392 }
174 maya 3227 }
175    
176 zmatsuo 8895 void CFileTransDlg::RefreshNum(DWORD StartTime, LONG FileSize, LONG ByteCount)
177 maya 3227 {
178 maya 3392 char NumStr[24];
179     double rate;
180 doda 4454 int rate2;
181     static DWORD prev_elapsed;
182     DWORD elapsed;
183 maya 3227
184 zmatsuo 8895 if (OpId == OpSendFile) {
185     if (StartTime == 0) {
186 doda 4461 SetDlgItemText(IDC_TRANS_ETIME, "0:00");
187 doda 4454 prev_elapsed = 0;
188     }
189     else {
190 zmatsuo 8895 elapsed = (GetTickCount() - StartTime) / 1000;
191 doda 4454 if (elapsed != prev_elapsed && elapsed != 0) {
192 zmatsuo 8895 rate2 = ByteCount / elapsed;
193 doda 4454 if (rate2 < 1200) {
194     _snprintf_s(NumStr, sizeof(NumStr), _TRUNCATE, "%d:%02d (%dBytes/s)", elapsed / 60, elapsed % 60, rate2);
195     }
196     else if (rate2 < 1200000) {
197     _snprintf_s(NumStr, sizeof(NumStr), _TRUNCATE, "%d:%02d (%d.%02dKB/s)", elapsed / 60, elapsed % 60, rate2 / 1000, rate2 / 10 % 100);
198     }
199     else {
200     _snprintf_s(NumStr, sizeof(NumStr), _TRUNCATE, "%d:%02d (%d.%02dMB/s)", elapsed / 60, elapsed % 60, rate2 / (1000*1000), rate2 / 10000 % 100);
201     }
202 doda 4461 SetDlgItemText(IDC_TRANS_ETIME, NumStr);
203 doda 4454 prev_elapsed = elapsed;
204     }
205     }
206    
207 zmatsuo 8895 if (FileSize > 0) {
208     rate = 100.0 * (double)ByteCount / (double)FileSize;
209     if (ProgStat < (int)rate) {
210     ProgStat = (int)rate;
211     SendDlgItemMessage(IDC_TRANSPROGRESS, PBM_SETPOS, (WPARAM)ProgStat, 0);
212     }
213     _snprintf_s(NumStr,sizeof(NumStr),_TRUNCATE,"%u (%3.1f%%)",ByteCount, rate);
214 maya 3392 }
215 zmatsuo 8895 SetDlgItemText(IDC_TRANSBYTES, NumStr);
216 maya 3392 }
217     else {
218 zmatsuo 8895 _snprintf_s(NumStr,sizeof(NumStr),_TRUNCATE,"%u",ByteCount);
219     SetDlgItemText(IDC_TRANSBYTES, NumStr);
220 maya 3392 }
221 maya 3227 }
222    
223 zmatsuo 8895 void CFileTransDlg::RefreshNum(TFileVar *fv)
224     {
225     ProgStat = fv->ProgStat;
226     RefreshNum(fv->StartTime, fv->FileSize, fv->ByteCount);
227     fv->ProgStat = ProgStat;
228     }
229    
230 maya 3227 /////////////////////////////////////////////////////////////////////////////
231     // CFileTransDlg message handler
232    
233     BOOL CFileTransDlg::OnInitDialog()
234     {
235 zmatsuo 7526 static const DlgTextInfo TextInfos[] = {
236     { IDC_TRANS_FILENAME, "DLG_FILETRANS_FILENAME" },
237     { IDC_FULLPATH_LABEL, "DLG_FILETRANS_FULLPATH" },
238     { IDC_TRANS_TRANS, "DLG_FILETRANS_TRNAS" },
239     { IDC_TRANS_ELAPSED, "DLG_FILETRANS_ELAPSED" },
240     { IDCANCEL, "DLG_FILETRANS_CLOSE" },
241     { IDC_TRANSPAUSESTART, "DLG_FILETRANS_PAUSE" },
242     { IDC_TRANSHELP, "BTN_HELP" },
243     };
244    
245 maya 3392 int fuLoad = LR_DEFAULTCOLOR;
246 maya 3227
247 zmatsuo 8895 if (HideDialog) {
248 maya 4822 // Visible = False �����t�H�A�O���E���h�����������������A������������
249     // �������g���X�^�C�� WS_EX_NOACTIVATE ���w�������B
250     // (Windows 2000 �������L��)
251     // WS_EX_NOACTIVATE ���w���������\�����������������^�X�N�o�[����������
252     // ���� WS_EX_APPWINDOW ���w�������B
253     ModifyStyleEx(0, WS_EX_NOACTIVATE | WS_EX_APPWINDOW);
254     }
255    
256 zmatsuo 8899 SetWindowTextW(DlgCaption);
257     SetDlgItemTextW(IDC_TRANSFNAME, FileName);
258     SetDlgItemTextW(IDC_EDIT_FULLPATH, FullName);
259 maya 3227
260 zmatsuo 8857 SetDlgTexts(m_hWnd, TextInfos, _countof(TextInfos), UILanguageFile);
261 zmatsuo 7526
262 yutakapon 6286 if (IsWindowsNT4()) {
263 maya 3392 fuLoad = LR_VGACOLOR;
264     }
265 zmatsuo 7526 SmallIcon = LoadImage(m_hInst,
266     MAKEINTRESOURCE(IDI_TTERM),
267     IMAGE_ICON, 16, 16, fuLoad);
268 yutakapon 6504 ::PostMessage(GetSafeHwnd(), WM_SETICON, ICON_SMALL,
269 zmatsuo 7526 (LPARAM)SmallIcon);
270 maya 3227
271 zmatsuo 7526 BigIcon = LoadImage(m_hInst,
272     MAKEINTRESOURCE(IDI_TTERM),
273     IMAGE_ICON, 0, 0, fuLoad);
274 yutakapon 6504 ::PostMessage(GetSafeHwnd(), WM_SETICON, ICON_BIG,
275 zmatsuo 7526 (LPARAM)BigIcon);
276 yutakapon 6504
277 zmatsuo 7915 AddModelessHandle(m_hWnd);
278 zmatsuo 7526
279     return TRUE;
280 maya 3227 }
281    
282 zmatsuo 7526 BOOL CFileTransDlg::OnCancel( )
283 maya 3227 {
284 zmatsuo 8900 if (OpId == OpLog) {
285     FLogClose();
286     }
287     else {
288     FileTransEnd(OpId);
289     }
290 zmatsuo 7526 return TRUE;
291 maya 3227 }
292    
293 doda 6435 BOOL CFileTransDlg::OnCommand(WPARAM wParam, LPARAM lParam)
294 maya 3227 {
295 maya 3392 switch (LOWORD(wParam)) {
296     case IDC_TRANSPAUSESTART:
297     ChangeButton(! Pause);
298 zmatsuo 8900 if (OpId == OpLog) {
299     FLogPause(Pause);
300     }
301     else {
302     FileTransPause(OpId, Pause);
303     }
304 maya 3392 return TRUE;
305     case IDC_TRANSHELP:
306 zmatsuo 8895 if (OpId == OpLog) {
307     ::PostMessage(HMainWin, WM_USER_DLGHELP2, HlpFileLog, 0);
308 zmatsuo 8851 }
309     else {
310 zmatsuo 8895 ::PostMessage(HMainWin, WM_USER_DLGHELP2, HlpFileSend, 0);
311 zmatsuo 8851 }
312 maya 3392 return TRUE;
313     default:
314 zmatsuo 7526 return (TTCDialog::OnCommand(wParam,lParam));
315 maya 3392 }
316 maya 3227 }
317    
318 zmatsuo 7526 BOOL CFileTransDlg::PostNcDestroy()
319 maya 3227 {
320 yutakapon 6504 // logopen��logclose���J���������AGDI���\�[�X���[�N�������������C�������B
321     // - LoadImage()�������A�C�R�����\�[�X�����������B
322     // (2016.10.5 yutaka)
323     if (SmallIcon) {
324     DestroyIcon((HICON)SmallIcon);
325     SmallIcon = NULL;
326     }
327    
328     if (BigIcon) {
329     DestroyIcon((HICON)BigIcon);
330     BigIcon = NULL;
331     }
332    
333 zmatsuo 7915 RemoveModelessHandle(m_hWnd);
334 zmatsuo 7526
335 maya 3392 delete this;
336 zmatsuo 7526 return TRUE;
337 maya 3227 }

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26