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 $gfcommon.'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
42 ORDER BY post_date DESC',
47 $res = db_query_params ('SELECT forum_id,summary,post_date,details,g.group_id,g.group_name,u.realname
48 FROM news_bytes, groups g,users u
49 WHERE news_bytes.group_id=g.group_id
50 AND u.user_id=news_bytes.submitted_by
53 ORDER BY post_date DESC',
60 print "\n <channel rdf:about=\"".util_make_url ('/export/rss_sfnews.php')."\">\n";
62 print " <title>".forge_get_config ('forge_name')." Project News</title>\n";
63 print " <link>".util_make_url ('/')."</link>\n";
64 print " <description>".forge_get_config ('forge_name')." Project News Highlights</description>\n";
69 $res = getres ($group_id, $limit) ;
70 while ($row = db_fetch_array($res)) {
71 if (!forge_check_perm('forum',$row['forum_id'],'read')) {
74 print " <rdf:li rdf:resource=\"".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."\" />\n";
77 print " </rdf:Seq>\n";
79 print " </channel>\n";
81 $res = getres ($group_id, $limit) ;
82 while ($row = db_fetch_array($res)) {
83 if (!forge_check_perm('forum',$row['forum_id'],'read')) {
86 print "\n <item rdf:about=\"".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."\">\n";
87 print " <title>".htmlspecialchars($row['summary'])."</title>\n";
88 // if news group, link is main page
89 if ($row['group_id'] != forge_get_config('news_group')) {
90 print " <link>".util_make_url ('/forum/forum.php?forum_id='.$row['forum_id'])."</link>\n";
92 print " <link>".util_make_url ('/')."</link>\n";
94 print " <description>".rss_description($row['details'])."</description>\n";
95 print " <dc:subject>".$row['group_name']."</dc:subject>\n";
96 print " <dc:creator>".$row['realname']."</dc:creator>\n";
97 print " <dc:date>".gmdate('c', $row['post_date'])."</dc:date>\n";