Stringscan

Check-in [ff6636407e]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Begin work on version 2.0
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256:ff6636407e7f1ebe15ab95f22740b1c7408d688f627f91fed4b7057ae122efd8
User & Date: kevin 2020-04-30 13:21:09
Context
2020-04-30
13:48
Remove obsolete files check-in: 4219e36ec2 user: kevin tags: trunk
13:21
Begin work on version 2.0 check-in: ff6636407e user: kevin tags: trunk
2020-04-20
02:27
Add recent ocra with codesign support check-in: 59c501c966 user: kevin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to install.bat.

6
7
8
9
10
11
12
13
14
15
16
17
18
19

20
21
22
23
24
25
26
27
28
29
30
31
32
33
..
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60


61
62
63
if not exist %install_dir% (
mkdir %install_dir%
)
 
if not exist %config_dir% (
mkdir %config_dir%
)
call 7za  x stringscan.zip
xcopy bin %install_dir%\bin /s /i /y
xcopy lib %install_dir%\lib /s /i /y
xcopy include %install_dir%\include /s /i /y
xcopy share %install_dir%\share /s /i /y
copy /Y uninstall.bat %config_dir%\
copy /Y stringscan.ico %config_dir%\


::test for key, add to registry
reg query "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.exe"
if errorlevel 0 (
reg delete "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.exe" /f
)
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.exe" /f
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.lnk"  /ve /d "%appdata%\Stringscan_App\stringscan\Stringscan.lnk" /f
 
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "DisplayIcon" /t REG_SZ /d "%appdata%\Stringscan\stringscan.ico"
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "DisplayName" /t REG_SZ /d "Stringscan"
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "InstallLocation" /t REG_SZ /d "%install_dir%"

................................................................................
set startdir="%appdata%\Microsoft\Windows\Start Menu\Stringscan\"

if not exist %startdir% (
mkdir %startdir%
)
cd %startdir%

::mklink /H Stringscan.exe "%appdata%\Stringscan_App\stringscan\Stringscan.exe"

echo Set oWS = WScript.CreateObject("WScript.Shell") >%temp%\link.vbs
echo sLinkFile = "Stringscan.lnk" >>  %temp%\link.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >>  %temp%\link.vbs
echo oLink.TargetPath = "%appdata%\Stringscan_App\bin\rubyw.exe" >> %temp%\link.vbs
echo oLink.Arguments = "stringscan.rb" >> %temp%\link.vbs
echo oLink.IconLocation = "%appdata%\Stringscan\stringscan.ico" >> %temp%\link.vbs
echo oLink.WorkingDirectory = "%appdata%\Stringscan_App\bin"  >> %temp%\link.vbs
echo oLink.Save >>  %temp%\link.vbs
call  %temp%\link.vbs
copy /Y "Stringscan.lnk"  "%appdata%\Stringscan_App\bin"
del %temp%\link.vbs



cd C:\Users\%username%\Desktop
echo Done.







|
|
<
<
<


>


|

|

|







 







|




|


|


|

>
>



6
7
8
9
10
11
12
13
14



15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
..
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
if not exist %install_dir% (
mkdir %install_dir%
)
 
if not exist %config_dir% (
mkdir %config_dir%
)
copy /Y stringscan.zip %install_dir%\
call 7za x %install_dir%\stringscan.zip -o%install_dir%



copy /Y uninstall.bat %config_dir%\
copy /Y stringscan.ico %config_dir%\
copy /Y pathed.exe %config_dir%\

::test for key, add to registry
reg query "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.lnk"
if errorlevel 0 (
reg delete "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.lnk" /f
)
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.lnk" /f
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.lnk"  /ve /d "%appdata%\Stringscan_App\stringscan\Stringscan.lnk" /f
 
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "DisplayIcon" /t REG_SZ /d "%appdata%\Stringscan\stringscan.ico"
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "DisplayName" /t REG_SZ /d "Stringscan"
reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f /v "InstallLocation" /t REG_SZ /d "%install_dir%"

................................................................................
set startdir="%appdata%\Microsoft\Windows\Start Menu\Stringscan\"

if not exist %startdir% (
mkdir %startdir%
)
cd %startdir%

::mklink /H Stringscan.lnk "%appdata%\Stringscan_App\stringscan\Stringscan.lnk"

