mirror of
https://github.com/reddit-archive/reddit.git
synced 2026-01-14 17:38:04 -05:00
90cfcaaecc
Ok, now I'm getting some angst in my commit messages like my predecessors had. I understand now. It's a terrible burden. Why must the calendar progress? Why must numbers increment? The world is forever turning. The future is here. It is 2014.
46 lines
2.2 KiB
PL/PgSQL
Executable File
46 lines
2.2 KiB
PL/PgSQL
Executable File
-- The contents of this file are subject to the Common Public Attribution
|
|
-- License Version 1.0. (the "License"); you may not use this file except in
|
|
-- compliance with the License. You may obtain a copy of the License at
|
|
-- http://code.reddit.com/LICENSE. The License is based on the Mozilla Public
|
|
-- License Version 1.1, but Sections 14 and 15 have been added to cover use of
|
|
-- software over a computer network and provide for limited attribution for the
|
|
-- Original Developer. In addition, Exhibit A has been modified to be
|
|
-- consistent with Exhibit B.
|
|
--
|
|
-- Software distributed under the License is distributed on an "AS IS" basis,
|
|
-- WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for
|
|
-- the specific language governing rights and limitations under the License.
|
|
--
|
|
-- The Original Code is reddit.
|
|
--
|
|
-- The Original Developer is the Initial Developer. The Initial Developer of
|
|
-- the Original Code is reddit Inc.
|
|
--
|
|
-- All portions of the code written by reddit are Copyright (c) 2006-2014
|
|
-- reddit Inc. All Rights Reserved.
|
|
-------------------------------------------------------------------------------
|
|
|
|
create or replace function hot(ups integer, downs integer, date timestamp with time zone) returns numeric as $$
|
|
select round(cast(log(greatest(abs($1 - $2), 1)) * sign($1 - $2) + (date_part('epoch', $3) - 1134028003) / 45000.0 as numeric), 7)
|
|
$$ language sql immutable;
|
|
|
|
create or replace function score(ups integer, downs integer) returns integer as $$
|
|
select $1 - $2
|
|
$$ language sql immutable;
|
|
|
|
create or replace function controversy(ups integer, downs integer) returns float as $$
|
|
select cast(($1 + $2) as float)/(abs($1 - $2)+1)
|
|
$$ language sql immutable;
|
|
|
|
create or replace function ip_network(ip text) returns text as $$
|
|
select substring($1 from E'[\\d]+\.[\\d]+\.[\\d]+')
|
|
$$ language sql immutable;
|
|
|
|
create or replace function base_url(url text) returns text as $$
|
|
select substring($1 from E'(?i)(?:.+?://)?(?:www[\\d]*\\.)?([^#]*[^#/])/?')
|
|
$$ language sql immutable;
|
|
|
|
create or replace function domain(url text) returns text as $$
|
|
select substring($1 from E'(?i)(?:.+?://)?(?:www[\\d]*\\.)?([^#/]*)/?')
|
|
$$ language sql immutable;
|