mirror of
https://github.com/ultimatepp/ultimatepp.git
synced 2026-09-10 03:54:54 -06:00
.upptst
git-svn-id: svn://ultimatepp.org/upp/trunk@6740 f0d560ea-af0d-0410-9eb7-867de7ffcac7
This commit is contained in:
cxl
parent
29c3c821a8
commit
6a2c839317
11 changed files with 1479 additions and 0 deletions
26
upptst/GZCompressFile/GZCompressFile.cpp
Normal file
26
upptst/GZCompressFile/GZCompressFile.cpp
Normal file
|
|
@ -0,0 +1,26 @@
|
|||
#include <Core/Core.h>
|
||||
|
||||
using namespace Upp;
|
||||
|
||||
CONSOLE_APP_MAIN
|
||||
{
|
||||
String dir1 = GetHomeDirFile("gztest1");
|
||||
DeleteFolderDeep(dir1);
|
||||
RealizeDirectory(dir1);
|
||||
String file1 = AppendFileName(dir1, "test.cpp");
|
||||
String gzfile1 = AppendFileName(dir1, "test.cpp.gz");
|
||||
|
||||
String dir2 = GetHomeDirFile("gztest2");
|
||||
DeleteFolderDeep(dir2);
|
||||
RealizeDirectory(dir2);
|
||||
String file2 = AppendFileName(dir2, "test.cpp");
|
||||
String gzfile2 = AppendFileName(dir2, "test.cpp.gz");
|
||||
|
||||
SaveFile(file1, LoadFile(GetDataFile("GZCompressFile.cpp")));
|
||||
GZCompressFile(file1);
|
||||
|
||||
SaveFile(gzfile2, LoadFile(gzfile1));
|
||||
GZDecompressFile(gzfile2);
|
||||
|
||||
ASSERT(LoadFile(file1) == LoadFile(file2));
|
||||
}
|
||||
9
upptst/GZCompressFile/GZCompressFile.upp
Normal file
9
upptst/GZCompressFile/GZCompressFile.upp
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
uses
|
||||
Core;
|
||||
|
||||
file
|
||||
GZCompressFile.cpp;
|
||||
|
||||
mainconfig
|
||||
"" = "SSE2";
|
||||
|
||||
4
upptst/GZCompressFile/init
Normal file
4
upptst/GZCompressFile/init
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
#ifndef _GZCompressFile_icpp_init_stub
|
||||
#define _GZCompressFile_icpp_init_stub
|
||||
#include "Core/init"
|
||||
#endif
|
||||
|
|
@ -57,6 +57,11 @@ CONSOLE_APP_MAIN
|
|||
test.Set(FLAG, "0");
|
||||
ASSERT(!test.FLAG);
|
||||
|
||||
DUMP(test.GetWidth(TEXT1));
|
||||
ASSERT(test.GetWidth(TEXT1) == 200);
|
||||
DUMP(test.GetWidth(FLAG));
|
||||
ASSERT(test.GetWidth(FLAG) == 0);
|
||||
|
||||
LOG("------------------------");
|
||||
ASSERT(test.Get(TEST).IsVoid());
|
||||
|
||||
|
|
@ -69,6 +74,11 @@ CONSOLE_APP_MAIN
|
|||
|
||||
DDUMPC(S_TEST::GetColumnIds());
|
||||
DDUMP(SqlCompile(SQLITE3, ~S_TEST::ColumnSet()));
|
||||
ASSERT(SqlCompile(SQLITE3, ~S_TEST::ColumnSet()) == "NUMBER1, TEXT1, A0, A1, A2, A3, A4, FLAG, FLAG2, NUMBER2, TEXT2, NUMBER, TEXT");
|
||||
DDUMP(SqlCompile(SQLITE3, ~S_TEST::ColumnSet("PREFIX_")));
|
||||
ASSERT(SqlCompile(SQLITE3, ~S_TEST::ColumnSet("PREFIX_")) == "PREFIX_NUMBER1, PREFIX_TEXT1, PREFIX_A0, PREFIX_A1, PREFIX_A2, PREFIX_A3, PREFIX_A4, PREFIX_FLAG, PREFIX_FLAG2, PREFIX_NUMBER2, PREFIX_TEXT2, PREFIX_NUMBER, PREFIX_TEXT");
|
||||
DDUMP(SqlCompile(SQLITE3, ~S_TEST::Of("TABLE")));
|
||||
ASSERT(SqlCompile(SQLITE3, ~S_TEST::Of("TABLE")) == "TABLE.NUMBER1, TABLE.TEXT1, TABLE.A0, TABLE.A1, TABLE.A2, TABLE.A3, TABLE.A4, TABLE.FLAG, TABLE.FLAG2, TABLE.NUMBER2, TABLE.TEXT2, TABLE.NUMBER, TABLE.TEXT");
|
||||
|
||||
LOG("--------- FINISHED");
|
||||
}
|
||||
|
|
|
|||
7
upptst/XmlStream/0.xml
Normal file
7
upptst/XmlStream/0.xml
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
|
||||
<!DOCTYPE 12A-sx549d>
|
||||
<12A-sx549d>
|
||||
<?3A-aulehl?>
|
||||
<!19A-p5hl9n>
|
||||
<4Al4tv13/>
|
||||
</12A-sx549d>
|
||||
1310
upptst/XmlStream/20130831_OB_536032_UZSZ.xml
Normal file
1310
upptst/XmlStream/20130831_OB_536032_UZSZ.xml
Normal file
File diff suppressed because it is too large
Load diff
9
upptst/XmlStream/20131102_ST_ZZSZ.xml
Normal file
9
upptst/XmlStream/20131102_ST_ZZSZ.xml
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<vf:VymennyFormat xsi:schemaLocation="urn:cz:isvs:ruian:schemas:VymennyFormatTypy:v1 ../ruian/xsd/vymenny_format/VymennyFormatTypy.xsd" xmlns:gml="http://www.opengis.net/gml/3.2" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:ami="urn:cz:isvs:ruian:schemas:AdrMistoIntTypy:v1" xmlns:base="urn:cz:isvs:ruian:schemas:BaseTypy:v1" xmlns:coi="urn:cz:isvs:ruian:schemas:CastObceIntTypy:v1" xmlns:com="urn:cz:isvs:ruian:schemas:CommonTypy:v1" xmlns:kui="urn:cz:isvs:ruian:schemas:KatUzIntTypy:v1" xmlns:kri="urn:cz:isvs:ruian:schemas:KrajIntTypy:v1" xmlns:mci="urn:cz:isvs:ruian:schemas:MomcIntTypy:v1" xmlns:mpi="urn:cz:isvs:ruian:schemas:MopIntTypy:v1" xmlns:obi="urn:cz:isvs:ruian:schemas:ObecIntTypy:v1" xmlns:oki="urn:cz:isvs:ruian:schemas:OkresIntTypy:v1" xmlns:opi="urn:cz:isvs:ruian:schemas:OrpIntTypy:v1" xmlns:pai="urn:cz:isvs:ruian:schemas:ParcelaIntTypy:v1" xmlns:pui="urn:cz:isvs:ruian:schemas:PouIntTypy:v1" xmlns:rsi="urn:cz:isvs:ruian:schemas:RegSouIntiTypy:v1" xmlns:spi="urn:cz:isvs:ruian:schemas:SpravObvIntTypy:v1" xmlns:sti="urn:cz:isvs:ruian:schemas:StatIntTypy:v1" xmlns:soi="urn:cz:isvs:ruian:schemas:StavObjIntTypy:v1" xmlns:uli="urn:cz:isvs:ruian:schemas:UliceIntTypy:v1" xmlns:vci="urn:cz:isvs:ruian:schemas:VuscIntTypy:v1" xmlns:vf="urn:cz:isvs:ruian:schemas:VymennyFormatTypy:v1" xmlns:zji="urn:cz:isvs:ruian:schemas:ZsjIntTypy:v1"><!--
|
||||
v 1.0 - základní verze
|
||||
v 1.1
|
||||
- doplnění verzování
|
||||
- doplnění dat platnosti (přidání elementu PlatnostDatK)
|
||||
- změna EPSG
|
||||
- doplnění hranice pro parcely OMP-V (OriginalniHraniceOmpv)
|
||||
--><vf:Hlavicka><vf:VerzeVFR>1.1</vf:VerzeVFR><vf:TypZaznamu>Platne</vf:TypZaznamu><vf:TypDavky>Prirustek</vf:TypDavky><vf:TypSouboru>ST_ZZSZ</vf:TypSouboru><vf:Datum>2013-11-03T00:00:01</vf:Datum><vf:TrasakceOd><com:Id>384178</com:Id><com:Zapsano>2013-11-02T01:01:00</com:Zapsano></vf:TrasakceOd><vf:TransakceDo><com:Id>384201</com:Id><com:Zapsano>2013-11-02T23:00:59</com:Zapsano></vf:TransakceDo><vf:PredchoziSoubor>20131101_ST_ZZSZ.xml.gz</vf:PredchoziSoubor><vf:Metadata xlink:type="simple" xlink:href="http://cuzk.cz/ruian/metadata/20131102_ST_ZZSZ.xml"></vf:Metadata><vf:PlatnostDatK><com:ISUI>2013-11-02T23:00:59</com:ISUI><com:ISKN>2013-11-02T14:48:51</com:ISKN></vf:PlatnostDatK></vf:Hlavicka><vf:Data><vf:KatastralniUzemi><vf:KatastralniUzemi gml:id="KU.930393"><kui:Kod>930393</kui:Kod><kui:Nazev>Osinky u Krumsína</kui:Nazev><kui:ExistujeDigitalniMapa>true</kui:ExistujeDigitalniMapa><kui:Obec><obi:Kod>592935</obi:Kod></kui:Obec><kui:PlatiOd>2013-11-02T00:00:00</kui:PlatiOd><kui:IdTransakce>384192</kui:IdTransakce><kui:GlobalniIdNavrhuZmeny>449467</kui:GlobalniIdNavrhuZmeny><kui:RizeniId>27812938010</kui:RizeniId></vf:KatastralniUzemi></vf:KatastralniUzemi></vf:Data></vf:VymennyFormat>
|
||||
9
upptst/XmlStream/20131110_ST_ZZSZ.xml
Normal file
9
upptst/XmlStream/20131110_ST_ZZSZ.xml
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<vf:VymennyFormat xsi:schemaLocation="urn:cz:isvs:ruian:schemas:VymennyFormatTypy:v1 ../ruian/xsd/vymenny_format/VymennyFormatTypy.xsd" xmlns:gml="http://www.opengis.net/gml/3.2" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:ami="urn:cz:isvs:ruian:schemas:AdrMistoIntTypy:v1" xmlns:base="urn:cz:isvs:ruian:schemas:BaseTypy:v1" xmlns:coi="urn:cz:isvs:ruian:schemas:CastObceIntTypy:v1" xmlns:com="urn:cz:isvs:ruian:schemas:CommonTypy:v1" xmlns:kui="urn:cz:isvs:ruian:schemas:KatUzIntTypy:v1" xmlns:kri="urn:cz:isvs:ruian:schemas:KrajIntTypy:v1" xmlns:mci="urn:cz:isvs:ruian:schemas:MomcIntTypy:v1" xmlns:mpi="urn:cz:isvs:ruian:schemas:MopIntTypy:v1" xmlns:obi="urn:cz:isvs:ruian:schemas:ObecIntTypy:v1" xmlns:oki="urn:cz:isvs:ruian:schemas:OkresIntTypy:v1" xmlns:opi="urn:cz:isvs:ruian:schemas:OrpIntTypy:v1" xmlns:pai="urn:cz:isvs:ruian:schemas:ParcelaIntTypy:v1" xmlns:pui="urn:cz:isvs:ruian:schemas:PouIntTypy:v1" xmlns:rsi="urn:cz:isvs:ruian:schemas:RegSouIntiTypy:v1" xmlns:spi="urn:cz:isvs:ruian:schemas:SpravObvIntTypy:v1" xmlns:sti="urn:cz:isvs:ruian:schemas:StatIntTypy:v1" xmlns:soi="urn:cz:isvs:ruian:schemas:StavObjIntTypy:v1" xmlns:uli="urn:cz:isvs:ruian:schemas:UliceIntTypy:v1" xmlns:vci="urn:cz:isvs:ruian:schemas:VuscIntTypy:v1" xmlns:vf="urn:cz:isvs:ruian:schemas:VymennyFormatTypy:v1" xmlns:zji="urn:cz:isvs:ruian:schemas:ZsjIntTypy:v1"><!--
|
||||
v 1.0 - základní verze
|
||||
v 1.1
|
||||
- doplnění verzování
|
||||
- doplnění dat platnosti (přidání elementu PlatnostDatK)
|
||||
- změna EPSG
|
||||
- doplnění hranice pro parcely OMP-V (OriginalniHraniceOmpv)
|
||||
--><vf:Hlavicka><vf:VerzeVFR>1.1</vf:VerzeVFR><vf:TypZaznamu>Platne</vf:TypZaznamu><vf:TypDavky>Prirustek</vf:TypDavky><vf:TypSouboru>ST_ZZSZ</vf:TypSouboru><vf:Datum>2013-11-11T00:00:01</vf:Datum><vf:TrasakceOd><com:Id>390362</com:Id><com:Zapsano>2013-11-10T11:48:55</com:Zapsano></vf:TrasakceOd><vf:TransakceDo><com:Id>390362</com:Id><com:Zapsano>2013-11-10T11:48:55</com:Zapsano></vf:TransakceDo><vf:PredchoziSoubor>20131109_ST_ZZSZ.xml.gz</vf:PredchoziSoubor><vf:Metadata xlink:type="simple" xlink:href="http://cuzk.cz/ruian/metadata/20131110_ST_ZZSZ.xml"></vf:Metadata><vf:PlatnostDatK><com:ISUI>2013-11-08T13:49:40</com:ISUI><com:ISKN>2013-11-10T11:48:55</com:ISKN></vf:PlatnostDatK></vf:Hlavicka><vf:Data><vf:Parcely><vf:Parcela gml:id="PA.1159722603"><pai:Id>1159722603</pai:Id><pai:KmenoveCislo>29</pai:KmenoveCislo><pai:PododdeleniCisla>1</pai:PododdeleniCisla><pai:VymeraParcely>1133</pai:VymeraParcely><pai:DruhCislovaniKod>1</pai:DruhCislovaniKod><pai:DruhPozemkuKod>13</pai:DruhPozemkuKod><pai:KatastralniUzemi><kui:Kod>747866</kui:Kod></pai:KatastralniUzemi><pai:PlatiOd>2013-11-10T00:00:00</pai:PlatiOd><pai:IdTransakce>390362</pai:IdTransakce><pai:RizeniId>27444799010</pai:RizeniId><pai:Geometrie><pai:DefinicniBod><gml:Point gml:id="DPA.1159722603" srsName="urn:ogc:def:crs:EPSG::5514" srsDimension="2"><gml:pos>-637163.59 -1081122.92</gml:pos></gml:Point></pai:DefinicniBod></pai:Geometrie></vf:Parcela><vf:Parcela gml:id="PA.1159723603"><pai:Id>1159723603</pai:Id><pai:KmenoveCislo>29</pai:KmenoveCislo><pai:PododdeleniCisla>2</pai:PododdeleniCisla><pai:VymeraParcely>150</pai:VymeraParcely><pai:DruhCislovaniKod>1</pai:DruhCislovaniKod><pai:DruhPozemkuKod>13</pai:DruhPozemkuKod><pai:KatastralniUzemi><kui:Kod>747866</kui:Kod></pai:KatastralniUzemi><pai:PlatiOd>2013-11-10T00:00:00</pai:PlatiOd><pai:IdTransakce>390362</pai:IdTransakce><pai:RizeniId>27444799010</pai:RizeniId><pai:Geometrie><pai:DefinicniBod><gml:Point gml:id="DPA.1159723603" srsName="urn:ogc:def:crs:EPSG::5514" srsDimension="2"><gml:pos>-637172.31 -1081105.05</gml:pos></gml:Point></pai:DefinicniBod></pai:Geometrie></vf:Parcela><vf:Parcela gml:id="PA.1159782603"><pai:Id>1159782603</pai:Id><pai:KmenoveCislo>1</pai:KmenoveCislo><pai:PododdeleniCisla>2</pai:PododdeleniCisla><pai:VymeraParcely>2213</pai:VymeraParcely><pai:DruhCislovaniKod>2</pai:DruhCislovaniKod><pai:DruhPozemkuKod>5</pai:DruhPozemkuKod><pai:KatastralniUzemi><kui:Kod>747866</kui:Kod></pai:KatastralniUzemi><pai:PlatiOd>2013-11-10T00:00:00</pai:PlatiOd><pai:IdTransakce>390362</pai:IdTransakce><pai:RizeniId>27444799010</pai:RizeniId><pai:BonitovaneDily><com:BonitovanyDil><com:Vymera>2213</com:Vymera><com:BonitovanaJednotkaKod>52504</com:BonitovanaJednotkaKod><com:IdTranskace>390362</com:IdTranskace><com:RizeniId>27444799010</com:RizeniId></com:BonitovanyDil></pai:BonitovaneDily><pai:ZpusobyOchranyPozemku><com:ZpusobOchrany><com:Kod>27</com:Kod><com:TypOchranyKod>6</com:TypOchranyKod><com:IdTransakce>0</com:IdTransakce><com:RizeniId>1153766603</com:RizeniId></com:ZpusobOchrany></pai:ZpusobyOchranyPozemku><pai:Geometrie><pai:DefinicniBod><gml:Point gml:id="DPA.1159782603" srsName="urn:ogc:def:crs:EPSG::5514" srsDimension="2"><gml:pos>-637124.64 -1081119.55</gml:pos></gml:Point></pai:DefinicniBod></pai:Geometrie></vf:Parcela></vf:Parcely><vf:StavebniObjekty><vf:StavebniObjekt gml:id="SO.5401763"><soi:Kod>5401763</soi:Kod><soi:CislaDomovni><com:CisloDomovni>55</com:CisloDomovni></soi:CislaDomovni><soi:IdentifikacniParcela><pai:Id>1159723603</pai:Id></soi:IdentifikacniParcela><soi:TypStavebnihoObjektuKod>1</soi:TypStavebnihoObjektuKod><soi:ZpusobVyuzitiKod>7</soi:ZpusobVyuzitiKod><soi:CastObce><coi:Kod>147869</coi:Kod></soi:CastObce><soi:PlatiOd>2011-07-01T00:00:00</soi:PlatiOd><soi:GlobalniIdNavrhuZmeny>0</soi:GlobalniIdNavrhuZmeny><soi:IdTransakce>0</soi:IdTransakce><soi:IsknBudovaId>194375603</soi:IsknBudovaId><soi:PocetBytu>1</soi:PocetBytu><soi:PripojeniKanalizaceKod>3</soi:PripojeniKanalizaceKod><soi:PripojeniPlynKod>3</soi:PripojeniPlynKod><soi:PripojeniVodovodKod>1</soi:PripojeniVodovodKod><soi:VybaveniVytahemKod>2</soi:VybaveniVytahemKod><soi:ZpusobVytapeniKod>1</soi:ZpusobVytapeniKod><soi:Geometrie><soi:DefinicniBod><gml:Point gml:id="DSO.5401763" srsName="urn:ogc:def:crs:EPSG::5514" srsDimension="2"><gml:pos>-637172.31 -1081102.45</gml:pos></gml:Point></soi:DefinicniBod></soi:Geometrie></vf:StavebniObjekt></vf:StavebniObjekty></vf:Data></vf:VymennyFormat>
|
||||
81
upptst/XmlStream/XmlStream.cpp
Normal file
81
upptst/XmlStream/XmlStream.cpp
Normal file
|
|
@ -0,0 +1,81 @@
|
|||
#include <Core/Core.h>
|
||||
|
||||
using namespace Upp;
|
||||
|
||||
void Check0(const String& xml0, bool full)
|
||||
{
|
||||
dword astyle = full ? 0 : XML_HEADER|XML_DOCTYPE;
|
||||
dword pstyle = full ? 0 : XML_IGNORE_DECLS|XML_IGNORE_PIS|XML_IGNORE_COMMENTS;
|
||||
String xml = AsXML(ParseXML(xml0, pstyle), astyle);
|
||||
String p = GetHomeDirFile("XML.xml");
|
||||
SaveFile(p, xml);
|
||||
String xml2 = AsXML(ParseXMLFile(p, pstyle), astyle);
|
||||
SaveFile(GetHomeDirFile("XML2.xml"), xml2);
|
||||
String xml1 = AsXML(ParseXML(xml, pstyle), astyle);
|
||||
SaveFile(GetHomeDirFile("XML1.xml"), xml1);
|
||||
|
||||
ASSERT(xml == xml1);
|
||||
ASSERT(xml == xml2);
|
||||
}
|
||||
|
||||
void Check(const String& xml)
|
||||
{
|
||||
Check0(xml, true);
|
||||
String xml2 = AsXML(ParseXML(xml));
|
||||
Check0(xml2, false);
|
||||
}
|
||||
|
||||
String GenID()
|
||||
{
|
||||
return "A" + AsString(Random(1000000));
|
||||
}
|
||||
|
||||
void GenNode(XmlNode& n)
|
||||
{
|
||||
bool doc = n.GetType() == XML_DOC;
|
||||
XmlNode& nn = n.Add();
|
||||
nn.CreateTag(GenID());
|
||||
int N = Random(4);
|
||||
for(int i = 0; i < N; i++)
|
||||
nn.SetAttr(GenID(), AsString(Random()));
|
||||
if(Random(10) == 0)
|
||||
nn.Add().CreatePI(GenID());
|
||||
if(Random(10) == 0)
|
||||
nn.Add().CreateComment(GenID());
|
||||
if(Random(10) == 0)
|
||||
nn.Add().CreateDecl(GenID());
|
||||
N = Random(2) * Random(4);
|
||||
if(nn.GetCount() == 0 && Random(3) == 0)
|
||||
nn.Add().CreateText(GenID());
|
||||
else
|
||||
for(int i = 0; i < N; i++)
|
||||
GenNode(nn);
|
||||
}
|
||||
|
||||
void CheckFile(const char *path)
|
||||
{
|
||||
Cout() << path << '\n';
|
||||
Check(AsXML(ParseXML(LoadFile(path), 0)));
|
||||
}
|
||||
|
||||
CONSOLE_APP_MAIN
|
||||
{
|
||||
SeedRandom();
|
||||
|
||||
for(int i = 0; i < 100; i++) {
|
||||
Cout() << i << '\n';
|
||||
XmlNode n;
|
||||
XmlNode& nn = n.Add();
|
||||
nn.CreateTag(GenID());
|
||||
for(int i = 0; i < 100; i++) {
|
||||
GenNode(nn);
|
||||
String xml = AsXML(n);
|
||||
LOG("============");
|
||||
LOG(xml);
|
||||
Check(AsXML(n));
|
||||
}
|
||||
}
|
||||
|
||||
for(FindFile ff(GetDataFile("*.xml")); ff; ff.Next())
|
||||
CheckFile(ff.GetPath());
|
||||
}
|
||||
10
upptst/XmlStream/XmlStream.upp
Normal file
10
upptst/XmlStream/XmlStream.upp
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
uses
|
||||
Core;
|
||||
|
||||
file
|
||||
XmlStream.cpp,
|
||||
0.xml;
|
||||
|
||||
mainconfig
|
||||
"" = "SSE2 TEST_XML";
|
||||
|
||||
4
upptst/XmlStream/init
Normal file
4
upptst/XmlStream/init
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
#ifndef _XmlStream_icpp_init_stub
|
||||
#define _XmlStream_icpp_init_stub
|
||||
#include "Core/init"
|
||||
#endif
|
||||
Loading…
Add table
Add a link
Reference in a new issue