Improvements
[infodrom.org/oldenburg.linux.de] / src / index.wml
index 2d7f309..6751b75 100644 (file)
 #include <LUGO.style>
 #include <tools.inc>
 
-<page>
+<?
+setlocale(LC_TIME, "de_DE");
 
-<p>Die <em>Linux User Group Oldenburg</em> (LUGO) ist eine
-Interessengemeinschaft für GNU/Linux und Freie Software in und um <a
-href="http://www.oldenburg.de/">Oldenburg</a>.  Die Linux User Group
-Oldenburg trifft sich regelmäßig auf dem <a
-href="<root_prefix>Infos/stammtisch.html">Oldenburger Linux-Stammtisch</a>
-und unregelmäßig auf weiteren Treffen.</p>
-
-<p>Außerhalb dieser Treffen wird auf der <a
-href="<root_prefix>Infos/liste.html">Mailing-Liste</a>
-linux-stammtisch (<a href="<url ml-linux-stammtisch>">Archiv</a>) über
-Freie Software und GNU/Linux diskutiert.  Aus der LUGO hervorgegangen
-ist der gemeinnützige <a href="http://www.ffis.de/">Verein zur
-Förderung Freier Informationen und Software e.V.</a> (ffis).  Auf den
-folgenden Seiten finden Sie Informationen rund um Freie Software sowie
-Veranstaltungen zu diesem Themenspektrum.</p>
-
-<p>Linux ist der Kern eines freien Unix-artigen Betriebssystems für Rechner der Intel
-x86er-Klasse ab 80386 sowie für viele weitere Prozessorarchitekturen
-(u.a. Alpha,
-Sun Sparc, PowerPC, HP PA-RISC, Motorola 680x0, IBM S/390, ARM, MIPS
-etc.).  GNU/Linux ist das Betriebssystem auf Basis des Linux-Kernels, das echtes Multitasking und
-vernünftige Unterstützung für Multiuser-Umgebungen bietet.  Durch
-seine breite Hardwareunterst&uuml;tzung ist es f&uuml;r Privatanwender
-genauso interessant, wie f&uuml;r den gewerblichen Einsatz.  <p>
+$max_news = 2;
+$max_age = 7;
+$newsdir = "News";
+$datedb = "Termine/dates-".date("Y").".txt";
+$max_days = 14;
 
