diff options
Diffstat (limited to 'src/finfo.c')
| -rw-r--r-- | src/finfo.c | 1015 |
1 files changed, 1015 insertions, 0 deletions
diff --git a/src/finfo.c b/src/finfo.c new file mode 100644 index 0000000..9b18d20 --- /dev/null +++ b/src/finfo.c @@ -0,0 +1,1015 @@ +/* +** Copyright (c) 2009 D. Richard Hipp +** +** This program is free software; you can redistribute it and/or +** modify it under the terms of the Simplified BSD License (also +** known as the "2-Clause License" or "FreeBSD License".) + +** 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. +** +** Author contact information: +** drh@hwaci.com +** http://www.hwaci.com/drh/ +** +******************************************************************************* +** +** This file contains code to implement the "finfo" command. +*/ +#include "config.h" +#include "finfo.h" + +/* +** COMMAND: finfo +** +** Usage: %fossil finfo ?OPTIONS? FILENAME +** +** Print the complete change history for a single file going backwards +** in time. The default mode is -l. +** +** For the -l|--log mode: If "-b|--brief" is specified one line per revision +** is printed, otherwise the full comment is printed. The "-n|--limit N" +** and "--offset P" options limits the output to the first N changes +** after skipping P changes. +** +** The -i mode will print various facts about FILENAME, including its +** hash and the check-in and time when the current version of the file +** was created. Use -v for additional information. Add the -r VERSION +** option to see similar information about the same file for the check-in +** specified by VERSION. +** +** The -s mode prints the status as <status> <revision>. This is +** a quick status and does not check for up-to-date-ness of the file. +** +** In the -p mode, there's an optional flag "-r|--revision REVISION". +** The specified version (or the latest checked-out version) is printed +** to stdout. The -p mode is another form of the "cat" command. +** +** Options: +** -b|--brief Display a brief (one line / revision) summary +** --case-sensitive B Enable or disable case-sensitive filenames. B is a +** boolean: "yes", "no", "true", "false", etc. +** -i|--id Print the artifact ID +** -l|--log Select log mode (the default) +** -n|--limit N Display the first N changes (default unlimited). +** N less than 0 means no limit. +** --offset P Skip P changes +** -p|--print Select print mode +** -r|--revision R Print the given revision (or ckout, if none is given) +** to stdout (only in print mode) +** -s|--status Select status mode (print a status indicator for FILE) +** -v|--verbose On the -i option, show all check-ins that use the +** file, not just the earliest check-in +** -W|--width N Width of lines (default is to auto-detect). Must be +** more than 22 or else 0 to indicate no limit. +** +** See also: [[artifact]], [[cat]], [[descendants]], [[info]], [[leaves]] +*/ +void finfo_cmd(void){ + db_must_be_within_tree(); + if( find_option("status","s",0) ){ + Stmt q; + Blob line; + Blob fname; + int vid; + + /* We should be done with options.. */ + verify_all_options(); + + if( g.argc!=3 ) usage("-s|--status FILENAME"); + vid = db_lget_int("checkout", 0); + if( vid==0 ){ + fossil_fatal("no check-out to finfo files in"); + } + vfile_check_signature(vid, CKSIG_ENOTFILE); + file_tree_name(g.argv[2], &fname, 0, 1); + db_prepare(&q, + "SELECT pathname, deleted, rid, chnged, coalesce(origname!=pathname,0)" + " FROM vfile WHERE vfile.pathname=%B %s", + &fname, filename_collation()); + blob_zero(&line); + if( db_step(&q)==SQLITE_ROW ) { + Blob uuid; + int isDeleted = db_column_int(&q, 1); + int isNew = db_column_int(&q,2) == 0; + int chnged = db_column_int(&q,3); + int renamed = db_column_int(&q,4); + + blob_zero(&uuid); + db_blob(&uuid, + "SELECT uuid FROM blob, mlink, vfile WHERE " + "blob.rid = mlink.mid AND mlink.fid = vfile.rid AND " + "vfile.pathname=%B %s", + &fname, filename_collation() + ); + if( isNew ){ + blob_appendf(&line, "new"); + }else if( isDeleted ){ + blob_appendf(&line, "deleted"); + }else if( renamed ){ + blob_appendf(&line, "renamed"); + }else if( chnged ){ + blob_appendf(&line, "edited"); + }else{ + blob_appendf(&line, "unchanged"); + } + blob_appendf(&line, " "); + blob_appendf(&line, " %10.10s", blob_str(&uuid)); + blob_reset(&uuid); + }else{ + blob_appendf(&line, "unknown 0000000000"); + } + db_finalize(&q); + fossil_print("%s\n", blob_str(&line)); + blob_reset(&fname); + blob_reset(&line); + }else if( find_option("print","p",0) ){ + Blob record; + Blob fname; + const char *zRevision = find_option("revision", "r", 1); + + /* We should be done with options.. */ + verify_all_options(); + + file_tree_name(g.argv[2], &fname, 0, 1); + if( zRevision ){ + historical_blob(zRevision, blob_str(&fname), &record, 1); + }else{ + int rid = db_int(0, "SELECT rid FROM vfile WHERE pathname=%B %s", + &fname, filename_collation()); + if( rid==0 ){ + fossil_fatal("no history for file: %b", &fname); + } + content_get(rid, &record); + } + blob_write_to_file(&record, "-"); + blob_reset(&record); + blob_reset(&fname); + }else if( find_option("id","i",0) ){ + Blob fname; + int rid; + int whatisFlags = WHATIS_BRIEF; + const char *zRevision = find_option("revision", "r", 1); + if( find_option("verbose","v",0)!=0 ) whatisFlags = 0; + + verify_all_options(); + + if( zRevision==0 ) zRevision = "current"; + if( g.argc!=3 ) usage("FILENAME"); + file_tree_name(g.argv[2], &fname, 0, 1); + rid = db_int(0, "SELECT rid FROM blob WHERE uuid =" + " (SELECT uuid FROM files_of_checkin(%Q)" + " WHERE filename=%B %s)", + zRevision, &fname, filename_collation()); + if( rid==0 ) { + fossil_fatal("file not found for revision %s: %s", + zRevision, blob_str(&fname)); + } + whatis_rid(rid,whatisFlags,0); + blob_reset(&fname); + }else{ + Blob line; + Stmt q; + Blob fname; + int rid; + const char *zFilename; + const char *zLimit; + const char *zWidth; + const char *zOffset; + int iLimit, iOffset, iBrief, iWidth; + const char *zMainBranch; + + if( find_option("log","l",0) ){ + /* this is the default, no-op */ + } + zLimit = find_option("limit","n",1); + zWidth = find_option("width","W",1); + iLimit = zLimit ? atoi(zLimit) : -1; + zOffset = find_option("offset",0,1); + iOffset = zOffset ? atoi(zOffset) : 0; + iBrief = find_option("brief","b",0) != 0; + if( iLimit==0 ){ + iLimit = -1; + } + if( zWidth ){ + iWidth = atoi(zWidth); + if( (iWidth!=0) && (iWidth<=22) ){ + fossil_fatal("-W|--width value must be >22 or 0"); + } + }else{ + iWidth = -1; + } + + /* We should be done with options.. */ + verify_all_options(); + + if( g.argc!=3 ){ + usage("?-l|--log? ?-b|--brief? FILENAME"); + } + file_tree_name(g.argv[2], &fname, 0, 1); + rid = db_int(0, "SELECT rid FROM vfile WHERE pathname=%B %s", + &fname, filename_collation()); + if( rid==0 ){ + fossil_fatal("no history for file: %b", &fname); + } + zFilename = blob_str(&fname); + db_prepare(&q, + "SELECT DISTINCT b.uuid, ci.uuid, date(event.mtime,toLocal())," + " coalesce(event.ecomment, event.comment)," + " coalesce(event.euser, event.user)," + " (SELECT value FROM tagxref WHERE tagid=%d AND tagtype>0" + " AND tagxref.rid=mlink.mid)" /* Tags */ + " FROM mlink, blob b, event, blob ci, filename" + " WHERE filename.name=%Q %s" + " AND mlink.fnid=filename.fnid" + " AND b.rid=mlink.fid" + " AND event.objid=mlink.mid" + " AND event.objid=ci.rid" + " ORDER BY event.mtime DESC LIMIT %d OFFSET %d", + TAG_BRANCH, zFilename, filename_collation(), + iLimit, iOffset + ); + blob_zero(&line); + if( iBrief == 0 ){ + fossil_print("History for %s\n", blob_str(&fname)); + } + zMainBranch = db_main_branch(); + while( db_step(&q)==SQLITE_ROW ){ + const char *zFileUuid = db_column_text(&q, 0); + const char *zCiUuid = db_column_text(&q,1); + const char *zDate = db_column_text(&q, 2); + const char *zCom = db_column_text(&q, 3); + const char *zUser = db_column_text(&q, 4); + const char *zBr = db_column_text(&q, 5); + char *zOut; + if( zBr==0 ) zBr = fossil_strdup(zMainBranch); + if( iBrief == 0 ){ + fossil_print("%s ", zDate); + zOut = mprintf( + "[%S] %s (user: %s, artifact: [%S], branch: %s)", + zCiUuid, zCom, zUser, zFileUuid, zBr); + comment_print(zOut, zCom, 11, iWidth, get_comment_format()); + fossil_free(zOut); + }else{ + blob_reset(&line); + blob_appendf(&line, "%S ", zCiUuid); + blob_appendf(&line, "%.10s ", zDate); + blob_appendf(&line, "%8.8s ", zUser); + blob_appendf(&line, "%8.8s ", zBr); + blob_appendf(&line,"%-39.39s", zCom ); + comment_print(blob_str(&line), zCom, 0, iWidth, get_comment_format()); + } + } + db_finalize(&q); + blob_reset(&fname); + } +} + +/* +** COMMAND: cat +** +** Usage: %fossil cat FILENAME ... ?OPTIONS? +** +** Print on standard output the content of one or more files as they exist +** in the repository. The version currently checked out is shown by default. +** Other versions may be specified using the -r option. +** +** Options: +** -o|--out OUTFILE For exactly one given FILENAME, write to OUTFILE +** -R|--repository REPO Extract artifacts from repository REPO +** -r VERSION The specific check-in containing the file +** +** See also: [[finfo]] +*/ +void cat_cmd(void){ + int i; + Blob content, fname; + const char *zRev; + const char *zFileName; + db_find_and_open_repository(0, 0); + zRev = find_option("r","r",1); + zFileName = find_option("out","o",1); + + /* We should be done with options.. */ + verify_all_options(); + + if ( zFileName && g.argc>3 ){ + fossil_fatal("output file can only be given when retrieving a single file"); + } + + for(i=2; i<g.argc; i++){ + file_tree_name(g.argv[i], &fname, 0, 1); + blob_zero(&content); + historical_blob(zRev, blob_str(&fname), &content, 1); + if ( g.argc==3 && zFileName ){ + blob_write_to_file(&content, zFileName); + }else{ + blob_write_to_file(&content, "-"); + } + blob_reset(&fname); + blob_reset(&content); + } +} + +/* Values for the debug= query parameter to finfo */ +#define FINFO_DEBUG_MLINK 0x01 + +/* +** WEBPAGE: finfo +** Usage: +** * /finfo?name=FILENAME +** * /finfo?name=FILENAME&ci=HASH +** +** Show the change history for a single file. The name=FILENAME query +** parameter gives the filename and is a required parameter. If the +** ci=HASH parameter is also supplied, then the FILENAME,HASH combination +** identifies a particular version of a file, and in that case all changes +** to that one file version are tracked across both edits and renames. +** If only the name=FILENAME parameter is supplied (if ci=HASH is omitted) +** then the graph shows all changes to any file while it happened +** to be called FILENAME and changes are not tracked across renames. +** +** Additional query parameters: +** +** a=DATETIME Only show changes after DATETIME +** b=DATETIME Only show changes before DATETIME +** ci=HASH identify a particular version of a file and then +** track changes to that file across renames +** m=HASH Mark this particular file version. +** n=NUM Show the first NUM changes only +** name=FILENAME (Required) name of file whose history to show +** brbg Background color by branch name +** ubg Background color by user name +** from=HASH Ancestors only (not descendants) of the version of +** the file in this particular check-in. +** to=HASH If both from= and to= are supplied, only show those +** changes on the direct path between the two given +** checkins. +** showid Show RID values for debugging +** showsql Show the SQL query used to gather the data for +** the graph +** +** DATETIME may be in any of usual formats, including "now", +** "YYYY-MM-DDTHH:MM:SS.SSS", "YYYYMMDDHHMM", and others. +*/ +void finfo_page(void){ + Stmt q; + const char *zFilename = PD("name",""); + char zPrevDate[20]; + const char *zA; + const char *zB; + int n; + int ridFrom; + int ridTo = 0; + int ridCi = 0; + const char *zCI = P("ci"); + int fnid; + Blob title; + Blob sql; + HQuery url; + GraphContext *pGraph; + int brBg = P("brbg")!=0; + int uBg = P("ubg")!=0; + int fDebug = atoi(PD("debug","0")); + int fShowId = P("showid")!=0; + Stmt qparent; + int iTableId = timeline_tableid(); + int tmFlags = 0; /* Viewing mode */ + const char *zStyle; /* Viewing mode name */ + const char *zMark; /* Mark this version of the file */ + int selRid = 0; /* RID of the marked file version */ + int mxfnid; /* Maximum filename.fnid value */ + const char *zMainBranch; + + login_check_credentials(); + if( !g.perm.Read ){ login_needed(g.anon.Read); return; } + fnid = db_int(0, "SELECT fnid FROM filename WHERE name=%Q", zFilename); + ridCi = zCI ? name_to_rid_www("ci") : 0; + if( fnid==0 ){ + style_header("No such file"); + }else if( ridCi==0 ){ + style_header("All files named \"%s\"", zFilename); + }else{ + style_header("History of %s of %s",zFilename, zCI); + } + login_anonymous_available(); + tmFlags = timeline_ss_submenu(); + if( tmFlags & TIMELINE_COLUMNAR ){ + zStyle = "Columnar"; + }else if( tmFlags & TIMELINE_COMPACT ){ + zStyle = "Compact"; + }else if( tmFlags & TIMELINE_SIMPLE ){ + zStyle = "Simple"; + }else if( tmFlags & TIMELINE_VERBOSE ){ + zStyle = "Verbose"; + }else if( tmFlags & TIMELINE_CLASSIC ){ + zStyle = "Classic"; + }else{ + zStyle = "Modern"; + } + url_initialize(&url, "finfo"); + if( brBg ) url_add_parameter(&url, "brbg", 0); + if( uBg ) url_add_parameter(&url, "ubg", 0); + ridFrom = name_to_rid_www("from"); + zPrevDate[0] = 0; + if( fnid==0 ){ + @ No such file: %h(zFilename) + style_finish_page(); + return; + } + if( g.perm.Admin ){ + style_submenu_element("MLink Table", "%R/mlink?name=%t", zFilename); + } + if( ridFrom ){ + if( P("to")!=0 ){ + ridTo = name_to_typed_rid(P("to"),"ci"); + path_shortest_stored_in_ancestor_table(ridFrom,ridTo); + }else{ + compute_direct_ancestors(ridFrom); + } + } + url_add_parameter(&url, "name", zFilename); + cgi_check_for_malice(); + blob_zero(&sql); + if( ridCi ){ + /* If we will be tracking changes across renames, some extra temp + ** tables (implemented as CTEs) are required */ + blob_append_sql(&sql, + /* The clade(fid,fnid) table is the set of all (fid,fnid) pairs + ** that should participate in the output. Clade is computed by + ** walking the graph of mlink edges. + */ + "WITH RECURSIVE clade(fid,fnid) AS (\n" + " SELECT blob.rid, %d FROM blob\n" /* %d is fnid */ + " WHERE blob.uuid=(SELECT uuid FROM files_of_checkin(%Q)" + " WHERE filename=%Q)\n" /* %Q is the filename */ + " UNION\n" + " SELECT mlink.fid, mlink.fnid\n" + " FROM clade, mlink\n" + " WHERE clade.fid=mlink.pid\n" + " AND ((mlink.pfnid=0 AND mlink.fnid=clade.fnid)\n" + " OR mlink.pfnid=clade.fnid)\n" + " AND (mlink.fid>0 OR NOT EXISTS(SELECT 1 FROM mlink AS mx" + " WHERE mx.mid=mlink.mid AND mx.pid=mlink.pid" + " AND mx.fid>0 AND mx.pfnid=mlink.fnid))\n" + " UNION\n" + " SELECT mlink.pid," + " CASE WHEN mlink.pfnid>0 THEN mlink.pfnid ELSE mlink.fnid END\n" + " FROM clade, mlink\n" + " WHERE mlink.pid>0\n" + " AND mlink.fid=clade.fid\n" + " AND mlink.fnid=clade.fnid\n" + ")\n", + fnid, zCI, zFilename + ); + }else{ + /* This is the case for all files with a given name. We will still + ** create a "clade(fid,fnid)" table that identifies all participates + ** in the output graph, so that subsequent queries can all be the same, + ** but in the case the clade table is much simplier, being just a + ** single direct query against the mlink table. + */ + blob_append_sql(&sql, + "WITH clade(fid,fnid) AS (\n" + " SELECT DISTINCT fid, %d\n" + " FROM mlink\n" + " WHERE fnid=%d)", + fnid, fnid + ); + } + blob_append_sql(&sql, + "SELECT\n" + " datetime(min(event.mtime),toLocal()),\n" /* Date of change */ + " coalesce(event.ecomment, event.comment),\n" /* Check-in comment */ + " coalesce(event.euser, event.user),\n" /* User who made chng */ + " mlink.pid,\n" /* Parent file rid */ + " mlink.fid,\n" /* File rid */ + " (SELECT uuid FROM blob WHERE rid=mlink.pid),\n" /* Parent file hash */ + " blob.uuid,\n" /* Current file hash */ + " (SELECT uuid FROM blob WHERE rid=mlink.mid),\n" /* Check-in hash */ + " event.bgcolor,\n" /* Background color */ + " (SELECT value FROM tagxref WHERE tagid=%d AND tagtype>0" + " AND tagxref.rid=mlink.mid),\n" /* Branchname */ + " mlink.mid,\n" /* check-in ID */ + " mlink.pfnid,\n" /* Previous filename */ + " blob.size,\n" /* File size */ + " mlink.fnid,\n" /* Current filename */ + " filename.name\n" /* Current filename */ + "FROM clade CROSS JOIN mlink, event" + " LEFT JOIN blob ON blob.rid=clade.fid" + " LEFT JOIN filename ON filename.fnid=clade.fnid\n" + "WHERE mlink.fnid=clade.fnid AND mlink.fid=clade.fid\n" + " AND event.objid=mlink.mid\n", + TAG_BRANCH + ); + if( (zA = P("a"))!=0 ){ + blob_append_sql(&sql, " AND event.mtime>=%.16g\n", + symbolic_name_to_mtime(zA,0,0)); + url_add_parameter(&url, "a", zA); + } + if( (zB = P("b"))!=0 ){ + blob_append_sql(&sql, " AND event.mtime<=%.16g\n", + symbolic_name_to_mtime(zB,0,1)); + url_add_parameter(&url, "b", zB); + } + if( ridFrom ){ + blob_append_sql(&sql, + " AND mlink.mid IN (SELECT rid FROM ancestor)\n" + "GROUP BY mlink.fid\n" + ); + }else{ + /* We only want each version of a file to appear on the graph once, + ** at its earliest appearance. All the other times that it gets merged + ** into this or that branch can be ignored. An exception is for when + ** files are deleted (when they have mlink.fid==0). If the same file + ** is deleted in multiple places, we want to show each deletion, so + ** use a "fake fid" which is derived from the parent-fid for grouping. + ** The same fake-fid must be used on the graph. + */ + blob_append_sql(&sql, + "GROUP BY" + " CASE WHEN mlink.fid>0 THEN mlink.fid ELSE mlink.pid+1000000000 END," + " mlink.fnid\n" + ); + } + blob_append_sql(&sql, "ORDER BY event.mtime DESC"); + if( (n = atoi(PD("n","0")))>0 ){ + blob_append_sql(&sql, " LIMIT %d", n); + url_add_parameter(&url, "n", P("n")); + } + blob_append_sql(&sql, " /*sort*/\n"); + db_prepare(&q, "%s", blob_sql_text(&sql)); + if( P("showsql")!=0 ){ + @ <p>SQL: <blockquote><pre>%h(blob_str(&sql))</blockquote></pre> + } + zMark = P("m"); + if( zMark ){ + selRid = symbolic_name_to_rid(zMark, "*"); + } + blob_reset(&sql); + blob_zero(&title); + if( ridFrom ){ + char *zUuid = db_text(0, "SELECT uuid FROM blob WHERE rid=%d", ridFrom); + char *zLink = href("%R/info/%!S", zUuid); + if( ridTo ){ + blob_appendf(&title, "Changes to file "); + }else if( n>0 ){ + blob_appendf(&title, "First %d ancestors of file ", n); + }else{ + blob_appendf(&title, "Ancestors of file "); + } + blob_appendf(&title,"%z%h</a>", + href("%R/file?name=%T&ci=%!S", zFilename, zUuid), + zFilename); + if( fShowId ) blob_appendf(&title, " (%d)", fnid); + blob_append(&title, ridTo ? " between " : " from ", -1); + blob_appendf(&title, "check-in %z%S</a>", zLink, zUuid); + if( fShowId ) blob_appendf(&title, " (%d)", ridFrom); + fossil_free(zUuid); + if( ridTo ){ + zUuid = db_text(0, "SELECT uuid FROM blob WHERE rid=%d", ridTo); + zLink = href("%R/info/%!S", zUuid); + blob_appendf(&title, " and check-in %z%S</a>", zLink, zUuid); + fossil_free(zUuid); + } + }else if( ridCi ){ + blob_appendf(&title, "History of file "); + hyperlinked_path(zFilename, &title, 0, "tree", "", LINKPATH_FILE); + if( fShowId ) blob_appendf(&title, " (%d)", fnid); + blob_appendf(&title, " at check-in %z%h</a>", + href("%R/info?name=%t",zCI), zCI); + }else{ + blob_appendf(&title, "History for "); + hyperlinked_path(zFilename, &title, 0, "tree", "", LINKPATH_FILE); + if( fShowId ) blob_appendf(&title, " (%d)", fnid); + } + if( uBg ){ + blob_append(&title, " (color-coded by user)", -1); + } + @ <h2>%b(&title)</h2> + blob_reset(&title); + pGraph = graph_init(); + @ <table id="timelineTable%d(iTableId)" class="timelineTable"> + mxfnid = db_int(0, "SELECT max(fnid) FROM filename"); + if( ridFrom ){ + db_prepare(&qparent, + "SELECT DISTINCT pid*%d+CASE WHEN pfnid>0 THEN pfnid ELSE fnid END" + " FROM mlink" + " WHERE fid=:fid AND mid=:mid AND pid>0 AND fnid=:fnid" + " AND pmid IN (SELECT rid FROM ancestor)" + " ORDER BY isaux /*sort*/", mxfnid+1 + ); + }else{ + db_prepare(&qparent, + "SELECT DISTINCT pid*%d+CASE WHEN pfnid>0 THEN pfnid ELSE fnid END" + " FROM mlink" + " WHERE fid=:fid AND mid=:mid AND pid>0 AND fnid=:fnid" + " ORDER BY isaux /*sort*/", mxfnid+1 + ); + } + while( db_step(&q)==SQLITE_ROW ){ + const char *zDate = db_column_text(&q, 0); + const char *zCom = db_column_text(&q, 1); + const char *zUser = db_column_text(&q, 2); + int fpid = db_column_int(&q, 3); + int frid = db_column_int(&q, 4); + const char *zPUuid = db_column_text(&q, 5); + const char *zUuid = db_column_text(&q, 6); + const char *zCkin = db_column_text(&q,7); + const char *zBgClr = db_column_text(&q, 8); + const char *zBr = db_column_text(&q, 9); + int fmid = db_column_int(&q, 10); + int pfnid = db_column_int(&q, 11); + int szFile = db_column_int(&q, 12); + int fnid = db_column_int(&q, 13); + const char *zFName = db_column_text(&q,14); + int gidx; + char zTime[10]; + int nParent = 0; + int bIsModified = 0; + GraphRowId aParent[GR_MAX_RAIL]; + + db_bind_int(&qparent, ":fid", frid); + db_bind_int(&qparent, ":mid", fmid); + db_bind_int(&qparent, ":fnid", fnid); + while( db_step(&qparent)==SQLITE_ROW && nParent<count(aParent) ){ + aParent[nParent] = db_column_int64(&qparent, 0); + nParent++; + } + db_reset(&qparent); + zMainBranch = db_main_branch(); + if( zBr==0 ) zBr = fossil_strdup(zMainBranch); + if( uBg ){ + zBgClr = user_color(zUser); + }else if( brBg || zBgClr==0 || zBgClr[0]==0 ){ + zBgClr = strcmp(zBr, zMainBranch)==0 ? "" : hash_color(zBr); + }else if( zBgClr ){ + zBgClr = reasonable_bg_color(zBgClr,0); + } + gidx = graph_add_row(pGraph, + frid>0 ? (GraphRowId)frid*(mxfnid+1)+fnid : fpid+1000000000, + nParent, 0, aParent, zBr, zBgClr, + zUuid, 0); + if( strncmp(zDate, zPrevDate, 10) ){ + sqlite3_snprintf(sizeof(zPrevDate), zPrevDate, "%.10s", zDate); + @ <tr><td> + @ <div class="divider timelineDate">%s(zPrevDate)</div> + @ </td><td></td><td></td></tr> + } + memcpy(zTime, &zDate[11], 5); + zTime[5] = 0; + if( frid==selRid ){ + @ <tr class='timelineSelected'> + }else{ + @ <tr> + } + @ <td class="timelineTime">\ + @ %z(href("%R/file?name=%T&ci=%!S",zFName,zCkin))%s(zTime)</a></td> + @ <td class="timelineGraph"><div id="m%d(gidx)" class="tl-nodemark"></div> + @ </td> + if( zBgClr && zBgClr[0] ){ + @ <td class="timeline%s(zStyle)Cell" id='mc%d(gidx)'> + }else{ + @ <td class="timeline%s(zStyle)Cell"> + } + if( zPUuid && zUuid && fossil_strcmp(zPUuid, zUuid)!=0 ){ + bIsModified = 1; + } + if( tmFlags & TIMELINE_COMPACT ){ + @ <span class='timelineCompactComment' data-id='%d(frid)'> + }else{ + @ <span class='timeline%s(zStyle)Comment'> + if( pfnid ){ + char *zPrevName = db_text(0,"SELECT name FROM filename WHERE fnid=%d", + pfnid); + if( bIsModified ){ + @ <b>Renamed and modified</b> %h(zPrevName) → %h(zFName). + }else{ + @ <b>Renamed</b> %h(zPrevName) → %h(zFName). + } + fossil_free(zPrevName); + } + if( zUuid && ridTo==0 && nParent==0 ){ + @ <b>Added:</b> + } + if( zUuid==0 ){ + char *zNewName; + zNewName = db_text(0, + "SELECT name FROM filename WHERE fnid = " + " (SELECT fnid FROM mlink" + " WHERE mid=%d" + " AND pfnid IN (SELECT fnid FROM filename WHERE name=%Q))", + fmid, zFName); + if( zNewName ){ + @ <b>Renamed</b> to + @ %z(href("%R/finfo?name=%t",zNewName))%h(zNewName)</a>. + fossil_free(zNewName); + }else{ + @ <b>Deleted:</b> + } + } + if( (tmFlags & TIMELINE_VERBOSE)!=0 && zUuid ){ + hyperlink_to_version(zUuid); + if( fShowId ){ + int srcId = delta_source_rid(frid); + if( srcId ){ + @ (%z(href("%R/deltachain/%d",frid))%d(frid)←%d(srcId)</a>) + }else{ + @ (%z(href("%R/deltachain/%d",frid))%d(frid)</a>) + } + } + @ part of check-in \ + hyperlink_to_version(zCkin); + } + } + @ %W(zCom)</span> + if( (tmFlags & TIMELINE_COMPACT)!=0 ){ + @ <span class='timelineEllipsis' data-id='%d(frid)' \ + @ id='ellipsis-%d(frid)'>...</span> + } + if( tmFlags & TIMELINE_COLUMNAR ){ + if( zBgClr && zBgClr[0] ){ + @ <td class="timelineDetailCell" id='md%d(gidx)'> + }else{ + @ <td class="timelineDetailCell"> + } + } + if( tmFlags & TIMELINE_COMPACT ){ + cgi_printf("<span class='clutter' id='detail-%d'>",frid); + } + cgi_printf("<span class='timeline%sDetail'>", zStyle); + if( tmFlags & TIMELINE_INLINE ) cgi_printf("("); + if( zUuid && (tmFlags & TIMELINE_VERBOSE)==0 ){ + @ file: %z(href("%R/file?name=%T&ci=%!S",zFName,zCkin))\ + @ %S(zUuid)</a> + if( fShowId ){ + int srcId = delta_source_rid(frid); + if( srcId>0 ){ + @ id: %z(href("%R/deltachain/%d",frid))\ + @ %d(frid)←%d(srcId)</a> + }else{ + @ id: %z(href("%R/deltachain/%d",frid))%d(frid)</a> + } + } + } + if( tmFlags & TIMELINE_SIMPLE ){ + @ <span class='timelineEllipsis' data-id='%d(frid)' \ + @ id='ellipsis-%d(frid)'>...</span> + @ <span class='clutter' id='detail-%d(frid)'> + } + @ check-in: \ + hyperlink_to_version(zCkin); + if( fShowId ){ + @ (%d(fmid)) + } + @ user: \ + hyperlink_to_user(zUser, zDate, ","); + @ branch: %z(href("%R/timeline?t=%T",zBr))%h(zBr)</a>, + if( tmFlags & TIMELINE_INLINE ){ + @ size: %d(szFile) + }else{ + @ size: %d(szFile) + } + if( g.perm.Hyperlink && zUuid ){ + const char *z = zFName; + @ <span id='links-%d(frid)'><span class='timelineExtraLinks'> + @ %z(href("%R/annotate?filename=%h&checkin=%s",z,zCkin)) + @ [annotate]</a> + @ %z(href("%R/blame?filename=%h&checkin=%s",z,zCkin)) + @ [blame]</a> + @ %z(href("%R/timeline?uf=%!S",zUuid))[check-ins using]</a> + if( fpid>0 && bIsModified!=0 ){ + @ %z(href("%R/fdiff?v1=%!S&v2=%!S",zPUuid,zUuid))[diff]</a> + } + if( fileedit_is_editable(zFName) ){ + @ %z(href("%R/fileedit?filename=%T&checkin=%!S",zFName,zCkin))\ + @ [edit]</a> + } + @ </span></span> + } + if( fDebug & FINFO_DEBUG_MLINK ){ + int ii; + char *zAncLink; + @ <br>fid=%d(frid) \ + @ graph-id=%lld(frid>0?(GraphRowId)frid*(mxfnid+1)+fnid:fpid+1000000000) \ + @ pid=%d(fpid) mid=%d(fmid) fnid=%d(fnid) \ + @ pfnid=%d(pfnid) mxfnid=%d(mxfnid) + if( nParent>0 ){ + @ parents=%lld(aParent[0]) + for(ii=1; ii<nParent; ii++){ + @ %lld(aParent[ii]) + } + } + zAncLink = href("%R/finfo?name=%T&from=%!S&debug=1",zFName,zCkin); + @ %z(zAncLink)[ancestry]</a> + } + tag_private_status(frid); + /* End timelineDetail */ + if( tmFlags & TIMELINE_INLINE ){ + @ </span>)</span> + }else{ + @ </span> + } + @ </td></tr> + } + db_finalize(&q); + db_finalize(&qparent); + if( pGraph ){ + graph_finish(pGraph, 0, TIMELINE_DISJOINT); + if( pGraph->nErr ){ + graph_free(pGraph); + pGraph = 0; + }else{ + @ <tr class="timelineBottom" id="btm-%d(iTableId)">\ + @ <td></td><td></td><td></td></tr> + } + } + @ </table> + { + int tmFlags = TIMELINE_GRAPH | TIMELINE_FILEDIFF; + timeline_output_graph_javascript(pGraph, tmFlags, iTableId); + } + style_finish_page(); +} + +/* +** WEBPAGE: mlink +** URL: /mlink?name=FILENAME +** URL: /mlink?ci=NAME +** +** Show all MLINK table entries for a particular file, or for +** a particular check-in. +** +** This screen is intended for use by Fossil developers to help +** in debugging Fossil itself. Ordinary Fossil users are not +** expected to know what the MLINK table is or why it is important. +** +** To avoid confusing ordinary users, this page is only available +** to administrators. +*/ +void mlink_page(void){ + const char *zFName = P("name"); + const char *zCI = P("ci"); + Stmt q; + + login_check_credentials(); + if( !g.perm.Admin ){ login_needed(g.anon.Admin); return; } + style_set_current_feature("finfo"); + style_header("MLINK Table"); + if( zFName==0 && zCI==0 ){ + @ <span class='generalError'> + @ Requires either a name= or ci= query parameter + @ </span> + }else if( zFName ){ + int fnid = db_int(0,"SELECT fnid FROM filename WHERE name=%Q",zFName); + if( fnid<=0 ) fossil_fatal("no such file: \"%s\"", zFName); + db_prepare(&q, + "SELECT" + /* 0 */ " datetime(event.mtime,toLocal())," + /* 1 */ " (SELECT uuid FROM blob WHERE rid=mlink.mid)," + /* 2 */ " (SELECT uuid FROM blob WHERE rid=mlink.pmid)," + /* 3 */ " isaux," + /* 4 */ " (SELECT uuid FROM blob WHERE rid=mlink.fid)," + /* 5 */ " (SELECT uuid FROM blob WHERE rid=mlink.pid)," + /* 6 */ " mlink.pid," + /* 7 */ " mperm," + /* 8 */ " (SELECT name FROM filename WHERE fnid=mlink.pfnid)" + " FROM mlink, event" + " WHERE mlink.fnid=%d" + " AND event.objid=mlink.mid" + " ORDER BY 1 DESC", + fnid + ); + style_table_sorter(); + @ <h1>MLINK table for file + @ <a href='%R/finfo?name=%t(zFName)'>%h(zFName)</a></h1> + @ <div class='brlist'> + @ <table class='sortable' data-column-types='tttxtttt' data-init-sort='1'> + @ <thead><tr> + @ <th>Date</th> + @ <th>Check-in</th> + @ <th>Parent<br>Check-in</th> + @ <th>Merge?</th> + @ <th>New</th> + @ <th>Old</th> + @ <th>Exe<br>Bit?</th> + @ <th>Prior<br>Name</th> + @ </tr></thead> + @ <tbody> + while( db_step(&q)==SQLITE_ROW ){ + const char *zDate = db_column_text(&q,0); + const char *zCkin = db_column_text(&q,1); + const char *zParent = db_column_text(&q,2); + int isMerge = db_column_int(&q,3); + const char *zFid = db_column_text(&q,4); + const char *zPid = db_column_text(&q,5); + int isExe = db_column_int(&q,7); + const char *zPrior = db_column_text(&q,8); + @ <tr> + @ <td><a href='%R/timeline?c=%!S(zCkin)'>%s(zDate)</a></td> + @ <td><a href='%R/info/%!S(zCkin)'>%S(zCkin)</a></td> + if( zParent ){ + @ <td><a href='%R/info/%!S(zParent)'>%S(zParent)</a></td> + }else{ + @ <td><i>(New)</i></td> + } + @ <td align='center'>%s(isMerge?"✓":"")</td> + if( zFid ){ + @ <td><a href='%R/info/%!S(zFid)'>%S(zFid)</a></td> + }else{ + @ <td><i>(Deleted)</i></td> + } + if( zPid ){ + @ <td><a href='%R/info/%!S(zPid)'>%S(zPid)</a> + }else if( db_column_int(&q,6)<0 ){ + @ <td><i>(Added by merge)</i></td> + }else{ + @ <td><i>(New)</i></td> + } + @ <td align='center'>%s(isExe?"✓":"")</td> + if( zPrior ){ + @ <td><a href='%R/finfo?name=%t(zPrior)'>%h(zPrior)</a></td> + }else{ + @ <td></td> + } + @ </tr> + } + db_finalize(&q); + @ </tbody> + @ </table> + @ </div> + }else{ + int mid = name_to_rid_www("ci"); + db_prepare(&q, + "SELECT" + /* 0 */ " (SELECT name FROM filename WHERE fnid=mlink.fnid)," + /* 1 */ " (SELECT uuid FROM blob WHERE rid=mlink.fid)," + /* 2 */ " pid," + /* 3 */ " (SELECT uuid FROM blob WHERE rid=mlink.pid)," + /* 4 */ " (SELECT name FROM filename WHERE fnid=mlink.pfnid)," + /* 5 */ " (SELECT uuid FROM blob WHERE rid=mlink.pmid)," + /* 6 */ " mperm," + /* 7 */ " isaux" + " FROM mlink WHERE mid=%d ORDER BY 1", + mid + ); + @ <h1>MLINK table for check-in %h(zCI)</h1> + render_checkin_context(mid, 0, 1, 0); + style_table_sorter(); + @ <hr> + @ <div class='brlist'> + @ <table class='sortable' data-column-types='ttxtttt' data-init-sort='1'> + @ <thead><tr> + @ <th>File</th> + @ <th>Parent<br>Check-in</th> + @ <th>Merge?</th> + @ <th>New</th> + @ <th>Old</th> + @ <th>Exe<br>Bit?</th> + @ <th>Prior<br>Name</th> + @ </tr></thead> + @ <tbody> + while( db_step(&q)==SQLITE_ROW ){ + const char *zName = db_column_text(&q,0); + const char *zFid = db_column_text(&q,1); + const char *zPid = db_column_text(&q,3); + const char *zPrior = db_column_text(&q,4); + const char *zParent = db_column_text(&q,5); + int isExec = db_column_int(&q,6); + int isAux = db_column_int(&q,7); + @ <tr> + @ <td><a href='%R/finfo?name=%t(zName)'>%h(zName)</a></td> + if( zParent ){ + @ <td><a href='%R/info/%!S(zParent)'>%S(zParent)</a></td> + }else{ + @ <td><i>(New)</i></td> + } + @ <td align='center'>%s(isAux?"✓":"")</td> + if( zFid ){ + @ <td><a href='%R/info/%!S(zFid)'>%S(zFid)</a></td> + }else{ + @ <td><i>(Deleted)</i></td> + } + if( zPid ){ + @ <td><a href='%R/info/%!S(zPid)'>%S(zPid)</a> + }else if( db_column_int(&q,2)<0 ){ + @ <td><i>(Added by merge)</i></td> + }else{ + @ <td><i>(New)</i></td> + } + @ <td align='center'>%s(isExec?"✓":"")</td> + if( zPrior ){ + @ <td><a href='%R/finfo?name=%t(zPrior)'>%h(zPrior)</a></td> + }else{ + @ <td></td> + } + @ </tr> + } + db_finalize(&q); + @ </tbody> + @ </table> + @ </div> + } + style_finish_page(); +} |