;; offset customizations not in my-c-style
;; This will take precedence over any setting of the syntactic symbol
;; made by a style.

(defun my-c-initialization-hook ()
  (progn (define-key c-mode-base-map "\C-m" 'c-context-line-break)))

;; Create my personal style.

(defconst my-c-style
  '("user"
	(c-block-comment-prefix . "*")
	(c-comment-prefix-regexp . "//+\\|\\*")
	(c-basic-offset . 4)		; Guessed value
	(c-offsets-alist
	 (block-close . 0)		; Guessed value
	 (defun-block-intro . +)	; Guessed value
	 (defun-close . 0)		; Guessed value
	 (defun-open . 0)		; Guessed value
	 (statement . 0)				; Guessed value
	 (statement-block-intro . +) ; Guessed value
	 (topmost-intro . 0)			; Guessed value
	 (access-label . -)
	 (annotation-top-cont . 0)
	 (annotation-var-cont . +)
	 (arglist-close . c-lineup-close-paren)
	 (arglist-cont c-lineup-gcc-asm-reg 0)
	 (arglist-cont-nonempty . c-lineup-arglist)
	 (arglist-intro . +)
	 (block-open . 0)
	 (brace-entry-open . 0)
	 (brace-list-close . 0)
	 (brace-list-entry . 0)
	 (brace-list-intro . +)
	 (brace-list-open . 0)
	 (c . c-lineup-C-comments)
	 (case-label . 0)
	 (catch-clause . 0)
	 (class-close . 0)
	 (class-open . 0)
	 (comment-intro . c-lineup-comment)
	 (composition-close . 0)
	 (composition-open . 0)
	 (cpp-define-intro c-lineup-cpp-define +)
	 (cpp-macro . -1000)
	 (cpp-macro-cont . +)
	 (do-while-closure . 0)
	 (else-clause . 0)
	 (extern-lang-close . 0)
	 (extern-lang-open . 0)
	 (friend . 0)
	 (func-decl-cont . +)
	 (inclass . +)
	 (incomposition . +)
	 (inexpr-class . +)
	 (inexpr-statement . +)
	 (inextern-lang . +)
	 (inher-cont . c-lineup-multi-inher)
	 (inher-intro . +)
	 (inlambda . c-lineup-inexpr-block)
	 (inline-close . 0)
	 (inline-open . +)
	 (inmodule . +)
	 (innamespace . +)
	 (knr-argdecl . 0)
	 (knr-argdecl-intro . +)
	 (label . 2)
	 (lambda-intro-cont . +)
	 (member-init-cont . c-lineup-multi-inher)
	 (member-init-intro . +)
	 (module-close . 0)
	 (module-open . 0)
	 (namespace-close . 0)
	 (namespace-open . 0)
	 (objc-method-args-cont . c-lineup-ObjC-method-args)
	 (objc-method-call-cont c-lineup-ObjC-method-call-colons c-lineup-ObjC-method-call +)
	 (objc-method-intro .
						[0])
	 (statement-case-intro . +)
	 (statement-case-open . 0)
	 (statement-cont . +)
	 (stream-op . c-lineup-streamop)
	 (string . -1000)
	 (substatement . +)
	 (substatement-label . 2)
	 (substatement-open . +)
	 (template-args-cont c-lineup-template-args +)
	 (topmost-intro-cont . c-lineup-topmost-intro-cont))))

;; Customizations for all modes in CC Mode.
(defun my-c-mode-common-hook ()
  ;; set my personal style for the current buffer
  (c-add-style "PERSONAL" my-c-style)
  (c-set-style "PERSONAL")
  (electric-pair-mode 1)
  (electric-layout-mode 1)

  ;; Follow will make character '#' to be moved to column 0 when # is
  ;; the first non-space character
  (setq c-electric-pound-behavior '(alignleft)) 

  ;;  (setq indent-tabs-mode nil)
  ;; we like auto-newline, but not hungry-delete
  (c-toggle-auto-newline 1)
  (which-function-mode 1))


(defun add-c-function-header (function-name)
  "Add header description of c/c++ functions"
  (interactive "sFunction Name:")
  (progn
    (insert "/*\n")
    (insert " *---------------------------------------------------------------------------------\n")
    (insert " *\n")
    (insert (concat " *  " function-name "() --\n"))
    (insert " *\n")
    (insert " *   DESCRIPTION:\n")
    (insert " *\n")
    (insert " *   ARGS:\n")
    (insert " *\n")
    (insert " *   RETURN:\n")
    (insert " *\n")
    (insert " *---------------------------------------------------------------------------------\n")
    (insert " */\n")))

(register-mypkg
 (list :name "my-c"
       :enabled t
       :packages nil
	   :init   #'(lambda ()
				     (add-hook 'c-initialization-hook 'my-c-initialization-hook))
       :config #'(lambda ()
					  (add-hook 'c-mode-common-hook 'my-c-mode-common-hook))))