unmaintained/raptor/config.factor

   1
   2 USING: namespaces threads
   3        unix.process unix.linux.if unix.linux.ifreq unix.linux.route
   4        raptor.cron ;
   5
   6 IN: raptor
   7
   8 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
   9 ! Networking
  10 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  11
  12 : configure-lo ( -- )
  13   "lo" "127.0.0.1"      set-if-addr
  14   "lo" { IFF_UP } flags set-if-flags ;
  15
  16 : configure-eth1 ( -- )
  17   "eth1" "192.168.1.10"                 set-if-addr
  18   "eth1" { IFF_UP IFF_MULTICAST } flags set-if-flags ;
  19
  20 : configure-route ( -- )
  21   "0.0.0.0" "192.168.1.1" "0.0.0.0" { RTF_UP RTF_GATEWAY } flags route ;
  22
  23 [
  24   configure-lo
  25   configure-eth1
  26   configure-route
  27 ] networking-hook set-global
  28
  29 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  30 ! Filesystems
  31 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  32
  33 "/dev/hda1"     root-device     set-global
  34
  35 { "/dev/hda5" } swap-devices    set-global
  36
  37 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  38 ! boot-hook
  39 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  40
  41 [
  42                                     start-wait-loop
  43
  44   ! rcS.d
  45
  46   "mountvirtfs"                     start-service
  47
  48   ! "hostname.sh"                           start-service
  49   "narodnik"                        set-hostname
  50
  51   "keymap.sh"                       start-service
  52   "linux-restricted-modules-common" start-service
  53   "udev"                            start-service
  54   "mountdevsubfs"                   start-service
  55   "module-init-tools"               start-service
  56   "procps.sh"                       start-service
  57
  58   !  "checkroot.sh"                 start-service
  59
  60                                     activate-swap
  61                                     mount-root
  62
  63   "mtab"                            start-service
  64   "checkfs.sh"                      start-service
  65   "mountall.sh"                     start-service
  66
  67                                     start-networking
  68 !   "loopback" start-service
  69 !   "networking" start-service
  70
  71   "hwclock.sh"                      start-service
  72   "displayconfig-hwprobe.py"        start-service
  73   "screen"                          start-service
  74   "x11-common"                      start-service
  75   "bootmisc.sh"                     start-service
  76   "urandom"                         start-service
  77
  78   ! rc2.d
  79
  80   "vbesave"                         start-service
  81   "acpid"                           start-service
  82   "powernowd.early"                 start-service
  83   "sysklogd"                        start-service
  84   "klogd"                           start-service
  85   "dbus"                            start-service
  86   "apmd"                            start-service
  87   "hotkey-setup"                    start-service
  88   "laptop-mode"                     start-service
  89   "makedev"                         start-service
  90   "nvidia-kernel"                   start-service
  91   "postfix"                         start-service
  92   "powernowd"                       start-service
  93   "ntp-server"                      start-service
  94   "binfmt-support"                  start-service
  95   "acpi-support"                    start-service
  96   "rc.local"                        start-service
  97   "rmnologin"                       start-service
  98
  99                                     schedule-cron-jobs
 100
 101   [ [ "/dev/tty2" tty-listener ] forever ] in-thread
 102   [ [ "/dev/tty3" tty-listener ] forever ] in-thread
 103   [ [ "/dev/tty4" tty-listener ] forever ] in-thread
 104   [ [ "/dev/tty5" getty        ] forever ] in-thread
 105   [ [ "/dev/tty6" getty        ] forever ] in-thread
 106
 107 ] boot-hook set-global
 108
 109 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 110 ! reboot-hook
 111 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 112
 113 [
 114   "acpi-support"                    stop-service
 115   "apmd"                            stop-service
 116   "dbus"                            stop-service
 117   "hotkey-setup"                    stop-service
 118   "laptop-mode"                     stop-service
 119   "makedev"                         stop-service
 120   "nvidia-kernel"                   stop-service
 121   "powernowd"                       stop-service
 122   "acpid"                           stop-service
 123   "hwclock.sh"                      stop-service
 124   "alsa-utils"                      stop-service
 125   "klogd"                           stop-service
 126   "binfmt-support"                  stop-service
 127   "sysklogd"                        stop-service
 128   "linux-restricted-modules-common" stop-service
 129   "sendsigs"                        stop-service
 130   "urandom"                         stop-service
 131   "umountnfs.sh"                    stop-service
 132   "networking"                      stop-service
 133   "umountfs"                        stop-service
 134   "umountroot"                      stop-service
 135   "reboot"                          stop-service
 136 ] reboot-hook set-global
 137
 138 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 139 ! shutdown-hook
 140 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 141
 142 [
 143   "acpi-support"                    stop-service
 144   "apmd"                            stop-service
 145   "dbus"                            stop-service
 146   "hotkey-setup"                    stop-service
 147   "laptop-mode"                     stop-service
 148   "makedev"                         stop-service
 149   "nvidia-kernel"                   stop-service
 150   "postfix"                         stop-service
 151   "powernowd"                       stop-service
 152   "acpid"                           stop-service
 153   "hwclock.sh"                      stop-service
 154   "alsa-utils"                      stop-service
 155   "klogd"                           stop-service
 156   "binfmt-support"                  stop-service
 157   "sysklogd"                        stop-service
 158   "linux-restricted-modules-common" stop-service
 159   "sendsigs"                        stop-service
 160   "urandom"                         stop-service
 161   "umountnfs.sh"                    stop-service
 162   "umountfs"                        stop-service
 163   "umountroot"                      stop-service
 164   "halt"                            stop-service
 165 ] shutdown-hook set-global