void MCAdExecCreateAd(MCExecContext& ctxt, const char *p_name, MCAdType p_type, MCAdTopLeft p_top_left, MCVariableValue *p_meta_data)
{
bool t_success;
t_success = true;
if (s_inneractive_ad_key == nil || MCCStringLength(s_inneractive_ad_key) == 0)
{
ctxt.SetTheResultToStaticCString("not registered with ad service");
t_success = false;;
}
MCAd *t_ad;
t_ad = nil;
if (t_success)
if (MCAd::FindByNameOrId(p_name, t_ad))
{
ctxt.SetTheResultToStaticCString("ad already exists");
t_success = false;
}
if (t_success)
{
uint32_t t_timeout;
if (t_success)
{
t_timeout = 0;
if (p_meta_data != nil && p_meta_data->fetch_element_if_exists(ctxt.GetEP(), "refresh", false))
t_timeout = ctxt.GetEP().getint4();
if (p_type == kMCAdTypeFullscreen)
t_timeout = 0;
else if (t_timeout < 30 || t_timeout > 500)
t_timeout = 120;
}
if (t_success)
t_success = MCSystemInneractiveAdCreate(ctxt, t_ad, p_type, p_top_left, t_timeout, p_meta_data);
if (t_success)
t_success = t_ad->Create();
if (t_success)
{
t_ad->SetNext(s_ads);
t_ad->SetName(p_name);
t_ad->SetOwner(ctxt.GetObjectHandle());
s_ads = t_ad;
}
else if (t_ad != nil)
t_ad->Release();
}
if (!t_success)
ctxt.SetTheResultToStaticCString("could not create ad");
}
void MCAdSetVisibleOfAd(MCExecContext& ctxt, const char *p_name, bool p_visible)
{
if (s_inneractive_ad_key == nil || MCCStringLength(s_inneractive_ad_key) == 0)
{
ctxt.SetTheResultToStaticCString("not registered with ad service");
return;
}
MCAd *t_ad;
t_ad = nil;
if (!MCAd::FindByNameOrId(p_name, t_ad))
ctxt.SetTheResultToStaticCString("could not find ad");
else
t_ad->SetVisible(p_visible);
}
bool MCAdGetTopLeftOfAd(MCExecContext& ctxt, const char *p_name, MCAdTopLeft &r_top_left)
{
if (s_inneractive_ad_key == nil || MCCStringLength(s_inneractive_ad_key) == 0)
{
ctxt.SetTheResultToStaticCString("not registered with ad service");
return false;
}
MCAd *t_ad;
t_ad = nil;
if (!MCAd::FindByNameOrId(p_name, t_ad))
{
ctxt.SetTheResultToStaticCString("could not find ad");
return false;
}
else
{
r_top_left = t_ad->GetTopLeft();
return true;
}
}
void MCPickDoPickDateTime(MCExecContext& ctxt, MCStringRef p_current, MCStringRef p_start, MCStringRef p_end, int32_t *p_step, MCPickButtonType p_buttons, MCRectangle p_button_rect, int p_which)
{
MCDateTime t_current;
MCDateTime *t_current_ptr;
t_current_ptr = nil;
// PM-2015-09-01: [[ Bug 15844 ]] Allow calling mobilePickDate with empty [, current] [, start] [, end] parameters
// i.e. mobilePickDate "time",,,,10
if (!MCStringIsEmpty(p_current))
{
if (!MCD_convert_to_datetime(ctxt, p_current, CF_UNDEFINED, CF_UNDEFINED, t_current))
return;
t_current_ptr = &t_current;
}
MCDateTime t_start;
MCDateTime *t_start_ptr;
t_start_ptr = nil;
if (!MCStringIsEmpty(p_start))
{
if (!MCD_convert_to_datetime(ctxt, p_start, CF_UNDEFINED, CF_UNDEFINED, t_start))
return;
t_start_ptr = &t_start;
}
MCDateTime t_end;
MCDateTime *t_end_ptr;
t_end_ptr = nil;
if (!MCStringIsEmpty(p_end))
{
if (!MCD_convert_to_datetime(ctxt, p_end, CF_UNDEFINED, CF_UNDEFINED, t_end))
return;
t_end_ptr = &t_end;
}
int32_t t_step;
if (p_step != nil)
t_step = *p_step;
else
t_step = 1;
bool t_cancel_button, t_done_button;
t_cancel_button = false;
t_done_button = false;
switch (p_buttons)
{
case kMCPickButtonCancel:
t_cancel_button = true;
break;
case kMCPickButtonDone:
t_done_button = true;
break;
case kMCPickButtonCancelAndDone:
t_cancel_button = true;
t_done_button = true;
break;
case kMCPickButtonNone:
default:
break;
}
MCDateTime t_result;
bool t_cancelled;
t_cancelled = false;
bool t_success;
t_success = true;
MCAutoValueRef t_result_string;
// SN-2014-12-03: [[ Bug 14120 ]] If the picker has been cancelled, we should not try to convert the uninitialised t_result.
switch (p_which)
{
case kMCPickDate:
t_success = (MCSystemPickDate(t_current_ptr, t_start_ptr, t_end_ptr, t_cancel_button, t_done_button, &t_result, t_cancelled, p_button_rect)
&& (t_cancelled || MCD_convert_from_datetime(ctxt, t_result, CF_DATE, CF_UNDEFINED, &t_result_string)));
break;
case kMCPickTime:
t_success = (MCSystemPickTime(t_current_ptr, t_start_ptr, t_end_ptr, t_step, t_cancel_button, t_done_button, &t_result, t_cancelled, p_button_rect)
&& (t_cancelled || MCD_convert_from_datetime(ctxt, t_result, CF_TIME, CF_UNDEFINED, &t_result_string)));
break;
case kMCPickDateAndTime:
t_success = (MCSystemPickDateAndTime(t_current_ptr, t_start_ptr, t_end_ptr, t_step, t_cancel_button, t_done_button, &t_result, t_cancelled, p_button_rect)
&& (t_cancelled || MCD_convert_from_datetime(ctxt, t_result, CF_DATE, CF_TIME, &t_result_string)));
break;
default:
MCUnreachable();
}
if (t_success)
{
if (t_cancelled)
ctxt.SetTheResultToStaticCString("cancel");
else
ctxt . SetTheResultToValue(*t_result_string);
return;
}
ctxt . SetTheResultToEmpty();
}
