OSDN Git Service

Support Git svn-clone at clone dialog.
[tortoisegit/TortoiseGitJp.git] / src / TortoiseProc / Commands / CloneCommand.cpp
1 // TortoiseSVN - a Windows shell extension for easy version control\r
2 \r
3 // Copyright (C) 2007-2008 - TortoiseSVN\r
4 \r
5 // This program is free software; you can redistribute it and/or\r
6 // modify it under the terms of the GNU General Public License\r
7 // as published by the Free Software Foundation; either version 2\r
8 // of the License, or (at your option) any later version.\r
9 \r
10 // This program is distributed in the hope that it will be useful,\r
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of\r
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
13 // GNU General Public License for more details.\r
14 \r
15 // You should have received a copy of the GNU General Public License\r
16 // along with this program; if not, write to the Free Software Foundation,\r
17 // 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.\r
18 //\r
19 #include "StdAfx.h"\r
20 #include "CloneCommand.h"\r
21 \r
22 //#include "SVNProgressDlg.h"\r
23 #include "StringUtils.h"\r
24 #include "Hooks.h"\r
25 #include "MessageBox.h"\r
26 \r
27 #include "CloneDlg.h"\r
28 #include "ProgressDlg.h"\r
29 #include "AppUtils.h"\r
30 \r
31 bool CloneCommand::Execute()\r
32 {\r
33         CCloneDlg dlg;\r
34         dlg.m_Directory=this->orgCmdLinePath.GetWinPathString();\r
35         if(dlg.DoModal()==IDOK)\r
36         {\r
37                 if(dlg.m_bAutoloadPuttyKeyFile)\r
38                 {\r
39                         CAppUtils::LaunchPAgent(&dlg.m_strPuttyKeyFile);\r
40                 }\r
41                 CString dir=dlg.m_Directory;\r
42                 CString url=dlg.m_URL;\r
43                 // is this a windows format UNC path, ie starts with \\ \r
44                 if (url.Find(_T("\\\\")) == 0)\r
45                 {\r
46                         // yes, change all \ to /\r
47                         // this should not be necessary but msysgit does not support the use \ here yet\r
48                         url.Replace( _T('\\'), _T('/'));\r
49                 }\r
50                 CString cmd;\r
51                 cmd.Format(_T("git.exe clone -v \"%s\" \"%s\""),\r
52                                                 url,\r
53                                                 dir);\r
54 \r
55                 // Handle Git SVN-clone\r
56                 if(dlg.m_bSVN)\r
57                 {\r
58                         WIN32_FILE_ATTRIBUTE_DATA attribs;\r
59                         if(GetFileAttributesEx(dlg.m_Directory, GetFileExInfoStandard, &attribs))\r
60                         {\r
61                                 if(!(attribs.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY))\r
62                                 {\r
63                                         CString errstr;\r
64                                         errstr.Format(_T("%s is not valid direcotry"),dlg.m_Directory);\r
65                                         CMessageBox::Show(NULL,errstr,_T("TortoiseGit"),MB_OK|MB_ICONERROR);\r
66                                         return FALSE;\r
67                                 }\r
68                         }       \r
69                         else\r
70                         {\r
71                                 DWORD err = GetLastError();\r
72                                 if(err == ERROR_PATH_NOT_FOUND)\r
73                                 {\r
74                                         if(!CAppUtils::CreateMultipleDirectory(dlg.m_Directory))\r
75                                         {\r
76                                                 CString errstr;\r
77                                                 errstr.Format(_T("Fail create dir: %s"),dlg.m_Directory);\r
78                                                 CMessageBox::Show(NULL,errstr,_T("TortoiseGit"),MB_OK|MB_ICONERROR);\r
79                                                 return FALSE;\r
80                                         }\r
81 \r
82                                 }\r
83                                 else\r
84                                 {\r
85                                         CMessageBox::Show(NULL,_T("Unknow ERROR"),_T("TortoiseGit"),MB_OK|MB_ICONERROR);\r
86                                         return FALSE;\r
87                                 }\r
88                         }\r
89 \r
90                         g_Git.m_CurrentDir=dlg.m_Directory;\r
91                         cmd.Format(_T("git.exe svn clone \"%s\" "),\r
92                                                 url);\r
93 \r
94                         if(dlg.m_bSVNTrunk)\r
95                                 cmd+=_T(" -T ")+dlg.m_strSVNTrunk;\r
96 \r
97                         if(dlg.m_bSVNBranch)\r
98                                 cmd+=_T(" -b ")+dlg.m_strSVNBranchs;\r
99 \r
100                         if(dlg.m_bSVNTags)\r
101                                 cmd+=_T(" -t ")+dlg.m_strSVNTags;\r
102 \r
103                 }\r
104                 CProgressDlg progress;\r
105                 progress.m_GitCmd=cmd;\r
106                 if(progress.DoModal()==IDOK)\r
107                         return TRUE;\r
108                 \r
109         }\r
110         return FALSE;\r
111 }\r