4 * SourceForge Exports: Export front page news in RSS
7 * SourceForge: Breaking Down the Barriers to Open Source Development
8 * Copyright 1999-2001 (c) VA Linux Systems
9 * http://sourceforge.net
13 require_once('../env.inc.php');
14 require_once $gfwww.'include/pre.php';
15 require_once $gfwww.'export/rss_utils.inc';
17 $group_id = getIntFromRequest('group_id');
18 $limit = getIntFromRequest('limit', 10);
19 if (($limit > 100) || ($limit <= 0)) {
23 header("Content-Type: text/xml; charset=utf-8");
24 print '<?xml version="1.0" encoding="UTF-8"?>
27 xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
28 xmlns="http://purl.org/rss/1.0/"
29 xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/"
30 xmlns:dc="http://purl.org/dc/elements/1.1/"
31 xmlns:syn="http://purl.org/rss/1.0/modules/syndication/"
32 xmlns:admin="http://webns.net/mvcb/" >';
34 function getres ($gid, $l) {
36 $res = db_query_params ('SELECT forum_id,summary,post_date,details,g.group_id,g.group_name,u.realname
37 FROM news_bytes, groups g,users u
38 WHERE news_bytes.group_id=g.group_id
39 AND u.user_id=news_bytes.submitted_by
43 ORDER BY post_date desc',
48 $res = db_query_params ('SELECT forum_id,summary,post_date,details,g.group_id,g.group_name,u.realname
49 FROM news_bytes, groups g,users u
50 WHERE news_bytes.group_id=g.group_id
51 AND u.user_id=news_bytes.submitted_by
55 ORDER BY post_date desc',
62 print "\n <channel rdf:about=\"".util_make_url ('/export/rss_sfnews.php')."\">\n";
64 print " <title>".fusionforge_get_config ('forge_name')." Project News</title>\n";
65 print " <link>".util_make_url ('/')."</link>\n";
66 print " <description>".fusionforge_get_config ('forge_name')." Project News Highlights</description>\n";
71 $res = getres ($group_id, $limit) ;
72 while ($row = db_fetch_array($res)) {
73 print " <rdf:li rdf:resource=\"".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."\" />\n";
76 print " </rdf:Seq>\n";
78 print " </channel>\n";
80 $res = getres ($group_id, $limit) ;
81 while ($row = db_fetch_array($res)) {
82 print "\n <item rdf:about=\"".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."\">\n";
83 print " <title>".htmlspecialchars($row['summary'])."</title>\n";
84 // if news group, link is main page
85 if ($row['group_id'] != $sys_news_group) {
86 print " <link>".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."</link>\n";
88 print " <link>".util_make_url ('/')."</link>\n";
90 print " <description>".rss_description($row['details'])."</description>\n";
91 print " <dc:subject>".$row['group_name']."</dc:subject>\n";
92 print " <dc:creator>".$row['realname']."</dc:creator>\n";
93 print " <dc:date>".gmdate('c', $row['post_date'])."</dc:date>\n";