/*
** Copyright (c) 2007 D. Richard Hipp
** Copyright (c) 2008 Stephan Beal
**
** This program is free software; you can redistribute it and/or
** modify it under the terms of the GNU General Public
** License as published by the Free Software Foundation; either
** version 2 of the License, or (at your option) any later version.
**
** This program is distributed in the hope that it will be useful,
** but WITHOUT ANY WARRANTY; without even the implied warranty of
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
** General Public License for more details.
**
** You should have received a copy of the GNU General Public
** License along with this library; if not, write to the
** Free Software Foundation, Inc., 59 Temple Place - Suite 330,
** Boston, MA 02111-1307, USA.
**
** Author contact information:
** drh@hwaci.com
** http://www.hwaci.com/drh/
**
*******************************************************************************
**
** Implementation of the Tag View page
*/
#include <assert.h>
#include "config.h"
#include "tagview.h"
#if 0 /* DISABLED */
#if 0
# define TAGVIEW_DEFAULT_FILTER "AND t.tagname NOT GLOB 'wiki-*' "
#else
# define TAGVIEW_DEFAULT_FILTER
#endif
/*
** Lists all tags matching the given LIKE clause (which
** may be 0).
*/
static void tagview_page_list_tags(const char *zLike){
char *zLikeClause = 0;
const int limit = 10;
char *zLimit = 0;
char *zSql;
if( zLike && zLike[0] ){
zLikeClause = mprintf( "AND t.tagname LIKE '%%%q%%'", zLike );
zLimit = "";
@ <h2>Tags matching [%h(zLikeClause)]:</h2>
}else{
zLimit = mprintf( "LIMIT %d", limit );
zLikeClause = "";
@ <h2>%d(limit) most recent tags:</h2>
}
zSql = mprintf(
"SELECT "
" linktagid(t.tagid) AS 'Tag ID',"
" linktagname(t.tagname) AS 'Name',"
" DATETIME(tx.mtime) AS 'Timestamp',"
" linkuuid(b.uuid) AS 'Version'"
" FROM tag t, tagxref tx, blob b "
" WHERE t.tagid=tx.tagid AND tx.rid=b.rid"
" %s "
TAGVIEW_DEFAULT_FILTER
" ORDER BY tx.mtime DESC %s",
zLikeClause, zLimit
);
db_generic_query_view(zSql, 1);
free(zSql);
if( zLikeClause[0] ) free(zLikeClause);
if( zLimit[0] ) free(zLimit);
}
/*
** A small search form which forwards to ?like=SEARCH_STRING
*/
static void tagview_page_search_miniform(void){
char const * like = P("like");
@ <div class='miniform'>
@ <form action='tagview' method='post'>
@ Search for tags:
@ <input type='text' name='like' value='%h((like?like:""))' size='10'/>
@ <input type='submit'/>
@ <input type='hidden' name='raw' value='y'/>
@ </form>
@ </div>
}
/*
** tagview_page_default() renders the default page for tagview_page().
*/
static void tagview_page_default(void){
tagview_page_list_tags( 0 );
}
/*
** Lists all tags matching the given tagid.
*/
static void tagview_page_tag_by_id( int tagid ){
char *zSql;
@ <h2>Tag #%d(tagid):</h2>
zSql = mprintf(
"SELECT DISTINCT"
" linktagname(t.tagname) AS 'Tag Name',"
" DATETIME(tx.mtime) AS 'Timestamp',"
" linkuuid(b.uuid) AS 'Version'"
" FROM tag t, tagxref tx, blob b"
" WHERE t.tagid=%d AND t.tagid=tx.tagid AND tx.rid=b.rid "
TAGVIEW_DEFAULT_FILTER
" ORDER BY tx.mtime DESC",
tagid
);
db_generic_query_view(zSql, 1);
free(zSql);
}
/*
** Lists all tags matching the given tag name.
*/
static void tagview_page_tag_by_name( char const * tagname ){
char *zSql;
@ <h2>Tag '%s(tagname)':</h2>
zSql = mprintf(
"SELECT DISTINCT"
" linktagid(t.tagid) AS 'Tag ID',"
" linktagname(t.tagname) AS 'Name',"
" DATETIME(tx.mtime) AS 'Timestamp',"
" linkuuid(b.uuid) AS 'Version'"
" FROM tag t, tagxref tx, blob b "
" WHERE ( t.tagname='%q' OR t.tagname='sym-%q') "
" AND t.tagid=tx.tagid AND tx.rid=b.rid "
TAGVIEW_DEFAULT_FILTER
" ORDER BY tx.mtime DESC",
tagname,tagname);
db_generic_query_view(zSql, 1);
free(zSql);
}
/*
** Internal view of tags
*/
void raw_tagview_page(void){
char const * check = 0;
login_check_credentials();
/* if( !g.okRdWiki ){ */
if( !g.okAdmin ){
login_needed();
}
style_header("Raw Tags");
login_anonymous_available();
tagview_page_search_miniform();
@ <hr/>
if( 0 != (check = P("tagid")) ){
tagview_page_tag_by_id( atoi(check) );
}else if( 0 != (check = P("like")) ){
tagview_page_list_tags( check );
}else if( 0 != (check = P("name")) ){
tagview_page_tag_by_name( check );
}else{
tagview_page_default();
}
style_footer();
}
#undef TAGVIEW_DEFAULT_FILTER
/*
** Generate a timeline for the chosen tag
*/
void tagview_print_timeline(char const *zName, char const *zPrefix){
char *zSql;
Stmt q;
int tagid = db_int(0, "SELECT tagid FROM tag WHERE tagname='%q%q'",
zPrefix, zName);
zSql = mprintf("%s AND EXISTS (SELECT 1"
" FROM tagxref"
" WHERE tagxref.rid = event.objid"
" AND tagxref.tagtype > 0"
" AND tagxref.tagid = %d)"
" ORDER BY 3 desc",
timeline_query_for_www(), tagid
);
db_prepare(&q, zSql);
free(zSql);
www_print_timeline(&q, 0, 0);
db_finalize(&q);
}
/*
** WEB PAGE: /tagview
*/
void tagview_page(void){
char const *zName = 0;
char const *zTitle = 0;
int nTag = 0;
login_check_credentials();
if( !g.okRead ){
login_needed();
}
if ( P("tagid") || P("like") || P("raw") ) {
raw_tagview_page();
return;
}
login_anonymous_available();
if( 0 != (zName = P("name")) ){
Blob uuid;
if( g.okAdmin ){
style_submenu_element("RawTags", "Internal Ticket View",
"%s/tagview?name=%s&raw=y", g.zTop, zName);
}
zTitle = "Tagged Artifacts";
@ <h2>%s(zName):</h2>
if( sym_tag_to_uuid(zName, &uuid) > 0){
tagview_print_timeline(zName, "sym-");
}else if( tag_to_uuid(zName, &uuid, "") > 0){
tagview_print_timeline(zName, "");
}else{
@ There is no artifact with this tag.
}
}else{
Stmt q;
const char *prefix = "sym-";
int preflen = strlen(prefix);
if( g.okAdmin ){
style_submenu_element("RawTags", "Internal Ticket View",
"%s/tagview?raw=y", g.zTop);
}
zTitle = "Tags";
db_prepare(&q,
"SELECT tagname"
" FROM tag"
" WHERE EXISTS(SELECT 1 FROM tagxref"
" WHERE tagid=tag.tagid"
" AND tagtype>0)"
" AND tagid > %d"
" AND tagname NOT GLOB 'wiki-*'"
" AND tagname NOT GLOB 'tkt-*'"
" ORDER BY tagname",
MAX_INT_TAG
);
@ <ul>
while( db_step(&q)==SQLITE_ROW ){
const char *name = db_column_text(&q, 0);
nTag++;
if( g.okHistory ){
if( strncmp(name, prefix, preflen)==0 ){
@ <li><a href=%s(g.zBaseURL)/tagview?name=%s(name+preflen)>
@ %s(name+preflen)</a>
}else{
@ <li><a href=%s(g.zBaseURL)/tagview?name=%s(name)>
@ %s(name)</a>
}
}else{
if( strncmp(name, prefix, preflen)==0 ){
@ <li><strong>%s(name+preflen)</strong>
}else{
@ <li><strong>%s(name)</strong>
}
}
if( strncmp(name, prefix, preflen)==0 ){
@ (symbolic label)
}
@ </li>
}
@ </ul>
if( nTag == 0) {
@ There are no relevant tags.
}
db_finalize(&q);
}
style_header(zTitle);
/*
* Put in dummy functions since www_print_timeline has generated calls to
* them. Some browsers don't seem to care, but better to be safe.
* Actually, it would be nice to use the functions on this page, but at
* the moment it looks to be too difficult.
*/
@ <script>
@ function xin(id){
@ }
@ function xout(id){
@ }
@ </script>
style_footer();
}
#endif /* DISABLED */