#! /usr/bin/perl
# 
# $Id$
# Captive project TestimonialBrunoSantos page Perl template.
# Copyright (C) 2004 Jan Kratochvil <project-www.jankratochvil.net@jankratochvil.net>
# 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; exactly version 2 of June 1991 is required
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA


package project::captive::TestimonialBrunoSantos;
require 5.6.0;	# at least 'use warnings;' but we need some 5.6.0+ modules anyway
our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
our $CVS_ID=q$Id$;
use strict;
use warnings;

BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
use My::Web;
Wrequire 'My::Project';


My::Web->init(
		"__PACKAGE__"=>__PACKAGE__,
		"title"=>'Captive NTFS - Hospital of Castelo Branco',
		"head_css"=>"
.name { font-style: italic; }
",
		"WebConfig::heading_novskip"=>1,
		"no_job"=>1,
		);
My::Web->heading();
print My::Project->section("captive");


print <<'HERE';
<h1>Captive NTFS - Hospital of Castelo Branco</h1>

<p>Hello Lace,</p>

<p>Let me explain this NFS.</p>

<p>I'm working on Hospital of Castelo Branco, Portugal, in the computers
division.</p>

<p>The Hospital is big (about 1000 workers), and we have a lot of machines,
since P II to P IV, everyone working with windows2000. (except 45 that are
working with ltsp).</p>

<p>we are preparing the machines to install another system that will allow the
digitalization of medical images - PACS (picture archive and communication
system).</p>

<p>since the computers that are need are about 100 and we need to install
windows in all of them (even we have an almost automated instalation - but
requires some administrator interaction). So, we want to install windows2000
without pressing a key.</p>

<p>So, the computers boot with PXE, and, run the minimal Fedora instalation,
that is provided by the NFS. before going to shell, it runs a script that erase
all the disk, creates a partition, restores a previous image of windows2000,
and thanks to captive-ntfs, mounts the ntfs partition and replaces several
lines on a configuration file. (the windows on the images is in a "unattented
instalation". means that only asks for the computer name when it boots for the
first time).  since the computer (alredy registered in dhcp), as a hostname
during the boot of fedora, i take that name and insert it in the configuration
file of windows 2000. umount the windows partition, reboot the machine and when
is boots again, windows is ready (after another reboot) to work !!!  Is nice,
since the machines are a lot and our time is short !!!</p>

<p>Well, this is why the captive-ntfs !! the error i report the other day, is
because on exports is the NFS is exported as: (ro,no_root_squash,sync). i guess
is because of this why we need to do the chmod -t / for captive to work !!</p>

<p>We have no lack of security, since this is only to install  windows and is
for a small number of machines (everyone as a MAC address that is very similar
and only those are allowed to boot with PXE that installs windows).</p>

<p>Well, after the history of my life (just kidding), you know why we use
captive-ntfs !! By the way, if you want to put our use of captive in the web
page, go for it (i tell u this, cause i've seen some testimonials) !!!</p>

<p>best regards !!!</p>

<p>Bruno Santos</p>
<p>Divisao de Informatica e Telecomunicacoes<br />
Hospital Amato Lusitano<br />
Av. Pedro Alvares Cabral<br />
6000-085 Castelo Branco</p>
HERE

My::Web->footer();
