1 /************************************************************** 2 * 3 * Licensed to the Apache Software Foundation (ASF) under one 4 * or more contributor license agreements. See the NOTICE file 5 * distributed with this work for additional information 6 * regarding copyright ownership. The ASF licenses this file 7 * to you under the Apache License, Version 2.0 (the 8 * "License"); you may not use this file except in compliance 9 * with the License. You may obtain a copy of the License at 10 * 11 * http://www.apache.org/licenses/LICENSE-2.0 12 * 13 * Unless required by applicable law or agreed to in writing, 14 * software distributed under the License is distributed on an 15 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16 * KIND, either express or implied. See the License for the 17 * specific language governing permissions and limitations 18 * under the License. 19 * 20 *************************************************************/ 21 22 23 24 // MARKER(update_precomp.py): autogen include statement, do not remove 25 #include "precompiled_cui.hxx" 26 27 #include "cuihyperdlg.hxx" 28 #include <unotools/localfilehelper.hxx> 29 #include <sfx2/filedlghelper.hxx> 30 #include "com/sun/star/ui/dialogs/TemplateDescription.hpp" 31 32 #include "hldoctp.hxx" 33 #include "hyperdlg.hrc" 34 #include "hlmarkwn_def.hxx" //ADD CHINA001 35 36 sal_Char __READONLY_DATA sHash[] = "#"; 37 sal_Char __READONLY_DATA sFileScheme[] = INET_FILE_SCHEME; 38 sal_Char __READONLY_DATA sNewsSRVScheme[] = "news://"; 39 // TODO news:// is nonsense 40 sal_Char __READONLY_DATA sHTTPScheme[] = INET_HTTP_SCHEME; 41 42 /************************************************************************* 43 |* 44 |* Contructor / Destructor 45 |* 46 |************************************************************************/ 47 48 SvxHyperlinkDocTp::SvxHyperlinkDocTp ( Window *pParent, const SfxItemSet& rItemSet) 49 : SvxHyperlinkTabPageBase ( pParent, CUI_RES( RID_SVXPAGE_HYPERLINK_DOCUMENT ), rItemSet ), 50 maGrpDocument ( this, CUI_RES (GRP_DOCUMENT) ), 51 maFtPath ( this, CUI_RES (FT_PATH_DOC) ), 52 maCbbPath ( this, INET_PROT_FILE ), 53 maBtFileopen ( this, CUI_RES (BTN_FILEOPEN) ), 54 maGrpTarget ( this, CUI_RES (GRP_TARGET) ), 55 maFtTarget ( this, CUI_RES (FT_TARGET_DOC) ), 56 maEdTarget ( this, CUI_RES (ED_TARGET_DOC) ), 57 maFtURL ( this, CUI_RES (FT_URL) ), 58 maFtFullURL ( this, CUI_RES (FT_FULL_URL) ), 59 maBtBrowse ( this, CUI_RES (BTN_BROWSE) ), 60 mbMarkWndOpen ( sal_False ) 61 { 62 // Set HC bitmaps and disable display of bitmap names. 63 maBtBrowse.SetModeImage( Image( CUI_RES( IMG_BROWSE_HC ) ), BMP_COLOR_HIGHCONTRAST ); 64 maBtBrowse.EnableTextDisplay (sal_False); 65 maBtFileopen.SetModeImage( Image( CUI_RES( IMG_FILEOPEN_HC ) ), BMP_COLOR_HIGHCONTRAST ); 66 maBtFileopen.EnableTextDisplay (sal_False); 67 68 InitStdControls(); 69 FreeResource(); 70 71 // Init URL-Box (pos&size, Open-Handler) 72 maCbbPath.SetPosSizePixel ( LogicToPixel( Point( COL_2, 15 ), MAP_APPFONT ), 73 LogicToPixel( Size ( 176 - COL_DIFF, 60), MAP_APPFONT ) ); 74 maCbbPath.Show(); 75 String aFileScheme( INET_FILE_SCHEME, RTL_TEXTENCODING_ASCII_US ); 76 maCbbPath.SetBaseURL(aFileScheme); 77 maCbbPath.SetHelpId( HID_HYPERDLG_DOC_PATH ); 78 79 SetExchangeSupport (); 80 81 // overload handlers 82 maBtFileopen.SetClickHdl ( LINK ( this, SvxHyperlinkDocTp, ClickFileopenHdl_Impl ) ); 83 maBtBrowse.SetClickHdl ( LINK ( this, SvxHyperlinkDocTp, ClickTargetHdl_Impl ) ); 84 maCbbPath.SetModifyHdl ( LINK ( this, SvxHyperlinkDocTp, ModifiedPathHdl_Impl ) ); 85 maEdTarget.SetModifyHdl ( LINK ( this, SvxHyperlinkDocTp, ModifiedTargetHdl_Impl ) ); 86 87 maCbbPath.SetLoseFocusHdl( LINK ( this, SvxHyperlinkDocTp, LostFocusPathHdl_Impl ) ); 88 89 maBtBrowse.SetAccessibleRelationMemberOf( &maGrpTarget ); 90 maBtBrowse.SetAccessibleRelationLabeledBy( &maFtTarget ); 91 maBtFileopen.SetAccessibleRelationMemberOf( &maGrpDocument ); 92 maBtFileopen.SetAccessibleRelationLabeledBy( &maFtPath ); 93 maTimer.SetTimeoutHdl ( LINK ( this, SvxHyperlinkDocTp, TimeoutHdl_Impl ) ); 94 } 95 96 SvxHyperlinkDocTp::~SvxHyperlinkDocTp () 97 { 98 } 99 100 /************************************************************************* 101 |* 102 |* Fill all dialog-controls except controls in groupbox "more..." 103 |* 104 |************************************************************************/ 105 106 void SvxHyperlinkDocTp::FillDlgFields ( String& aStrURL ) 107 { 108 INetURLObject aURL ( aStrURL ); 109 110 String aStrMark; 111 xub_StrLen nPos = aStrURL.SearchAscii( sHash ); 112 // path 113 maCbbPath.SetText ( aStrURL.Copy( 0, ( nPos == STRING_NOTFOUND ? aStrURL.Len() : nPos ) ) ); 114 115 // set target in document at editfield 116 if ( nPos != STRING_NOTFOUND && nPos<aStrURL.Len()-1 ) 117 aStrMark = aStrURL.Copy( nPos+1, aStrURL.Len() ); 118 maEdTarget.SetText ( aStrMark ); 119 120 ModifiedPathHdl_Impl ( NULL ); 121 } 122 123 /************************************************************************* 124 |* 125 |* retrieve current url-string 126 |* 127 |************************************************************************/ 128 129 String SvxHyperlinkDocTp::GetCurrentURL () 130 { 131 // get data from dialog-controls 132 String aStrURL; 133 String aStrPath ( maCbbPath.GetText() ); 134 const String aBaseURL ( maCbbPath.GetBaseURL() ); 135 String aStrMark( maEdTarget.GetText() ); 136 137 if ( aStrPath != aEmptyStr ) 138 { 139 INetURLObject aURL( aStrPath ); 140 if ( aURL.GetProtocol() != INET_PROT_NOT_VALID ) // maybe the path is already a valid 141 aStrURL = aStrPath; // hyperlink, then we can use this path directly 142 else 143 utl::LocalFileHelper::ConvertSystemPathToURL( aStrPath, aBaseURL, aStrURL ); 144 145 //#105788# always create a URL even if it is not valid 146 if( aStrURL == aEmptyStr ) 147 aStrURL = aStrPath; 148 } 149 150 if( aStrMark != aEmptyStr ) 151 { 152 aStrURL.AppendAscii( sHash ); 153 aStrURL += aStrMark; 154 } 155 156 return aStrURL; 157 } 158 159 /************************************************************************* 160 |* 161 |* retrieve and prepare data from dialog-fields 162 |* 163 |************************************************************************/ 164 165 void SvxHyperlinkDocTp::GetCurentItemData ( String& aStrURL, String& aStrName, 166 String& aStrIntName, String& aStrFrame, 167 SvxLinkInsertMode& eMode ) 168 { 169 // get data from standard-fields 170 aStrURL = GetCurrentURL(); 171 172 if( aStrURL.EqualsIgnoreCaseAscii( sFileScheme ) ) 173 aStrURL=aEmptyStr; 174 175 GetDataFromCommonFields( aStrName, aStrIntName, aStrFrame, eMode ); 176 } 177 178 /************************************************************************* 179 |* 180 |* static method to create Tabpage 181 |* 182 |************************************************************************/ 183 184 IconChoicePage* SvxHyperlinkDocTp::Create( Window* pWindow, const SfxItemSet& rItemSet ) 185 { 186 return( new SvxHyperlinkDocTp( pWindow, rItemSet ) ); 187 } 188 189 /************************************************************************* 190 |* 191 |* Set initial focus 192 |* 193 |************************************************************************/ 194 195 void SvxHyperlinkDocTp::SetInitFocus() 196 { 197 maCbbPath.GrabFocus(); 198 } 199 200 /************************************************************************* 201 |* 202 |* Click on imagebutton : fileopen 203 |* 204 |************************************************************************/ 205 206 IMPL_LINK ( SvxHyperlinkDocTp, ClickFileopenHdl_Impl, void *, EMPTYARG ) 207 { 208 // Open Fileopen-Dialog 209 ::sfx2::FileDialogHelper aDlg( 210 com::sun::star::ui::dialogs::TemplateDescription::FILEOPEN_SIMPLE, 0, 211 GetParent() ); 212 String aOldURL( GetCurrentURL() ); 213 if( aOldURL.EqualsIgnoreCaseAscii( sFileScheme, 0, sizeof( sFileScheme ) - 1 ) ) 214 { 215 aDlg.SetDisplayDirectory( aOldURL ); 216 } 217 218 DisableClose( sal_True ); 219 ErrCode nError = aDlg.Execute(); 220 DisableClose( sal_False ); 221 222 if ( ERRCODE_NONE == nError ) 223 { 224 String aURL( aDlg.GetPath() ); 225 String aPath; 226 227 utl::LocalFileHelper::ConvertURLToSystemPath( aURL, aPath ); 228 229 maCbbPath.SetBaseURL( aURL ); 230 maCbbPath.SetText( aPath ); 231 232 if ( aOldURL != GetCurrentURL() ) 233 ModifiedPathHdl_Impl (NULL); 234 } 235 236 return( 0L ); 237 } 238 239 /************************************************************************* 240 |* 241 |* Click on imagebutton : target 242 |* 243 |************************************************************************/ 244 245 IMPL_LINK ( SvxHyperlinkDocTp, ClickTargetHdl_Impl, void *, EMPTYARG ) 246 { 247 if ( GetPathType ( maStrURL ) == Type_ExistsFile || 248 maStrURL == aEmptyStr || 249 maStrURL.EqualsIgnoreCaseAscii( sFileScheme ) || 250 maStrURL.SearchAscii( sHash ) == 0 ) 251 { 252 mpMarkWnd->SetError( LERR_NOERROR ); 253 254 EnterWait(); 255 256 if ( maStrURL.EqualsIgnoreCaseAscii( sFileScheme ) ) 257 mpMarkWnd->RefreshTree ( aEmptyStr ); 258 else 259 mpMarkWnd->RefreshTree ( maStrURL ); 260 261 LeaveWait(); 262 } 263 else 264 mpMarkWnd->SetError( LERR_DOCNOTOPEN ); 265 266 ShowMarkWnd (); 267 268 return( 0L ); 269 } 270 271 /************************************************************************* 272 |* 273 |* Contens of combobox "Path" modified 274 |* 275 |************************************************************************/ 276 277 IMPL_LINK ( SvxHyperlinkDocTp, ModifiedPathHdl_Impl, void *, EMPTYARG ) 278 { 279 maStrURL = GetCurrentURL(); 280 281 maTimer.SetTimeout( 2500 ); 282 maTimer.Start(); 283 284 maFtFullURL.SetText( maStrURL ); 285 286 return( 0L ); 287 } 288 289 /************************************************************************* 290 |* 291 |* If path-field was modify, to browse the new doc after timeout 292 |* 293 |************************************************************************/ 294 295 IMPL_LINK ( SvxHyperlinkDocTp, TimeoutHdl_Impl, Timer *, EMPTYARG ) 296 { 297 if ( IsMarkWndVisible() && ( GetPathType( maStrURL )==Type_ExistsFile || 298 maStrURL == aEmptyStr || 299 maStrURL.EqualsIgnoreCaseAscii( sFileScheme ) ) ) 300 { 301 EnterWait(); 302 303 if ( maStrURL.EqualsIgnoreCaseAscii( sFileScheme ) ) 304 mpMarkWnd->RefreshTree ( aEmptyStr ); 305 else 306 mpMarkWnd->RefreshTree ( maStrURL ); 307 308 LeaveWait(); 309 } 310 311 return( 0L ); 312 } 313 314 /************************************************************************* 315 |* 316 |* Contens of editfield "Target" modified 317 |* 318 |************************************************************************/ 319 320 IMPL_LINK ( SvxHyperlinkDocTp, ModifiedTargetHdl_Impl, void *, EMPTYARG ) 321 { 322 maStrURL = GetCurrentURL(); 323 324 if ( IsMarkWndVisible() ) 325 mpMarkWnd->SelectEntry ( maEdTarget.GetText() ); 326 327 maFtFullURL.SetText( maStrURL ); 328 329 return( 0L ); 330 } 331 332 /************************************************************************* 333 |* 334 |* editfield "Target" lost focus 335 |* 336 |************************************************************************/ 337 338 IMPL_LINK ( SvxHyperlinkDocTp, LostFocusPathHdl_Impl, void *, EMPTYARG ) 339 { 340 maStrURL = GetCurrentURL(); 341 342 maFtFullURL.SetText( maStrURL ); 343 344 return (0L); 345 } 346 347 /************************************************************************* 348 |* 349 |* Get String from Bookmark-Wnd 350 |* 351 |************************************************************************/ 352 353 void SvxHyperlinkDocTp::SetMarkStr ( String& aStrMark ) 354 { 355 maEdTarget.SetText ( aStrMark ); 356 357 ModifiedTargetHdl_Impl ( NULL ); 358 } 359 360 /************************************************************************* 361 |* 362 |* retrieve kind of pathstr 363 |* 364 |************************************************************************/ 365 366 SvxHyperlinkDocTp::EPathType SvxHyperlinkDocTp::GetPathType ( String& aStrPath ) 367 { 368 INetURLObject aURL( aStrPath, INET_PROT_FILE ); 369 370 if( aURL.HasError() ) 371 return Type_Invalid; 372 else 373 return Type_ExistsFile; 374 } 375