-<p>
-<:
+function next_date()
+{
+  global $max_days;
+  global $datedb;
+
+  $head = '<div class="news"><div class="datesbody"><h3 class="newstitle">%s</h3><div class="date">';
+  $head .= '<table class="font" cellpadding=2 cellspacing=0 width=100%%><tr class="head"><th>Wann</th><th>Was</th><th>Wo</th></tr>';
+  $foot = '</table></div></div></div>';
+  $row = '<tr class="%s"><td>%s</td><td>%s</td><td>%s</td></tr>';
+  $pivot = time() + 60*60*24*$max_days;
+  $now = mktime(0,0,0, date('m'), date('d'), date('Y'));
+
+  if (($dates = @fopen($datedb,'r')) !== false) {
+    $lines = array();
+    while (!feof($dates)) {
+      $line = fgets($dates, 200);
 
-    if (opendir (NEWS, "News/")) {
-       @news = reverse (sort (grep (/^news-.*\.txt$/,readdir (NEWS))));
-        closedir (NEWS);
+      if (!preg_match("/\|OL\|/", $line))
+       continue;
+
+      if (preg_match("/([0-9]{4})-([0-9]{2})-([0-9]{2})\|/", $line, $match)) {
+       $when = mktime(0,0,0, $match[2], $match[3], $match[1]);
+       if ($when > $pivot || $when < $now)
+         continue;
+       $lines[] = $line;
+      }
     }
 
-    my ($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst)
-        = localtime(time-24*60*60*10);
-    my $pivot = sprintf ("%04d-%d-%02d", $date_year+1900, $date_mon+1, $date_mday);
+    if (count($lines)) {
+      sort($lines);
+      echo '<div style="padding-top: 10px"></div>'."\n";
+      printf($head."\n", "Kommende Termine in Oldenburg");
+
+      foreach ($lines as $line) {
+       if (preg_match("/([0-9]{4})-([0-9]{2})-([0-9]{2})\|([^\|]*)\|OL\|([^\|]*)\|([^\|]*)\|(.*)/", $line, $match)) {
+         $when = mktime(0,0,0, $match[2], $match[3], $match[1]);
+
+         if ($when == $now) {
+           $date = '<strong>heute, ' . $match[4].'</strong>';
+           $class = 'today';
+         } else {
+           $date = strftime("%e.%m.%y", $when) . ', ' . $match[4];
+           $class = ($class == 'row0'?'row1':'row0');
+         }
 
-    my @top = ();
-    foreach my $fname (@news) {
-        $fname =~ /news-(\d+-\d+-\d+).*/;
-       push (@top, $fname) if ($1 gt $pivot);
+         if (empty($match[7]))
+           $what = $match[5];
+         else
+           $what = '<a href="'.$match[7].'">'.$match[5].'</a>';
+
+         printf($row, $class, $date, $what, $match[6]);
+       }
+      }
+      echo $foot;
     }
+  }
+}
+function display_news($when, $file)
+{
+  global $newsdir;
+
+  $head = '<div class="news"><div class="newsbody"><h3 class="newstitle">%s</h3><div class="newscontent">';
+  $foot = '</div></div></div>';
+
+  $date = strftime("%e. %B %Y", $when);
+
+  if (($news = @fopen($newsdir.'/'.$file,'r')) !== false) {
+    $needp = 0;  // 0 = init, 1 = <p> need, 2 = no <p> needed
+
+    printf($head."\n", $date);
+    while (!feof($news)) {
+      $line = fgets($news, 200);
+
+      $line = str_replace ("\\\n", "", $line);
 
-    if ($#top > -1) {
-:>
-<center>
-<border width=90% color=0000ff>
-<:
-        while (my $news = shift @top) {
-           $news =~ /news-(\d+)-(\d+)-(\d+).txt/;
-           $date = "$3.$2.$1";
-           if (open (NEWS, "News/$news")) {
-               printf "<b>%s</b><br>", $date;
-               while (<NEWS>) {
-                   if (/\\$/) {
-                       s,\\$,,;
-                       chomp;
-                   }
-                   print;
-               }
-               close (NEWS);
-               print "<hr>" if ($#top > -1);
-           }
+      if ($needp == 0) {
+       if (substr($_, 0, 3) == "<p>") {
+         $needp = 2;
+       } else {
+         $needp = 1;
+         $line = '<p>'.$line;
        }
-:>
-</border>
-</center>
-<:
+      }
+
+      echo $line;
+    }
+    if ($needp == 1)
+      echo '</p>';
+    echo $foot;
+  }
+}
+
+function newsbox()
+{
+  global $max_news;
+  global $max_age;
+  global $newsdir;
+
+  setlocale(LC_TIME, "de_DE");
+
+  $pivot = time() - 60*60*24*$max_age;
+  $news = array();
+  if (is_dir($newsdir)) {
+    if ($dir = opendir($newsdir)) {
+      while (($file = readdir($dir)) !== false) {
+       if (!preg_match("/news-([0-9]{4})-([0-9]{2})-([0-9]{2})\.txt/", $file, $matches))
+         continue;
+       $when = mktime(0,0,0, $matches[2], $matches[3], $matches[1]);
+       if ($when < $pivot)
+         continue;
+       $news[$when] = $file;
+      }
+      closedir($dir);
+    }
+  }
+
+  if (count($news)) {
+    echo '<div style="padding-top: 10px"></div>'."\n";
+
+    krsort($news);
+
+    $cnt = 0;
+    foreach ($news as $time => $file) {
+      if ($cnt >= $max_news)
+       continue;
+      display_news($time, $file);
+      $cnt++;
     }
+  }
+}
+?>
+
+<page>
+
+<p>Die <strong>Linux User Group Oldenburg</strong> (LUGO) ist eine
+Interessengemeinschaft für GNU/Linux und Freie Software in und um <a
+href="http://www.oldenburg.de/">Oldenburg</a> in Niedersachsen.
+Wir <a href="Termine/">treffen</a> uns unregelmäßig auf dem
+Stammtisch und der <a href="http://www.linux-werkstatt-oldenburg.de/">Linux-Werkstatt</a>,
+reden über GNU/Linux und verbessern unsere Systeme.  Daneben veranstalten wir in unregelmäßigen Abständen Vorträge,
+Workshops, einen Brunch und eine öffentliche
+Ausstellung mit Vorträgen.  Aus der LUGO hervorgegangen
+ist der gemeinnützige <a href="http://www.ffis.de/">Verein zur
+Förderung Freier Informationen und Software e.V.</a>.</p>
+
+<?next_date()?>
+
+<p>Wir pflegen bewußt kein Web-Forum für Diskussionen sondern laden
+interessierte Anwender und Entwickler stattdessen ein, sich von
+Angesicht zu Angesicht mit uns auf unseren <a
+href="<root_prefix>Infos/stammtisch.html">Linux-Stammtischen</a> oder
+in der <a href="http://www.linux-werkstatt-oldenburg.de/">Linux-Werkstatt</a>
+zu unterhalten.  Zwischen den Stammtischen und für hartnäckige Probleme
+nutzen wir eine <a href="<root_prefix>Infos/liste.html">\ 
+Mailing-Liste</a>.</p>
 
-:>
 <p>
+<?newsbox()?>
 
 </page>
 
 # Local variables:
 # mode: html
 # mode: auto-fill
-# mode: iso-accents
 # end: