;;; $DOOMDIR/config.el -*- lexical-binding: t; -*-

;; Place your private configuration here! Remember, you do not need to run 'doom
;; sync' after modifying this file!


;; Some functionality uses this to identify you, e.g. GPG configuration, email
;; clients, file templates and snippets. It is optional.
(setq user-full-name "Aly Sewelam"
      user-mail-address "linly@swagg.ml")

;; Doom exposes five (optional) variables for controlling fonts in Doom:
;;
;; - `doom-font' -- the primary font to use
;; - `doom-variable-pitch-font' -- a non-monospace font (where applicable)
;; - `doom-big-font' -- used for `doom-big-font-mode'; use this for
;;   presentations or streaming.
;; - `doom-unicode-font' -- for unicode glyphs
;; - `doom-serif-font' -- for the `fixed-pitch-serif' face
;;
;; See 'C-h v doom-font' for documentation and more examples of what they
;; accept. For example:
;;
(setq doom-font (font-spec :family "FiraCode" :size 13.5))
;;(font-spec :family "Fira Code" :size 12.5 :weight 'semi-light)
;;    doom-variable-pitch-font (font-spec :family "Fira Sans" :size 13))
;;
;; If you or Emacs can't find your font, use 'M-x describe-font' to look them
;; up, `M-x eval-region' to execute elisp code, and 'M-x doom/reload-font' to
;; refresh your font settings. If Emacs still can't find your font, it likely
;; wasn't installed correctly. Font issues are rarely Doom issues!

;; There are two ways to load a theme. Both assume the theme is installed and
;; available. You can either set `doom-theme' or manually load a theme with the
;; `load-theme' function. This is the default:
(setq doom-theme 'doom-gruvbox-light)

;; This determines the style of line numbers in effect. If set to `nil', line
;; numbers are disabled. For relative line numbers, set this to `relative'.
(setq display-line-numbers-type 'relative)

;; If you use `org' and don't want your org files in the default location below,
;; change `org-directory'. It must be set before org loads!
(setq org-directory "~/org/")


;; Whenever you reconfigure a package, make sure to wrap your config in an
;; `after!' block, otherwise Doom's defaults may override your settings. E.g.
;;
;;   (after! PACKAGE
;;     (setq x y))
;;
;; The exceptions to this rule:
;;
;;   - Setting file/directory variables (like `org-directory')
;;   - Setting variables which explicitly tell you to set them before their
;;     package is loaded (see 'C-h v VARIABLE' to look up their documentation).
;;   - Setting doom variables (which start with 'doom-' or '+').
;;
;; Here are some additional functions/macros that will help you configure Doom.
;;
;; - `load!' for loading external *.el files relative to this one
;; - `use-package!' for configuring packages
;; - `after!' for running code after a package has loaded
;; - `add-load-path!' for adding directories to the `load-path', relative to
;;   this file. Emacs searches the `load-path' when you load packages with
;;   `require' or `use-package'.
;; - `map!' for binding new keys
;;
;; To get information about any of these functions/macros, move the cursor over
;; the highlighted symbol at press 'K' (non-evil users must press 'C-c c k').
;; This will open documentation for it, including demos of how they are used.
;; Alternatively, use `C-h o' to look up a symbol (functions, variables, faces,
;; etc).
;;
;; You can also try 'gd' (or 'C-c c d') to jump to their definition and see how
;; they are implemented.