echo Set oWS = WScript.CreateObject("WScript.Shell") >%temp%\link.vbs
echo sLinkFile = "Stringscan.lnk" >>  %temp%\link.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >>  %temp%\link.vbs
echo oLink.TargetPath = "%appdata%\Stringscan_App\Stringscan.lnk" >> %temp%\link.vbs
echo oLink.Arguments = "stringscan.rb" >> %temp%\link.vbs
echo oLink.IconLocation = "%appdata%\Stringscan\stringscan.ico" >> %temp%\link.vbs
echo oLink.WorkingDirectory = "%appdata%\Stringscan_App\"  >> %temp%\link.vbs
echo oLink.Save >>  %temp%\link.vbs
call  %temp%\link.vbs
copy /Y "Stringscan.lnk"  "%appdata%\Stringscan_App\"
del %temp%\link.vbs

call %config_dir%\pathed.exe -a "%appdata%\Stringscan_App\\"

cd C:\Users\%username%\Desktop
echo Done.

Changes to makeinstaller.bat.

1
2
3
4
5
6
7
8
9
10
call 7za a stringscan.zip .\build\*

iexpress /n stringscan.sed

set VERSION="1.2.0.0 (%date%)"
set FILEDESCR=/s desc "Installer for Stringscan"
set COMPINFO=/s company "WordTech Communications LLC" /s (c) "(c) 2018"
set PRODINFO=/s product "Stringscan" /pv "1.2.0.0"

"C:\Users\kevin\Desktop\verpatch.exe" /va Stringscan_Setup.exe %VERSION% %FILEDESCR% %COMPINFO% %PRODINFO% 



<
<
<
<
<
<
<
1
2
3







call 7za a stringscan.zip .\build\*

iexpress /n stringscan.sed







Added stringscan-cli.bat.



































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
:::stringscan-cli   -- batch interface to Stringscan. (c) 2020 Kevin Walzer/WordTech Communications LLC.

::check to see if stringscan is running

call ddecmd servers | findstr "Stringscan" 
If %ERRORLEVEL% EQU 1  start Stringscan.lnk
 
::check to see if run with or without args

if "%~1"=="" (
  exit
) else (
timeout 5
call ddecmd execute --server TclEval --topic Stringscan --command "set_search_dir %1"
call ddecmd execute --server TclEval --topic Stringscan --command "set_search_term %2"
call ddecmd execute --server TclEval --topic Stringscan --command "execute_search"
)

Changes to uninstall.bat.

21
22
23
24
25
26
27

28
29
30
31
32
33
34
35
36
reg delete "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.exe" /f
reg delete  "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f
 
rmdir "%appdata%\Microsoft\Windows\Start Menu\Stringscan" /s /q 
echo MsgBox "Uninstallation of Stringscan is complete.", vbOKOnly+vbInformation, "Uninstall"> %temp%\remove.vbs
call %temp%\remove.vbs
del %temp%\remove.vbs /f /q

rd %appdata%\Stringscan_App /s /q
start /b "" cmd /c rd "%appdata%\Stringscan\" /s /q && exit
 
 
:cancel
echo MsgBox "Uninstallation of Stringscan cancelled.",vbOKOnly+vbInformation, "Uninstall Stringscan"  > %temp%\cancel.vbs
call %temp%\cancel.vbs
del %temp%\cancel.vbs /f /q
exit /b







>









21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
reg delete "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Stringscan.exe" /f
reg delete  "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Stringscan" /f
 
rmdir "%appdata%\Microsoft\Windows\Start Menu\Stringscan" /s /q 
echo MsgBox "Uninstallation of Stringscan is complete.", vbOKOnly+vbInformation, "Uninstall"> %temp%\remove.vbs
call %temp%\remove.vbs
del %temp%\remove.vbs /f /q
call %appdata%\Stringscan\pathed.exe -r "%appdata%\Stringscan_App\\"
rd %appdata%\Stringscan_App /s /q
start /b "" cmd /c rd "%appdata%\Stringscan\" /s /q && exit
 
 
:cancel
echo MsgBox "Uninstallation of Stringscan cancelled.",vbOKOnly+vbInformation, "Uninstall Stringscan"  > %temp%\cancel.vbs
call %temp%\cancel.vbs
del %temp%\cancel.vbs /f /q
exit /b