#!/bin/tcl
# If you improve something in this script, please send a letter
# on one of these addresses: opole@pios.gov.pl or kkhrebeniuk@qnx.com
#
system clear
puts "     You  will  not  be  able  to  run  StarOffice 5.0 untill you
     register   this    Personal    Edition    for    Linux    on
     http://www.stardivision.com.    If  you  already  have  your
     Customer number and Registration Key, please answer \"y\" on
     the  next  question  and  fill all required data fields.  In
     other case press any key - you will have to complete missing
     data  after  installation  by  editing  \[User\]  section in
     sofficerc  file  which  will  be  created  in  program  root
     directory,  and  in  file authrc which will reside in config
     directory. This file should contain Registration Key without
     any  dashes.  All StarOffice text configuration files are in
     DOS format.\n"
flush stdout
puts -nonewline "Do you have registration data? "
flush stdout
gets stdin data
puts ""
flush stdout
if {[cequal $data "y"]} {
set OK1 ""
while {($OK1 != "n") && ($OK1 != "N")} {
set i 1
foreach data {Company "First name" "Last name" Street Country ZIP City State \
"Phone Home" "Phone Work" Fax eMail "Customer number" "Reg. Key (without\
dashes)"} {
	puts -nonewline "	${data}: "
	flush stdout
	gets stdin user($i)
	set i [expr $i + 1]
}
puts -nonewline "Do you want to change something (y|n)? "
flush stdout
gets stdin OK1
}
} else {
	set user(1) Company
	set user(2) Name
	set user(3) Surname
	set user(4) Street
	set user(5) Country
	set user(6) ZIP
	set user(7) City
	set user(8) State
	set user(9) Home_Phone
	set user(10) Work_Home
	set user(11) Fax
	set user(12) eMail
	set user(13) "Customer Number"
	set user(14) "Registration Key (without dashes)"
}
puts ""
flush stdout
set OK2 ""
while {($OK2 != "y") && ($OK2 != "Y")} {
	puts -nonewline "Where to install SO5: "
	flush stdout
	gets stdin to
	puts -nonewline "Is it correct: $to ? (y|n): "
	flush stdout
	gets stdin OK2
}
puts "Installing to $to. Wait for Installation Done info"
flush stdout
set to [string trimright $to "/"]
set darr(PD_PROGDIR) $to
set darr(PREDEFINED_PROGDIR) $to
set currdir [pwd]
set realname ""
if {[file exists $currdir/setup.ins]} {
	if {[file exists $currdir/setup.txt]} {
		catch {exec mv $currdir/setup.txt $currdir/setup.txt.bak}
	}
	puts -nonewline "Transforming setup.ins to unix format ... "
	flush stdout
	exec tr -d '\015' < setup.ins > setup.txt
	puts "done."
	flush stdout
	set file [open "$currdir/setup.txt" r]
} else {
	puts "Installation instructions file: setup.ins is missing."
	flush stdout
	exit
}
sleep 2
puts -nonewline "Preparing for installation ... "
flush stdout
if {[file exists setup.zip]} {
	mkdir $currdir/setup.dir
	exec unzip -nLd setup.dir setup.zip
} else {
puts "setup.zip file is missing from current directory. Installation aborted!"
flush stdout
exit
}
puts "done."
flush stdout
sleep 2
# Here begins extraction engine ...
#
while {[gets $file line] >=0} {
	if [regexp "^Directory DIR*" $line] {
		set DIRNR [lindex $line 1]
		set line2 ""
		while {![cequal $line2 End]} {
			gets $file line2
			set line2 [string trimleft $line2 " \t"]
			set line2 [string trimright $line2 ";"]
			set ditems [split $line2 "="]
			set ditem1 [lindex $ditems 0]
			set ditem1 [string trim $ditem1]
			set ditem2 [lindex $ditems 1]
			set ditem2 [string trim [string trim $ditem2] "\""]
				if {[cequal $ditem1 DosName]} {
					set darr($DIRNR) $ditem2
				}
				if {[cequal $ditem1 ParentID]} {
					set darr($DIRNR) $darr($ditem2)/$darr($DIRNR)
					set KAT $darr($DIRNR)
				}
		} ;# End of second while (directories section)
		if {![file isdirectory $KAT]} {
			puts "Making directory: $KAT"
			flush stdout
			mkdir -path $KAT
		}
	} ;# End of first if
	if [regexp "^File FILE_*" $line] {
		set line2 ""
		while {![cequal $line2 End]} {
			gets $file line2
			set line2 [string trimleft $line2 " \t"]
			set line2 [string trimright $line2 ";"]
			set fitems [split $line2 "="]
			set fitem1 [lindex $fitems 0]
			set fitem1 [string trim $fitem1]
			set fitem2 [lindex $fitems 1]
			set fitem2 [string trim [string trim $fitem2] "\""]
				if {[cequal $fitem1 PackedName]} {
					set f_file $fitem2
				}
				if {[cequal $fitem1 Name]} {
					set realname $fitem2
				}
				if {[cequal $fitem1 ArchiveFiles]} {
					set realname ""
				}
				if {[cequal $fitem1 Dir]} {
					set DIR $darr($fitem2)
				}
				if {[cequal $fitem1 UnixRights]} {
					set urights $fitem2
				}
			} ;# End of third while (files)
			if {![file exists $f_file]} {
	puts "File $f_file doesn't exist in current directory. Can't continue"
				flush stdout
				exit
			}
			if {![cequal $realname ""]} {
			puts "Extracting file: $f_file ($realname) to $DIR"
			flush stdout
				set name [exec unzip -nd $DIR $f_file]
				set wy [string trim [lindex [split $name \n] 1]]
				set wy [lindex [split $wy " "] 1]
				catch {exec mv $wy $DIR/$realname}
				if {![cequal $urights 0]} {
					catch {chmod 0$urights $DIR/$realname}
				}
			} else {
			puts "Extracting file: $f_file (subarchive) to $DIR"
			flush stdout
				set name [exec unzip -nd $DIR $f_file]
			set name [split $name \n]
			set n [llength $name]
			for {set i 1} {$i < $n} {incr i} {
			set files($i) [string trim [lindex [lindex $name $i] 1]]
			puts $files($i)
			flush stdout
				if {![cequal $urights 0]} {
					catch {chmod 0$urights $files($i)}
				}
			}
			}
		} ;# End of second if
}
close $file
# End of extraction
puts "All program files are extracted. Wait for final tailoring."
flush stdout

