← Back to branch summary

~ubuntu-branches/ubuntu/warty/openafs/warty

« back to all changes in this revision

Viewing changes to src/afsinstall/lib/InstallGuides/sun4x_56/unix

  • Committer: Bazaar Package Importer
  • Author(s): Sam Hartman
  • Date: 2004-01-10 16:37:33 UTC
  • Revision ID: james.westby@ubuntu.com-20040110163733-jvr0n1uahshlb1uu
Tags: upstream-1.2.11
Import upstream version 1.2.11

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/afsinstall/lib/InstallGuides/sun4x_56/unix
 
1
# Copyright 2000, International Business Machines Corporation and others.
 
2
# All Rights Reserved.
 
3
# 
 
4
# This software has been released under the terms of the IBM Public
 
5
# License.  For details, see the LICENSE file in the top-level source
 
6
# directory or online at http://www.openafs.org/dl/license10.html
 
7
 
 
8
# An InstallGuide for the AFS modified Unix commands
 
9
# For Sun systems running Solaris 5.6
 
10
#
 
11
 
 
12
sub unix {
 
13
  &Copy("etc/inetd",   "/usr/sbin/inetd.afs");
 
14
 
 
15
  &ErrorsAreFatal(1);
 
16
  &Patch::Verbose if ($InstallVerbose);
 
17
  &CreateDir("/usr/vice/bin");
 
18
 
 
19
  &Copy("bin/rsh", "/usr/vice/bin");
 
20
  &Chown (0,2,   "/usr/vice/bin/rsh");
 
21
  &Chmod (04755, "/usr/vice/bin/rsh");
 
22
 
 
23
  &Copy("lib/pam_afs.so.1", "/usr/lib/security");
 
24
  &Chmod(0755, "/usr/lib/security/pam_afs.so.1");
 
25
  &Chown(0,3, "/usr/lib/security/pam_afs.so.1");
 
26
 
 
27
  $PamConf = "/etc/pam.conf";
 
28
  &Patch::FileOpen($PamConf);
 
29
 
 
30
  $RloginSubSearch = "^(rlogin.+)required(.+)";
 
31
  $RloginSubReplace = '$1.optional.$2';
 
32
 
 
33
  $RLoginAuthSearch = "^rlogin\\s+auth\\s+.+pam_unix.so.1";
 
34
  $RLoginAuthNew = <<"xxENDxx";
 
35
rlogin  auth optional   /usr/lib/security/pam_afs.so.1 try_first_pass ignore_root
 
36
xxENDxx
 
37
 
 
38
  $RshSubSearch = "^(rsh.+)required(.+)";
 
39
  $RshSubReplace = '$1.optional.$2';
 
40
 
 
41
  $RshSearch = "^rsh\\s+auth\\s+.*pam_rhosts_auth.so.1";
 
42
  $RshNew = <<"xxENDxx";
 
43
rsh     auth optional   /usr/lib/security/pam_afs.so.1 try_first_pass ignore_root
 
44
xxENDxx
 
45
 
 
46
  if (!&Patch::Patch($PamConf, [[1, "Substitution", $RloginSubSearch, $RloginSubReplace],
 
47
                                [1, "Insert", $RLoginAuthSearch, $RLoginAuthNew],
 
48
                                [1, "Substitution", $RshSubSearch, $RshSubReplace],
 
49
                                [1, "Insert", $RshSearch, $RshNew]])) {
 
50
    &ErrorMsg("Did not succeed with patch", $PamConf);
 
51
  }
 
52
 
 
53
  # Create the inetd.conf.afs file
 
54
  $InetdConfAfs = "/etc/inet/inetd.conf.afs";
 
55
  open(INETD, ">$InetdConfAfs") || &ErrorMsg("Can't open file", $InetdConfAfs);
 
56
  print INETD <<"EOINETD";
 
57
shell           stream tcp nowait root /usr/sbin/in.rshd   in.rshd
 
58
ta-rauth        stream tcp nowait root internal         ta-rauth
 
59
EOINETD
 
60
  &Symlink("./inet/inetd.conf.afs", "/etc/inetd.conf.afs");
 
61
 
 
62
  # comment out the rshd line in inetd.conf
 
63
  $InetdConf = "/etc/inet/inetd.conf";
 
64
  &CopyStat($InetdConf, $InetdConfAfs);
 
65
  &Patch::FileOpen($InetdConf);
 
66
 
 
67
  $Search = "^(shell\\s+.+)";
 
68
  $Replace = '"#".$1';
 
69
 
 
70
  if (!&Patch::Patch($InetdConf, [[1, "Substitution", $Search, $Replace]])) {
 
71
    &ErrorMsg("Did not succeed with patch", $InetdConf);
 
72
  }
 
73
 
 
74
  # Modify the /etc/inet/services file
 
75
  # append the ta-rauth to the services file
 
76
  $Services = "/etc/inet/services";
 
77
  &Patch::FileOpen($Services);
 
78
 
 
79
  $ServicesAppend = "ta-rauth   601/tcp rauth";
 
80
 
 
81
  if (!&Patch::Patch($Services, [[0, "EOF", "", $ServicesAppend]])) {
 
82
    &ErrorMsg("Did not succeed with patch", $Services);
 
83
  }
 
84
}
 
85