10 files changed, 133 insertions, 0 deletions

@@ -0,0 +1,22 @@
+%article.quote.h-entry{ :id => "quote-#{quote.id}" }
+  %data.p-name{ value: "\##{quote.id}" }
+  %data.u-url{ value: url_for(quote) }
+  %header.quote-header{ :id => "quote-header-#{quote.id}" }
+    = link_to_unless (quote.new_record? or current_page?(quote)), "\##{quote.id}", quote, :class => "quote-link"
+    %span.vote-link{ :id => "quote-upvote-link-#{quote.id}" }= link_to_unless (quote.new_record? or quote.already_upvoted?(request.remote_ip)), "Up", upvote_quote_path(quote.id), :remote => true, :rel => "nofollow", :class => "quote-upvote-link", method: :post
+    %span.quote-rating{ :id => "quote-rating-#{quote.id}" }= "+#{quote.upvotes}/-#{quote.downvotes}"
+    %span.vote-link{ :id => "quote-downvote-link-#{quote.id}" }= link_to_unless (quote.new_record? or quote.already_downvoted?(request.remote_ip)), "Down", downvote_quote_path(quote.id), :remote => true, :rel => "nofollow", :class => "quote-downvote-link", method: :post
+    %time.dt-published{ datetime: quote.created_at.strftime("%Y-%m-%dT%H:%M:%SZ%z") }= quote.published_date
+    - if user_signed_in? and !quote.new_record?
+      = link_to "Edit", edit_admin_quote_path(quote), :class => "quote-edit-link"
+  - if quote.audio.attached?
+    .audioplayer= audio_tag(rails_blob_url(quote.audio), controls: true)
+  %blockquote.quote-body.e-content= raw quote_format(h(quote.content))
+  - if !quote.new_record? and quote.has_extra?
+    .quote-footer
+      - if quote.has_notes?
+        .quote-notes= auto_link(quote.notes, :link => :urls)
+      - if quote.has_tags?
+        %ul.quote-tags
+          - quote.tags.each do |tag|
+            %li= link_to tag.name, tag_quotes_path(tag.name)
@@ -0,0 +1,8 @@
+#about-left
+  #quotes= render @quote
+  %p.normal Welcome to the Four Island Quotes Database! Here you can find many strange and hopefully humorous Four Island quotes. There are currently #{@qnumber} quotes in the database, and there are #{@mnumber} quotes awaiting moderation.
+#about-right
+  %h3 About
+  %p.normal The Four Island Quotes DB is a repository for humorous and memorable quotes from #{link_to "FourNet", "http://irc.fourisland.com/"} channels, instant messaging sessions, real life situations, and more.
+  %p.normal The quotes database, in its first incarnation, was created on #{link_to "April 25th 2008", "http://www.fourisland.com/blog/quote-time/"} by hatkirby, who was inspired by #{link_to "bash.org", "http://bash.org/"} and his obsession with record-keeping to create a quotes database for Four Island. It ran on the now-defunct PHP quote management system, #{link_to "rash", "http://rqms.sourceforge.net/"}, on the subdomain "<code>quotes.fourisland.com</code>". It was rewritten by hand and integrated into Four Island (at the URL "<code>fourisland.com/quotes</code>") by hatkirby on #{link_to "June 13th 2008", "http://www.fourisland.com/blog/the-new-four-island/"} with the release of Four Island 2, dubbed The New Four Island. With the release of Four Island 3 on #{link_to "September 22nd, 2011", "http://www.fourisland.com/blog/four-island-3/"}, it was rewritten in Ruby on Rails, disassociated from Four Island and returned to its original URL.
+.cleardiv
@@ -0,0 +1,11 @@
+atom_feed do |feed|
+  feed.title("The Four Island Quotes DB")
+  feed.updated(@quotes.first.created_at)
+
+  @quotes.each do |quote|
+    feed.entry(quote) do |entry|
+      entry.title("##{quote.id}")
+      entry.content(quote_format(quote.content), :type => 'html')
+    end
+  end
+end
@@ -0,0 +1,4 @@
+%section#quotes
+  .pagination= will_paginate @quotes
+  = render @quotes
+  .pagination= will_paginate @quotes
@@ -0,0 +1,24 @@
+%p.normal You're about to submit a quote to the Four Island Quotes DB! This is great, but first, there are a few rules/guidelines/things you should know before submitting:
+%ul
+  %li Quotes should come from a chat involving one or more Four Island regulars. This is not a strict guideline, as quotes are often submitted from video chats or real life situations possibly involving only one Four Island regular, but just make sure before submitting that the quote you're submitting would be appreciated by other Four Island regulars.
+  %li Make sure to remove timestamps, if present in your quote, before submitting.
+  %li If your quote is extremely offensive, it will probably not be approved. This is not referring to profanity--you can leave profanity uncensored in your quotes.
+  %li If you want to, you can enter your username in the box below the quote labelled "Your username" (this is completely optional). This is mostly for record-keeping and statistical purposes; submitting a quote of yourself being awesome and then signing your name under it won't decrease the chances of it being accepted.
+  %li You can enter any notes about the quote that may be important (such as context, or if it's a memorable quote, why it's memorable) in the box below your quote.
+  %li You can also enter a list of comma-separated tags in the provided box. This is, again, optional, but it's suggested that you do tag your quote, especially with #{link_to "tags that already exist", tags_quotes_path}, though creating new tags is not frowned upon.
+%h3 Your Quote
+= form_for @quote do |f|
+  - if @quote.errors.any?
+    #error-messages
+      %h4 Errors were found!
+      %ul
+        - @quote.errors.full_messages.each do |msg|
+          %li= msg
+  .form-field= f.text_area :content
+  .form-field Your username (optional): #{f.text_field :submitter}
+  .form-field Notes (optional):
+  .form-field= f.text_area :notes
+  .form-field
+    Tags (optional):
+    .tags-input= f.text_field :tag_list, type: :tags, value: f.object.tag_list.join(",")
+  .form-field= f.submit
@@ -0,0 +1,6 @@
+%h3 Search
+= search_form_for @q, url: search_quotes_url do |f|
+  .form-field
+    = f.label :content_or_notes_cont, "Query:"
+    = f.search_field :content_or_notes_cont
+  .form-field= f.submit
@@ -0,0 +1 @@
+%section#quotes= render @quote
@@ -0,0 +1,41 @@
+%script{ :type => "text/javascript", :src => "https://www.gstatic.com/charts/loader.js" }
+%script{ :type => "text/javascript" }
+    google.charts.load('visualization', '1.0', {'packages':['corechart']});
+    google.charts.setOnLoadCallback(drawChart);
+    function drawChart()
+    {
+    var data = new google.visualization.DataTable();
+    data.addColumn('string', 'Month');
+    data.addColumn('number', 'Quotes Submitted');
+    data.addRows([
+    - @months.each do |month|
+        ['#{month[:name]}', #{month[:number]}],
+    ]);
+    var options = {'title':'Quotes Submitted in the Last 12 Months', 'width':1000, 'height':500, 'legend':'none', 'hAxis.maxAlternation':1};
+    var chart = new google.visualization.ColumnChart(document.getElementById('chart_div'));
+    chart.draw(data, options);
+    //var data2 = new google.visualization.DataTable();
+    //data2.addColumn('string', 'Month');
+    //data2.addColumn('number', 'Quotes');
+    //data2.addRows([
+    //- @months2.each do |month|
+    //    ['\#{month[:name]}', \#{month[:number]}],
+    //]);
+    //var options2 = {'title':'Number of Quotes', 'width':1000, 'height':500, 'legend':'none', 'hAxis.maxAlternation':1};
+    //var chart2 = new google.visualization.AreaChart(document.getElementById('chart2_div'));
+    //chart2.draw(data2, options2);
+    var data3 = new google.visualization.DataTable();
+    data3.addColumn('string', 'Speaker');
+    data3.addColumn('number', 'Quotes');
+    data3.addRows([
+    - @by_speaker.each do |speaker|
+        ['#{speaker[0]}', #{speaker[1]}],
+    ]);
+    var options3 = {'title':'Number of Quotes per Speaker', 'width':1000, 'height':500};
+    var chart3 = new google.visualization.ColumnChart(document.getElementById('chart3_div'));
+    chart3.draw(data3, options3);
+    }
+%p.normal Because charts are fun, we've compiled a few charts here containing statistics about the Four Island Quotes DB.
+#chart2_div
+#chart_div
+#chart3_div
@@ -0,0 +1,4 @@
+%h2 Tag Cloud
+%ul#tags-container
+  - tag_cloud(@tags, %w(css1 css1_5 css2 css2_5 css3 css3_5 css4 css4_5 css5 css5_5 css6)) do |tag, css_class|
+    %li= link_to tag.name, tag_quotes_path(tag.name), :class => css_class
@@ -0,0 +1,12 @@
+$("#quote-rating-<%= @quote.id %>").html('<%= escape_javascript("+#{@quote.upvotes}/-#{@quote.downvotes}") %>');
+
+<% if @quote.already_upvoted? request.remote_ip %>
+  $("#quote-upvote-link-<%= @quote.id %>").html("Up");
+<% elsif @quote.already_downvoted? request.remote_ip %>
+  $("#quote-downvote-link-<%= @quote.id %>").html("Down");
+<% else %>
+  $("#quote-upvote-link-<%= @quote.id %>").html('<%= escape_javascript(link_to("Up", upvote_quote_path(@quote.id), :remote => true, :rel => "nofollow", :class => "quote-upvote-link", method: :post)) %>');
+  $("#quote-downvote-link-<%= @quote.id %>").html('<%= escape_javascript(link_to("Down", downvote_quote_path(@quote.id), :remote => true, :rel => "nofollow", :class => "quote-downvote-link", method: :post)) %>');
+<% end %>
+
+$("#quote-header-<%= @quote.id %>").effect('highlight', {}, 2000);