/*
** 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 1
# 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.srcid=b.rid"
" AND tx.tagtype!=0 %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 style='font-size:smaller'>
@ <form action='tagview' method='post'>
@ Search for tags:
@ <input type='text' name='like' value='%h((like?like:""))' size='10'/>
@ <input type='submit'/>
@ </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.srcid=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',"
" DATETIME(tx.mtime) AS 'Timestamp',"
" linkuuid(b.uuid) AS 'Version'"
" FROM tag t, tagxref tx, blob b "
" WHERE t.tagname='%q' AND t.tagid=tx.tagid AND tx.srcid=b.rid "
TAGVIEW_DEFAULT_FILTER
" ORDER BY tx.mtime DESC",
tagname);
db_generic_query_view(zSql, 1);
free(zSql);
}
/*
** Get the UUIDs for a tag
*/
char *tag_query_for_www(const char *pName){
static const char zBaseSql[] =
@ SELECT
@ blob.rid,
@ uuid,
@ datetime(event.mtime,'localtime') AS timestamp,
@ coalesce(ecomment, comment),
@ coalesce(euser, user),
@ (SELECT count(*) FROM plink WHERE pid=blob.rid AND isprim=1),
@ (SELECT count(*) FROM plink WHERE cid=blob.rid),
@ NOT EXISTS (SELECT 1 FROM plink WHERE pid=blob.rid),
@ coalesce(bgcolor, brbgcolor),
@ event.type
@ FROM event JOIN blob JOIN tagxref
@ WHERE blob.rid=event.objid
@ AND tagxref.rid = event.objid
@ AND tagxref.tagid = (SELECT tagid FROM tag
@ WHERE tagname = 'sym-'||%Q)
@ ORDER BY 3 desc
;
return mprintf(zBaseSql,pName);
}
/*
** WEBP AGE: /tagview
*/
void old_tagview_page(void){
char const * check = 0;
login_check_credentials();
if( !g.okRdWiki ){
login_needed();
}
style_header("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();
}
/*
** WEBPAGE: /tagview
*/
void tagview_page(void){
char const *zName = 0;
login_check_credentials();
if( !g.okRead ){
login_needed();
}
login_anonymous_available();
if( 0 != (zName = P("name")) ){
Blob uuid;
char *zSql;
Stmt q;
if( sym_tag_to_uuid(zName, &uuid) > 0){
style_header("Tagged Baselines");
@ <h2>%s(zName):</h2>
zSql = tag_query_for_www(zName);
db_prepare(&q, zSql);
free(zSql);
www_print_timeline(&q);
db_finalize(&q);
}else{
style_header("TaggedBaselines");
@ <h2>%s(zName):</h2>
@ There is no artifact with this tag.
}
}else{
Stmt q;
const char *prefix = "sym-";
int preflen = strlen(prefix);
style_header("Tags");
db_prepare(&q,
"SELECT tagname"
" FROM tag"
" WHERE EXISTS(SELECT 1 FROM tagxref"
" WHERE tagid=tag.tagid"
" AND tagtype>0)"
" ORDER BY tagname"
);
@ <ul>
while( db_step(&q)==SQLITE_ROW ){
const char *name = db_column_text(&q, 0);
if( strncmp(name, prefix, preflen)==0 ){
@ <li><a href=%s(g.zBaseURL)/tagview?name=%s(name+preflen)>
@ %s(name+preflen)</a></li>
}
}
@ </ul>
db_finalize(&q);
}
style_footer();
}
#undef TAGVIEW_DEFAULT_FILTER