;; Use more memory to reduce garbage collection calls
(setq gc-cons-threshold (* 8 1024 1024)) ;; 8 MB

;; Default changes
(setq inhibit-startup-message t)
(scroll-bar-mode -1)
(tool-bar-mode -1)
(tooltip-mode -1)
(menu-bar-mode -1)
(setq visible-bell t)
(setq warning-minimum-level :error)
(global-visual-line-mode)

;; Line Numbers
(global-display-line-numbers-mode t)
(column-number-mode)

;; Disable line num on these modes
(dolist (mode '(term-mode-hook
		shell-mode-hook
		treemacs-mode-hook
		eshell-mode-hook))
  (add-hook mode (lambda () (display-line-numbers-mode 0))))
 
;; set up use-package
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/"))
(add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/"))
(package-initialize)

(unless (package-installed-p 'use-package)
  (package-refresh-contents)
  (package-install 'use-package))
(eval-and-compile
  (setq use-package-always-ensure t
        use-package-expand-minimally t))

;; Ivy
(use-package ivy
  :diminish
  :config
  (ivy-mode 1))

(use-package counsel
  :after ivy
  :bind (("M-x" . counsel-M-x)
	 ("C-x b" . counsel-ibuffer)
	 ("C-x C-f" . counsel-find-file)
	 :map minibuffer-local-map
	 ("C-r" . 'counsel-minibuffer-history))
  :config
  (setq ivy-initial-inputs-alist nil)) ;; Don't start searches with ^

(use-package ivy-rich
  :config (ivy-rich-mode 1))

;; Theme
(load-theme 'modus-vivendi)

(use-package doom-modeline
  :init (doom-modeline-mode 1)
  :config (setq doom-modeline-height 15))

;; Projects
(use-package projectile
  :diminish projectile-mode
  :config (projectile-mode)
  :custom ((projectile-completion-system 'ivy))
  :bind-keymap ("C-c p" . projectile-command-map))

(use-package magit)
;; TODO Look into forge for git community engagement

;; Make M-x all-the-icons-install-fonts and M-x nerd-icons-install-fonts available
(use-package all-the-icons
  :if (display-graphic-p))

;; Quality of life
(use-package rainbow-delimiters
  :hook (prog-mode . rainbow-delimiters-mode))

(use-package which-key
  :init (which-key-mode)
  :diminish which-key-mode
  :config
  (setq which-key-idle-delay 0.3))

(use-package helpful
  :custom
  (counsel-describe-function-function #'helpful-callable)
  (counsel-describe-variable-function #'helpful-variable)
  :bind
  ([remap describe-function] . counsel-describe-function)
  ([remap describe-command] . helpful-command)
  ([remap describe-variable] . counsel-describe-variable)
  ([remap describe-key] . helpful-key))

;; Org mode
(use-package org)
(use-package org-bullets
  :after org
  :hook (org-mode . org-bullet-mode))
;; TODO configure to be prettier

;; Tree Sitter (better syntax highlighting)
(use-package tree-sitter)
(use-package tree-sitter-langs
  :after tree-sitter
  :init
  (global-tree-sitter-mode)
  (add-hook 'tree-sitter-after-on-hook #'tree-sitter-hl-mode))

;; lsp-mode
(use-package lsp-mode
  :commands (lsp lsp-deferred)
  :init (setq lsp-keymap-prefix "C-c l")
  :hook (lsp-mode . lsp-enable-which-key-integration))
(use-package lsp-ui
  :hook (lsp-mode . lsp-ui-mode))
(use-package lsp-treemacs
  :after lsp)
(use-package lsp-ivy)

;; company (useful for showing lsp-mode popups)
(use-package company
  :after lsp-mode
  :hook (lsp-mode . company-mode)
  :bind
  (:map company-active-map
	("<tab>" . company-complete-selection))
  (:map lsp-mode-map
	("<tab>" . company-indent-or-complete-common))
  :custom
  (company-minimum-prefix-length 1)
  (company-idle-delay 0.0))
(use-package company-box
  :hook (company-mode . company-box-mode))

;; TypeScript
(use-package typescript-mode
  :mode ("\\.[jt]s\\'" "\\.[jt]sx\\'")
  :hook (typescript-mode . lsp-deferred)
  :config (setq typescript-indent-level 2))

;; C/C++
(add-hook 'c-mode-hook 'lsp)
(add-hook 'c++-mode-hook 'lsp)

;; TODO look into general for easy custom key bindings
;; TODO explore theme packages
;; TODO consider evil?

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(package-selected-packages
   '(tree-sitter-langs tree-sitter lsp-ivy lsp-treemacs lsp-ui company-box company which-key use-package typescript-mode rainbow-delimiters projectile org-bullets magit lsp-mode ivy-rich helpful doom-modeline counsel all-the-icons)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )