Function act_alter_database

src/gpre/sql.cpp:1108–1215

//

static act* act_alter_database()
{
	gpre_req* request = MSC_request(REQ_ddl);
	if (gpreGlob.isc_databases && !gpreGlob.isc_databases->dbb_next)
		request->req_database = gpreGlob.isc_databases;
	else
		PAR_error("Can only alter database in context of single database");

	PAR_get_token();

	// create action block
	act* action = MSC_action(request, ACT_alter_database);
	action->act_whenever = gen_whenever();
	gpre_dbb* database = (gpre_dbb*) MSC_alloc(DBB_LEN);
	action->act_object = (ref*) database;

	bool logdefined = false;	// this var was undefined

	while (true)
	{
		if (MSC_match(KW_DROP))
		{
			if (MSC_match(KW_LOG_FILE))
				; // ignore DROP LOG database->dbb_flags |= DBB_drop_log;
			else if (MSC_match(KW_CASCADE))
				; // ignore DROP CASCADE database->dbb_flags |= DBB_cascade;
			else
				PAR_error("only log file can be dropped");
		}
		else if (MSC_match(KW_ADD))
		{
			if (MSC_match(KW_FILE))
			{
				do {
					gpre_file* file = define_file();
					file->fil_next = database->dbb_files;
					database->dbb_files = file;
				} while (MSC_match(KW_FILE));
			}
			else if (MSC_match(KW_LOG_FILE))
			{
				if (logdefined)
					PAR_error("log redefinition");
				logdefined = true;
				if (MSC_match(KW_LEFT_PAREN))
				{
					while (true)
					{
						gpre_file* logfile = define_log_file();
						logfile->fil_next = database->dbb_logfiles;
						database->dbb_logfiles = logfile;
						if (!MSC_match(KW_COMMA))
						{
							EXP_match_paren();
							break;
						}
					}