70 lines
1.6 KiB
Tcl
70 lines
1.6 KiB
Tcl
#!/usr/bin/tclsh
|
|
#
|
|
# Run this script in order to generate a ZIP archive containing various
|
|
# command-line tools.
|
|
#
|
|
# The makefile that invokes this script must first build the following
|
|
# binaries:
|
|
#
|
|
# testfixture -- used to run this script
|
|
# sqlite3 -- the SQLite CLI
|
|
# sqldiff -- Program to diff two databases
|
|
# sqlite3_analyzer -- Space analyzer
|
|
#
|
|
switch $tcl_platform(os) {
|
|
{Windows NT} {
|
|
set OS win32
|
|
set EXE .exe
|
|
}
|
|
Linux {
|
|
set OS linux
|
|
set EXE {}
|
|
}
|
|
Darwin {
|
|
set OS osx
|
|
set EXE {}
|
|
}
|
|
default {
|
|
set OS unknown
|
|
set EXE {}
|
|
}
|
|
}
|
|
switch $tcl_platform(machine) {
|
|
arm64 {
|
|
set ARCH arm64
|
|
}
|
|
x86_64 {
|
|
set ARCH x64
|
|
}
|
|
amd64 -
|
|
intel {
|
|
if {$tcl_platform(pointerSize)==4} {
|
|
set ARCH x86
|
|
} else {
|
|
set ARCH x64
|
|
}
|
|
}
|
|
default {
|
|
set ARCH unk
|
|
}
|
|
}
|
|
set in [open [file join [file dirname [file dirname [info script]]] VERSION]]
|
|
set vers [read $in]
|
|
close $in
|
|
scan $vers %d.%d.%d v1 v2 v3
|
|
set v2 [format 3%02d%02d00 $v2 $v3]
|
|
set name sqlite-tools-$OS-$ARCH-$v2.zip
|
|
|
|
if {$OS=="win32"} {
|
|
# The win32 tar.exe supports the -a ("auto-compress") option. This causes
|
|
# tar to create an archive type based on the extension of the output file.
|
|
# In this case, a zip file.
|
|
puts "tar -a -cf $name sqlite3$EXE sqldiff$EXE sqlite3_analyzer$EXE"
|
|
puts [exec tar -a -cf $name sqlite3$EXE sqldiff$EXE sqlite3_analyzer$EXE]
|
|
puts "$name: [file size $name] bytes"
|
|
} else {
|
|
puts "zip $name sqlite3$EXE sqldiff$EXE sqlite3_analyzer$EXE"
|
|
puts [exec zip $name sqlite3$EXE sqldiff$EXE sqlite3_analyzer$EXE]
|
|
puts [exec ls -l $name]
|
|
}
|