;; org-roam
(use-package! org-roam
  :custom
  (org-roam-directory "~/org/Brain")
  (org-roam-dailies-directory "daily/")

  (org-roam-capture-templates
   '(("d" "default" plain
      (function org-roam-capture--get-point)
      "%?"
      :file-name "${slug}"     ;  <---------- see?
      :head "#+title: ${title}\n#+created: %u\n#+last_modified: %U\n#+roam_tags:${tag}\n\n"
      :unnarrowed t
      :immediate-finish t  :config)))

  (org-roam-dailies-capture-templates
   '(("d" "default" entry
      "* %?"
      :target (file+head "%<%Y-%m-%d>.org"
			 "#+title: %<%Y-%m-%d>\n"))))
  :config
  (org-roam-db-autosync-enable)
  (require 'org-roam-dailies)
  (require 'org-roam-graph)
  (require 'org-roam-protocol))

(eval-after-load 'org-list
  '(add-hook 'org-checkbox-statistics-hook (function ndk/checkbox-list-complete)))

(defun ndk/checkbox-list-complete ()
  (save-excursion
    (org-back-to-heading t)
    (let ((beg (point)) end)
      (end-of-line)
      (setq end (point))
      (goto-char beg)
      (if (re-search-forward "\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]" end t)
            (if (match-end 1)
                (if (equal (match-string 1) "100%")
                    ;; all done - do the state change
                    (org-todo 'done)
                  )
              (if (and (> (match-end 2) (match-beginning 2))
                       (equal (match-string 2) (match-string 3)))
                  (org-todo 'done)
		(org-todo 'todo)
                ))))))

;; ctrl+a and ctrl+x is awesome
(evil-define-key '(normal visual) 'global (kbd "C-a") 'evil-numbers/inc-at-pt)
(evil-define-key '(normal visual) 'global (kbd "C-x") 'evil-numbers/dec-at-pt)
(evil-define-key '(normal visual) 'global (kbd "C-a") 'evil-numbers/inc-at-pt-incremental)
(evil-define-key '(normal visual) 'global (kbd "C-x") 'evil-numbers/dec-at-pt-incremental)

;; YAY I LOVE PRESSING s
(remove-hook 'doom-first-input-hook
    #'evil-snipe-mode)
;; TABBSS
;; use tab indentation everywhere
(setq-default indent-tabs-mode t)
(setq-default tab-width 4) ; Assuming you want your tabs to be four spaces wide
(defvaralias 'c-basic-offset 'tab-width)

;;Chezmoi
(use-package chezmoi)

;; Silly Latex
(setq-default org-latex-toc-command "\\tableofcontents \\clearpage")

;;org-caldav
(use-package! org-caldav
  :init
  ;; This is the sync on close function; it also prompts for save after syncing so
  ;; no late changes get lost
;;  (defun org-caldav-sync-at-close ()
;;    (org-caldav-sync)
;;    (save-some-buffers))
;;
  ;; This is the delayed sync function; it waits until emacs has been idle for
  ;; "secs" seconds before syncing.  The delay is important because the caldav-sync
  ;; can take five or ten seconds, which would be painful if it did that right at save.
  ;; This way it just waits until you've been idle for a while to avoid disturbing
  ;; the user.
  (defvar org-caldav-sync-timer nil
     "Timer that `org-caldav-push-timer' used to reschedule itself, or nil.")
  (defun org-caldav-sync-with-delay (secs)
    (when org-caldav-sync-timer
      (cancel-timer org-caldav-sync-timer))
    (setq org-caldav-sync-timer
	  (run-with-idle-timer
	   (* 1 secs) nil 'org-caldav-sync)))

  ;; Actual calendar configuration edit this to meet your specific needs
  (setq org-caldav-url "https://cloud.sewelam.org/remote.php/dav/calendars/Aly")
      (setq org-caldav-calendars
    '(
;;      (:calendar-id "capture-1"
;;	    	:files ("~/org/todo.org")
;;		:inbox "~/org/todo.org")
      (:calendar-id "work"
		    :files ("~/org/work.org")
		    :inbox "~/org/from_work.org")
      ;; (:calendar-id "home"
      ;; 		    :files: ("~/org/home.org")
      ;; 		    :inbox "~/org/home.org")
      (:calendar-id "studies"
		    :files: ("~/org/studies.org")
		    :inbox "~/org/studies.org")
      ;; (:calendar-id "some-day-1"
      ;; 		    :files: ("~/org/someday.org")
      ;; 		    :inbox "~/org/someday.org")
      ))
  (setq org-caldav-backup-file "~/org-caldav/org-caldav-backup.org")
  (setq org-caldav-save-directory "~/org-caldav/")
  (setq org-icalendar-categories '(local-tags))

  :config
  (setq org-icalendar-alarm-time 1)
  ;; This makes sure to-do items as a category can show up on the calendar
  (setq org-icalendar-include-todo nil)
  (setq org-caldav-sync-todo nil)
  (setq org-caldav-delete-calendar-entries 'always)
  (setq org-caldav-delete-org-entries 'always)
  ;; This ensures all org "deadlines" show up, and show up as due dates
  (setq org-icalendar-use-deadline '(todo-due))
  ;; This ensures "scheduled" org items show up, and show up as start times
  (setq org-icalendar-use-scheduled '(todo-start))
  ;; Add the delayed save hook with a five minute idle timer
  (add-hook 'after-save-hook
	    (lambda ()
	      (when (eq major-mode 'org-mode)
		(org-caldav-sync-with-delay 300))))
  ;; Add the close emacs hook
  ;;(add-hook 'kill-emacs-hook 'org-caldav-sync-at-close)
  )
(setq auth-sources '("~/.authinfo.gpg"))

;; MORE TEMPLATES
(after! org
  (add-to-list 'org-capture-templates
	       '("w" "Work" entry
		 (file "~/org/work.org")
		 "* TODO %?" :empty-lines 1))

  (add-to-list 'org-capture-templates
	       '("l" "Someday" entry
		 (file "~/org/someday.org")
		 "* TODO %?" :empty-lines 1))
  (add-to-list 'org-capture-templates
	       '("s" "Studies" entry
		 (file "~/org/studies.org")
		 "* TODO %?" :empty-lines 1))
  (add-to-list 'org-capture-templates
	       '("h" "Home" entry
		 (file "~/org/home.org")
		 "* TODO %?" :empty-lines 1))
  (use-package! org-contacts
    :after org
    :custom (org-contacts-files '("~/org/contacts.org"))
  )

  ;;def var for template that's crazy
  (defvar my/org-contacts-template "* %(org-contacts-template-name)
:PROPERTIES:
:ADDRESS: %^{289 Cleveland St. Brooklyn, 11206 NY, USA}
:BIRTHDAY: %^{yyyy-mm-dd}
:EMAIL: %(org-contacts-template-email)
:NOTE: %^{NOTE}
:END:" "Template for org-contacts.")
  (add-to-list 'org-capture-templates
	       '("c" "Contact" entry
		(file+headline "~/org/contacts.org" "Contacts")
		my/org-contacts-template
		:empty-lines 1))
  )
(setq-default cache-long-scans nil)

;; zsh pls
(setq explicit-shell-file-name "/usr/bin/zsh")
(setq shell-file-name "zsh")
(setq explicit-zsh-args '("--login" "--interactive"))
(defun zsh-shell-mode-setup ()
  (setq-local comint-process-echoes t))
(add-hook 'shell-mode-hook #'zsh-shell-mode-setup)

(after! telega
  (telega-notifications-mode 1))
(setq-default org-export-with-broken-links t)
(setq org-modern-label-border 0.1)
(global-org-modern-mode)
(add-hook 'python-mode-hook #'flymake-ruff-load)
;; Jetbrains comment keybind )
(evil-define-key '(normal insert) 'global (kbd "C-/") 'comment-line)
(evil-define-key '(visual) 'global (kbd "C-/") 'comment-dwim)
(evil-define-key '(normal visual) 'global (kbd "C-b") 'comment-box)
(setq-default ispell-dictionary "british")
(setq-default org-log-into-drawer "LOGBOOK")

;; binds for ctrl+hjkl
(evil-define-key '(normal insert) 'global (kbd "C-h") 'evil-window-left)
(evil-define-key '(normal insert) 'global (kbd "C-j") 'evil-window-down)
(evil-define-key '(normal insert) 'global (kbd "C-k") 'evil-window-up)
(evil-define-key '(normal insert) 'global (kbd "C-l") 'evil-window-right)
(setq conda-env-home-directory "~/anaconda3")

(remove-hook 'doom-first-buffer-hook #'smartparens-global-mode)
(ranger-override-dired-mode t)
;; ("\\.pdf\\'" . default) is already member in `org-file-apps'
;; Use "xdg-open" to open files by default
(setcdr (assq t org-file-apps-gnu) 'browse-url-xdg-open)

(setq telega-open-file-function 'org-open-file)
(setq org-log-done 'time)


(use-package! org-alert
  :config
  (setq alert-default-style 'libnotify)
  (setq org-alert-interval 300
	org-alert-notify-cutoff 10
	org-alert-notify-after-event-cutoff 10)
  )