Convenience fun to open character devices

rolong · Apr 18, 2011 · a1310c1 · a1310c1
1 parent f90dd1b
commit a1310c1
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/src/bpf.erl b/src/bpf.erl
@@ -110,7 +110,7 @@
 
 
 open(Dev) ->
-    {ok, Socket} = procket:open(0, [{dev, "bpf"}]),
+    {ok, Socket} = procket:dev("bpf"),
 
     % Set the interface for the bpf
     {ok, _} = attr(Socket, setif, Dev),

diff --git a/src/procket.erl b/src/procket.erl
@@ -34,6 +34,7 @@
 -export([
         init/0,
         open/1,open/2,
+        dev/1,
         socket/3,
         listen/1,listen/2,
         connect/2,
@@ -136,6 +137,9 @@ setsockopt(_,_,_,_) ->
     erlang:error(not_implemented).
 
 
+dev(Dev) when is_list(Dev) ->
+    open(0, [{dev, Dev}]).
+
 open(Port) ->
     open(Port, []).
 open(Port, Options) when is_integer(Port), is_list(Options) ->