OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [rtos/] [ecos-2.0/] [tools/] [src/] [tools/] [ecostest/] [common/] [eCosTestPlatform.cpp] - Blame information for rev 174

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 26 unneback
//####COPYRIGHTBEGIN####
2
//                                                                          
3
// ----------------------------------------------------------------------------
4
// Copyright (C) 1998, 1999, 2000 Red Hat, Inc.
5
// Copyright (C) 2003 John Dallaway
6
//
7
// This program is part of the eCos host tools.
8
//
9
// This program is free software; you can redistribute it and/or modify it 
10
// under the terms of the GNU General Public License as published by the Free 
11
// Software Foundation; either version 2 of the License, or (at your option) 
12
// any later version.
13
// 
14
// This program is distributed in the hope that it will be useful, but WITHOUT 
15
// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 
16
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for 
17
// more details.
18
// 
19
// You should have received a copy of the GNU General Public License along with
20
// this program; if not, write to the Free Software Foundation, Inc., 
21
// 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22
//
23
// ----------------------------------------------------------------------------
24
//                                                                          
25
//####COPYRIGHTEND####
26
//=================================================================
27
//
28
//        eCosTestPlatform.cpp
29
//
30
//        platform information implementation
31
//
32
//=================================================================
33
#include "eCosTestPlatform.h"
34
#include "eCosTestUtils.h"
35
#include "eCosTrace.h"
36
 
37
std::vector<CeCosTestPlatform> CeCosTestPlatform::arPlatforms;
38
 
39
const CeCosTestPlatform *CeCosTestPlatform::Get(LPCTSTR psz)
40
{
41
  for(int i=0;i<(signed)arPlatforms.size();i++){
42
    const CeCosTestPlatform &t=arPlatforms[i];
43
    if(0==_tcsicmp(t.Name(),psz)){
44
      return &t;
45
    }
46
  }
47
  return NULL;
48
}
49
 
50
CeCosTestPlatform::CeCosTestPlatformProperties::CeCosTestPlatformProperties(CeCosTestPlatform *pti)
51
{
52
  Add(_T("platform"),pti->m_strName);
53
  Add(_T("prefix"),  pti->m_strPrefix);
54
  Add(_T("commands"),pti->m_strCommands);
55
  Add(_T("inferior"),pti->m_strInferior);
56
  Add(_T("prompt"),  pti->m_strPrompt);
57
  Add(_T("ServerSideGdb"),pti->m_nServerSideGdb);
58
}
59
 
60
bool CeCosTestPlatform::LoadFromDir(LPCTSTR pszDir)
61
{
62
  bool rc=true;
63
  TRACE(_T("CeCosTestPlatform::LoadFromDir %s\n"),pszDir);
64
  // Find all the files in directory pszDir and load from each of them
65
  TCHAR szOrigDir[256];
66
  _tgetcwd(szOrigDir,sizeof szOrigDir-1);
67
  if(0==_tchdir(pszDir)){
68
    String strFile;
69
    void *pHandle;
70
    for(bool b=CeCosTestUtils::StartSearch(pHandle,strFile);b;b=CeCosTestUtils::NextFile(pHandle,strFile)){
71
      if(CeCosTestUtils::IsFile(strFile)){
72
        CeCosTestPlatform t;
73
        t.m_strName=strFile;
74
        CeCosTestPlatformProperties prop(&t);
75
        if(prop.LoadFromFile(strFile)){
76
          Add(t);
77
        } else {
78
          ERROR(_T("Illegal platform specification in %s%c%s\n"),pszDir,cPathsep,(LPCTSTR)strFile);
79
          rc=false;
80
        }
81
      }
82
    }
83
    CeCosTestUtils::EndSearch(pHandle);
84
  } else {
85
    ERROR(_T("Failed to change to %s from %s\n"),pszDir,szOrigDir);
86
  }
87
  _tchdir(szOrigDir);
88
 
89
  return rc;
90
}
91
 
