PUBLIC void espButtonLink(HttpConn *conn, cchar *text, cchar *uri, cchar *optionString)
{
MprHash *options;
options = httpGetOptions(optionString);
httpSetOption(options, EDATA("click"), httpUri(conn, uri));
espRender(conn, "<button%s>%s</button>", map(conn, options), text);
}
PUBLIC void espTable(HttpConn *conn, EdiGrid *grid, cchar *optionString)
{
MprHash *options, *colOptions, *rowOptions, *thisCol;
MprList *cols;
EdiRec *rec;
EdiField *fp;
cchar *title, *width, *o, *header, *value, *sortColumn;
char index[8];
int c, r, ncols, sortOrder;
assert(grid);
if (grid == 0) {
return;
}
options = httpGetOptions(optionString);
if (grid->nrecords == 0) {
espRender(conn, "<p>No Data</p>\r\n");
return;
}
if (grid->flags & EDI_GRID_READ_ONLY) {
grid = ediCloneGrid(grid);
}
if ((sortColumn = httpGetOption(options, "sort", 0)) != 0) {
sortOrder = httpOption(options, "sortOrder", "ascending", 1);
ediSortGrid(grid, sortColumn, sortOrder);
}
colOptions = httpGetOptionHash(options, "columns");
filterCols(grid, options, colOptions);
if (httpOption(options, "pivot", "true", 0) != 0) {
pivotTable(conn, ediPivotGrid(grid, 1), options);
return;
}
cols = ediGetGridColumns(grid);
ncols = mprGetListLength(cols);
rowOptions = mprCreateHash(0, MPR_HASH_STABLE);
httpSetOption(rowOptions, EDATA("click"), httpGetOption(options, EDATA("click"), 0));
httpRemoveOption(options, EDATA("click"));
httpSetOption(rowOptions, EDATA("remote"), httpGetOption(options, EDATA("remote"), 0));
httpSetOption(rowOptions, EDATA("key"), httpGetOption(options, EDATA("key"), 0));
httpSetOption(rowOptions, EDATA("params"), httpGetOption(options, EDATA("params"), 0));
httpSetOption(rowOptions, EDATA("edit"), httpGetOption(options, EDATA("edit"), 0));
httpInsertOption(options, "class", ESTYLE("table"));
httpInsertOption(options, "class", ESTYLE("stripe"));
espRender(conn, "<table%s>\r\n", map(conn, options));
/*
Table header
*/
if (httpOption(options, "showHeader", "true", 1)) {
espRender(conn, " <thead>\r\n");
if ((title = httpGetOption(options, "title", 0)) != 0) {
espRender(conn, " <tr class='" ESTYLE("table-title") "'><td colspan='%s'>%s</td></tr>\r\n",
mprGetListLength(cols), title);
}
espRender(conn, " <tr class='" ESTYLE("table-header") "'>\r\n");
rec = grid->records[0];
for (c = 0; c < ncols; c++) {
assert(c <= rec->nfields);
fp = &rec->fields[c];
width = ((o = httpGetOption(options, "width", 0)) != 0) ? sfmt(" width='%s'", o) : "";
thisCol = mprLookupKey(colOptions, itosbuf(index, sizeof(index), c, 10));
header = httpGetOption(thisCol, "header", spascal(fp->name));
espRender(conn, " <th%s>%s</th>\r\n", width, header);
}
espRender(conn, " </tr>\r\n </thead>\r\n");
}
espRender(conn, " <tbody>\r\n");
/*
Table body data
*/
for (r = 0; r < grid->nrecords; r++) {
rec = grid->records[r];
httpSetOption(rowOptions, "id", rec->id);
espRender(conn, " <tr%s>\r\n", map(conn, rowOptions));
for (c = 0; c < ncols; c++) {
fp = &rec->fields[c];
thisCol = mprLookupKey(colOptions, itosbuf(index, sizeof(index), c, 10));
if (httpGetOption(thisCol, "align", 0) == 0) {
if (fp->type == EDI_TYPE_INT || fp->type == EDI_TYPE_FLOAT) {
if (!thisCol) {
thisCol = mprCreateHash(0, MPR_HASH_STABLE);
}
httpInsertOption(thisCol, "align", "right");
}
}
value = formatValue(fp, thisCol);
espRender(conn, " <td%s>%s</td>\r\n", map(conn, thisCol), value);
}
espRender(conn, " </tr>\r\n");
}
espRender(conn, " </tbody>\r\n</table>\r\n");
}
/*
Render a table from a data grid
Examples:
table(grid, "{ refresh:'@update', period:'1000', pivot:'true' }");
table(grid, "{ click:'@edit' }");
table(grid, "columns: [ \
{ name: product, header: 'Product', width: '20%' }, \
{ name: date, format: '%m-%d-%y' }, \
{ name: 'user.name' }, \
]");
table(readTable("users"));
table(makeGrid("[{'name': 'peter', age: 23 }, {'name': 'mary', age: 22}]")
table(grid, "{ \
columns: [ \
{ name: 'speed', header: 'Speed', dropdown: [100, 1000, 40000] }, \
{ name: 'adminMode', header: 'Admin Mode', radio: ['Up', 'Down'] }, \
{ name: 'state', header: 'State', radio: ['Enabled', 'Disabled'] }, \
{ name: 'autoNegotiate', header: 'Auto Negotiate', checkbox: ['enabled'] }, \
{ name: 'type', header: 'Type' }, \
], \
edit: true, \
pivot: true, \
showHeader: false, \
class: 'esp-pivot', \
}");
*/
static void pivotTable(HttpConn *conn, EdiGrid *grid, MprHash *options)
{
MprHash *colOptions, *rowOptions, *thisCol, *dropdown, *radio;
MprList *cols;
EdiRec *rec;
EdiField *fp;
cchar *title, *width, *o, *header, *name, *checkbox;
char index[8];
int c, r, ncols;
assert(grid);
if (grid->nrecords == 0) {
espRender(conn, "<p>No Data</p>\r\n");
return;
}
colOptions = httpGetOptionHash(options, "columns");
cols = ediGetGridColumns(grid);
ncols = mprGetListLength(cols);
rowOptions = mprCreateHash(0, MPR_HASH_STABLE);
httpSetOption(rowOptions, EDATA("click"), httpGetOption(options, EDATA("click"), 0));
httpInsertOption(options, "class", ESTYLE("pivot"));
httpInsertOption(options, "class", ESTYLE("table"));
espRender(conn, "<table%s>\r\n", map(conn, options));
/*
Table header
*/
if (httpOption(options, "showHeader", "true", 1)) {
espRender(conn, " <thead>\r\n");
if ((title = httpGetOption(options, "title", 0)) != 0) {
espRender(conn, " <tr class='" ESTYLE("table-title") "'><td colspan='%s'>%s</td></tr>\r\n",
mprGetListLength(cols), title);
}
espRender(conn, " <tr class='" ESTYLE("header") "'>\r\n");
rec = grid->records[0];
for (r = 0; r < ncols; r++) {
assert(r <= grid->nrecords);
width = ((o = httpGetOption(options, "width", 0)) != 0) ? sfmt(" width='%s'", o) : "";
thisCol = mprLookupKey(colOptions, itosbuf(index, sizeof(index), r, 10));
header = httpGetOption(thisCol, "header", spascal(rec->id));
espRender(conn, " <th%s>%s</th>\r\n", width, header);
}
espRender(conn, " </tr>\r\n </thead>\r\n");
}
espRender(conn, " <tbody>\r\n");
/*
Table body data
*/
for (r = 0; r < grid->nrecords; r++) {
rec = grid->records[r];
httpSetOption(rowOptions, "id", rec->id);
espRender(conn, " <tr%s>\r\n", map(conn, rowOptions));
for (c = 0; c < ncols; c++) {
fp = &rec->fields[c];
thisCol = mprLookupKey(colOptions, itosbuf(index, sizeof(index), r, 10));
if (httpGetOption(thisCol, "align", 0) == 0) {
if (fp->type == EDI_TYPE_INT || fp->type == EDI_TYPE_FLOAT) {
if (!thisCol) {
thisCol = mprCreateHash(0, MPR_HASH_STABLE);
}
httpInsertOption(thisCol, "align", "right");
}
}
if (c == 0) {
/*
Render column name
*/
name = httpGetOption(thisCol, "header", spascal(rec->id));
if (httpOption(options, "edit", "true", 0) && httpOption(thisCol, "edit", "true", 1)) {
espRender(conn, " <td%s>%s</td><td>", map(conn, thisCol), name);
if ((dropdown = httpGetOption(thisCol, "dropdown", 0)) != 0) {
espDropdown(conn, fp->name, hashToGrid(dropdown), 0);
} else if ((radio = httpGetOption(thisCol, "radio", 0)) != 0) {
espRadio(conn, fp->name, hashToString(radio, 0), 0);
} else if ((checkbox = httpGetOption(thisCol, "checkbox", 0)) != 0) {
espCheckbox(conn, fp->name, checkbox, 0);
} else {
input(fp->name, 0);
}
espRender(conn, "</td>\r\n");
} else {
espRender(conn, " <td%s>%s</td><td>%s</td>\r\n", map(conn, thisCol), name, fp->value);
}
} else {
espRender(conn, " <td%s>%s</td>\r\n", map(conn, thisCol), fp->value);
}
}
}
espRender(conn, " </tr>\r\n");
espRender(conn, " </tbody>\r\n</table>\r\n");
}
PUBLIC HttpUri *httpLinkUri(HttpConn *conn, cchar *target, MprHash *options)
{
HttpRoute *route, *lroute;
HttpRx *rx;
HttpUri *uri;
cchar *routeName, *action, *controller, *originalAction, *tplate;
char *rest;
assert(conn);
rx = conn->rx;
route = rx->route;
controller = 0;
if (target == 0) {
target = "";
}
if (*target == '@') {
target = sjoin("{action: '", target, "'}", NULL);
}
if (*target != '{') {
tplate = target;
if (!options) {
options = route->vars;
}
} else {
if (options) {
options = mprBlendHash(httpGetOptions(target), options);
} else {
options = httpGetOptions(target);
}
options = mprBlendHash(options, route->vars);
/*
Prep the action. Forms are:
. @action # Use the current controller
. @controller/ # Use "index" as the action
. @controller/action
*/
if ((action = httpGetOption(options, "action", 0)) != 0) {
originalAction = action;
if (*action == '@') {
action = &action[1];
}
if (strchr(action, '/')) {
controller = stok((char*) action, "/", (char**) &action);
action = stok((char*) action, "/", &rest);
}
if (controller) {
httpSetOption(options, "controller", controller);
} else {
controller = httpGetParam(conn, "controller", 0);
}
if (action == 0 || *action == '\0') {
action = "list";
}
if (action != originalAction) {
httpSetOption(options, "action", action);
}
}
/*
Find the template to use. Strategy is this order:
. options.template
. options.route.template
. options.action mapped to a route.template, via:
. /app/STAR/action
. /app/controller/action
. /app/STAR/default
. /app/controller/default
*/
if ((tplate = httpGetOption(options, "template", 0)) == 0) {
if ((routeName = httpGetOption(options, "route", 0)) != 0) {
routeName = expandRouteName(conn, routeName);
lroute = httpLookupRoute(conn->host, routeName);
} else {
lroute = 0;
}
if (!lroute) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, controller, action))) == 0) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, "{controller}", action))) == 0) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, controller, "default"))) == 0) {
lroute = httpLookupRoute(conn->host, actionRoute(route, "{controller}", "default"));
}
}
}
}
if (lroute) {
tplate = lroute->tplate;
}
}
if (!tplate) {
mprLog("error http", 0, "Cannot find template for URI %s", target);
target = "/";
}
}
target = httpTemplate(conn, tplate, options);
if ((uri = httpCreateUri(target, 0)) == 0) {
return 0;
}
return uri;
}
PUBLIC HttpUri *httpLinkUri(HttpConn *conn, cchar *target, MprHash *options)
{
HttpRoute *route, *lroute;
HttpRx *rx;
HttpUri *uri;
cchar *routeName, *action, *controller, *originalAction, *tplate;
char *rest;
rx = conn->rx;
route = rx->route;
controller = 0;
if (target == 0) {
target = "";
}
if (*target == '@') {
target = sjoin("{action: '", target, "'}", NULL);
}
if (*target != '{') {
tplate = target;
if (!options) {
options = route->vars;
}
} else {
if (options) {
options = mprBlendHash(httpGetOptions(target), options);
} else {
options = httpGetOptions(target);
}
options = mprBlendHash(options, route->vars);
/*
Prep the action. Forms are:
. @action # Use the current controller
. @controller/ # Use "index" as the action
. @controller/action
*/
if ((action = httpGetOption(options, "action", 0)) != 0) {
originalAction = action;
if (*action == '@') {
action = &action[1];
}
if (strchr(action, '/')) {
controller = stok((char*) action, "/", (char**) &action);
action = stok((char*) action, "/", &rest);
}
if (controller) {
httpSetOption(options, "controller", controller);
} else {
controller = httpGetParam(conn, "controller", 0);
}
if (action == 0 || *action == '\0') {
action = "list";
}
if (action != originalAction) {
httpSetOption(options, "action", action);
}
}
/*
Find the template to use. Strategy is this order:
. options.template
. options.route.template
. options.action mapped to a route.template, via:
. /app/STAR/action
. /app/controller/action
. /app/STAR/default
. /app/controller/default
*/
if ((tplate = httpGetOption(options, "template", 0)) == 0) {
if ((routeName = httpGetOption(options, "route", 0)) != 0) {
routeName = expandRouteName(conn, routeName);
lroute = httpLookupRoute(conn->host, routeName);
} else {
lroute = 0;
}
if (!lroute) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, controller, action))) == 0) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, "{controller}", action))) == 0) {
if ((lroute = httpLookupRoute(conn->host, actionRoute(route, controller, "default"))) == 0) {
lroute = httpLookupRoute(conn->host, actionRoute(route, "{controller}", "default"));
}
}
}
}
if (lroute) {
tplate = lroute->tplate;
}
}
if (!tplate) {
mprLog("error http", 0, "Cannot find template for URI %s", target);
target = "/";
}
}
target = httpTemplate(conn, tplate, options);
uri = httpCreateUri(target, 0);
/*
This was changed from: httpCreateUri(rx->uri) to rx->parsedUri.
The use case was appweb: /auth/form/login which redirects using: https:///auth/form/login on localhost:4443
This must extract the existing host and port from the prior request
*/
uri = httpResolveUri(rx->parsedUri, 1, &uri, 0);
return httpNormalizeUri(uri);
}