foreach so [glob setup.dir/*.so] {exec cp -f $so $to/lib}
foreach bmp [glob setup.dir/*.bmp] {exec cp -f $bmp $to/kino}
foreach res [glob setup.dir/*.res] {exec cp -f $res $to/bin}
exec cp -f setup.dir/setup.bin $to/bin
exec rm -fr setup.dir

set sorc_f [open $to/bin/sorc w]
puts $sorc_f {[StarIPC2]
}
set sorc "c20cf9d1-85ae-11d1-aab4-006097da561a=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Document;StarOffice 5.0 Document
c6a5b861-85d6-11d1-89cb-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Spreadsheet;StarOffice 5.0 Spreadsheet
565c7221-85bc-11d1-89d0-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Presentation;StarOffice 5.0 Presentation
bf884321-85dd-11d1-89d0-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Chart;StarOffice 5.0 Chart
65c68d00-85de-11d1-89d0-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Image;StarOffice 5.0 Image
ffb5e640-85de-11d1-89d0-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Formula;StarOffice 5.0 Formula
2e8905a0-85bd-11d1-89d0-008029e4b0b1=${to}\\SDESKTOP.EXE;sdesktop;-Embedding;;;StarOffice 5.0 Drawing;StarOffice 5.0 Drawing

"
puts $sorc_f $sorc
flush $sorc_f
close $sorc_f

set oreg_f [open $to/config/oreg.ini w]
set oreg {[Reg]
OnlineReg=0
}
puts $oreg_f $oreg
puts $oreg_f "OnlineRegDoc=${to}/config/oreg2.htm

"
flush $oreg_f
close $oreg_f

set service_f [open $to/config/servicesrc w]
set service {[Database]
URL_Pattern=file:///*.sdb*
Type_ID=application/sbase
Type_Description-01=Database
Type_Description-49=Datenbank
ChildDelimiter=#
Service=stardiv.one.data.DatabaseComponent
DLL=libofa???**.so
InitFunction=InitDatabaseContents
SubComponentCount=5
SubComponent1=DBQueries
SubComponent2=DBReports
SubComponent3=DBForms
SubComponent4=DBTables
SubComponent5=DBStatement
HelpID=35867

[DBQueries]
URL_Pattern=#db:Query*
ChildDelimiter=;
SubComponentCount=1
SubComponent1=DBQuery
Type_ID=application/sbase-queries
Service=stardiv.one.data.QueriesComponent

[DBQuery]
URL_Pattern=;*
Type_ID=application/sbase-query
Service=stardiv.one.data.QueryComponent

[DBReports]
URL_Pattern=#db:Report*
ChildDelimiter=;
SubComponentCount=1
SubComponent1=DBReport
Type_ID=application/sbase-reports
Service=stardiv.one.data.ReportsComponent

[DBReport]
URL_Pattern=;*
Type_ID=application/sbase-report
Service=stardiv.one.data.ReportComponent

[components]
Gallery=1
Database=2
SsRoot=3
Startmenu=4
Docmenu=5
Settings=6
Help=7

[Gallery]
URL_Pattern=.component:Gallery/*
Type_ID=application/x-gallery
service=stardiv.Gallery.GalComponent
DLL=libgal???**.so
InitFunction=InitGallery
SubComponentCount=1
SubComponent1=Themes
DontShowInMenu=1

[DBForms]
URL_Pattern=#db:Form*
ChildDelimiter=;
SubComponentCount=1
SubComponent1=DBForm
Type_ID=application/sbase-forms
Service=stardiv.one.data.FormsComponent

[DBForm]
URL_Pattern=;*
Type_ID=application/sbase-form
Service=stardiv.one.data.FormComponent

[Themes]
URL_Pattern=/*.Theme
Type_ID=application/x-gallery-theme
service=stardiv.Gallery.GalThemeComponent

[DBTables]
URL_Pattern=#db:Table*
ChildDelimiter=;
SubComponentCount=1
SubComponent1=DBTable
Type_ID=application/sbase-tables
Service=stardiv.one.data.TablesComponent

[DBTable]
URL_Pattern=;*
Type_ID=application/sbase-table
Service=stardiv.one.data.TableComponent

[DBStatement]
URL_Pattern=#db:Statement;*
Type_ID=application/sbase-statement
Service=stardiv.one.data.StatementComponent

[Startmenu]
URL_Pattern=.component:Startmenu/*
Type_ID=application/x-startmenu
Service=stardiv.startmenu.StartmenuComponent
DLL=libcsp???**.so
InitFunction=InitStartmenu
SubComponentCount=1
SubComponent1=Startmenu1
DontShowInMenu=1

[Startmenu1]
URL_Pattern=/*
Type_ID=application/x-startmenu
Service=stardiv.startmenu.StartmenuComponent

[Programs]
URL_Pattern=/*
Type_ID=component/startmenu-programs
Service=stardiv.startmenu.StartmenuComponent

[Docmenu]
URL_Pattern=.component:Docmenu/*
Type_ID=application/x-docmenu
Service=stardiv.startmenu.DocmenuComponent
DLL=libdmn???**.so
InitFunction=InitDocmenu
SubComponentCount=1
SubComponent1=Docmenu1
DontShowInMenu=1

[Docmenu1]
URL_Pattern=/*
Type_ID=application/x-docmenu
Service=stardiv.startmenu.DocmenuComponent

[Settings]
URL_Pattern=.component:Settings/*
Type_ID=application/x-settings
Service=stardiv.startmenu.SettingsComponent
DLL=libcsp???**.so
InitFunction=InitSettings
SubComponentCount=1
SubComponent1=Settings1
DontShowInMenu=1

[Settings1]
URL_Pattern=/*
Type_ID=application/x-settings
Service=stardiv.startmenu.SettingsComponent

[Help]
Type_Description-01=Help
Type_Description-49=Hilfe
URL_Pattern=.component:Help/*
Type_ID=application/help
service=stardiv.Help.HelpComponent
dll=libsfx???**.so
InitFunction=InitHelp
SubComponentCount=2
SubComponent1=HelpBookmarks
SubComponent2=HelpContents
DontShowInMenu=1

[HelpBookmarks]
URL_Pattern=/*.Bookmarks
Type_ID=application/help-bookmarks
service=stardiv.Help.HelpBookmarksComponent
SubComponentCount=1
ChildDelimiter=;
SubComponent1=HelpBookmark

[HelpContents]
URL_Pattern=/*.Contents
Type_ID=application/help-contents
service=stardiv.Help.HelpContentsComponent
SubComponentCount=1
ChildDelimiter=;
SubComponent1=HelpContent

[HelpBookmark]
URL_Pattern=*.Bookmark
Type_ID=application/help-bookmark
ChildDelimiter=;
service=stardiv.Help.HelpBookmarkComponent

[HelpContent]
URL_Pattern=*.Content
Type_ID=application/help-content
ChildDelimiter=;
service=stardiv.Help.HelpContentComponent

[SsUser]
Service=stardiv.Ss.SsUserExplorerComponent
ChildDelimiter=,
URL_Pattern=&*

[SsServers]
URL_Pattern=/*?serverui*
Service=stardiv.Ss.SsServersExplorerComponent
ChildDelimiter=d
SubComponentCount=1
SubComponent1=SsServer

[SsServer]
URL_Pattern=d=*
Service=stardiv.Ss.SsServerExplorerComponent
ChildDelimiter=&
SubComponentCount=1
SubComponent1=SsUser

[SsRoot]
Type_Description-01=StarSchedule
Type_Description-49=StarSchedule
URL_Pattern=.component:ss/*
Type_ID=application/x-schedule
Service=stardiv.Ss.SsRootExplorerComponent
DLL=libss???**.so
InitFunction=InitSs
SubComponentCount=2
SubComponent1=SsFolder
SubComponent2=SsServers
ChildDelimiter=/
DontShowInMenu=1

[SsFolder]
URL_Pattern=/*?type=*
Service=stardiv.Ss.SsFolderExplorerComponent
ChildDelimiter=,

}
puts $service_f $service
flush $service_f
close $service_f

set version_f [open $env(HOME)/.sversionrc w]
puts $version_f {[Versions]}
puts $version_f "StarOffice 5.0=$to
"
flush $version_f
close $version_f

set install_f [open $to/install.ini w]
set inst_data {[Graphics Filters - Import]
BMP=BMP - MS Windows,XXXX,BMP,SVBMP,SD,PIX,FALSE
DXF=DXF - AutoCAD Interchange,XXXX,DXF,libidx???**.flt,SD,VEC,FALSE
EPS=EPS - Encapsulated PostScript,EPS 0.EPS,EPS,libips???**.flt,SD,VEC,FALSE
GIF=GIF - Graphics Interchange,XXXX,GIF,SVIGIF,SD,PIX,FALSE
JPG=JPG - JPEG,XXXX,JPG,SVIJPEG,SD,PIX,FALSE
MET=MET - OS/2 Metafile,XXXX,MET,libime???**.flt,SD,VEC,FALSE
PNG=PNG - Portable Network Graphic,XXXX,PNG,SVIPNG,SD,PIX,FALSE
PCT=PCT - Mac Pict,XXXX,PCT,libipt???**.flt,SD,VEC,FALSE
PCD=PCD - Photo CD,XXXX,PCD,libicd???**.flt,SD,PIX,TRUE
PSD=PSD - Adobe Photoshop,PSD 0.PSD,PSD,libipd???**.flt,SD,PIX,FALSE
PCX=PCX - Zsoft Paintbrush,XXXX,PCX,libipx???**.flt,SD,PIX,FALSE
PBM=PBM - Portable Bitmap,PBM 0.PBM,PBM,libipb???**.flt,SD,PIX,FALSE
PGM=PGM - Portable Graymap,PGM 0.PGM,PGM,libipb???**.flt,SD,PIX,FALSE
PPM=PPM - Portable Pixelmap,PPM 0.PPM,PPM,libipb???**.flt,SD,PIX,FALSE
RAS=RAS - Sun Rasterfile,RAS 0.RAS,RAS,libira???**.flt,SD,PIX,FALSE
SVM=SVM - StarView Metafile,XXXX,SVM,SVMETAFILE,SD,VEC,FALSE
TGA=TGA - Truevision TARGA,TGA 0,TGA,libitg???**.flt,SD,PIX,FALSE
TIF=TIF - Tag Image File,XXXX,TIF,libiti???**.flt,SD,PIX,FALSE
EMF=EMF - MS Windows Metafile,XXXX,EMF,SVEMF,SD,VEC,FALSE
WMF=WMF - MS Windows Metafile,XXXX,WMF,SVWMF,SD,VEC,FALSE
XBM=XBM - X-Consortium,XBM 0.XBM,XBM,SVIXBM,SD,PIX,FALSE
XPM=XPM,XXXX,XPM,SVIXPM,SD,PIX,FALSE

[Graphics Filters - Export]
BMP=BMP - MS Windows,XXXX,BMP,SVBMP,SD,PIX,TRUE
PNG=PNG - Portable Network Graphic,XXXX,PNG,libepn???**.flt,SD,PIX,TRUE
EPS=EPS - Encapsulated PostScript,EPS 0.EPS,EPS,libeps???**.flt,SD,VEC,TRUE
GIF=GIF - Graphics Interchange,XXXX,GIF,libegi???**.flt,SD,PIX,TRUE
JPG=JPG - JPEG,XXXX,JPG,SVEJPEG,SD,PIX,TRUE
MET=MET - OS/2 Metafile,XXXX,MET,libeme???**.flt,SD,VEC,TRUE
PCT=PCT - Mac Pict,XXXX,PCT,libept???**.flt,SD,VEC,TRUE
PBM=PBM - Portable Bitmap,XXXX,PBM,libepb???**.flt,SD,PIX,TRUE
PGM=PGM - Portable Graymap,XXXX,PGM,libepg???**.flt,SD,PIX,TRUE
PPM=PPM - Portable Pixelmap,XXXX,PPM,libepp???**.flt,SD,PIX,TRUE
RAS=RAS - Sun Rasterfile,XXXX,RAS,libera???**.flt,SD,PIX,FALSE
SVM=SVM - StarView Metafile,XXXX,SVM,SVMETAFILE,SD,VEC,TRUE
TIF=TIF - Tag Image File,XXXX,TIF,libeti???**.flt,SD,PIX,FALSE
WMF=WMF - MS Windows Metafile,XXXX,WMF,SVWMF,SD,VEC,TRUE
XPM=XPM,XXXX,XPM,libexp???**.flt,SD,PIX,FALSE

[swriter-Filters-01]
StarWriter 5.0=StarWriter 5.0,application/vnd.stardivision.writer,StarWriter 5.0,*.sdw,StarWriter 5.0,*.sdw,20002,CSW5,,Import|Export|Template|Own
StarWriter 5.0 Vorlage/Template=StarWriter 5.0 Template,application/vnd.stardivision.writer,StarWriter 5.0,*.vor,StarWriter 5.0,*.vor,20002,CSW5V,,Import|Export|Template|TemplatePath|Own
StarWriter 4.0=StarWriter 4.0,application/x-starwriter,StarWriter 4.0,*.sdw,StarWriter 4.0,*.sdw,20002,CSW4,3580,Import|Export|Template|Own
StarWriter 4.0 Vorlage/Template=StarWriter 4.0 Template,application/x-starwriter,StarWriter 4.0,*.vor,StarWriter 4.0,*.vor,20002,CSW4V,3580,Import|Export|Template|TemplatePath|Own
StarWriter 3.0=StarWriter 3.0,application/x-starwriter,StarWriter 3.0,*.sdw,StarWriter 3.0,*.sdw,20002,CSW3,3450,Import|Export|Template|Own|Alien
StarWriter 3.0 Vorlage/Template=StarWriter 3.0 Template,application/x-starwriter,StarWriter 3.0,*.vor,StarWriter 3.0,*.vor,20002,CSW3V,3450,Import|Export|Template|TemplatePath|Own|Alien
StarWriter 2.0=StarWriter 2.0,,,XXXX,StarWriter 3.0,*.sdw,20002,SWG,,Import|Template|Alien
StarWriter 1.0=StarWriter 1.0,,,XXXX,StarWriter 3.0,*.sdw,20002,SWG1,,Import|Alien
StarWriter DOS=StarWriter DOS,,,XXXX,StarWriter 3.0,*.txt,20002,SW6,,Import|Alien
HTML (StarWriter)=HTML (StarWriter),text/html,,XXXX;*.html,Hypertext,*.html;*.htm,20002,HTML,,Import|Export|Alien|Asynchron|Readonly
Text=Text,text/plain,,XXXX,Plain Text,*.txt,20002,TEXTX,,Import|Export|Alien
Text Ansi=Text Ansi,text/plain,,XXXX,Plain Text,*.txt,20002,TEXTA,,Import|Export|Alien
Text Mac=Text Mac,text/plain,,XXXX,Plain Text,*.txt,20002,TEXTM,,Import|Export|Alien
Text DOS=Text DOS,text/plain,,XXXX,Plain Text,*.txt,20002,TEXTD,,Import|Export|Alien
Rich Text Format=Rich Text Format,application/rtf,,XXXX,Rich Text,*.rtf,20002,RTF,,Import|Export|Alien
MS Word 97=MS Word 97,application/msword,MSWordDoc,XXXX,Microsoft Winword,*.doc,20002,CWW8,,Import|Export|Alien
MS Word 95=MS Word 95,application/msword,MSWordDoc,XXXX,Microsoft Winword,*.doc,20002,CWW6,,Import|Export|Alien
MS WinWord 6.0=MS WinWord 6.0,application/msword,MSWordDoc,XXXX,Microsoft Winword,*.doc,20002,CWW6,,Import|Export|Alien
MS Excel 4.0 (StarWriter)=MS Excel 4.0 (StarWriter),,,XLS 0.xls,Microsoft Excel,*.xls;*.xlw;*.xlt,20002,EXCEL,,Import|Alien
MS Excel 5.0 (StarWriter)=MS Excel 5.0 (StarWriter),,Biff5,XLS 0.xls,Microsoft Excel,*.xls;*.xlw;*.xlt,20002,CEXCEL,,Import|Alien
MS Excel 95 (StarWriter)=MS Excel 95 (StarWriter),,Biff5,XLS 0.xls,Microsoft Excel,*.xls;*.xlw;*.xlt,20002,CEXCEL,,Import|Alien
Lotus 1-2-3 1.0 (DOS) (StarWriter)=Lotus 1-2-3 1.0 (DOS) (StarWriter),,,XXXX,Lotus 1-2-3,*.wk?,20002,LOTUSD,,Import|Alien
Lotus 1-2-3 1.0 (WIN) (StarWriter)=Lotus 1-2-3 1.0 (WIN) (StarWriter),,,XXXX,Lotus 1-2-3,*.wk?,20002,LOTUSW,,Import|Alien

[swriter/web-Filters-01]
HTML=HTML,text/html,,TEXT0.htm;*.html,Hypertext,*.html;*.htm,0,HTML,,Import|Export|Asynchron|Readonly
StarWriter/Web 5.0 Vorlage/Template=StarWriter/Web 5.0 Template,application/vnd.stardivision.writer/web,StarWriter/Web 5.0,*.vor,StarWriter/Web 5.0,*.vor,0,CSW5VWEB,,Import|Export|Template|TemplatePath|Own
StarWriter/Web 4.0 Vorlage/Template=StarWriter/Web 4.0 Template,application/x-starwriter/web,StarWriter/Web 4.0,*.vor,StarWriter/Web 4.0,*.vor,0,CSW4VWEB,3580,Import|Export|Template|TemplatePath|Own|Alien
Text (StarWriter/Web)=Text (StarWriter/Web),text/plain,,TEXT0.txt,Plain Text,*.txt,0,TEXTX°,,Import|Export|Alien
Text DOS (StarWriter/Web)=Text DOS (StarWriter/Web),text/plain,,TEXT0.txt,Plain Text,*.txt,0,TEXTD,,Import|Export|Alien
Text Mac (StarWriter/Web)=Text Mac (StarWriter/Web),text/plain,,TEXT0.txt,Plain Text,*.txt,0,TEXTM,,Import|Export|Alien
Text Ansi (StarWriter/Web)=Text Ansi (StarWriter/Web),text/plain,,TEXT0.txt,Plain Text,*.txt,0,TEXTA,,Import|Export|Alien
StarWriter 5.0=StarWriter 5.0,application/vnd.stardivision.writer,StarWriter 5.0,*.sdw,StarWriter 5.0,*.sdw,20002,CSW5,,Export|Template
StarWriter 4.0=StarWriter 4.0,application/x-starwriter,StarWriter 4.0,*.sdw,StarWriter 4.0,*.sdw,20002,CSW4,3580,Export|Template|Alien
StarWriter 3.0=StarWriter 3.0,application/x-starwriter,StarWriter 3.0,*.sdw,StarWriter 3.0,*.sdw,20002,CSW3,3450,Export|Template|Alien

[swriter/GlobalDocument-Filters-01]
StarWriter 5.0/GlobalDocument=StarWriter 5.0 Master Document,application/vnd.stardivision.writer-global,StarWriter/Global 5.0,*.sgl,StarWriter 5.0,*.sgl,20801,CSW5,,Import|Export|Template|Own
StarWriter 4.0/GlobalDocument=StarWriter 4.0 Master Document,application/x-starwriter,StarWriter/Global 4.0,*.sgl,StarWriter 4.0,*.sgl,20801,CSW4,3580,Import|Export|Template|Own|Alien
StarWriter 5.0=StarWriter 5.0,application/vnd.stardivision.writer,StarWriter 5.0,*.sdw,StarWriter 5.0,*.sdw,20002,CSW5,,Export|Template
StarWriter 4.0=StarWriter 4.0,application/x-starwriter,StarWriter 4.0,*.sdw,StarWriter 4.0,*.sdw,20002,CSW4,3580,Export|Template|Alien
StarWriter 3.0=StarWriter 3.0,application/x-starwriter,StarWriter 3.0,*.sdw,StarWriter 3.0,*.sdw,20002,CSW3,3450,Export|Template|Alien

[scalc-Filters-01]
StarCalc 5.0=StarCalc 5.0,application/vnd.stardivision.calc,StarCalc 5.0,SVsc0.sdc,StarCalc 5.0,*.sdc,0,,,Import|Export|Template|Own
StarCalc 5.0 Vorlage/Template=StarCalc 5.0 Template,application/vnd.stardivision.calc,StarCalc 5.0,SVsc1.vor,StarCalc 5.0,*.vor,25597,,,Import|Export|Template|TemplatePath|Own
StarCalc 4.0=StarCalc 4.0,application/x-starcalc,StarCalc 4.0,SVsc0.sdc,StarCalc 4.0,*.sdc,0,,3580,Import|Export|Template|Own|Alien
StarCalc 4.0 Vorlage/Template=StarCalc 4.0 Template,application/x-starcalc,StarCalc 4.0,SVsc1.vor,StarCalc 4.0,*.vor,25597,,3580,Import|Export|Template|TemplatePath|Own|Alien
StarCalc 3.0=StarCalc 3.0,application/x-starcalc,StarCalcDocument,SVsc0.sdc,StarCalc 3.0,*.sdc,0,,3450,Import|Export|Template|Own
StarCalc 3.0 Vorlage/Template=StarCalc 3.0 Template,application/x-starcalc,StarCalcDocument,Ssc1.vor,StarCalc 3.0,*.vor,25597,,3450,Import|Export|Template|TemplatePath|Own
MS Excel 97=MS Excel 97,,Biff8,XLS80.xl?,Microsoft Excel,*.xls;*.xlw;*.xlt,0,,,Import|Export
MS Excel 95=MS Excel 95,,Biff5,XLS50.xl?,Microsoft Excel,*.xls;*.xlw;*.xlt,0,,,Import|Export
MS Excel 5.0/95=MS Excel 5.0,,Biff5,XLS50.xl?,Microsoft Excel,*.xls;*.xlw;*.xlt,0,,,Import|Export
MS Excel 4.0=MS Excel 4.0,,,XLS40.xl?,Microsoft Excel,*.xls;*.xlw;*.xlt,0,,,Import
Rich Text Format (StarCalc)=Rich Text Format (StarCalc),,,RTF 0.rtf,RTF,*.rtf,0,,,Import|Alien
SYLK=SYLK,,,SLK 0.slk,Sylk,*.slk,0,,,Import|Export|Alien
DIF=DIF,,,DIF 0.dif,Dif,*.dif,0,,,Import|Export|Alien
HTML (StarCalc)=HTML (StarCalc),text/html,,HTML0.htm,HTML,*.html;*.htm,0,,,Import|Export|Alien|Readonly
dBase=dBase,,,DBF 0.dbf,DBase,*.dbf,0,,,Import|Export|Alien
Lotus=Lotus,,,LWKS0.wk?,Lotus 1-2-3,*.wk?,0,,,Import|Alien
StarCalc 1.0=StarCalc 1.0,,,TEXT0.sdc,StarCalc 1.0,*.sdc,25598,,,Import|Alien
Text - txt - csv (StarCalc)=Text - txt - csv (StarCalc),text/plain,,TEXT0.txt,Plain Text,*.txt;*.csv,0,,,Import|Export|Alien

[simpress-Filters-01]
StarImpress 5.0=StarImpress 5.0,application/vnd.stardivision.impress,StarImpress 5.0,SVsd0.sdd,StarImpress 5.0,*.sdd,20004,,,Import|Export|Template|Own
StarImpress 5.0 Vorlage=StarImpress 5.0 Template,application/vnd.stardivision.impress,StarImpress 5.0,SVsd1.vor,StarImpress 5.0,*.vor,20004,,,Import|Export|Template|TemplatePath|Own
StarImpress 4.0=StarImpress 4.0,application/x-starimpress,StarDrawDocument 4.0,SVsd0.sdd,StarImpress 4.0,*.sdd,20004,,3580,Import|Export|Template|Own|Alien
StarImpress 4.0 Vorlage=StarImpress 4.0 Template,application/x-starimpress,StarDrawDocument 4.0,SVsd1.vor,StarImpress 4.0,*.vor,20004,,3580,Import|Export|Template|TemplatePath|Own|Alien
StarDraw 5.0 (StarImpress)=StarDraw 5.0 (StarImpress),application/vnd.stardivision.draw,StarDraw 5.0,SVsa0.sdd,StarDraw 5.0,*.sda,20028,,,Import|Export|Template|Own
StarDraw 5.0 Vorlage (StarImpress)=StarDraw 5.0 Template (StarImpress),application/vnd.stardivision.draw,StarDraw 5.0,SVsa1.vor,StarDraw 5.0,*.vor,20028,,,Import|Export|Template|TemplatePath|Own
StarDraw 3.0 (StarImpress)=StarDraw 3.0 (StarImpress),application/x-stardraw,StarDrawDocument,SVsd0.sdd,StarDraw 3.0,*.sdd,20028,,3450,Import|Export|Template|Own
StarDraw 3.0 Vorlage (StarImpress)=StarDraw 3.0 (StarImpress) Template,application/x-stardraw,StarDrawDocument,SVsd1.vor,StarDraw 3.0,*.vor,20028,,3450,Import|Export|Template|TemplatePath|Own
MS PowerPoint 97=MS PowerPoint 97,,,PPT97.ppt,Microsoft PowerPoint 97,*.ppt,0,libemp???**.flt,,Import|Export|Own
MS PowerPoint 97 Template=MS PowerPoint 97 Template,,,PPT97.pot,Microsoft PowerPoint 97,*.pot,0,libemp???**.flt,,Import|Export|Own
CGM - Computer Graphics Metafile=CGM - Computer Graphics Metafile,,,,CGM - Computer Graphics Metafile,*.cgm,0,libicg???**.flt,,Import|Alien

[sdraw-Filters-01]
StarDraw 5.0=StarDraw 5.0,application/vnd.stardivision.draw,StarDraw 5.0,SVsa0.sdd,StarDraw 5.0,*.sda,20028,,,Import|Export|Template|Own
StarDraw 5.0 Vorlage=StarDraw 5.0 Template,application/vnd.stardivision.draw,StarDraw 5.0,SVsa1.vor,StarDraw 5.0,*.vor,20028,,,Import|Export|Template|TemplatePath|Own
StarImpress 5.0 (StarDraw)=StarImpress 5.0 (StarDraw),application/vnd.stardivision.impress,StarImpress 5.0,SVsd0.sdd,StarImpress 5.0,*.sdd,20004,,,Import|Export|Template|Own
StarImpress 5.0 Vorlage (StarDraw)=StarImpress 5.0 Template (StarDraw),application/vnd.stardivision.impress,StarImpress 5.0,SVsd1.vor,StarImpress 5.0,*.vor,20004,,,Import|Export|Template|TemplatePath|Own
StarImpress 4.0 (StarDraw)=StarImpress 4.0 (StarDraw),application/x-starimpress,StarDrawDocument 4.0,SVsd0.sdd,StarImpress 4.0,*.sdd,20004,,3580,Import|Export|Template|Own|Alien
StarImpress 4.0 Vorlage (StarDraw)=StarImpress 4.0 Template (StarDraw),application/x-starimpress,StarDrawDocument 4.0,SVsd1.vor,StarImpress 4.0,*.vor,20004,,3580,Import|Export|Template|TemplatePath|Own|Alien
StarDraw 3.0=StarDraw 3.0,application/x-stardraw,StarDrawDocument,SVsd0.sdd,StarDraw 3.0,*.sdd,20028,,3450,Import|Export|Template|Own
StarDraw 3.0 Vorlage=StarDraw 3.0 Template,application/x-stardraw,StarDrawDocument,SVsd1.vor,StarDraw 3.0,*.vor,20028,,3450,Import|Export|Template|TemplatePath|Own
DXF - AutoCAD Interchange=DXF - AutoCAD Interchange,,,,AutoCAD,*.dxf,0,,,Import|Alien
EPS - Encapsulated PostScript=EPS - Encapsulated PostScript,,,,EPS-File,*.eps,0,,,Import|Alien
MET - OS/2 Metafile=MET - OS/2 Metafile,,,,Metafile,*.met,0,,,Import|Alien
PCT - Mac Pict=PCT - Mac Pict,,,,Mac Pict,*.pct,0,,,Import|Alien
SVM - StarView Metafile=SVM - StarView Metafile,,,,SV-Metafile,*.svm,0,,,Import|Alien
EMF - MS Windows Metafile=EMF - MS Windows Metafile,,,,MS-Metafile,*.emf,0,,,Import|Alien
WMF - MS Windows Metafile=WMF - MS Windows Metafile,,,,MS-Metafile,*.wmf,0,,,Import|Alien

[smath-Filters-01]
StarMath 5.0=StarMath 5.0,application/vnd.stardivision.math,StarMath 5.0,SVsm0.smf,StarMath 5.0,*.smf,20602,0,,Import|Export|Own
StarMath 4.0=StarMath 4.0,application/x-starmath,StarMathDocument 4.0,SVsm0.smf,StarMath 4.0,*.smf,20602,0,3580,Import|Export|Own
StarMath 3.0=StarMath 3.0,application/x-starmath,StarMath,SVsm0.smf,StarMath 3.0,*.smf,20602,0,3450,Import|Export|Own
StarMath 2.0=StarMath 2.0,application/x-starmath,,SDmf0.smf,OS2,*.smf,20602,1,,Import|Alien

[schart-Filters-01]
StarChart 5.0=StarChart 5.0,application/vnd.stardivision.chart,StarChart 5.0,SVsh0.sds,StarChart 5.0,*.sds,20020,,,Import|Export|Own
StarChart 4.0=StarChart 4.0,application/x-starchart,StarChartDocument 4.0,SVsh0.sds,StarChart 4.0,*.sds,20020,,3580,Import|Export|Own|Alien
StarChart 3.0=StarChart 3.0,application/x-starchart,StarChartDocument,SVsh0.sds,StarChart 3.0,*.sds,20020,,3450,Import|Export|Own

[simage-Filters-01]
StarImage 5.0=StarImage 5.0,application/x-starimage,StarImage 5.0,SDsi.sim,StarImage 5.0,*.sim,0,,,Internal|Own
StarImage 4.0=StarImage 4.0,application/x-starimage,StarImageDocument 4.0,SDsi.sim,StarImage 4.0,*.sim,0,,3580,Internal|Own|Alien
StarImage 3.0=StarImage 3.0,application/x-starimage,StarImageDocument,SDsi.sim,StarImage 3.0,*.sim,0,,3450,Internal|Own
BMP - MS Windows=BMP - MS Windows,image/x-MS-bmp,,,Bitmap,*.bmp,0,,,Import|Export|Alien
GIF - Graphics Interchange=GIF - Graphics Interchange,image/gif,,,Gif-File,*.gif,0,,,Import|Export|Alien
JPG - JPEG=JPG - JPEG,,,,JPEG-File,*.jpg;*.jpeg;*.jfif;*.jif;*.jpe,0,,,Import|Export|Alien
PNG - Portable Network Graphic=PNG - Portable Network Graphic,,,,PNG-File,*.png,0,,,Import|Export|Alien
PCD - Photo CD=PCD - Photo CD,,,,Photo-CD,*.pcd,0,,,Import|Alien
PCX - Zsoft Paintbrush=PCX - Zsoft Paintbrush,,,,PCX-File,*.pcx,0,,,Import|Alien
PSD - Adobe Photoshop=PSD - Adobe Photoshop,,,,PSD-File,*.psd,0,,,Import|Alien
PBM - Portable Bitmap=PBM - Portable Bitmap,,,,PBM-File,*.pbm,0,,,Import|Export|Alien
PGM - Portable Graymap=PGM - Portable Graymap,,,,PGM-File,*.pgm,0,,,Import|Export|Alien
PPM - Portable Pixelmap=PPM - Portable Pixelmap,,,,PPM-File,*.ppm,0,,,Import|Export|Alien
RAS - Sun Rasterfile=RAS - Sun Rasterfile,,,,RAS-File,*.ras,0,,,Import|Export|Alien
TGA - Truevision TARGA=TGA - Truevision TARGA,,,,TAG-File,*.tga,0,,,Import|Alien
TIF - Tag Image File=TIF - Tag Image File,,,,TIFF-File,*.tif;*.tiff,0,,,Import|Export|Alien
XBM - X-Consortium=XBM - X-Consortium,,,,XBM-File,*.xbm,0,,,Import|Alien
XPM=XPM,image/x-xbitmap,,XXXX,Bitmap,*.xpm,20004,,,Import|Export|Alien

}
puts $install_f $inst_data
flush $install_f
close $install_f

set officerc_f [open $to/sofficerc w]

set sorc1 {[soffice-View]
0Browser-Sets=EXPFLD;1,0,A,4,144,70,118,1000000000
IconView-GridSize=125;70;0
5962Window=V1,511/238/200/250,H,0,AL:(16,4,0/0/400/250)#100
6318Window=V1,315/309/394/130,V,0,AL:(8,16,0/0/394/130)
16605Dialog=113/123/0/0,12001
5539Window=V1,21/203/241/349,V,0,AL:(16,4,0/0/241/349)
5931Window=V1,0/512/786/25,V,0,0
6308Window=V1,418/277/187/195,V,0,AL:(4,16,0/0/151/195)
0SplitWindow=V1,1,1,0,6308
2SplitWindow=V1,1,0
1SplitWindow=V1,1,1,0,6318
3SplitWindow=V1,1,0
App-Window=0,22,22,786,556;0

[Directories]
Agent-Dir=$(user)/agent
Autopilot-Dir=$(user)/config/wizard
Autostart-Dir=$(user)/config/startup
Backup-Path=$(user)/backup
Basic-Path=$(user)/basic
Bitmap-Path=$(user)/config/symbol
Bookmark-Dir=$(user)/explorer/Bookmarks
Config-Dir=$(user)/config
Database-Path=$(user)/database
Desktop-Dir=$(user)/Desktop
Dictionary-Path=$(user)/wordbook
Explorer=$(user)/explorer
Gallery-Dir=$(user)/gallery
Glossary-Path=$(user)/autotext
Graphics-Path=$(inst)/gallery
Help-Dir=$(inst)/help
Modules-Path=$(inst)
New-Dir=$(user)/config/new
Palette-Path=$(user)/config
Quickstart-Dir=$(user)/config/quickstart
Template-Path=$(user)/template
Trash-Dir=$(user)/store/trash
Work-Path=$(user)/explorer/WorkFolder
StartMenu-Dir=$(user)/config/start
Download-Dir=$(user)/download
Storage-Dir=$(user)/store
Temp-Dir=/tmp/soffice.tmp/sv16962.tmp

[INet]
MemCache=10
Homepage=www.stardivision.com
DNS=255.255.255.255
SSL=1
ExecuteJava=1
ExecuteJavaScript=1
ReadTimerOn=1
ReadTimerOut=0s

[Redirects-Filters]
Override1=Zip-File,application/x-zip-compressed,,,,*.zip,0,PlugIn|StarDownload (*.dnl),,
Override2=,application/octet-stream,,,,,0,PlugIn|StarDownload (*.dnl),,Import|Alien,
Override3=,,,,,*.exe,0,PlugIn|StarDownload (*.dnl),,Import|Alien
Override4=Tar-File,application/x-tar,,,,*.tar,0,PlugIn|StarDownload (*.dnl),,
Override5=,,     ,,,*.xls;*.xlw;*.xlt,0,scalc|MS Excel 4.0,,
Override6=,,Biff5,,,*.xls;*.xlw;*.xlt,0,scalc|MS Excel 95,,
Override7=,,Biff5,,,*.xls;*.xlw;*.xlt,0,scalc|MS Excel 5.0,,
Override8=HTML-File,text/html,,,,*.htm;*.html,0,swriter/web|HTML,,
Override9=Lotus-File,,,,,*.wk?,0,scalc|Lotus,,Import|Alien
Override10=,application/vnd.stardivision.impress,StarImpress 5.0,,,*.sdd,0,simpress|StarImpress 5.0,,,
Override11=,application/vnd.stardivision.impress,StarImpress 5.0,,,*.vor,0,simpress|StarImpress 5.0 Vorlage,,Template
Override12=,application/vnd.stardivision.draw,StarDraw 5.0,,,*.sda,0,sdraw|StarDraw 5.0,,,
Override13=,application/vnd.stardivision.draw,StarDraw 5.0,,,*.vor,0,sdraw|StarDraw 5.0 Vorlage,,Template

[Database]
Addressbook=$(user)/explorer/address.sdb;address

[Security]
SecureURL=9
0SecureURL=private:explorer
1SecureURL=private:newmenu
2SecureURL=file:/
3SecureURL=http://*.stardivision.de/
4SecureURL=http://*.stardiv.de/
5SecureURL=http://*.stardivision.com/
6SecureURL=private:help
7SecureURL=private:user
8SecureURL=private:schedule

[OfficeLanguages]
LANGUAGE_ENGLISH_US=Installed

[3D-Engine]
3D-OpenGL=1
3D-Dithering=1
3D-ShowFull=0

[soffice-WorkingSet]
MaxGraphicCacheKBytes=2000
UseUserData=1

[DefaultWallpapers]
$(inst)/explorer/Samples/Formulas=11,$(inst)/config/math_bck.gif,255,255,255,255
$(inst)/explorer/Samples/Presentations=11,$(inst)/config/impr_bck.gif,255,255,255,255
$(inst)/explorer/Samples/Spreadsheets=11,$(inst)/config/calc_bck.gif,255,255,255,255
$(inst)/explorer/Samples/Databases=11,$(inst)/config/base_bck.gif,255,255,255,255
$(inst)/explorer/Samples/TextDocuments=11,$(inst)/config/writ_bck.gif,255,255,255,255
$(inst)/Desktop=11,$(inst)/config/desk_bck.gif,255,255,255,255
$(inst)/explorer/Samples/Drawings=11,$(inst)/config/draw_bck.gif,255,255,255,255

[Common]
FullScreenDesktop=0
Last-Database=adressen
AddressBookFields=Company:COMPANY;FirstName:FIRSTNAME;LastName:LASTNAME;Street:ADDRESS;Country:COUNTRY;Zip:POSTALCODE;City:CITY;Title:TITLE;Position:POSITION;AddrForm:PREFIX;Code:INITIALS;AddrFormMail:SALUTATION;PhonePriv:PHONEHOME;PhoneComp:PHONEWORK;Fax:FAX;EMail:EMAIL;URL:URL;Department:DEPARTMENT;PhoneOffice:PHONEOFFI;Pager:PAGER;PhoneCell:MOBILE;PhoneOther:PHONEOTHE;Note:NOTE;Altfield1:ALTFIELD1;Altfield2:ALTFIELD2;Altfield3:ALTFIELD3;Altfield4:ALTFIELD4;Id:ID;State:STATEPROV
0LDAP-Server=Four11 Directory|ldap.four11.com||389|100
FileDialogFilterCache=
Phone-LastLine=-1
Phone-Mode=3

[User]
}
puts $officerc_f $sorc1

set userdata "CustomerNumber=$user(13)
User-Id=$env(LOGNAME)
User-Name=$user(3)
User-FirstName=$user(2)
User-Adress=$user(1)#$user(4)#$user(5)#$user(6)#$user(7)###$user(9)#$user(10)#$user(11)#$user(12)#$user(8)
Language=1033

"
puts $officerc_f $userdata
flush $officerc_f

set sorc2 {[soffice-Apps]
scalc=1
simpress=1
sdraw=1
smath=1
simage=1
schart=1
sschedule=1
swriter=1

[soffice-Picklist]

}
puts $officerc_f $sorc2
flush $officerc_f
close $officerc_f

set auth [open $to/config/authrc w]
puts $auth {[Keys]
}
set regkey "PALK=$user(14)

"
puts $auth $regkey
flush $auth
close $auth

puts "\nInstallation Done"
puts "Now you have to copy contents of glibc2 directory to $to/lib directory.
Existing sym links in glibc2 directory should be preserved.
Don't use cp glibc2/* $to/lib !"
puts "Insert lxrun after word exec in last line of $to/bin/soffice file."
puts "And don't forget to set LINUX_ROOT environment variable."
flush stdout