├── .gitignore ├── CHANGELOG.md ├── LICENSE ├── README.md ├── lib └── lager.ex ├── mix.exs ├── mix.lock ├── package.head.exs └── test ├── exlager_test.exs └── test_helper.exs /.gitignore: -------------------------------------------------------------------------------- 1 | _build 2 | deps 3 | log 4 | -------------------------------------------------------------------------------- /CHANGELOG.md: -------------------------------------------------------------------------------- 1 | # v0.3 (2013-04-21) 2 | 3 | * enhancements 4 | * Use level name instead of meaningless integer 5 | 6 | * deprecations 7 | * Use of integers to specify log level is depricated 8 | -------------------------------------------------------------------------------- /LICENSE: -------------------------------------------------------------------------------- 1 | 2 | Apache License 3 | Version 2.0, January 2004 4 | http://www.apache.org/licenses/ 5 | 6 | TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION 7 | 8 | 1. Definitions. 9 | 10 | "License" shall mean the terms and conditions for use, reproduction, 11 | and distribution as defined by Sections 1 through 9 of this document. 12 | 13 | "Licensor" shall mean the copyright owner or entity authorized by 14 | the copyright owner that is granting the License. 15 | 16 | "Legal Entity" shall mean the union of the acting entity and all 17 | other entities that control, are controlled by, or are under common 18 | control with that entity. For the purposes of this definition, 19 | "control" means (i) the power, direct or indirect, to cause the 20 | direction or management of such entity, whether by contract or 21 | otherwise, or (ii) ownership of fifty percent (50%) or more of the 22 | outstanding shares, or (iii) beneficial ownership of such entity. 23 | 24 | "You" (or "Your") shall mean an individual or Legal Entity 25 | exercising permissions granted by this License. 26 | 27 | "Source" form shall mean the preferred form for making modifications, 28 | including but not limited to software source code, documentation 29 | source, and configuration files. 30 | 31 | "Object" form shall mean any form resulting from mechanical 32 | transformation or translation of a Source form, including but 33 | not limited to compiled object code, generated documentation, 34 | and conversions to other media types. 35 | 36 | "Work" shall mean the work of authorship, whether in Source or 37 | Object form, made available under the License, as indicated by a 38 | copyright notice that is included in or attached to the work 39 | (an example is provided in the Appendix below). 40 | 41 | "Derivative Works" shall mean any work, whether in Source or Object 42 | form, that is based on (or derived from) the Work and for which the 43 | editorial revisions, annotations, elaborations, or other modifications 44 | represent, as a whole, an original work of authorship. For the purposes 45 | of this License, Derivative Works shall not include works that remain 46 | separable from, or merely link (or bind by name) to the interfaces of, 47 | the Work and Derivative Works thereof. 48 | 49 | "Contribution" shall mean any work of authorship, including 50 | the original version of the Work and any modifications or additions 51 | to that Work or Derivative Works thereof, that is intentionally 52 | submitted to Licensor for inclusion in the Work by the copyright owner 53 | or by an individual or Legal Entity authorized to submit on behalf of 54 | the copyright owner. For the purposes of this definition, "submitted" 55 | means any form of electronic, verbal, or written communication sent 56 | to the Licensor or its representatives, including but not limited to 57 | communication on electronic mailing lists, source code control systems, 58 | and issue tracking systems that are managed by, or on behalf of, the 59 | Licensor for the purpose of discussing and improving the Work, but 60 | excluding communication that is conspicuously marked or otherwise 61 | designated in writing by the copyright owner as "Not a Contribution." 62 | 63 | "Contributor" shall mean Licensor and any individual or Legal Entity 64 | on behalf of whom a Contribution has been received by Licensor and 65 | subsequently incorporated within the Work. 66 | 67 | 2. Grant of Copyright License. Subject to the terms and conditions of 68 | this License, each Contributor hereby grants to You a perpetual, 69 | worldwide, non-exclusive, no-charge, royalty-free, irrevocable 70 | copyright license to reproduce, prepare Derivative Works of, 71 | publicly display, publicly perform, sublicense, and distribute the 72 | Work and such Derivative Works in Source or Object form. 73 | 74 | 3. Grant of Patent License. Subject to the terms and conditions of 75 | this License, each Contributor hereby grants to You a perpetual, 76 | worldwide, non-exclusive, no-charge, royalty-free, irrevocable 77 | (except as stated in this section) patent license to make, have made, 78 | use, offer to sell, sell, import, and otherwise transfer the Work, 79 | where such license applies only to those patent claims licensable 80 | by such Contributor that are necessarily infringed by their 81 | Contribution(s) alone or by combination of their Contribution(s) 82 | with the Work to which such Contribution(s) was submitted. If You 83 | institute patent litigation against any entity (including a 84 | cross-claim or counterclaim in a lawsuit) alleging that the Work 85 | or a Contribution incorporated within the Work constitutes direct 86 | or contributory patent infringement, then any patent licenses 87 | granted to You under this License for that Work shall terminate 88 | as of the date such litigation is filed. 89 | 90 | 4. Redistribution. You may reproduce and distribute copies of the 91 | Work or Derivative Works thereof in any medium, with or without 92 | modifications, and in Source or Object form, provided that You 93 | meet the following conditions: 94 | 95 | (a) You must give any other recipients of the Work or 96 | Derivative Works a copy of this License; and 97 | 98 | (b) You must cause any modified files to carry prominent notices 99 | stating that You changed the files; and 100 | 101 | (c) You must retain, in the Source form of any Derivative Works 102 | that You distribute, all copyright, patent, trademark, and 103 | attribution notices from the Source form of the Work, 104 | excluding those notices that do not pertain to any part of 105 | the Derivative Works; and 106 | 107 | (d) If the Work includes a "NOTICE" text file as part of its 108 | distribution, then any Derivative Works that You distribute must 109 | include a readable copy of the attribution notices contained 110 | within such NOTICE file, excluding those notices that do not 111 | pertain to any part of the Derivative Works, in at least one 112 | of the following places: within a NOTICE text file distributed 113 | as part of the Derivative Works; within the Source form or 114 | documentation, if provided along with the Derivative Works; or, 115 | within a display generated by the Derivative Works, if and 116 | wherever such third-party notices normally appear. The contents 117 | of the NOTICE file are for informational purposes only and 118 | do not modify the License. You may add Your own attribution 119 | notices within Derivative Works that You distribute, alongside 120 | or as an addendum to the NOTICE text from the Work, provided 121 | that such additional attribution notices cannot be construed 122 | as modifying the License. 123 | 124 | You may add Your own copyright statement to Your modifications and 125 | may provide additional or different license terms and conditions 126 | for use, reproduction, or distribution of Your modifications, or 127 | for any such Derivative Works as a whole, provided Your use, 128 | reproduction, and distribution of the Work otherwise complies with 129 | the conditions stated in this License. 130 | 131 | 5. Submission of Contributions. Unless You explicitly state otherwise, 132 | any Contribution intentionally submitted for inclusion in the Work 133 | by You to the Licensor shall be under the terms and conditions of 134 | this License, without any additional terms or conditions. 135 | Notwithstanding the above, nothing herein shall supersede or modify 136 | the terms of any separate license agreement you may have executed 137 | with Licensor regarding such Contributions. 138 | 139 | 6. Trademarks. This License does not grant permission to use the trade 140 | names, trademarks, service marks, or product names of the Licensor, 141 | except as required for reasonable and customary use in describing the 142 | origin of the Work and reproducing the content of the NOTICE file. 143 | 144 | 7. Disclaimer of Warranty. Unless required by applicable law or 145 | agreed to in writing, Licensor provides the Work (and each 146 | Contributor provides its Contributions) on an "AS IS" BASIS, 147 | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 148 | implied, including, without limitation, any warranties or conditions 149 | of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A 150 | PARTICULAR PURPOSE. You are solely responsible for determining the 151 | appropriateness of using or redistributing the Work and assume any 152 | risks associated with Your exercise of permissions under this License. 153 | 154 | 8. Limitation of Liability. In no event and under no legal theory, 155 | whether in tort (including negligence), contract, or otherwise, 156 | unless required by applicable law (such as deliberate and grossly 157 | negligent acts) or agreed to in writing, shall any Contributor be 158 | liable to You for damages, including any direct, indirect, special, 159 | incidental, or consequential damages of any character arising as a 160 | result of this License or out of the use or inability to use the 161 | Work (including but not limited to damages for loss of goodwill, 162 | work stoppage, computer failure or malfunction, or any and all 163 | other commercial damages or losses), even if such Contributor 164 | has been advised of the possibility of such damages. 165 | 166 | 9. Accepting Warranty or Additional Liability. While redistributing 167 | the Work or Derivative Works thereof, You may choose to offer, 168 | and charge a fee for, acceptance of support, warranty, indemnity, 169 | or other liability obligations and/or rights consistent with this 170 | License. However, in accepting such obligations, You may act only 171 | on Your own behalf and on Your sole responsibility, not on behalf 172 | of any other Contributor, and only if You agree to indemnify, 173 | defend, and hold each Contributor harmless for any liability 174 | incurred by, or claims asserted against, such Contributor by reason 175 | of your accepting any such warranty or additional liability. 176 | 177 | END OF TERMS AND CONDITIONS 178 | 179 | APPENDIX: How to apply the Apache License to your work. 180 | 181 | To apply the Apache License to your work, attach the following 182 | boilerplate notice, with the fields enclosed by brackets "[]" 183 | replaced with your own identifying information. (Don't include 184 | the brackets!) The text should be enclosed in the appropriate 185 | comment syntax for the file format. We also recommend that a 186 | file or class name and description of purpose be included on the 187 | same "printed page" as the copyright notice for easier 188 | identification within third-party archives. 189 | 190 | Copyright [yyyy] [name of copyright owner] 191 | 192 | Licensed under the Apache License, Version 2.0 (the "License"); 193 | you may not use this file except in compliance with the License. 194 | You may obtain a copy of the License at 195 | 196 | http://www.apache.org/licenses/LICENSE-2.0 197 | 198 | Unless required by applicable law or agreed to in writing, software 199 | distributed under the License is distributed on an "AS IS" BASIS, 200 | WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 201 | See the License for the specific language governing permissions and 202 | limitations under the License. 203 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | ExLager 2 | ======= 3 | 4 | This package implements a simple wrapper over https://github.com/basho/lager. 5 | 6 | It embeds logging calls to ExLager into a module if currently configured logging 7 | level is less or equal than severity of a call. Therefore it doesn't have 8 | any negative impact on performance of a production system when you configure 9 | error level even if you have tons of debug messages. 10 | 11 | Information about location of a call (module, function, line, pid) is properly 12 | passed to lager for your convenience so you can easily find the source of a message. 13 | In this aspect using ExLager is equal to using parse transform shipped with 14 | basho lager. 15 | 16 | Since ExLager depends on macro implemented in Lager module you have to require it. 17 | Then you call one of logging methods on Lager module. There are seven logging 18 | methods in order of severity: 19 | 20 | - debug 21 | - info 22 | - notice 23 | - warning 24 | - error 25 | - critical 26 | - alert 27 | - emergency 28 | 29 | Examples: 30 | --------- 31 | 32 | ```elixir 33 | defmodule Test do 34 | require Lager 35 | def debug do 36 | Lager.debug "Hi debug" 37 | end 38 | def info do 39 | Lager.info "Hi error" 40 | end 41 | def notice do 42 | Lager.notice "Hi notice" 43 | end 44 | def warning do 45 | Lager.warning "Hi warning" 46 | end 47 | def error do 48 | Lager.error "Hi error" 49 | end 50 | def critical do 51 | Lager.critical "Hi critical" 52 | end 53 | def alert do 54 | Lager.alert "Hi alert" 55 | end 56 | def emergency do 57 | Lager.emergency "Hi emergency" 58 | end 59 | def test do 60 | debug 61 | info 62 | notice 63 | warning 64 | error 65 | critical 66 | alert 67 | emergency 68 | end 69 | end 70 | 71 | Application.start :exlager 72 | Test.test 73 | ``` 74 | 75 | Configuration 76 | ------------- 77 | It is possible to configure truncation size and compile time log level. 78 | Being a simple wrapper ExLager doesn't attempt to configure underlying Lager. 79 | You would need to configure it yourself [see](https://github.com/basho/lager) to ensure that: 80 | 81 | * lager_truncation_size >= compile_truncation_size 82 | * lager severity level >= compile_log_level 83 | * appropriate handlers are configured 84 | 85 | Configuration of ExLager can be done by calling helper functions of Lager from your build system as follows: 86 | 87 | ``` 88 | iex(1)> Lager.compile_log_level(:info) 89 | true 90 | iex(2)> Lager.compile_truncation_size(512) 91 | true 92 | ``` 93 | 94 | If you cannot call those function you can set compiler options: 95 | 96 | ``` 97 | iex(3)> Code.compiler_options exlager_level: :debug 98 | ok 99 | iex(4)> Code.compiler_options exlager_truncation_size: 512 100 | ok 101 | ``` 102 | 103 | If you are mix user you could specify level and truncation_size in *config/config.#{Mix.env}.exs* as follows: 104 | 105 | ``` 106 | use Mix.Config 107 | 108 | config :exlager, 109 | level: :debug, 110 | truncation_size: 8096 111 | ``` 112 | 113 | Multiple Sink Support 114 | --------------------- 115 | As of Lager 3.x, you can configure multiple sinks to provide different behavior 116 | for different streams of logs. To use a different sink, prepend the name to the 117 | logging calls above. For example, to use the `magic_lager_event` sink, you can 118 | do the following: 119 | 120 | ``` 121 | Lager.info :magic, "magic event" 122 | ``` 123 | -------------------------------------------------------------------------------- /lib/lager.ex: -------------------------------------------------------------------------------- 1 | defmodule Lager do 2 | @default_sink :lager_event 3 | 4 | defdelegate trace_console(filter), to: :lager 5 | defdelegate trace_file(file, filter, level), to: :lager 6 | defdelegate stop_trace(trace), to: :lager 7 | defdelegate clear_all_traces(), to: :lager 8 | defdelegate status(), to: :lager 9 | defdelegate set_loglevel(handler, level), to: :lager 10 | defdelegate set_loglevel(handler, indent, level), to: :lager 11 | defdelegate get_loglevel(handler), to: :lager 12 | defdelegate posix_error(error), to: :lager 13 | defdelegate md, to: :lager 14 | defdelegate md(new_md_list), to: :lager 15 | 16 | levels = [ 17 | debug: 7, 18 | info: 6, 19 | notice: 5, 20 | warning: 4, 21 | error: 3, 22 | critical: 2, 23 | alert: 1, 24 | emergency: 0, 25 | none: -1 26 | ] 27 | 28 | quoted = for {level, _num} <- levels do 29 | quote do 30 | defmacro unquote(level)(message) do 31 | log(@default_sink, unquote(level), '~ts', [message], __CALLER__) 32 | end 33 | defmacro unquote(level)(sink, message) when is_atom(sink) do 34 | sink_evt = String.to_atom(Atom.to_string(sink) <> "_lager_event") 35 | log(sink_evt, unquote(level), '~ts', [message], __CALLER__) 36 | end 37 | defmacro unquote(level)(format, message) do 38 | log(@default_sink, unquote(level), format, message, __CALLER__) 39 | end 40 | defmacro unquote(level)(sink, format, message) when is_atom(sink) do 41 | sink_evt = String.to_atom(Atom.to_string(sink) <> "_lager_event") 42 | log(sink_evt, unquote(level), format, message, __CALLER__) 43 | end 44 | end 45 | end 46 | Module.eval_quoted __MODULE__, quoted, [], __ENV__ 47 | 48 | quoted = for {level, num} <- levels do 49 | quote do 50 | defp level_to_num(unquote(level)), do: unquote(num) 51 | end 52 | end 53 | Module.eval_quoted __MODULE__, quoted, [], __ENV__ 54 | defp level_to_num(_), do: nil 55 | 56 | quoted = for {level, num} <- levels do 57 | quote do 58 | defp num_to_level(unquote(num)), do: unquote(level) 59 | end 60 | end 61 | Module.eval_quoted __MODULE__, quoted, [], __ENV__ 62 | defp num_to_level(_), do: nil 63 | 64 | defp log(sink, level, format, args, caller) do 65 | {name, _arity} = caller.function || {:unknown, 0} 66 | module = caller.module || :unknown 67 | format = 68 | if is_binary(format) do 69 | String.to_char_list(format) 70 | else 71 | format 72 | end 73 | if should_log(level) do 74 | dispatch(sink, level, module, name, caller.line, format, args) 75 | end 76 | end 77 | 78 | defp dispatch(sink, level, module, name, line, format, args) do 79 | quote do 80 | :lager.dispatch_log(unquote(sink), unquote(level), 81 | [module: unquote(module), 82 | function: unquote(name), 83 | line: unquote(line), 84 | pid: self(), 85 | node: node()] ++ :lager.md(), 86 | unquote(format), unquote(args), unquote(compile_truncation_size()), 87 | :safe) 88 | end 89 | end 90 | 91 | defp should_log(level), do: level_to_num(level) <= level_to_num(compile_log_level()) 92 | 93 | @doc """ 94 | This function is used to get compile time log level. 95 | Examples: 96 | iex(4)> Lager.compile_log_level 97 | :info 98 | """ 99 | def compile_log_level() do 100 | level = Application.get_env(:exlager, :level, :info) 101 | if is_integer(level) do 102 | level = num_to_level(level) 103 | IO.puts "Using integers is deprecated, please use :#{level} instead" 104 | level 105 | else 106 | level 107 | end 108 | end 109 | 110 | @doc """ 111 | This function is used to set compile time log level. 112 | By default the log level is 'info'. 113 | Examples: 114 | iex(4)> Lager.compile_log_level(6) 115 | true 116 | iex(4)> Lager.compile_log_level(:info) 117 | true 118 | """ 119 | def compile_log_level(level) when level in -1..7 do 120 | compile_log_level(num_to_level(level)) 121 | end 122 | def compile_log_level(level) when is_atom(level) do 123 | :ok = Application.put_env(:exlager, :level, level) 124 | true 125 | end 126 | def compile_log_level(level) do 127 | IO.puts "ERROR: unknown level #{inspect level}" 128 | false 129 | end 130 | 131 | def compile_truncation_size() do 132 | Application.get_env(:exlager, :truncation_size, 4096) 133 | end 134 | 135 | @doc """ 136 | This function is used to set compile time truncation size. 137 | By default the truncation size is 4096. 138 | Examples: 139 | iex(4)> Lager.compile_truncation_size(512) 140 | true 141 | """ 142 | def compile_truncation_size(size) do 143 | :ok = Application.put_env(:exlager, :truncation_size, size) 144 | true 145 | end 146 | end 147 | -------------------------------------------------------------------------------- /mix.exs: -------------------------------------------------------------------------------- 1 | defmodule Exlager.Mixfile do 2 | use Mix.Project 3 | 4 | def project do 5 | [ 6 | app: :exlager, 7 | version: "0.14.1", 8 | elixir: "> 0.14.0", 9 | deps: deps() 10 | ] 11 | end 12 | 13 | def application do 14 | [ 15 | applications: [ 16 | :compiler, 17 | :syntax_tools, 18 | :lager 19 | ], 20 | ] 21 | end 22 | 23 | defp deps do 24 | [ 25 | {:lager, "~> 3.2.4"}, 26 | ] 27 | end 28 | end 29 | 30 | -------------------------------------------------------------------------------- /mix.lock: -------------------------------------------------------------------------------- 1 | %{"goldrush": {:hex, :goldrush, "0.1.9", "f06e5d5f1277da5c413e84d5a2924174182fb108dabb39d5ec548b27424cd106", [:rebar3], []}, 2 | "lager": {:hex, :lager, "3.2.4", "a6deb74dae7927f46bd13255268308ef03eb206ec784a94eaf7c1c0f3b811615", [:rebar3], [{:goldrush, "0.1.9", [hex: :goldrush, optional: false]}]}} 3 | -------------------------------------------------------------------------------- /package.head.exs: -------------------------------------------------------------------------------- 1 | Expm.Package.new( 2 | name: "exlager", 3 | description: "Elixir wrapper over basho/lager", 4 | version: :head, 5 | keywords: ["Elixir","Erlang","logging","lager"], 6 | maintainers: [[name: "ILYA Khlopotov", email: "ilya.khlopotov@gmail.com"]], 7 | repositories: [[github: "khia/exlager"]]) -------------------------------------------------------------------------------- /test/exlager_test.exs: -------------------------------------------------------------------------------- 1 | defmodule ExLager.Test do 2 | use ExUnit.Case 3 | @top Path.expand "../..", __ENV__.file 4 | 5 | test "debug" do 6 | {enabled, disabled} = split(compile(:debug)) 7 | assert disabled == [] 8 | assert enabled == [ 9 | :alert, :critical, :debug, :emergency, 10 | :error, :info, :notice, :warning] 11 | end 12 | 13 | test "info" do 14 | {enabled, disabled} = split(compile(:info)) 15 | assert disabled == [:debug] 16 | assert enabled == [ 17 | :alert, :critical, :emergency, 18 | :error, :info, :notice, :warning] 19 | end 20 | 21 | test "notice" do 22 | {enabled, disabled} = split(compile(:notice)) 23 | assert disabled == [:debug, :info] 24 | assert enabled == [:alert, :critical, :emergency, :error, :notice, :warning] 25 | end 26 | 27 | test "warning" do 28 | {enabled, disabled} = split(compile(:warning)) 29 | assert disabled == [:debug, :info, :notice] 30 | assert enabled == [:alert, :critical, :emergency, :error, :warning] 31 | end 32 | 33 | test "error" do 34 | {enabled, disabled} = split(compile(:error)) 35 | assert disabled == [:debug, :info, :notice, :warning] 36 | assert enabled == [:alert, :critical, :emergency, :error] 37 | end 38 | 39 | test "critical" do 40 | {enabled, disabled} = split(compile(:critical)) 41 | assert disabled == [:debug, :error, :info, :notice, :warning] 42 | assert enabled == [:alert, :critical, :emergency] 43 | end 44 | 45 | test "alert" do 46 | {enabled, disabled} = split(compile(:alert)) 47 | assert disabled == [:critical, :debug, :error, :info, :notice, :warning] 48 | assert enabled == [:alert, :emergency] 49 | end 50 | 51 | test "emergency" do 52 | {enabled, disabled} = split(compile(:emergency)) 53 | assert disabled == [:alert, :critical, :debug, :error, :info, :notice, :warning] 54 | assert enabled == [:emergency] 55 | end 56 | 57 | test "none" do 58 | {enabled, disabled} = split(compile(:none)) 59 | assert disabled == [:alert, :critical, :debug, :emergency, 60 | :error, :info, :notice, :warning] 61 | assert enabled == [] 62 | end 63 | 64 | test "compile_log_level(atom)" do 65 | assert compile_log_level(:debug) == :debug 66 | assert compile_log_level(:info) == :info 67 | assert compile_log_level(:notice) == :notice 68 | assert compile_log_level(:warning) == :warning 69 | assert compile_log_level(:error) == :error 70 | assert compile_log_level(:critical) == :critical 71 | assert compile_log_level(:alert) == :alert 72 | assert compile_log_level(:emergency) == :emergency 73 | assert compile_log_level(:none) == :none 74 | end 75 | 76 | test "compile_log_level(integer)" do 77 | assert compile_log_level(7) == :debug 78 | assert compile_log_level(6) == :info 79 | assert compile_log_level(5) == :notice 80 | assert compile_log_level(4) == :warning 81 | assert compile_log_level(3) == :error 82 | assert compile_log_level(2) == :critical 83 | assert compile_log_level(1) == :alert 84 | assert compile_log_level(0) == :emergency 85 | assert compile_log_level(-1) == :none 86 | end 87 | 88 | test "get and set metadata" do 89 | assert [] = Lager.md 90 | new_md_list = [md1: "foo", md2: "bar"] 91 | assert :ok = Lager.md(new_md_list) 92 | assert ^new_md_list = Lager.md 93 | end 94 | 95 | setup_all do 96 | on_exit fn -> File.rm("#{@top}/test/#{beam(Lager)}") end 97 | :ok 98 | end 99 | 100 | defp compile_log_level(level) do 101 | true = Lager.compile_log_level(level) 102 | Lager.compile_log_level 103 | end 104 | 105 | defp compile(level) do 106 | :code.purge Lager 107 | Application.put_env :exlager, :level, level 108 | Kernel.ParallelCompiler.files_to_path ["#{@top}/lib/lager.ex"], "#{@top}/test" 109 | Code.ensure_compiled(Lager) 110 | quoted = 111 | quote do 112 | require Lager 113 | [ 114 | debug: Lager.debug("Hi debug"), 115 | info: Lager.info("Hi info"), 116 | notice: Lager.notice("Hi notice"), 117 | warning: Lager.warning("Hi warning"), 118 | error: Lager.error("Hi error"), 119 | critical: Lager.critical("Hi critical"), 120 | alert: Lager.alert("Hi alert"), 121 | emergency: Lager.emergency("Hi emergency"), 122 | ] 123 | end 124 | {res, _} = Code.eval_quoted quoted 125 | res 126 | end 127 | 128 | defp beam(module), do: "#{module}.beam" 129 | 130 | defp split(macros) do 131 | {e, d} = Enum.reduce macros, {[], []}, fn({level, res}, {e, d}) -> 132 | if is_nil(res) do 133 | {e, [level|d]} 134 | else 135 | {[level|e], d} 136 | end 137 | end 138 | {Enum.sort(e), Enum.sort(d)} 139 | end 140 | end 141 | -------------------------------------------------------------------------------- /test/test_helper.exs: -------------------------------------------------------------------------------- 1 | ExUnit.start --------------------------------------------------------------------------------