static void process_create_schedule(const char * string, const jsmntok_t * tokens) { char zs[128]; char query[2048]; char uid[16], stp_indicator[2], tsc[16]; MYSQL_RES * result0; MYSQL_ROW row0; stats[ScheduleCreate]++; EXTRACT("CIF_stp_indicator", stp_indicator); if(stp_indicator[0] == 'C') return; EXTRACT("CIF_train_uid", uid); EXTRACT("schedule_start_date", zs); time_t start_date = parse_datestamp(zs); EXTRACT("schedule_end_date", zs); time_t end_date = parse_datestamp(zs); EXTRACT("CIF_train_service_code", tsc); sprintf(query, "SELECT id FROM cif_schedules WHERE CIF_stp_indicator = '%s' AND CIF_train_uid = '%s' AND schedule_start_date = %ld AND schedule_end_date = %ld AND CIF_train_service_code = '' AND update_id = %s", stp_indicator, uid, start_date, end_date, last_update_id); if(!db_query(query)) { result0 = db_store_result(); if((row0 = mysql_fetch_row(result0))) { sprintf(query, "UPDATE cif_schedules SET CIF_train_service_code = '%s' WHERE id = %s", tsc, row0[0]); db_query(query); stats[TSCUpdate]++; _log(GENERAL, "Updated schedule %s (%s %s) with TSC \"%s\".", row0[0], uid, stp_indicator, tsc); } mysql_free_result(result0); } }
static void process_update_schedule(const char * string, const jsmntok_t * tokens) { char query[1024], CIF_train_uid[16], schedule_start_date[16], schedule_end_date[16], CIF_stp_indicator[8]; dword id; MYSQL_RES * result0; MYSQL_ROW row0; EXTRACT("CIF_train_uid", CIF_train_uid); EXTRACT("schedule_start_date", schedule_start_date); EXTRACT("schedule_end_date", schedule_end_date); EXTRACT("CIF_stp_indicator", CIF_stp_indicator); time_t schedule_start_date_stamp = parse_datestamp(schedule_start_date); // time_t schedule_end_date_stamp = parse_datestamp(schedule_end_date); sprintf(query, "SELECT id FROM cif_schedules WHERE update_id = 0 AND CIF_train_uid = '%s' AND CIF_stp_indicator = '%s' AND schedule_start_date = %ld AND deleted > %ld", CIF_train_uid, CIF_stp_indicator, schedule_start_date_stamp, time(NULL)); if(!db_query(query)) { result0 = db_store_result(); word num_rows = mysql_num_rows(result0); if(num_rows != 1) { _log(MAJOR, "Update for schedule \"%s\" found %d existing records. Delete phase skipped.", CIF_train_uid, num_rows); jsmn_dump_tokens(string, tokens, 0); if(num_rows) stats[UpdateDeleteMulti]++; else stats[UpdateDeleteMiss]++; } else { row0 = mysql_fetch_row(result0); id = atol(row0[0]); //sprintf(query, "DELETE FROM cif_schedule_locations WHERE cif_schedule_id = %ld", id); //db_query(query); sprintf(query, "UPDATE cif_schedules SET deleted = %ld WHERE id = %ld", time(NULL), id); db_query(query); } mysql_free_result(result0); } // Create phase. process_create_schedule(string, tokens, true); _log(DEBUG, "Updated schedule \"%s\".", CIF_train_uid); }
static void process_create_schedule(const char * string, const jsmntok_t * tokens, const word update) { // update true indicates this is as the result of a VSTP update. char zs[128], zs1[128]; char query[2048]; word i; char uid[16], stp_indicator[2]; char signalling_id[8]; if(debug) jsmn_dump_tokens(string, tokens, 0); time_t now = time(NULL); sprintf(query, "INSERT INTO cif_schedules VALUES(0, %ld, %lu", now, NOT_DELETED); // update_id == 0 => VSTP EXTRACT_APPEND_SQL("CIF_bank_holiday_running"); //EXTRACT_APPEND_SQL("CIF_stp_indicator"); EXTRACT("CIF_stp_indicator", stp_indicator); sprintf(zs1, ", '%s'", stp_indicator); strcat(query, zs1); //EXTRACT_APPEND_SQL("CIF_train_uid"); EXTRACT("CIF_train_uid", uid); sprintf(zs1, ", '%s'", uid); strcat(query, zs1); EXTRACT_APPEND_SQL("applicable_timetable"); EXTRACT_APPEND_SQL("atoc_code"); // EXTRACT_APPEND_SQL("traction_class"); EXTRACT_APPEND_SQL("uic_code"); EXTRACT("schedule_days_runs", zs); for(i=0; i<7; i++) { strcat(query, ", "); strcat(query, (zs[i]=='1')?"1":"0"); } EXTRACT("schedule_end_date", zs); time_t z = parse_datestamp(zs); sprintf(zs1, ", %ld", z); strcat(query, zs1); EXTRACT("signalling_id", signalling_id); sprintf(zs1, ", '%s'", signalling_id); strcat(query, zs1); EXTRACT_APPEND_SQL("CIF_train_category"); EXTRACT_APPEND_SQL("CIF_headcode"); //EXTRACT_APPEND_SQL("CIF_course_indicator"); EXTRACT_APPEND_SQL("CIF_train_service_code"); EXTRACT_APPEND_SQL("CIF_business_sector"); EXTRACT_APPEND_SQL("CIF_power_type"); EXTRACT_APPEND_SQL("CIF_timing_load"); EXTRACT_APPEND_SQL("CIF_speed"); EXTRACT_APPEND_SQL("CIF_operating_characteristics"); EXTRACT_APPEND_SQL("CIF_train_class"); EXTRACT_APPEND_SQL("CIF_sleepers"); EXTRACT_APPEND_SQL("CIF_reservations"); EXTRACT_APPEND_SQL("CIF_connection_indicator"); EXTRACT_APPEND_SQL("CIF_catering_code"); EXTRACT_APPEND_SQL("CIF_service_branding"); EXTRACT("schedule_start_date", zs); z = parse_datestamp(zs); sprintf(zs1, ", %ld", z); strcat(query, zs1); EXTRACT_APPEND_SQL("train_status"); strcat(query, ", 0, '', '')"); // id filled by MySQL if(!db_query(query)) { stats[update?UpdateCreate:Create]++; } dword id = db_insert_id(); word index = jsmn_find_name_token(string, tokens, 0, "schedule_location"); word locations = tokens[index+1].size; huyton_flag = false; index += 2; for(i = 0; i < locations; i++) { index = process_create_schedule_location(string, tokens, index, id); } if(stp_indicator[0] == 'O' && (signalling_id[0] == '\0' || signalling_id[0] == ' ')) { // Search db for schedules with a deduced headcode, and add it to this one, status = D // Bug: Really this should also look for schedules with a signalling_id MYSQL_RES * result; MYSQL_ROW row; sprintf(query, "SELECT deduced_headcode FROM cif_schedules WHERE CIF_train_uid = '%s' AND deduced_headcode != '' AND schedule_end_date > %ld ORDER BY created DESC", uid, now - (64L * 24L * 60L * 60L)); if(!db_query(query)) { result = db_store_result(); if((row = mysql_fetch_row(result))) { sprintf(query, "UPDATE cif_schedules SET deduced_headcode = '%s', deduced_headcode_status = 'D' WHERE id = %ld", row[0], id); db_query(query); _log(DEBUG, "Deduced headcode \"%s\" applied to overlay schedule %ld, uid \"%s\".", row[0], id, uid); stats[HeadcodeDeduced]++; } else { _log(DEBUG, "Deduced headcode not found for overlay schedule %ld, uid \"%s\".", id, uid); } mysql_free_result(result); } } sprintf(query, "UPDATE status SET last_vstp_processed = %ld", now); db_query(query); if(huyton_flag) { _log(DEBUG, "Created schedule %ld%s. +++ Passes Huyton +++", id, update?" as a result of an Update transaction":""); } if(huyton_flag) { char title[64], message[512]; MYSQL_RES * result0; MYSQL_ROW row0; char stp[4]; sprintf(title, "Huyton Schedule Created."); sprintf(message, "Created schedule which passes Huyton."); if(update) strcat(message, " Due to a VSTP Update transaction."); strcat(message, "\n\n"); EXTRACT("CIF_train_uid", zs1); EXTRACT("CIF_stp_indicator", stp); sprintf(zs, "%ld (%s %s) ", id, zs1, stp); EXTRACT("signalling_id", zs1); strcat(zs, zs1); sprintf(query, "SELECT tiploc_code, departure FROM cif_schedule_locations WHERE record_identity = 'LO' AND cif_schedule_id = %ld", id); if(!db_query(query)) { result0 = db_store_result(); if((row0 = mysql_fetch_row(result0))) { sprintf(zs1, " %s %s to ", show_time_text(row0[1]), tiploc_name(row0[0])); strcat(zs, zs1); } mysql_free_result(result0); } sprintf(query, "SELECT tiploc_code FROM cif_schedule_locations WHERE record_identity = 'LT' AND cif_schedule_id = %ld", id); if(!db_query(query)) { result0 = db_store_result(); if((row0 = mysql_fetch_row(result0))) { strcat (zs, tiploc_name(row0[0])); } mysql_free_result(result0); } strcat(message, zs); sprintf(query, "SELECT schedule_start_date, schedule_end_date, CIF_stp_indicator FROM cif_schedules WHERE id = %ld", id); if(!db_query(query)) { result0 = db_store_result(); if((row0 = mysql_fetch_row(result0))) { dword from = atol(row0[0]); dword to = atol(row0[1]); if(from == to) { strcat(message, " Runs on "); strcat(message, date_text(from, true)); } else { strcat(message, " Runs from "); strcat(message, date_text(from, true)); strcat(message, " to "); strcat(message, date_text(to, true)); } if(row0[2][0] == 'C') strcat(message, " CANCELLED"); strcat(message, "\n"); } mysql_free_result(result0); } sprintf(query, "SELECT departure, arrival, pass, tiploc_code FROM cif_schedule_locations WHERE (tiploc_code = 'HUYTON' OR tiploc_code = 'HUYTJUN') AND cif_schedule_id = %ld", id); if(!db_query(query)) { result0 = db_store_result(); while((row0 = mysql_fetch_row(result0))) { char where[32], z[128]; if(row0[3][4] == 'J') strcpy(where, "Huyton Junction"); else strcpy(where, "Huyton"); if(row0[0][0]) { sprintf(z, "Depart %s at %s.\n", where, row0[0]); strcat(message, z); } else if(row0[1][0]) { sprintf(z, "Arrive %s at %s.\n", where, row0[1]); strcat(message, z); } else if(row0[2][0]) { sprintf(z, "Pass %s at %s.\n", where, row0[2]); strcat(message, z); } } mysql_free_result(result0); } email_alert(NAME, BUILD, title, message); } }
static void process_delete_schedule(const char * string, const jsmntok_t * tokens) { char query[1024], CIF_train_uid[16], schedule_start_date[16], schedule_end_date[16], CIF_stp_indicator[8]; dword id; word update_id; MYSQL_RES * result0; MYSQL_ROW row0; word deleted = 0; EXTRACT("CIF_train_uid", CIF_train_uid); EXTRACT("schedule_start_date", schedule_start_date); EXTRACT("schedule_end_date", schedule_end_date); EXTRACT("CIF_stp_indicator", CIF_stp_indicator); time_t schedule_start_date_stamp = parse_datestamp(schedule_start_date); time_t schedule_end_date_stamp = parse_datestamp(schedule_end_date); // Find the id sprintf(query, "SELECT id, update_id FROM cif_schedules where CIF_train_uid = '%s' and schedule_start_date = '%ld' and schedule_end_date = %ld and CIF_stp_indicator = '%s' AND update_id = 0 AND deleted > %ld", CIF_train_uid, schedule_start_date_stamp, schedule_end_date_stamp, CIF_stp_indicator, time(NULL)); // DO WE NEED DAYS RUNS AS WELL???? // Note: Only find VSTP ones. if (db_query(query)) { db_disconnect(); return; } result0 = db_store_result(); word num_rows = mysql_num_rows(result0); if(num_rows > 1) { char zs[256]; sprintf(zs, "Delete schedule found %d matches.", num_rows); _log(MAJOR, zs); jsmn_dump_tokens(string, tokens, 0); stats[DeleteMulti]++; // Bodge! query[7] = '*'; query[8] = ' '; dump_mysql_result_query(query); } while((row0 = mysql_fetch_row(result0)) && row0[0]) { id = atol(row0[0]); update_id = atoi(row0[1]); //sprintf(query, "DELETE FROM cif_schedule_locations WHERE cif_schedule_id = %ld", id); //if(!db_query(query)) //{ //} sprintf(query, "UPDATE cif_schedules SET deleted = %ld where id = %ld", time(NULL), id); if(!db_query(query)) { deleted++; if(update_id) { // Can never happen! _log(MAJOR, "Deleted non-VSTP schedule %ld.", id); } else { _log(DEBUG, "Deleted VSTP schedule %ld \"%s\".", id, CIF_train_uid); } } } mysql_free_result(result0); if(deleted) { stats[DeleteHit]++; } else { _log(MAJOR, "Delete schedule miss."); jsmn_dump_tokens(string, tokens, 0); stats[DeleteMiss]++; } }
static void process_trust_0001(const char * const string, const jsmntok_t * const tokens, const int index) { char zs[128], zs1[128], report[1024]; char train_id[64], train_uid[64]; char query[1024]; dword cif_schedule_id; MYSQL_RES * result0; MYSQL_ROW row0; sprintf(report, "Activation message:"); jsmn_find_extract_token(string, tokens, index, "train_id", train_id, sizeof(train_id)); sprintf(zs1, " train_id=\"%s\"", train_id); strcat(report, zs1); jsmn_find_extract_token(string, tokens, index, "schedule_start_date", zs, sizeof(zs)); time_t schedule_start_date_stamp = parse_datestamp(zs); sprintf(zs1, " schedule_start_date=\"%s\" %ld", zs, schedule_start_date_stamp); strcat(report, zs1); jsmn_find_extract_token(string, tokens, index, "schedule_end_date", zs, sizeof(zs)); time_t schedule_end_date_stamp = parse_datestamp(zs); sprintf(zs1, " schedule_end_date=\"%s\" %ld", zs, schedule_end_date_stamp); strcat(report, zs1); jsmn_find_extract_token(string, tokens, index, "train_uid", train_uid, sizeof(train_uid)); sprintf(zs1, " train_uid=\"%s\"", train_uid); strcat(report, zs1); jsmn_find_extract_token(string, tokens, index, "schedule_source", zs, sizeof(zs)); sprintf(zs1, " schedule_source=\"%s\"", zs); strcat(report, zs1); jsmn_find_extract_token(string, tokens, index, "schedule_wtt_id", zs, sizeof(zs)); sprintf(zs1, " schedule_wtt_id=\"%s\"", zs); strcat(report, zs1); // Bodge. The ORDER BY here will *usually* get the correct one out first! // Idea: If we store and index on cif_train_uid, we can guarantee to get the right one. sprintf(query, "select id from cif_schedules where cif_train_uid = '%s' AND schedule_start_date = %ld AND schedule_end_date = %ld AND deleted > %ld ORDER BY LOCATE(CIF_stp_indicator, 'OCPN')", train_uid, schedule_start_date_stamp, schedule_end_date_stamp, time(NULL)); if(!db_query(query)) { result0 = db_store_result(); word num_rows = mysql_num_rows(result0); sprintf(zs, " Schedule hit count %d. Message contents:", num_rows); strcat(report, zs); if(num_rows < 1) { stats[Mess1Miss]++; _log(MINOR, report); time_t now = time(NULL); sprintf(query, "INSERT INTO trust_activation VALUES(%ld, '%s', %ld, 0)", now, train_id, 0L); db_query(query); jsmn_dump_tokens(string, tokens, index); } else { row0 = mysql_fetch_row(result0); cif_schedule_id = atol(row0[0]); time_t now = time(NULL); sprintf(query, "INSERT INTO trust_activation VALUES(%ld, '%s', %ld, 0)", now, train_id, cif_schedule_id); db_query(query); } mysql_free_result(result0); } return; }