92
#ifdef _WIN32
93
bool CeCosTestPlatform::SaveToRegistry(HKEY hTopKey,LPCTSTR pszKey)
94
{
95
  // save target info to the registry
96
 
97
  CProperties::CreateKey(pszKey,hTopKey);
98
  HKEY hKey;
99
  bool rc=ERROR_SUCCESS==RegOpenKeyEx (hTopKey, pszKey, 0L, KEY_ALL_ACCESS, &hKey);
100
  if(rc){
101
    for(int i=0;i<(signed)arPlatforms.size();i++){
102
      HKEY hKey2;
103
      DWORD dwDisp;
104
      const CeCosTestPlatform &ti=arPlatforms[i];
105
      rc&=(ERROR_SUCCESS==RegCreateKeyEx(hKey,ti.Name(), 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hKey2, &dwDisp));
106
      if(rc){
107
        LPCTSTR pszPrefix=ti.Prefix();
108
        LPCTSTR pszGdb   =ti.GdbCmds();
109
        LPCTSTR pszInferior=ti.Inferior();
110
        LPCTSTR pszPrompt=ti.Prompt();
111
        DWORD dwServerSideGdb=ti.ServerSideGdb()?1l:0l;
112
        rc&=(ERROR_SUCCESS==RegSetValueEx(hKey2,_T("Prefix"),0,REG_SZ,   (CONST BYTE *)pszPrefix,(1+_tcslen(pszPrefix))*sizeof (TCHAR))) &&
113
            (ERROR_SUCCESS==RegSetValueEx(hKey2,_T("Commands"),0,REG_SZ,   (CONST BYTE *)pszGdb,(1+_tcslen(pszGdb))*sizeof (TCHAR))) &&
114
            (ERROR_SUCCESS==RegSetValueEx(hKey2,_T("Inferior"),0,REG_SZ,   (CONST BYTE *)pszInferior,(1+_tcslen(pszInferior))*sizeof (TCHAR))) &&
115
            (ERROR_SUCCESS==RegSetValueEx(hKey2,_T("Prompt"),0,REG_SZ,   (CONST BYTE *)pszPrompt,(1+_tcslen(pszPrompt))*sizeof (TCHAR))) &&
116
            (ERROR_SUCCESS==RegSetValueEx(hKey2,_T("ServerSideGdb"),0,REG_DWORD,   (CONST BYTE *)&dwServerSideGdb,sizeof (DWORD)));
117
      }
118
      RegCloseKey(hKey2);
119
    }
120
    RegCloseKey(hKey);
121
  }
122
  return rc;
123
}
124
 
125
const String CeCosTestPlatform::GetGreatestSubkey (LPCTSTR pszKey)
126
{
127
  String strSubkey;
128
  HKEY hKey;
129
 
130
  if (ERROR_SUCCESS == RegOpenKeyEx (HKEY_LOCAL_MACHINE, pszKey, 0L, KEY_READ, &hKey)) {
131
    DWORD dwIndex = 0;
132
    TCHAR pszBuffer [MAX_PATH + 1];
133
 
134
    while (ERROR_SUCCESS == RegEnumKey (hKey, dwIndex++, (LPTSTR) pszBuffer, sizeof (pszBuffer))) {
135
      if (strSubkey.compare (pszBuffer) < 0) {
136
        strSubkey = pszBuffer;
137
      }
138
    }
139
 
140
    RegCloseKey (hKey);
141
  }
142
 
143
  TRACE (_T("CeCosTestPlatform::GetGreatestSubkey(\"%s\"): %s\n"), pszKey, (LPCTSTR)strSubkey);
144
  return strSubkey;
145
}
146
#endif
147
 
148
bool CeCosTestPlatform::Load()
149
{
150
  TRACE(_T("CeCosTestPlatform::Load\n"));
151
  srand( (unsigned)time( NULL ) );
152
 
153
#ifdef _WIN32
154
 
155
  // get target info from the registry
156
  String strPlatformsKey = _T("Software\\eCos Configuration Tool\\Platforms");
157
//  strPlatformsKey += GetGreatestSubkey (_T("Software\\eCos"));
158
//  strPlatformsKey += _T("\\Platforms");
159
 
160
  HKEY hKey;
161
  bool rc=ERROR_SUCCESS==RegOpenKeyEx (HKEY_CURRENT_USER, strPlatformsKey, 0L, KEY_READ, &hKey);
162
  DWORD dwSubKeys=0;
163
  if(rc){
164
    // Found the given key.
165
    // Subkeys' names are the target image names:
166
    // Subkeys's values are:
167
    //      Prefix  String
168
    //      Type    String 
169
    //      GdbCmd  String [optional]
170
    FILETIME ftLastWriteTime;
171
    DWORD dwMaxSubKeyLen;
172
    if(ERROR_SUCCESS==RegQueryInfoKey(hKey,NULL,NULL,NULL,&dwSubKeys,&dwMaxSubKeyLen,NULL,NULL,NULL,NULL,NULL,NULL)){
173
      TCHAR *szName=new TCHAR[1+dwMaxSubKeyLen];
174
      DWORD dwSizeName=sizeof(TCHAR)*(1+dwMaxSubKeyLen);
175
      for(DWORD dwIndex=0;ERROR_SUCCESS==RegEnumKeyEx(hKey, dwIndex, szName, &dwSizeName, NULL, NULL, NULL, &ftLastWriteTime); dwIndex++){
176
        CeCosTestPlatform t;
177
        if(t.LoadFromRegistry(hKey,szName)){
178
          t.m_strName=szName;
179
          CeCosTestPlatform::Add(t);
180
        }
181
        dwSizeName=sizeof(TCHAR)*(1+dwMaxSubKeyLen);
182
      }
183
      delete [] szName;
184
    }
185
    RegCloseKey(hKey);
186
  }
187
#endif
188
  const String strDir(CeCosTestUtils::HomeFile(_T(".eCosPlatforms")));
189
#ifdef _WIN32
190
  if(!CeCosTestUtils::Exists(strDir)){
191
    return true;
192
  }
193
#endif
194
  LoadFromDir(strDir);
195
  if(0==Count()){
196
    ERROR(_T("Failed to initialize any targets\n"));
197
  }
198
  return true;
199
}
200
 
