Hex Artifact Content

Artifact be0f1f2714e89e6aa055dd9bff097a301ebc37f3:


0000: 23 21 20 2f 62 69 6e 2f 74 63 6c 6b 69 74 0a 0a  #! /bin/tclkit..
0010: 70 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20  package require 
0020: 74 75 61 70 69 0a 0a 3a 3a 74 75 61 70 69 3a 3a  tuapi..::tuapi::
0030: 73 63 61 6e 5f 61 6e 64 5f 6c 6f 61 64 5f 6b 65  scan_and_load_ke
0040: 72 6e 65 6c 5f 6d 6f 64 75 6c 65 73 0a 0a 3a 3a  rnel_modules..::
0050: 74 75 61 70 69 3a 3a 69 66 63 6f 6e 66 69 67 20  tuapi::ifconfig 
0060: 65 74 68 30 20 61 64 64 72 65 73 73 20 31 30 2e  eth0 address 10.
0070: 30 2e 32 2e 31 35 20 6e 65 74 6d 61 73 6b 20 32  0.2.15 netmask 2
0080: 35 35 2e 32 35 35 2e 32 35 35 2e 30 20 66 6c 61  55.255.255.0 fla
0090: 67 73 20 7b 42 52 4f 41 44 43 41 53 54 20 4d 55  gs {BROADCAST MU
00a0: 4c 54 49 43 41 53 54 20 55 50 7d 0a 3a 3a 74 75  LTICAST UP}.::tu
00b0: 61 70 69 3a 3a 73 79 73 63 61 6c 6c 3a 3a 72 6f  api::syscall::ro
00c0: 75 74 65 20 61 64 64 20 30 2e 30 2e 30 2e 30 20  ute add 0.0.0.0 
00d0: 30 2e 30 2e 30 2e 30 20 67 61 74 65 77 61 79 20  0.0.0.0 gateway 
00e0: 31 30 2e 30 2e 32 2e 32 20 64 65 76 20 65 74 68  10.0.2.2 dev eth
00f0: 30 0a 0a 66 69 6c 65 20 6d 6b 64 69 72 20 2f 65  0..file mkdir /e
0100: 74 63 20 20 20 0a 73 65 74 20 66 64 20 5b 6f 70  tc   .set fd [op
0110: 65 6e 20 2f 65 74 63 2f 72 65 73 6f 6c 76 2e 63  en /etc/resolv.c
0120: 6f 6e 66 20 77 5d 0a 70 75 74 73 20 24 66 64 20  onf w].puts $fd 
0130: 22 6e 61 6d 65 73 65 72 76 65 72 20 31 30 2e 30  "nameserver 10.0
0140: 2e 32 2e 33 22 0a 63 6c 6f 73 65 20 24 66 64 0a  .2.3".close $fd.