00001 // $Id: rechinfo.cpp 1688 2006-08-10 12:05:20Z gerry $ 00002 /* @@tag:xara-cn@@ DO NOT MODIFY THIS LINE 00003 ================================XARAHEADERSTART=========================== 00004 00005 Xara LX, a vector drawing and manipulation program. 00006 Copyright (C) 1993-2006 Xara Group Ltd. 00007 Copyright on certain contributions may be held in joint with their 00008 respective authors. See AUTHORS file for details. 00009 00010 LICENSE TO USE AND MODIFY SOFTWARE 00011 ---------------------------------- 00012 00013 This file is part of Xara LX. 00014 00015 Xara LX is free software; you can redistribute it and/or modify it 00016 under the terms of the GNU General Public License version 2 as published 00017 by the Free Software Foundation. 00018 00019 Xara LX and its component source files are distributed in the hope 00020 that it will be useful, but WITHOUT ANY WARRANTY; without even the 00021 implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 00022 See the GNU General Public License for more details. 00023 00024 You should have received a copy of the GNU General Public License along 00025 with Xara LX (see the file GPL in the root directory of the 00026 distribution); if not, write to the Free Software Foundation, Inc., 51 00027 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA 00028 00029 00030 ADDITIONAL RIGHTS 00031 ----------------- 00032 00033 Conditional upon your continuing compliance with the GNU General Public 00034 License described above, Xara Group Ltd grants to you certain additional 00035 rights. 00036 00037 The additional rights are to use, modify, and distribute the software 00038 together with the wxWidgets library, the wxXtra library, and the "CDraw" 00039 library and any other such library that any version of Xara LX relased 00040 by Xara Group Ltd requires in order to compile and execute, including 00041 the static linking of that library to XaraLX. In the case of the 00042 "CDraw" library, you may satisfy obligation under the GNU General Public 00043 License to provide source code by providing a binary copy of the library 00044 concerned and a copy of the license accompanying it. 00045 00046 Nothing in this section restricts any of the rights you have under 00047 the GNU General Public License. 00048 00049 00050 SCOPE OF LICENSE 00051 ---------------- 00052 00053 This license applies to this program (XaraLX) and its constituent source 00054 files only, and does not necessarily apply to other Xara products which may 00055 in part share the same code base, and are subject to their own licensing 00056 terms. 00057 00058 This license does not apply to files in the wxXtra directory, which 00059 are built into a separate library, and are subject to the wxWindows 00060 license contained within that directory in the file "WXXTRA-LICENSE". 00061 00062 This license does not apply to the binary libraries (if any) within 00063 the "libs" directory, which are subject to a separate license contained 00064 within that directory in the file "LIBS-LICENSE". 00065 00066 00067 ARRANGEMENTS FOR CONTRIBUTION OF MODIFICATIONS 00068 ---------------------------------------------- 00069 00070 Subject to the terms of the GNU Public License (see above), you are 00071 free to do whatever you like with your modifications. However, you may 00072 (at your option) wish contribute them to Xara's source tree. You can 00073 find details of how to do this at: 00074 http://www.xaraxtreme.org/developers/ 00075 00076 Prior to contributing your modifications, you will need to complete our 00077 contributor agreement. This can be found at: 00078 http://www.xaraxtreme.org/developers/contribute/ 00079 00080 Please note that Xara will not accept modifications which modify any of 00081 the text between the start and end of this header (marked 00082 XARAHEADERSTART and XARAHEADEREND). 00083 00084 00085 MARKS 00086 ----- 00087 00088 Xara, Xara LX, Xara X, Xara X/Xtreme, Xara Xtreme, the Xtreme and Xara 00089 designs are registered or unregistered trademarks, design-marks, and/or 00090 service marks of Xara Group Ltd. All rights in these marks are reserved. 00091 00092 00093 Xara Group Ltd, Gaddesden Place, Hemel Hempstead, HP2 6EX, UK. 00094 http://www.xara.com/ 00095 00096 =================================XARAHEADEREND============================ 00097 */ 00098 00099 // Implementation of the colour record handler class of the v2 file format 00100 00101 #include "camtypes.h" 00102 00103 #include "rechinfo.h" // DocInfoRecordHandler for importing doc info from v2 native/web files 00104 #include "infocomp.h" // Document info component, handles import of document information 00105 //#include "camfiltr.h" // BaseCamelotFilter - version 2 native filter - in camtypes.h [AUTOMATICALLY REMOVED] 00106 #include "cxftags.h" // TAG_DOCUMENTCOMMENT 00107 //#include "cxfrec.h" // - in camtypes.h [AUTOMATICALLY REMOVED] 00108 00109 //#include "localenv.h" // LocalEnvironment 00110 00111 DECLARE_SOURCE("$Revision: 1688 $"); 00112 00113 // Declare smart memory handling in Debug builds 00114 #define new CAM_DEBUG_NEW 00115 00116 // An implement to match the Declare in the .h file. 00117 CC_IMPLEMENT_DYNAMIC(DocInfoRecordHandler,CamelotRecordHandler); 00118 00119 // #if NEW_NATIVE_FILTER // New native filters, only available to those who need them at present 00120 00121 /******************************************************************************************** 00122 00123 > virtual BOOL DocInfoRecordHandler::BeginImport() 00124 00125 Author: Neville_Humphrys (Xara Group Ltd) <camelotdev@xara.com> 00126 Created: 24/7/96 00127 Inputs: - 00128 Returns: TRUE if ok 00129 FALSE otherwise 00130 Purpose: Initialises the units record handler 00131 Errors: - 00132 SeeAlso: - 00133 00134 ********************************************************************************************/ 00135 00136 BOOL DocInfoRecordHandler::BeginImport() 00137 { 00138 pInfoComponent = GetDocInfoComponent(); 00139 00140 return (pInfoComponent != NULL); 00141 } 00142 00143 /******************************************************************************************** 00144 00145 > virtual UINT32* DocInfoRecordHandler::GetTagList() 00146 00147 Author: Neville_Humphrys (Xara Group Ltd) <camelotdev@xara.com> 00148 Created: 24/7/96 00149 Inputs: - 00150 Returns: Ptr to a list of tag values, terminated by CXFRH_TAG_LIST_END 00151 Purpose: Provides the record handler system with a list of records handled by this 00152 handler 00153 SeeAlso: - 00154 00155 ********************************************************************************************/ 00156 00157 UINT32* DocInfoRecordHandler::GetTagList() 00158 { 00159 static UINT32 TagList[] = {TAG_DOCUMENTCOMMENT, TAG_DOCUMENTDATES, 00160 TAG_DOCUMENTUNDOSIZE, 00161 TAG_DOCUMENTFLAGS, 00162 CXFRH_TAG_LIST_END}; 00163 00164 return (UINT32*)&TagList; 00165 } 00166 00167 /******************************************************************************************** 00168 00169 > virtual BOOL DocInfoRecordHandler::HandleRecord(CXaraFileRecord* pCXaraFileRecord) 00170 00171 Author: Neville_Humphrys (Xara Group Ltd) <camelotdev@xara.com> 00172 Created: 24/7/96 00173 Inputs: pCXaraFileRecord = ptr to record to handle 00174 Returns: TRUE if handled successfuly 00175 FALSE otherwise 00176 Purpose: Handles the given record. 00177 SeeAlso: - 00178 00179 ********************************************************************************************/ 00180 00181 BOOL DocInfoRecordHandler::HandleRecord(CXaraFileRecord* pCXaraFileRecord) 00182 { 00183 ERROR2IF(pCXaraFileRecord == NULL,FALSE,"DocInfoRecordHandler::HandleRecord pCXaraFileRecord is NULL"); 00184 00185 BOOL ok = TRUE; 00186 Document * pDoc = GetDocument(); 00187 INT32 Tag = pCXaraFileRecord->GetTag(); 00188 if (pInfoComponent == NULL) 00189 { 00190 ERROR3("DocInfoRecordHandler::HandleRecord no pInfoComponent"); 00191 return FALSE; 00192 } 00193 00194 // If we are just importing data from this document into an existing one, 00195 // then don't import any of this data. 00196 if (IsImporting()) 00197 return TRUE; 00198 00199 switch (Tag) 00200 { 00201 case TAG_DOCUMENTCOMMENT: 00202 // Ask the document information component class to import that data for us 00203 pInfoComponent->ImportDocumentComment(pCXaraFileRecord, pDoc); 00204 break; 00205 00206 case TAG_DOCUMENTDATES: 00207 // Ask the document information component class to import that data for us 00208 pInfoComponent->ImportDocumentDates(pCXaraFileRecord, pDoc); 00209 break; 00210 00211 case TAG_DOCUMENTUNDOSIZE: 00212 // Ask the document information component class to import that data for us 00213 pInfoComponent->ImportUndoBufferSize(pCXaraFileRecord, pDoc); 00214 break; 00215 00216 case TAG_DOCUMENTFLAGS: 00217 // Ask the document information component class to import that data for us 00218 pInfoComponent->ImportDocumentFlags(pCXaraFileRecord, pDoc); 00219 break; 00220 00221 default: 00222 ok = FALSE; 00223 ERROR3_PF(("DocInfoRecordHandler::HandleRecord I don't handle records with the tag (%d)\n",Tag)); 00224 break; 00225 } 00226 00227 return ok; 00228 } 00229 00230 /******************************************************************************************** 00231 00232 > virtual void DocInfoRecordHandler::GetRecordDescriptionText(CXaraFileRecord* pRecord,StringBase* pStr) 00233 00234 Author: Neville_Humphrys (Xara Group Ltd) <camelotdev@xara.com> 00235 Created: 24/7/96 00236 Inputs: pRecord = ptr to a record 00237 pStr = ptr to string to update 00238 Returns: - 00239 Purpose: This provides descriptions for the define units records. 00240 Errors: - 00241 SeeAlso: - 00242 00243 ********************************************************************************************/ 00244 00245 #ifdef XAR_TREE_DIALOG 00246 void DocInfoRecordHandler::GetRecordDescriptionText(CXaraFileRecord* pRecord, StringBase* pStr) 00247 { 00248 if (pStr == NULL || pRecord == NULL) 00249 return; 00250 00251 // Call base class first 00252 // This outputs the tag and size 00253 CamelotRecordHandler::GetRecordDescriptionText(pRecord, pStr); 00254 00255 UINT32 Tag = pRecord->GetTag(); 00256 BOOL ok = TRUE; 00257 // INT32 RecordNumber = pRecord->GetRecordNumber(); 00258 switch (Tag) 00259 { 00260 case TAG_DOCUMENTCOMMENT: 00261 { 00262 String_256 Comment; 00263 if (ok) ok = pRecord->ReadUnicode(&Comment);//Comment, Comment.MaxLength()); 00264 if (Comment.Length() == 0) 00265 (*pStr) += _T("None\r\n\r\n"); 00266 else 00267 { 00268 (*pStr) += _T("Comment:- \r\n"); 00269 (*pStr) += Comment; 00270 (*pStr) += _T("\r\n\r\n"); 00271 } 00272 00273 break; 00274 } 00275 00276 case TAG_DOCUMENTDATES: 00277 { 00278 #if FALSE 00279 // Read in the times/dates from the record 00280 time_t Creation; 00281 time_t LastSaved; 00282 00283 if (ok) ok = pRecord->ReadINT32((INT32*)&Creation); 00284 if (ok) ok = pRecord->ReadINT32((INT32*)&LastSaved); 00285 00286 #if !defined(EXCLUDE_FROM_RALPH) 00287 String_256 String; 00288 (*pStr) += _T("Document created:- \t"); 00289 LocalEnvironment::SystemTimeToString(&String, &Creation); 00290 (*pStr) += String; 00291 (*pStr) += _T("\t"); 00292 LocalEnvironment::SystemDateToString(&String, &Creation); 00293 (*pStr) += String; 00294 (*pStr) += _T("\r\n\r\n"); 00295 (*pStr) += _T("Document last saved:- \t"); 00296 LocalEnvironment::SystemTimeToString(&String, &LastSaved); 00297 (*pStr) += String; 00298 (*pStr) += _T("\t"); 00299 LocalEnvironment::SystemDateToString(&String, &LastSaved); 00300 (*pStr) += String; 00301 (*pStr) += _T("\r\n\r\n"); 00302 #endif 00303 #endif 00304 break; 00305 } 00306 00307 case TAG_DOCUMENTUNDOSIZE: 00308 { 00309 UINT32 UndoBufSize = 0; 00310 if (ok) ok = pRecord->ReadUINT32(&UndoBufSize); 00311 if (UndoBufSize == UINT32_MAX) 00312 { 00313 (*pStr) += _T("Undo buffer size: \t= unlimited\r\n"); 00314 } 00315 else 00316 { 00317 (*pStr) += _T("Undo buffer size:- "); 00318 String_256 Value; 00319 Convert::BytesToString(&Value, UndoBufSize); 00320 (*pStr) += Value; 00321 (*pStr) += _T("\r\n\r\n"); 00322 } 00323 break; 00324 } 00325 00326 case TAG_DOCUMENTFLAGS: 00327 { 00328 UINT32 DocFlags = 0; 00329 if (ok) ok = pRecord->ReadUINT32(&DocFlags); 00330 (*pStr) += _T("Document flags which are currently set are:- \r\n"); 00331 if (DocFlags & 2) 00332 (*pStr) += _T("Multilayer "); 00333 if (DocFlags & 1) 00334 (*pStr) += _T("AllLayersVisible "); 00335 (*pStr) += _T("\r\n\r\n"); 00336 break; 00337 } 00338 } 00339 00340 return; 00341 } 00342 00343 #endif // _DEBUG 00344 00345 // #endif // NEW_NATIVE_FILTER 00346