mirror of
https://github.com/owntone/owntone-server.git
synced 2024-12-29 00:23:23 -05:00
296 lines
7.4 KiB
Plaintext
296 lines
7.4 KiB
Plaintext
/*
|
|
* Copyright (C) 2015 Christian Meffert <christian.meffert@googlemail.com>
|
|
*
|
|
* 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 program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
tree grammar SMARTPL2SQL;
|
|
|
|
options {
|
|
tokenVocab = SMARTPL;
|
|
ASTLabelType = pANTLR3_BASE_TREE;
|
|
language = C;
|
|
}
|
|
|
|
@header {
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <limits.h>
|
|
#include <errno.h>
|
|
#include <time.h>
|
|
#include <sqlite3.h>
|
|
|
|
#include "logger.h"
|
|
}
|
|
|
|
@members {
|
|
}
|
|
|
|
playlist returns [ pANTLR3_STRING title, pANTLR3_STRING query ]
|
|
@init { $title = NULL; $query = NULL; }
|
|
: STR '{' e = expression '}'
|
|
{
|
|
pANTLR3_UINT8 val;
|
|
val = $STR.text->toUTF8($STR.text)->chars;
|
|
val++;
|
|
val[strlen((const char *)val) - 1] = '\0';
|
|
|
|
$title = $STR.text->factory->newRaw($STR.text->factory);
|
|
$title->append8($title, (const char *)val);
|
|
|
|
$query = $e.result->factory->newRaw($e.result->factory);
|
|
$query->append8($query, "(");
|
|
$query->appendS($query, $e.result);
|
|
$query->append8($query, ")");
|
|
}
|
|
;
|
|
|
|
expression returns [ pANTLR3_STRING result ]
|
|
@init { $result = NULL; }
|
|
: ^(NOT a = expression)
|
|
{
|
|
$result = $a.result->factory->newRaw($a.result->factory);
|
|
$result->append8($result, "NOT(");
|
|
$result->appendS($result, $a.result);
|
|
$result->append8($result, ")");
|
|
}
|
|
| ^(AND a = expression b = expression)
|
|
{
|
|
$result = $a.result->factory->newRaw($a.result->factory);
|
|
$result->append8($result, "(");
|
|
$result->appendS($result, $a.result);
|
|
$result->append8($result, " AND ");
|
|
$result->appendS($result, $b.result);
|
|
$result->append8($result, ")");
|
|
}
|
|
| ^(OR a = expression b = expression)
|
|
{
|
|
$result = $a.result->factory->newRaw($a.result->factory);
|
|
$result->append8($result, "(");
|
|
$result->appendS($result, $a.result);
|
|
$result->append8($result, " OR ");
|
|
$result->appendS($result, $b.result);
|
|
$result->append8($result, ")");
|
|
}
|
|
| STRTAG INCLUDES STR
|
|
{
|
|
pANTLR3_UINT8 val;
|
|
val = $STR.text->toUTF8($STR.text)->chars;
|
|
val++;
|
|
val[strlen((const char *)val) - 1] = '\0';
|
|
|
|
$result = $STR.text->factory->newRaw($STR.text->factory);
|
|
$result->append8($result, "f.");
|
|
$result->appendS($result, $STRTAG.text->toUTF8($STRTAG.text));
|
|
$result->append8($result, " LIKE '\%");
|
|
$result->append8($result, sqlite3_mprintf("\%q", (const char *)val));
|
|
$result->append8($result, "\%'");
|
|
}
|
|
| STRTAG IS STR
|
|
{
|
|
pANTLR3_UINT8 val;
|
|
val = $STR.text->toUTF8($STR.text)->chars;
|
|
val++;
|
|
val[strlen((const char *)val) - 1] = '\0';
|
|
|
|
$result = $STR.text->factory->newRaw($STR.text->factory);
|
|
$result->append8($result, "f.");
|
|
$result->appendS($result, $STRTAG.text->toUTF8($STRTAG.text));
|
|
$result->append8($result, " = '");
|
|
$result->append8($result, sqlite3_mprintf("\%q", (const char *)val));
|
|
$result->append8($result, "'");
|
|
}
|
|
| INTTAG INTBOOL INT
|
|
{
|
|
$result = $INTTAG.text->factory->newRaw($INTTAG.text->factory);
|
|
$result->append8($result, "f.");
|
|
$result->appendS($result, $INTTAG.text->toUTF8($INTTAG.text));
|
|
$result->append8($result, " ");
|
|
$result->appendS($result, $INTBOOL.text->toUTF8($INTBOOL.text));
|
|
$result->append8($result, " ");
|
|
$result->appendS($result, $INT.text->toUTF8($INT.text));
|
|
}
|
|
| DATETAG AFTER dateval
|
|
{
|
|
char str[15];
|
|
sprintf(str, "\%d", $dateval.result);
|
|
|
|
$result = $DATETAG.text->factory->newRaw($DATETAG.text->factory);
|
|
$result->append8($result, "f.");
|
|
$result->appendS($result, $DATETAG.text->toUTF8($DATETAG.text));
|
|
$result->append8($result, " > ");
|
|
$result->append8($result, str);
|
|
}
|
|
| DATETAG BEFORE dateval
|
|
{
|
|
char str[15];
|
|
sprintf(str, "\%d", $dateval.result);
|
|
|
|
$result = $DATETAG.text->factory->newRaw($DATETAG.text->factory);
|
|
$result->append8($result, "f.");
|
|
$result->appendS($result, $DATETAG.text->toUTF8($DATETAG.text));
|
|
$result->append8($result, " > ");
|
|
$result->append8($result, str);
|
|
}
|
|
;
|
|
|
|
dateval returns [ int result ]
|
|
@init { $result = 0; }
|
|
: DATE
|
|
{
|
|
pANTLR3_UINT8 datval;
|
|
|
|
datval = $DATE.text->chars;
|
|
|
|
if (strcmp((char *)datval, "today") == 0)
|
|
{
|
|
$result = time(NULL);
|
|
}
|
|
else if (strcmp((char *)datval, "yesterday") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600;
|
|
}
|
|
else if (strcmp((char *)datval, "last week") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 7;
|
|
}
|
|
else if (strcmp((char *)datval, "last month") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 30;
|
|
}
|
|
else if (strcmp((char *)datval, "last year") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 365;
|
|
}
|
|
else
|
|
{
|
|
struct tm tm;
|
|
char year[5];
|
|
char month[3];
|
|
char day[3];
|
|
|
|
memset((void*)&tm,0,sizeof(tm));
|
|
memset(year, 0, sizeof(year));
|
|
memset(month, 0, sizeof(month));
|
|
memset(day, 0, sizeof(day));
|
|
|
|
strncpy(year, (const char *)datval, 4);
|
|
strncpy(month, (const char *)datval + 5, 2);
|
|
strncpy(day, (const char *)datval + 8, 2);
|
|
|
|
tm.tm_year = atoi(year) - 1900;
|
|
tm.tm_mon = atoi(month) - 1;
|
|
tm.tm_mday = atoi(day);
|
|
|
|
$result = mktime(&tm);
|
|
}
|
|
}
|
|
| interval BEFORE DATE
|
|
{
|
|
pANTLR3_UINT8 datval;
|
|
|
|
datval = $DATE.text->chars;
|
|
|
|
if (strcmp((char *)datval, "yesterday") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600;
|
|
}
|
|
else if (strcmp((char *)datval, "last week") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 7;
|
|
}
|
|
else if (strcmp((char *)datval, "last month") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 30;
|
|
}
|
|
else if (strcmp((char *)datval, "last year") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 365;
|
|
}
|
|
else
|
|
{
|
|
$result = time(NULL);
|
|
}
|
|
|
|
$result = $result - $interval.result;
|
|
}
|
|
| interval AFTER DATE
|
|
{
|
|
pANTLR3_UINT8 datval;
|
|
|
|
datval = $DATE.text->chars;
|
|
|
|
if (strcmp((char *)datval, "yesterday") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600;
|
|
}
|
|
else if (strcmp((char *)datval, "last week") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 7;
|
|
}
|
|
else if (strcmp((char *)datval, "last month") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 30;
|
|
}
|
|
else if (strcmp((char *)datval, "last year") == 0)
|
|
{
|
|
$result = time(NULL) - 24 * 3600 * 365;
|
|
}
|
|
else
|
|
{
|
|
$result = time(NULL);
|
|
}
|
|
|
|
$result = $result + $interval.result;
|
|
}
|
|
| interval AGO
|
|
{
|
|
$result = time(NULL) - $interval.result;
|
|
}
|
|
;
|
|
|
|
interval returns [ int result ]
|
|
@init { $result = 0; }
|
|
: INT DATINTERVAL
|
|
{
|
|
pANTLR3_UINT8 interval;
|
|
|
|
$result = atoi((const char *)$INT.text->chars);
|
|
interval = $DATINTERVAL.text->chars;
|
|
|
|
if (strcmp((char *)interval, "days") == 0)
|
|
{
|
|
$result = $result * 24 * 3600;
|
|
}
|
|
else if (strcmp((char *)interval, "weeks") == 0)
|
|
{
|
|
$result = $result * 24 * 3600 * 7;
|
|
}
|
|
else if (strcmp((char *)interval, "months") == 0)
|
|
{
|
|
$result = $result * 24 * 3600 * 30;
|
|
}
|
|
else if (strcmp((char *)interval, "weeks") == 0)
|
|
{
|
|
$result = $result * 24 * 3600 * 365;
|
|
}
|
|
else
|
|
{
|
|
$result = 0;
|
|
}
|
|
}
|
|
;
|