00001 // $Id: htmllist.cpp 751 2006-03-31 15:43:49Z alex $ 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 00100 #include "camtypes.h" 00101 #include "htmllist.h" 00102 00103 00104 00105 DECLARE_SOURCE("$Revision: 751 $"); 00106 00107 CC_IMPLEMENT_DYNAMIC(HTMLFileList, List) 00108 CC_IMPLEMENT_DYNAMIC(HTMLFileListItem, ListItem) 00109 00110 #define new CAM_DEBUG_NEW 00111 00112 00116 00117 00118 /******************************************************************************************** 00119 00120 > HTMLFileListItem::HTMLFileListItem(String_256 Filename, HTMLTAG_TYPE TagId, BOOL Center) 00121 00122 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00123 Created: 11/04/97 00124 Inputs: Filename - name of the file 00125 TagId - which tag ? (img, body...) 00126 Center - used for formatting 00127 Returns: 00128 Purpose: HTMLFileListItem constructor. Create a new HTMLFileListItem. 00129 Errors: 00130 00131 ********************************************************************************************/ 00132 00133 HTMLFileListItem::HTMLFileListItem(String_256 Filename, HTMLTAG_TYPE TagId, BOOL Center) 00134 { 00135 m_Filename = Filename; 00136 m_TagId = TagId; 00137 m_IsCenter = Center; 00138 } 00139 00140 00141 /******************************************************************************************** 00142 00143 > String_256 HTMLFileListItem::GetFileName() 00144 00145 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00146 Created: 14/04/97 00147 Inputs: 00148 Returns: 00149 Purpose: return the filename 00150 Errors: 00151 00152 ********************************************************************************************/ 00153 00154 String_256 HTMLFileListItem::GetFileName() 00155 { 00156 return m_Filename; 00157 } 00158 00159 00160 /******************************************************************************************** 00161 00162 > HTMLTAG_TYPE HTMLFileListItem::GetTagId() 00163 00164 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00165 Created: 16/04/97 00166 Inputs: 00167 Returns: 00168 Purpose: return the tag ID 00169 Errors: 00170 00171 ********************************************************************************************/ 00172 00173 HTMLTAG_TYPE HTMLFileListItem::GetTagId() 00174 { 00175 return m_TagId; 00176 } 00177 00178 00179 /******************************************************************************************** 00180 00181 > BOOL HTMLFileListItem::IsCenter() 00182 00183 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00184 Created: 21/04/97 00185 Inputs: 00186 Returns: 00187 Purpose: return the tag ID 00188 Errors: 00189 00190 ********************************************************************************************/ 00191 00192 BOOL HTMLFileListItem::IsCenter() 00193 { 00194 return m_IsCenter; 00195 } 00196 00197 00198 00199 void HTMLFileListItem::MyPrint() 00200 { 00201 if (IsUserName("Olivier")) 00202 { 00203 TRACE( _T("HTMLFileListItem::FileName = %s\n"), (TCHAR*)m_Filename); 00204 //TRACE( _T("HTMLFileListItem::TagId = %d\n"), m_TagId); 00205 } 00206 } 00207 00208 00209 /******************************************************************************************** 00210 00211 > BOOL HTMLFileList::Add(HTMLFileListItem* pItem) 00212 00213 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00214 Created: 14/04/97 00215 Inputs: pItem - Item to add in the list 00216 Returns: 00217 Purpose: add an element in the list 00218 See also: AddTail() 00219 Errors: 00220 00221 ********************************************************************************************/ 00222 00223 BOOL HTMLFileList::Add(HTMLFileListItem* pItem) 00224 { 00225 //Graham 8/8/97: Is our item already in the list? 00226 if (IsAlreadyInList(pItem)) 00227 { 00228 //Yes. So return FALSE 00229 return FALSE; 00230 } 00231 else 00232 { 00233 //No. So add it. 00234 AddTail(pItem); 00235 00236 //And return TRUE 00237 return TRUE; 00238 } 00239 } 00240 00241 00242 /******************************************************************************************** 00243 00244 > BOOL HTMLFileList::IsAlreadyInList(HTMLFileListItem* pItem) 00245 00246 Author: Olivier_Gascoin (Xara Group Ltd) <camelotdev@xara.com> 00247 Created: 14/04/97 00248 Inputs: pItem - Item to check 00249 Returns: TRUE if pItem is already in the list, FALSE otherwise. 00250 Purpose: check whether pItem is already in the list or not 00251 See also: 00252 Errors: 00253 00254 ********************************************************************************************/ 00255 00256 BOOL HTMLFileList::IsAlreadyInList(HTMLFileListItem* pItem) 00257 { 00258 // how many item in the list ? 00259 DWORD NbItem = GetCount(); 00260 00261 // is it already in the list 00262 if (NbItem != 0) 00263 { 00264 // first item of the list 00265 HTMLFileListItem* ListBitmaps = (HTMLFileListItem*)GetHead(); 00266 if ((ListBitmaps->GetFileName()).IsIdentical(pItem->GetFileName())) 00267 return TRUE; 00268 00269 // scan the list 00270 while(ListBitmaps = (HTMLFileListItem*)GetNext(ListBitmaps)) 00271 { 00272 if ((ListBitmaps->GetFileName()).IsIdentical(pItem->GetFileName())) 00273 return TRUE; 00274 } 00275 } 00276 00277 return FALSE; 00278 } 00279 00280 00281 00282 00283