X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=project%2Fcaptive%2FIndex.html.pl;h=de5bc4dd8d72a9f17ba205202ae2b0025719f7d3;hb=9d744ac07eb02ad5ae7c8650e9dd16d3e34f25ef;hp=488edc8ceb57dd6f5799079f1d50f65121b5f469;hpb=0d57b18a0884975e76ea9a0e5bc7477c663bdcaa;p=www.jankratochvil.net.git diff --git a/project/captive/Index.html.pl b/project/captive/Index.html.pl index 488edc8..de5bc4d 100755 --- a/project/captive/Index.html.pl +++ b/project/captive/Index.html.pl @@ -31,25 +31,6 @@ Wuse 'My::Project'; Wuse 'project::captive::ListItem'; -# Redirect foreign visitors to our root with that disgusting introduction ad. -{ - my $r=Apache->request(); - if (my $referer=$r->header_in("Referer")) { - Wuse 'WebConfig'; - require URI; - my $refuri=URI->new_abs($referer,$r->uri()); - if (1 - && $refuri->host() ne "localhost" - && $refuri->host() ne &{$WebConfig::WebConfig{"web_hostname_sub"}}) { - use Apache::Constants qw(REDIRECT); - $r->status(REDIRECT); - $r->header_out("Location"=>"http://".&{$WebConfig::WebConfig{"web_hostname_sub"}}()); - exit 0; - } - } - } - - my $W=My::Project->init_project( "__PACKAGE__"=>__PACKAGE__, "ListItem"=>\@project::captive::ListItem::ListItem, @@ -60,207 +41,122 @@ my $W=My::Project->init_project( .re { font-style: italic; } table.mailman > * /* FIXME: What is it? */ > tr > th, table.mailman > * /* FIXME: What is it? */ > tr > td { padding: 1ex; text-align: center; } +table.download td { padding: 8px; } +table.navigate td { padding-bottom: 1ex; padding-left: 15px; padding-right: 15px; } ", + "project_text_after_title"=>"" + .'
' + .'' + .'' + .'' + .'' + .'' + .'' + .'' + .'
• '.a_href('#download','Download').'• '.a_href('#news','NEWS').'• '.a_href('#testimonials','Testimonials').'• '.a_href('#notes','Installation Notes').'• '.a_href('#lists','Mailing Lists').'• '.a_href('#seealso','See Also').'
' + .'
' ); -print <<"HERE"; -

The First free Read/Write NTFS for Free Operating Systems

-

The First Open Source MS-Windows Kernel API for Free OS

