Changeset 348 for tools/dbc_export


Ignore:
Timestamp:
Mar 1, 2010, 4:04:25 PM (15 years ago)
Author:
maron
Message:

Přidání nuly za každý ukládaný textový řetězec, přidána změna znakové sady při připojení do databáze a možné nastavení pomocí parametru. Celý export otestován... funkční.

Location:
tools/dbc_export
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • tools/dbc_export

    • Property svn:ignore

      •  

        old new  
        11bin
        22*.bak
         3backup

  • tools/dbc_export/DBCExport.lpi

    r341 r348  
    1212      <Title Value="DBCExport"/>
    1313      <UseXPManifest Value="True"/>
    14       <ActiveEditorIndexAtStart Value="0"/>
     14      <ActiveEditorIndexAtStart Value="3"/>
    1515    </General>
    1616    <VersionInfo>
    … …  
    2727      <local>
    2828        <FormatVersion Value="1"/>
    29         <CommandLineParams Value="-f ../../../trunk/source/3.3.0/dbc/GameTips.dbc -n test.dbc -c usuuuuuuuuuuuuuuuu -q &quot;SELECT T.entry as entry,T.Text as text1 FROM (SELECT * FROM gametips WHERE (Complete = 1) AND ((Language = 1)) AND (User IN (459,670,602,462,1,400,638,592,624,610,769,331,131,704,2,499,641,660,578,337,304,277,208,613,768,754,590,606,26,618,739,503,601,607,585,596,765,320,547,687)) AND VersionStart <= 9947 AND VersionEnd >= 9947) AS T GROUP BY T.entry&quot;"/>
     29        <CommandLineParams Value="-f ../../../trunk/source/3.3.2/dbc/GameTips.dbc -n test.dbc -c usuuuuuuuuuuuuuuuu -q &quot;SELECT T.entry as entry,T.Text as text1 FROM (SELECT * FROM gametips WHERE (Complete = 1) AND ((Language = 1)) AND (User IN (459,670,602,462,1,400,638,592,624,610,769,331,131,704,2,499,641,660,578,337,304,277,208,613,768,754,590,606,26,618,739,503,601,607,585,596,765,320,547,687)) AND VersionStart <= 9947 AND VersionEnd >= 9947) AS T GROUP BY T.entry&quot;"/>
    3030        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
    3131      </local>
    … …  
    3636        <IsPartOfProject Value="True"/>
    3737        <UnitName Value="DBCExport"/>
    38         <CursorPos X="1" Y="199"/>
    39         <TopLine Value="196"/>
     38        <CursorPos X="1" Y="196"/>
     39        <TopLine Value="174"/>
    4040        <EditorIndex Value="0"/>
    41         <UsageCount Value="48"/>
     41        <UsageCount Value="79"/>
    4242        <Loaded Value="True"/>
    4343        <SyntaxHighlighter Value="Delphi"/>
    … …  
    4848        <CursorPos X="1" Y="1"/>
    4949        <TopLine Value="1"/>
    50         <UsageCount Value="27"/>
     50        <UsageCount Value="24"/>
    5151        <SyntaxHighlighter Value="Delphi"/>
    5252      </Unit1>
    … …  
    5555        <CursorPos X="14" Y="719"/>
    5656        <TopLine Value="703"/>
    57         <UsageCount Value="13"/>
     57        <UsageCount Value="10"/>
    5858      </Unit2>
    5959      <Unit3>
    … …  
    6161        <CursorPos X="23" Y="36"/>
    6262        <TopLine Value="33"/>
    63         <UsageCount Value="12"/>
     63        <UsageCount Value="9"/>
    6464      </Unit3>
    6565      <Unit4>
    … …  
    6868        <CursorPos X="1" Y="1"/>
    6969        <TopLine Value="1"/>
    70         <UsageCount Value="27"/>
     70        <UsageCount Value="24"/>
    7171        <SyntaxHighlighter Value="Delphi"/>
    7272      </Unit4>
    … …  
    7575        <CursorPos X="24" Y="6"/>
    7676        <TopLine Value="1"/>
    77         <UsageCount Value="7"/>
     77        <UsageCount Value="4"/>
    7878        <SyntaxHighlighter Value="None"/>
    7979      </Unit5>
    … …  
    8383        <CursorPos X="3" Y="166"/>
    8484        <TopLine Value="164"/>
    85         <UsageCount Value="8"/>
     85        <UsageCount Value="5"/>
    8686      </Unit6>
    8787      <Unit7>
    … …  
    8989        <CursorPos X="22" Y="196"/>
    9090        <TopLine Value="184"/>
    91         <UsageCount Value="10"/>
     91        <UsageCount Value="7"/>
    9292      </Unit7>
    9393      <Unit8>
    … …  
    9696        <CursorPos X="12" Y="100"/>
    9797        <TopLine Value="66"/>
    98         <UsageCount Value="10"/>
     98        <UsageCount Value="7"/>
    9999      </Unit8>
    100100      <Unit9>
    … …  
    102102        <CursorPos X="1" Y="1"/>
    103103        <TopLine Value="51"/>
    104         <UsageCount Value="10"/>
     104        <UsageCount Value="7"/>
    105105      </Unit9>
    106106      <Unit10>
    … …  
    109109        <CursorPos X="9" Y="79"/>
    110110        <TopLine Value="51"/>
    111         <UsageCount Value="9"/>
     111        <UsageCount Value="6"/>
    112112      </Unit10>
    113113      <Unit11>
    … …  
    115115        <IsPartOfProject Value="True"/>
    116116        <UnitName Value="USqlDatabase"/>
    117         <CursorPos X="14" Y="34"/>
    118         <TopLine Value="16"/>
     117        <CursorPos X="1" Y="181"/>
     118        <TopLine Value="159"/>
    119119        <EditorIndex Value="3"/>
    120         <UsageCount Value="39"/>
     120        <UsageCount Value="70"/>
    121121        <Loaded Value="True"/>
    122122        <SyntaxHighlighter Value="Delphi"/>
    … …  
    126126        <IsPartOfProject Value="True"/>
    127127        <UnitName Value="UDBC"/>
    128         <CursorPos X="1" Y="130"/>
    129         <TopLine Value="116"/>
     128        <CursorPos X="27" Y="139"/>
     129        <TopLine Value="89"/>
    130130        <EditorIndex Value="1"/>
    131         <UsageCount Value="39"/>
     131        <UsageCount Value="70"/>
    132132        <Loaded Value="True"/>
    133133        <SyntaxHighlighter Value="Delphi"/>
    … …  
    139139        <TopLine Value="1"/>
    140140        <EditorIndex Value="2"/>
    141         <UsageCount Value="39"/>
     141        <UsageCount Value="70"/>
    142142        <Loaded Value="True"/>
    143143        <SyntaxHighlighter Value="None"/>
    … …  
    148148        <CursorPos X="15" Y="42"/>
    149149        <TopLine Value="28"/>
    150         <UsageCount Value="15"/>
     150        <UsageCount Value="12"/>
    151151      </Unit14>
    152152    </Units>
    … …  
    154154      <Position1>
    155155        <Filename Value="DBCExport.pas"/>
    156         <Caret Line="192" Column="1" TopLine="178"/>
     156        <Caret Line="203" Column="1" TopLine="189"/>
    157157      </Position1>
    158158      <Position2>
    159159        <Filename Value="DBCExport.pas"/>
    160         <Caret Line="193" Column="1" TopLine="179"/>
     160        <Caret Line="204" Column="1" TopLine="190"/>
    161161      </Position2>
    162162      <Position3>
    163163        <Filename Value="DBCExport.pas"/>
    164         <Caret Line="194" Column="1" TopLine="180"/>
     164        <Caret Line="205" Column="1" TopLine="191"/>
    165165      </Position3>
    166166      <Position4>
    167167        <Filename Value="DBCExport.pas"/>
    168         <Caret Line="195" Column="1" TopLine="181"/>
     168        <Caret Line="206" Column="1" TopLine="192"/>
    169169      </Position4>
    170170      <Position5>
    171171        <Filename Value="DBCExport.pas"/>
    172         <Caret Line="194" Column="64" TopLine="176"/>
     172        <Caret Line="29" Column="5" TopLine="1"/>
    173173      </Position5>
    174174      <Position6>
    175175        <Filename Value="DBCExport.pas"/>
    176         <Caret Line="190" Column="1" TopLine="177"/>
     176        <Caret Line="80" Column="18" TopLine="58"/>
    177177      </Position6>
    178178      <Position7>
    179179        <Filename Value="DBCExport.pas"/>
    180         <Caret Line="157" Column="1" TopLine="146"/>
     180        <Caret Line="81" Column="42" TopLine="59"/>
    181181      </Position7>
    182182      <Position8>
    183         <Filename Value="DBCExport.pas"/>
    184         <Caret Line="156" Column="1" TopLine="142"/>
     183        <Filename Value="USqlDatabase.pas"/>
     184        <Caret Line="34" Column="14" TopLine="8"/>
    185185      </Position8>
    186186      <Position9>
    187         <Filename Value="DBCExport.pas"/>
    188         <Caret Line="157" Column="1" TopLine="143"/>
     187        <Filename Value="USqlDatabase.pas"/>
     188        <Caret Line="52" Column="24" TopLine="30"/>
    189189      </Position9>
    190190      <Position10>
    191         <Filename Value="DBCExport.pas"/>
    192         <Caret Line="158" Column="1" TopLine="144"/>
     191        <Filename Value="USqlDatabase.pas"/>
     192        <Caret Line="80" Column="45" TopLine="54"/>
    193193      </Position10>
    194194      <Position11>
    195         <Filename Value="DBCExport.pas"/>
    196         <Caret Line="157" Column="1" TopLine="143"/>
     195        <Filename Value="USqlDatabase.pas"/>
     196        <Caret Line="137" Column="21" TopLine="115"/>
    197197      </Position11>
    198198      <Position12>
    199199        <Filename Value="DBCExport.pas"/>
    200         <Caret Line="208" Column="22" TopLine="184"/>
     200        <Caret Line="96" Column="7" TopLine="55"/>
    201201      </Position12>
    202202      <Position13>
    203203        <Filename Value="DBCExport.pas"/>
    204         <Caret Line="190" Column="1" TopLine="176"/>
     204        <Caret Line="193" Column="16" TopLine="171"/>
    205205      </Position13>
    206206      <Position14>
    207207        <Filename Value="DBCExport.pas"/>
    208         <Caret Line="193" Column="1" TopLine="184"/>
     208        <Caret Line="198" Column="37" TopLine="171"/>
    209209      </Position14>
    210210      <Position15>
    211         <Filename Value="DBCExport.pas"/>
    212         <Caret Line="194" Column="1" TopLine="180"/>
     211        <Filename Value="USqlDatabase.pas"/>
     212        <Caret Line="4" Column="18" TopLine="1"/>
    213213      </Position15>
    214214      <Position16>
    215         <Filename Value="DBCExport.pas"/>
    216         <Caret Line="195" Column="1" TopLine="181"/>
     215        <Filename Value="USqlDatabase.pas"/>
     216        <Caret Line="52" Column="24" TopLine="30"/>
    217217      </Position16>
    218218      <Position17>
    219         <Filename Value="DBCExport.pas"/>
    220         <Caret Line="196" Column="1" TopLine="182"/>
     219        <Filename Value="USqlDatabase.pas"/>
     220        <Caret Line="80" Column="45" TopLine="58"/>
    221221      </Position17>
    222222      <Position18>
    223         <Filename Value="DBCExport.pas"/>
    224         <Caret Line="199" Column="1" TopLine="185"/>
     223        <Filename Value="USqlDatabase.pas"/>
     224        <Caret Line="137" Column="21" TopLine="115"/>
    225225      </Position18>
    226226      <Position19>
    227227        <Filename Value="DBCExport.pas"/>
    228         <Caret Line="201" Column="1" TopLine="187"/>
     228        <Caret Line="212" Column="30" TopLine="190"/>
    229229      </Position19>
    230230      <Position20>
    231231        <Filename Value="DBCExport.pas"/>
    232         <Caret Line="202" Column="1" TopLine="188"/>
     232        <Caret Line="197" Column="32" TopLine="191"/>
    233233      </Position20>
    234234      <Position21>
    235235        <Filename Value="DBCExport.pas"/>
    236         <Caret Line="203" Column="1" TopLine="189"/>
     236        <Caret Line="195" Column="1" TopLine="173"/>
    237237      </Position21>
    238238      <Position22>
    239         <Filename Value="DBCExport.pas"/>
    240         <Caret Line="204" Column="1" TopLine="190"/>
     239        <Filename Value="USqlDatabase.pas"/>
     240        <Caret Line="181" Column="1" TopLine="159"/>
    241241      </Position22>
    242242      <Position23>
    243         <Filename Value="DBCExport.pas"/>
    244         <Caret Line="205" Column="1" TopLine="191"/>
     243        <Filename Value="USqlDatabase.pas"/>
     244        <Caret Line="183" Column="1" TopLine="161"/>
    245245      </Position23>
    246246      <Position24>
    247         <Filename Value="UDBC.pas"/>
    248         <Caret Line="125" Column="1" TopLine="111"/>
     247        <Filename Value="USqlDatabase.pas"/>
     248        <Caret Line="184" Column="1" TopLine="162"/>
    249249      </Position24>
    250250      <Position25>
    251         <Filename Value="UDBC.pas"/>
    252         <Caret Line="126" Column="1" TopLine="112"/>
     251        <Filename Value="USqlDatabase.pas"/>
     252        <Caret Line="186" Column="1" TopLine="164"/>
    253253      </Position25>
    254254      <Position26>
    255         <Filename Value="UDBC.pas"/>
    256         <Caret Line="127" Column="1" TopLine="113"/>
     255        <Filename Value="USqlDatabase.pas"/>
     256        <Caret Line="188" Column="1" TopLine="166"/>
    257257      </Position26>
    258258      <Position27>
    259         <Filename Value="UDBC.pas"/>
    260         <Caret Line="128" Column="1" TopLine="114"/>
     259        <Filename Value="USqlDatabase.pas"/>
     260        <Caret Line="190" Column="1" TopLine="168"/>
    261261      </Position27>
    262262      <Position28>
    263         <Filename Value="UDBC.pas"/>
    264         <Caret Line="130" Column="1" TopLine="116"/>
     263        <Filename Value="USqlDatabase.pas"/>
     264        <Caret Line="193" Column="1" TopLine="171"/>
    265265      </Position28>
    266266      <Position29>
    267         <Filename Value="DBCExport.pas"/>
    268         <Caret Line="206" Column="1" TopLine="192"/>
     267        <Filename Value="USqlDatabase.pas"/>
     268        <Caret Line="194" Column="1" TopLine="172"/>
    269269      </Position29>
    270270      <Position30>
    271271        <Filename Value="DBCExport.pas"/>
    272         <Caret Line="207" Column="1" TopLine="193"/>
     272        <Caret Line="196" Column="1" TopLine="174"/>
    273273      </Position30>
    274274    </JumpHistory>
    … …  
    304304  </CompilerOptions>
    305305  <Debugging>
    306     <BreakPoints Count="2">
     306    <BreakPoints Count="3">
    307307      <Item1>
    308308        <Source Value="DBCExport.pas"/>
    309         <Line Value="190"/>
     309        <Line Value="212"/>
    310310      </Item1>
    311311      <Item2>
    312312        <Source Value="DBCExport.pas"/>
    313         <Line Value="199"/>
     313        <Line Value="195"/>
    314314      </Item2>
     315      <Item3>
     316        <Source Value="DBCExport.pas"/>
     317        <Line Value="196"/>
     318      </Item3>
    315319    </BreakPoints>
    316320    <Watches Count="2">

  • tools/dbc_export/DBCExport.pas

    r341 r348  
    2727    IndexTable: array of integer;
    2828    SQLquery: string;
     29    CharSet: string;
    2930    DisplayData: Boolean;
    3031    constructor Create(TheOwner: TComponent); override;
    … …  
    7778    Database.Hostname := GetOptionValue('t', 'host');
    7879  end else Database.Hostname := 'localhost';
     80  if HasOption('a', 'Charset') then begin
     81    Charset := GetOptionValue('a', 'Charset');
     82  end else Charset := 'utf8';
    7983  if HasOption('q', 'sql_query') then begin
    8084    SQLquery := GetOptionValue('q', 'sql_query');
    … …  
    115119  WriteLn('Usage: ', ExtractFileName(ExeName), ' [options]');
    116120  WriteLn('  -h --help        Show this help');
    117   WriteLn('  -u --user        Database user name');
     121  WriteLn('  -u --user        Database user name, default root');
    118122  WriteLn('  -p --password    Database password name');
    119   WriteLn('  -s --schema      Database schema name');
    120   WriteLn('  -t --host        Database host name');
     123  WriteLn('  -s --schema      Database schema name, default wowpreklad');
     124  WriteLn('  -t --host        Database host name, default localhost');
     125  WriteLn('  -a --Charset     Database Charset, default utf8');
    121126  WriteLn('  -f --file        Source DBC file name');
    122127  WriteLn('  -n --newfile     New created DBC file name');
    … …  
    169174begin
    170175  with DBC do begin
    171     SaveToFile(NewDBCFileName);
     176    if FileExists(DBCFileName) then
     177      SaveToFile(NewDBCFileName);
    172178    Free;
    173179  end;
    … …  
    185191  with DBC do begin
    186192    if (SQLquery <> '') then begin;
     193
    187194      Database.Connect;
     195//      Database.Query('CHARACTER SET '+CharSet);
     196      Database.Query('SET NAMES '+CharSet);
    188197      DBRows := Database.Query(SQLquery);
     198      CharSet:=Database.Charset;
    189199
    190200      CreateIndexTable(DBRows);

  • tools/dbc_export/UDBC.pas

    r340 r348  
    118118      for Col := 1 to Length(StringList[Row]) do
    119119        WriteByte(Ord(StringList[Row][Col]));
     120        WriteByte(0);
    120121    end;
    121122  end;
Note: See TracChangeset for help on using the changeset viewer.