201
int CeCosTestPlatform::Add(const CeCosTestPlatform &t)
202
{
203
  for(std::vector<CeCosTestPlatform>::iterator it=arPlatforms.begin();it!=arPlatforms.end();){
204
    if(0==_tcsicmp(it->Name(),t.Name())){
205
      // Careful - there's already something here with this name:
206
      ERROR(_T("Warning: duplicate target info %s\n"),it->Name());
207
      it=arPlatforms.erase(it);
208
    } else {
209
      it++;
210
    }
211
  }
212
  arPlatforms.push_back(t);
213
  return arPlatforms.size()-1;
214
}
215
 
216
void CeCosTestPlatform::RemoveAllPlatforms()
217
{
218
  arPlatforms.clear();
219
}
220
 
221
bool CeCosTestPlatform::LoadFromCommandString(LPCTSTR psz)
222
{
223
  CeCosTestPlatformProperties prop(this);
224
  return prop.LoadFromCommandString(psz);
225
}
226
 
227
#ifdef _WIN32
228
bool CeCosTestPlatform::LoadFromRegistry(HKEY hKey,LPCTSTR pszKey)
229
{
230
  CeCosTestPlatformProperties prop(this);
231
  return prop.LoadFromRegistry(hKey,pszKey);
232
}
233
#endif
234
 
235
bool CeCosTestPlatform::Save()
236
{
237
  const String strDir(CeCosTestUtils::HomeFile(_T(".eCosPlatforms")));
238
#ifdef _WIN32
239
  if(!CeCosTestUtils::Exists(strDir)){
240
    String strPlatformsKey = _T("Software\\eCos Configuration Tool\\Platforms");
241
//    strPlatformsKey += GetGreatestSubkey (_T("Software\\eCos"));
242
//    strPlatformsKey += _T("\\Platforms");
243
 
244
    return SaveToRegistry(HKEY_CURRENT_USER,strPlatformsKey);
245
  }
246
#endif
247
  return SaveToDir(strDir);
248
}
249
 
250
bool CeCosTestPlatform::SaveToDir (LPCTSTR pszDir)
251
{
252
  bool rc=false;
253
  void *pHandle;
254
  TCHAR szOrigDir[256];
255
  _tgetcwd(szOrigDir,sizeof szOrigDir-1);
256
  if(0==_tchdir(pszDir)){
257
    // Delete all the files under directory "pszDir"
258
    String strFile;
259
    for(bool b=CeCosTestUtils::StartSearch(pHandle,strFile);b;b=CeCosTestUtils::NextFile(pHandle,strFile)){
260
      if(CeCosTestUtils::IsFile(strFile)){
261
        _tunlink(strFile);
262
      }
263
    }
264
    CeCosTestUtils::EndSearch(pHandle);
265
    rc=true;
266
    // Rewrite the files
267
    for(int i=0;i<(signed)arPlatforms.size();i++){
268
      CeCosTestPlatform &t=arPlatforms[i];
269
      CeCosTestPlatformProperties prop(&t);
270
      rc&=prop.SaveToFile(t.Name());
271
    }
272
  } else {
273
    ERROR(_T("Failed to change to %s from %s\n"),pszDir,szOrigDir);
274
  }
275
 
276
  return rc;
277
}
278
 
279
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.