+print <<"HERE" if !$WebConfig::WebConfig{"no_job"}; +@{[ vskip "3ex" ]} + +
+ + +
+ Looking for a challenging job: @{[ a_href $W->{"resume_url"},"My resume" ]} +
+
HERE -my @stuff=( - "A lot of people claim to be Windows Programmers.\n" - ." Now, I can join them at last - I have also written my own Microsoft Windows.", - "Why do they need ".a_href('http://www.winsupersite.com/reviews/winserver2k3_gold2.asp','5,000 developers') - ." to write Microsoft Windows when it can be just a One Man Show?", - "My first Microsoft Windows program ever written? Some 'helloworld'?" - ." hal.dll.", +my %version=( + map(($_=>["1.1.4","0"]),qw(captive captive-lufs captive-install)), + "lufs"=>["0.9.7","1captive8"], ); -print rightimg((map("

$_

\n",($stuff[int rand @stuff])))[0], - 'captive-install-acquire-small','[ Captive Microsoft Windows Drivers Acquire Illustration ]', - "a_href_img"=>'captive-install-acquire'); - print <<"HERE"; - +

Download

 + +

Choose the one preferred installation format:

+ +
+ + + + + + + + + + + + + + + + + +
+ RPM i386 binary
+ tested for distributions: +
    +
  • Red Hat 9 Shrike
    • +
  • Red Hat 8 Psyche
    • +
  • Mandrake 9.1 Bamboo
    • +
+ 		@{[ a_href 'dist/captive-static-'.$version{"captive"}[0].'-'.$version{"captive"}[1].'.i386.rpm', + undef(),"size"=>1,"basename"=>1 ]}
.tar.gz i386 binary
(for non-RPM distributions)		@{[ a_href 'dist/captive-static-'.$version{"captive"}[0].'.tar.gz',undef(),"size"=>1,"basename"=>1 ]}
Debian .deb binaries@{[ a_href 'CVS.html.pl#debian','download link' ]}
Source archives@{[ a_href 'CVS.html.pl#source','download link' ]}
+
@{[ vskip "3ex" ]} -

- Why did I install Microsoft Windows and write such a disgusting piece of code?
- Expecting @{[ a_href $W->{"resume_url"},"yet another challenging task" ]}! -

- -@{[ vskip "3ex" ]} +

NEWS

 +
+
captive-1.1.4 (2003-12-13) [@{[ a_href $W->{"project_viewcvs"}.'/*checkout*/captive/NEWS?rev=HEAD','archive' ]}]
+
+ +
+
lufs-0.9.7captive8 (2003-12-06) [@{[ a_href $W->{"project_viewcvs"}.'/*checkout*/lufs/NEWS.captive?rev=1.1.2.11','archive' ]}]
+
- - - - -HERE -my %pkg=( - 1=>[qw(captive captive-lufs captive-install lufs gnome-vfs-httpcaptive ntfsprogs ntfsprogs-gnomevfs)], - 2=>[qw(captive captive-lufs lufs)], - 3=>[qw(captive)], - ); -my %reqpkg=( - 1 =>[qw(glib2 gnome-vfs2 ORBit2 libxml2 openssl popt readline libgnomeui)], - 23=>[qw(glib2 gnome-vfs2 ORBit2 libxml2 openssl popt readline)], - ); -my %version=( - map(($_=>["1.0","0"]),qw(captive captive-lufs captive-install)), - "lufs"=>["0.9.6","1captive6"], - "gnome-vfs-httpcaptive"=>["2.3.8captive2","0"], - "ntfsprogs"=>["200309071734","1captive1"], - "ntfsprogs-gnomevfs"=>["1.0.2","0"], - ); -my %has_rh8=(map(($_=>1),qw( - gnome-vfs-httpcaptive - captive - captive-lufs - captive-install - ))); -my %has_mdk91=(map(($_=>1),qw( - gnome-vfs-httpcaptive - lufs - captive - captive-lufs - captive-install - ))); -my %has_devel=(map(($_=>1),qw( - ntfsprogs - ))); -my %pkg_nosrc=(map(($_=>1),qw( - captive-lufs - captive-install - ))); - -my $case; -my $a_href_arch=sub ($$%) -{ -my($file_base,$text,%args)=@_; - - $text=~s/[._]\D.*$// if $case!=1 && $text!~/^[.]/; - return a_href $file_base,$text,"size"=>($case==1),%args; -}; - -my @libxml2_rh8_pkgs=qw(libxml2-2.5.4-1.i386.rpm libxml2-python-2.5.4-1.i386.rpm libxml2-devel-2.5.4-1.i386.rpm); - -my @dist=( - { - "name"=>"Red Hat 9
Shrike i386", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - my $file="$pkg-$version_base-$version_ext.i386.rpm"; - my $r=&$a_href_arch("dist/$file",$file); - (my $filedev=$file)=~s/^\Q$pkg\E-/${pkg}-devel-/; - $r.="
".&$a_href_arch("dist/$filedev",$filedev) if $has_devel{$pkg}; - return $r; - }, - }, - { - "name"=>"Red Hat 8
Psyche i386
" - ."(".a_href("#libxml2_rh8","libxml2 upgrade note").")", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - my $file="$pkg-$version_base-$version_ext".(!$has_rh8{$pkg} ? "" : "rh8").".i386.rpm"; - my $r=&$a_href_arch("dist/$file",$file); - (my $filedev=$file)=~s/^\Q$pkg\E-/${pkg}-devel-/; - $r.="
".&$a_href_arch("dist/$filedev",$filedev) if $has_devel{$pkg}; - if ($pkg eq "captive-install") { - for (@libxml2_rh8_pkgs) { - $r.="
".&$a_href_arch('ftp://ftp.redhat.com/pub/redhat/linux/9/en/os/i386/RedHat/RPMS/'.$_,$_)." of Red Hat 9"; - } - } - return $r; - }, - }, - { - "name"=>"Mandrake 9.1
Bamboo i586", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - my $file="$pkg-$version_base-$version_ext".(!$has_mdk91{$pkg} ? ".i386.rpm" : "mdk91.i586.rpm"); - my $r=&$a_href_arch("dist/$file",$file); - (my $filedev=$file)=~s/^\Q$pkg\E-/${pkg}-devel-/; - $r.="
".&$a_href_arch("dist/$filedev",$filedev) if $has_devel{$pkg}; - return $r; - }, - }, - { - "name"=>"Debian GNU/Linux
'unstable' i386", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - $version_ext=~s/^\d+//; - my $file="${pkg}_$version_base".($version_ext=~/^\d+$/ ? "" : $version_ext)."_i386.deb"; - my $r=&$a_href_arch("dist/$file",$file); - (my $filedev=$file)=~s/^\Q$pkg\E_/${pkg}-dev_/; - $r.="
".&$a_href_arch("dist/$filedev",$filedev) if $has_devel{$pkg}; - return $r; - }, - }, - { - "name"=>"Sources (.tar.gz)", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - return () if $pkg_nosrc{$pkg}; - $version_ext=~s/^\d+//; - my $file="$pkg-$version_base".($version_ext=~/^\d+$/ ? "" : $version_ext).".tar.gz"; - return $file,$file; - }, - }, - { - "name"=>"Sources (.src.rpm)
(Red Hat 9 - Shrike)", - "out"=>sub { - my($pkg,$version_base,$version_ext)=@_; - return () if $pkg_nosrc{$pkg}; - my $file="$pkg-$version_base-$version_ext.src.rpm"; - return $file,$file; - }, - }, - ); +@{[ vskip "3ex" ]} -for my $dist (@dist) { - print ""; - print ""; - for my $casel (1,2,3) { - $case=$casel; - print ""; - } - print "\n"; - } -print "\n"; -print ""; - print ""; - for my $case (1,23) { - print ""; - print join(", ",map("$_",@{$reqpkg{$case}})); - print ""; - } -print "\n"; -print <<"HERE"; -
DistributionInstallation Case #1
Filesystem and installer
(recommended)		Installation Case #2
Manual installation
(filesystem, expert user)		Installation Case #3
Command-line client
(no filesystem access)
".$dist->{"name"}.""; - print join("
",map({ my $pkg=$_; - my($file,$text)=&{$dist->{"out"}}($pkg,@{$version{$pkg}}); - (!defined $text ? ($file) || () : (&$a_href_arch("dist/$file",$text))); - } @{$pkg{$case}})); - print "
Package Requirements
+

Captive NTFS Testimonials

 -
-

Red Hat 8 Psyche upgrade of libxml2 package: - Upgrade only the packages already installed on your system to prevent - many dependency requirements - do not use "rpm -U", - use "rpm -F" instead:

-

- rpm -F @{[ join(" ",@libxml2_rh8_pkgs) ]} -

-
+ @{[ vskip "3ex" ]} -

Installation Notes

+

Installation Notes

You should first run captive-install-acquire command to check your available Microsoft Windows drivers versions. Now you can execute:

@@ -275,10 +171,6 @@ available Microsoft Windows drivers versions. Now you can execute:

Overview

-

'captive' is the base package. It contains debugging 'captive-cmdline' client.
-'captive-lufs' permits mounting NTFS as regular filesystem. It needs 'lufs'.
-'lufs' is a daemon to enable userland process to provide filesystem functions.

-

Any errors from 'captive-lufs' are written to '/var/log/messages'.

Needed drivers (at least ntoskrnl.exe+ntfs.sys) must be in '/var/lib/captive'.

@@ -286,28 +178,6 @@ available Microsoft Windows drivers versions. Now you can execute:

'captive' package creates 'captive' user and 'captive' group on your system.

-

Package Version Conflicts

- -
- -
@{[ a_href 'http://lufs.sourceforge.net/lufs/','lufs' ]}
-

'captive' version required: Although you may already have the -original package installed you must replace it by the local 'captive'-marked -version containing some 'captive'-essential fixes and extensions.

- -
@{[ a_href 'http://linux-ntfs.sourceforge.net/','ntfsprogs' ]}
-

Original version >=200309071734 sufficient: -The package which is downloadable from here, has no code patches - you can freely use the -original version instead. Unfortunately, the last public release is -1.7.1 while this project requires at least -@{[ a_href 'http://linux-ntfs.sourceforge.net/snapshots/','snapshot' ]} version -@{[ a_href 'http://linux-ntfs.sourceforge.net/snapshots/ntfsprogs-200309071734.tar.bz2','200309071734' ]} -which is not packaged (.rpm/.deb) yet. Packaged versions are provided here for -your convenience.

- -
- -

LUFS Kernel Driver Module

@{[ a_href 'http://lufs.sourceforge.net/lufs/','LUFS' ]} (Linux Userland File @@ -358,14 +228,14 @@ print <<"HERE";

- @{[ map("",@lists) ]} + @{[ map('',@lists) ]} - @{[ map({ ""; } @lists) ]} - @{[ map({ ""; } @lists) ]} + @{[ map({ ""; } @lists) ]} + @{[ map({ ""; } @lists) ]}@{[ map(('
$_
'.$_.'@jankratochvil.net
New version announcements
(low traffic, recommended)		 User support,
bug reports		 Development
".a_href(&{$W->{"mailman_url_sub"}}()."/listinfo/$_",'Mailman Infopage')."
".a_href(&{$W->{"pipermail_url_sub"}}()."/$_",'Archive')."
".a_href(&{$W->{"mailman_url_sub"}}()."listinfo/$_",'Mailman Infopage')."
".a_href(&{$W->{"pipermail_url_sub"}}()."$_",'Archive')."
See Also +

See Also
    -
  • @{[ a_href 'Preview.html.pl','Technology Preview' ]}
    • -
  • @{[ a_href 'CVS.html.pl','CVS Repository' ]}
    • +
  • @{[ a_href 'Preview.html.pl','Technology Preview' ]}
    • +
  • @{[ a_href 'CVS.html.pl','Download Sources, CVS Repository' ]}
  • @{[ a_href 'doc/','Developer Documentation' ]}; highlights:
    • @{[ a_href 'doc/About.html.pl#versions','Microsoft Windows Versions Compatibility' ]}
    • @{[ a_href 'doc/Architecture.html.pl#law','Laws and Licensing Conditions' ]}
      • @@ -400,7 +270,7 @@ print <<"HERE";
    • @{[ a_href 'doc/Related.html.pl#vmware','Related Projects - VMware Workstation' ]}
    • @{[ a_href 'doc/LinuxNTFS.html.pl',"Re: 7.7 Can't we write a wrapper for Windows' driver?" ]}
    • -
  • @{[ a_href 'http://cvs.jankratochvil.net/viewcvs/*checkout*/captive/TODO?rev=HEAD','Known Bugs' ]}
    • +
  • @{[ a_href $W->{"project_viewcvs"}.'/*checkout*/captive/TODO?rev=HEAD','Known Bugs' ]}
  • Man Pages
      @{[ do {