126 lines
2.6 KiB
Plaintext
126 lines
2.6 KiB
Plaintext
(def use-repo (fn (a b) (print a b)))
|
|
|
|
|
|
|
|
;; (def window-system (fn (a) (start-driver a)))
|
|
;; (def window-system (fn (a) (start-driver a)))
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;
|
|
;; Repos ;;
|
|
;;;;;;;;;;;
|
|
|
|
;; This is the core repo that is used for core things like networking ;;
|
|
(use-repo core "https://repo.ablecorp.us/core")
|
|
;; Add a secondary repo ;;
|
|
;; (use-repo able "https://repo.ablecorp.us/able")
|
|
|
|
;; Set the default pkg-install to be binary ;;
|
|
(pkg-defaults binary:true)
|
|
|
|
;; Install compilers ;;
|
|
;; pkg-install <repo> <pkg-name>
|
|
;; pkg-name : A string or atom to search.
|
|
(pkg-install core hblang2)
|
|
;; Install the rust compiler ;;
|
|
(pkg-install core rustc)
|
|
(pkg-install core clang)
|
|
|
|
;;;;;;;;;;;;;;;
|
|
;; Compilers ;;
|
|
;;;;;;;;;;;;;;;
|
|
|
|
;; Set default compilers to use ;;
|
|
;; the dev tool pulls from this ;;
|
|
(compilers
|
|
)
|
|
;; hblang: 'hblang2
|
|
;; rust: 'rustc
|
|
;; Clang is not supported :thumbsup:
|
|
;; c: 'clang
|
|
|
|
;;;;;;;;;;;;;;;;;
|
|
;; Boot Loader ;;
|
|
;;;;;;;;;;;;;;;;;
|
|
(pkg-install core limine)
|
|
|
|
(def limine_res (resolution 1024 768 24))
|
|
(boot-loader
|
|
(default-entry 1)
|
|
(timeout 0)
|
|
(interface_resolution: 'limine_res))
|
|
|
|
(boot-loader-entry "ableos"
|
|
(comment "Default AbleOS boot entry.")
|
|
(protocol "limine")
|
|
(kernel_path "boot:///kernel_${ARCH}")
|
|
(kernel_cmdline "")
|
|
(resolution 'limine_res))
|
|
|
|
(boot-loader-entry "ableos-no-cluster"
|
|
(comment "Default AbleOS boot entry.")
|
|
(protocol "limine")
|
|
(kernel_path "boot:///kernel_${ARCH}")
|
|
(kernel_cmdline "cluster=false")
|
|
(resolution 'limine_res))
|
|
|
|
;;;;;;;;;;;;;;;;;;;;
|
|
;; Kernel Options ;;
|
|
;;;;;;;;;;;;;;;;;;;;
|
|
|
|
;; A kernel package is required
|
|
(pkg-install core kernel-rust)
|
|
|
|
;; Set the kernel to be used by ableOS ;;
|
|
;; Maybe set a default if this isn't set? ;;
|
|
;; Must be installed already ;;
|
|
(kernel 'kernel-rust)
|
|
|
|
;;;;;;;;;;;;
|
|
;; Config ;;
|
|
;;;;;;;;;;;;
|
|
|
|
;; Install packages ;;
|
|
(pkg-install core sunset)
|
|
(pkg-install core ps2-driver)
|
|
|
|
;; A list of programs to run on startup ;;
|
|
(start ())
|
|
|
|
;; A list of programs to add to the driver supervisor ;;
|
|
(start-driver (ps2-driver))
|
|
|
|
;; Set the window system to be used by ableOS ;;
|
|
;; Must be installed already ;;
|
|
;; adds the window system to the driver supervisor ;;
|
|
(def window-system (fn (a) (start-driver a)))
|
|
(window-system sunset)
|
|
|
|
;;;;;;;;;;;;;;;;
|
|
;; Networking ;;
|
|
;;;;;;;;;;;;;;;;
|
|
|
|
(networking
|
|
;; set the network hostname
|
|
;; TODO Namespace this somehow ;;
|
|
(hostname "ableOS")
|
|
;; use dhcp to find an ip ;;
|
|
(ipv4 dhcp)
|
|
(ipv6 dhcp)
|
|
;; Set the time server ;;
|
|
(ntp "time.nist.gov")
|
|
(dns 'router-dns-steal))
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Cluster Software ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
;; Install the cluster software ;;
|
|
(pkg-install core cluster)
|
|
|
|
;; Defaults to false ;;
|
|
(cluster enabled:false) |