QString KstIfaceImpl::createEvent(const QString& name,
const QString& expression,
const QString& description,
int debugLogType,
const QString& email) {
//suggest a name if not supplied
QString evtag_end;
if (name.isEmpty())
evtag_end = QString(expression);
else
evtag_end = QString(name);
//count number of events and make a unique name
KstEventMonitorEntryList evlist = kstObjectSubList<KstDataObject,EventMonitorEntry>(KST::dataObjectList);
int i = evlist.count() + 1;
QString stringnum;
stringnum = stringnum.setNum(i);
QString evtag = "E" + stringnum + "-" + evtag_end;
while (KstData::self()->dataTagNameNotUnique(evtag, false)) {
stringnum.setNum(++i);
evtag = "E" + stringnum + "-" + evtag_end;
}
EventMonitorEntryPtr event = new EventMonitorEntry(evtag);
event->setEvent(expression);
event->setDescription(description);
if (debugLogType <= 3 && debugLogType >= 1) {
event->setLogKstDebug(true);
switch (debugLogType) {
case 1:
event->setLevel(KstDebug::Notice);
break;
case 2:
event->setLevel(KstDebug::Warning);
break;
case 3:
event->setLevel(KstDebug::Error);
break;
default:
event->setLevel(KstDebug::Notice);
break;
}
}
else {
event->setLogKstDebug(false);
}
if (email.isEmpty()) {
event->setLogEMail(false);
} else {
event->setLogEMail(true);
event->setEMailRecipients(email);
}
KST::dataObjectList.lock().writeLock();
KST::dataObjectList.append(KstDataObjectPtr(event));
KST::dataObjectList.lock().unlock();
_doc->forceUpdate();
_doc->setModified();
return evtag;
}
