Skip to content

Instantly share code, notes, and snippets.

/*
* Dummy DVB adapter driver
*
* Copyright (C) 2010 Andy Walls <[email protected]>
*
* Partially based on cx18-dvb.c driver code
* Copyright (C) 2008 Steve Toth <[email protected]>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
-module(events_sink).
-export([start_link/2]).
-export([init/1, handle_info/2, handle_call/3, terminate/2]).
-export([overloaded/1]).
-include("event_pt.hrl").
-define(RECHECK_INTERVAL, 200).
-define(ALLOWED_DELAY, 60000).
-module(events_router).
-export([start_link/0]).
-export([init/1, handle_info/2, handle_call/3, terminate/2]).
-export([sync/0]).
-export([deliver/2, remote_deliver/1]).
-export([load_config/1, add_handler/1, remove_handler/1]).
%%%----------------------------------------------------------------------
%%% Copyright (c) 2012 Peter Lemenkov <[email protected]>
%%%
%%% All rights reserved.
%%%
%%% Redistribution and use in source and binary forms, with or without modification,
%%% are permitted provided that the following conditions are met:
%%%
%%% * Redistributions of source code must retain the above copyright notice, this
%%% list of conditions and the following disclaimer.
-module(webrtc_view). % Copy of webrtc_publish2
-behaviour(cowboy_websocket_handler).
-include_lib("erlmedia/include/video_frame.hrl").
-include_lib("erlmedia/include/media_info.hrl").
-export([live_stream/4]).
-export([init/3, terminate/3]).
<!DOCTYPE html>
<html>
<head>
<title>HDS</title>
<meta name="fragment" content="!" />
<meta name="viewport" content="width=device-width, initial-scale=1.0">
<meta charset="utf8">
</head>
<body>
#!/usr/bin/env escript
%%
%%
-mode(compile).
main([IP]) ->
{ok, Socket} = gen_tcp:connect(IP, 1560, [binary, {active,false}]),
loop(Socket);
@maxlapshin
maxlapshin / systemd.erl
Last active December 24, 2022 17:28
Systemd support
-module(systemd).
% This is what you need to adopt systemd in erlang
%
% Do whatever you want license. If you want, you can take this code under terms of MIT license.
-export([ready/0, reloading/0, stopping/0, watchdog/0]).
-export([start_link/0]).
-export([init/1, handle_info/2, terminate/2]).
#!/usr/bin/env escript
%%
%%
-mode(compile).
-include_lib("stdlib/include/ms_transform.hrl").
% This benchmark is trying to measure how to store and access in ets tuples with partially bound
-module(config2_lexer).
-export([tokens/1, ast/1, ast2/1, maybe_int/1]).
-export([parse/1, parse/2]).
-export([cidr/1]).
parse(Bin) ->
parse(Bin, #{}).