commit 41cfa63718f1db84889e041d87ae4ef738878614 · hauleth.dev/esl_hn

+23

lib/esl_hn.ex

···

       6
        
         Contexts are also responsible for managing your data, regardless

     

       7
        
         if it comes from the database, an external API or others.

     

       8
        
         """

     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       9
        
       end

···

       6
        
         Contexts are also responsible for managing your data, regardless

     

       7
        
         if it comes from the database, an external API or others.

     

       8
        
         """

     

       9
       +
       

     

       10
       +
         def all(page \\ 1, per_page \\ 10) do

     

       11
       +
           skip = per_page * (page - 1)

     

       12
       +
       

     

       13
       +
           ids = EslHn.Cache.get(EslHn, :index, [])

     

       14
       +
       

     

       15
       +
           ids

     

       16
       +
           |> Enum.drop(skip)

     

       17
       +
           |> Enum.take(per_page)

     

       18
       +
           |> Enum.map(&story/1)

     

       19
       +
         end

     

       20
       +
       

     

       21
       +
         def story(id) do

     

       22
       +
           EslHn.Cache.get(EslHn, id)

     

       23
       +
         end

     

       24
       +
       

     

       25
       +
         def broadcast_new(stories) do

     

       26
       +
           Phoenix.PubSub.broadcast(EslHn.PubSub, "hn:new", {:new_stories, stories})

     

       27
       +
         end

     

       28
       +
       

     

       29
       +
         def subscribe_new do

     

       30
       +
           Phoenix.PubSub.subscribe(EslHn.PubSub, "hn:new")

     

       31
       +
         end

     

       32
        
       end

+10 -12

lib/esl_hn/hn.ex

···

       17
        
           end

     

       18
        
         end

     

       19
        
       

     

       20
       -
         def top_stories(opts \\ []) do

     

       21
       -
           with {:ok, ids} <- top_stories_ids(opts) do

     

       22
       -
             ids

     

       23
       -
             |> Task.async_stream(&story/1)

     

       24
       -
             |> map_while(fn

     

       25
       -
               {:ok, {:ok, data}} -> {:cont, data}

     

       26
       -
               other -> {:halt, other}

     

       27
       -
             end)

     

       28
       -
             |> case do

     

       29
       -
               list when is_list(list) -> {:ok, list}

     

       30
       -
               error -> error

     

       31
       -
             end

     

       32
        
           end

     

       33
        
         end

     

       34

···

       17
        
           end

     

       18
        
         end

     

       19
        
       

     

       20
       +
         def stories(ids, opts \\ []) do

     

       21
       +
           ids

     

       22
       +
           |> Task.async_stream(&story(&1, opts))

     

       23
       +
           |> map_while(fn

     

       24
       +
             {:ok, {:ok, data}} -> {:cont, data}

     

       25
       +
             other -> {:halt, other}

     

       26
       +
           end)

     

       27
       +
           |> case do

     

       28
       +
             list when is_list(list) -> {:ok, list}

     

       29
       +
             error -> error

     

       0
        
       
     

       0
        
       
     

       30
        
           end

     

       31
        
         end

     

       32