#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#define CMDS_DEL        "."
#define CMDS_DEL_NL     ".\n"

#define MODE_CMD        1   
#define MODE_TEXT       2
#define MODE_END        3

#define CMD_BUFFER      1024
#define CMD_DELIMITER   ";"

#define CMD_PRINT       'p'
#define CMD_QUIT        'q'
#define CMD_APPENDS     'a'
#define CMD_REPLACE     'r'
#define CMD_DELETE      'd'
#define CMD_INSERT      'i'

int main (void) {
    char* buffer = NULL;
    int buffer_size = 0;
    int buffer_length = 0;
    int chars_read = 0;
    int program_mode = MODE_CMD;
    int line_number = 0;
    int char_pos = 0;
   
    char valid_cmds[CMD_BUFFER + 1] = {'\0'};
    char* all_cmds = NULL;
    char* cmd_line = NULL;
   
    int number = 0;
    int number_b = 0;
    char letter;
    char symbol;
    char commatilde;
    char* string = NULL;
   
    int skip_print = 0;
   
    do {
        chars_read = getline(&buffer, &buffer_size, stdin);
       
        if(chars_read < 1){
            break;
        }
       
        if(strcmp(buffer, CMDS_DEL) == 0 || strcmp(buffer, CMDS_DEL_NL) == 0){
            program_mode = program_mode + 1;
            continue;
        }
       
        if(program_mode == MODE_CMD){
           
            buffer_length = strlen(buffer);
            for(char_pos = 0; char_pos < buffer_length; char_pos++){
                    if(islower(buffer[char_pos])){
                        if(buffer[char_pos] == CMD_PRINT ||
                            buffer[char_pos] == CMD_QUIT ||
                            buffer[char_pos] == CMD_APPENDS ||
                            buffer[char_pos] == CMD_REPLACE ||
                            buffer[char_pos] == CMD_DELETE ||
                            buffer[char_pos] == CMD_INSERT ){
                                strcat(valid_cmds, buffer);
                                strcat(valid_cmds, CMD_DELIMITER);
                                break;
                        }
                   
                    program_mode  = MODE_END;
                    break;
                }
            }
        }
       
        if(program_mode == MODE_TEXT){
            skip_print = 0;
            line_number = line_number + 1;
            all_cmds = strdup(valid_cmds);
           
            for(cmd_line = strtok(all_cmds, CMD_DELIMITER); cmd_line != NULL; cmd_line = strtok(NULL, CMD_DELIMITER)){
           
                // most specific - 6 parameters, 2 of which are verified
                if(sscanf("%d%c%d%c%c%s", &number, &commatilde, &number_b, &symbol, &letter, string) == 6
                    && (commatilde == ',' || commatilde == '~')
                    && symbol == '!'){
                       
                    if(letter = CMD_APPENDS && (
                        (commatilde == ',' && number < line_number || line_number > number_b)
                        || (commatilde == '~' && (number != line_number && (line_number - number % number_b) > 0))
                    )){
                        strcat(buffer, "\n");
                        strcat(buffer, string);
                    }
                   
                    if(letter = CMD_REPLACE && (
                        (commatilde == ',' && number < line_number || line_number > number_b)
                        || (commatilde == '~' && (number != line_number && (line_number - number % number_b) > 0))
                    )){
                        strcpy(buffer, string);
                    }
                   
                    if(letter = CMD_INSERT && (
                        (commatilde == ',' && number < line_number || line_number > number_b)
                        || (commatilde == '~' && (number != line_number && (line_number - number % number_b) > 0))
                    )){
                        strcat(string, "\n");
                        strcat(string, buffer);
                        strcpy(buffer, string);
                    }
               
                // this is next cause it's 5, 2 of which are verified.
                }else if(sscanf("%d%c%d%c%c", &number, &commatilde, &number_b, &symbol, &letter) == 5
                    && (commatilde == ',' || commatilde == '~')
                    && symbol == '!'){
               
                    if(letter = CMD_PRINT && (
                        (commatilde == ',' && number < line_number || line_number > number_b)
                        || (commatilde == '~' && (number != line_number && (line_number - number % number_b) > 0))
                    )){
                        printf("%s", buffer);
                    }
                   
                    if(letter = CMD_DELETE && (
                        (commatilde == ',' && number < line_number || line_number > number_b)
                        || (commatilde == '~' && (number != line_number && (line_number - number % number_b) > 0))
                    )){
                        skip_print = 1;
                    }
               
                // then this because it's also 5, 1 of which is verified.
                }else if(sscanf("%d%c%d%c%s", &number, &commatilde, &number_b, &letter, string) == 5
                    && (commatilde == ',' || commatilde == '~')){   
                       
                    if(letter = CMD_APPENDS && (
                        (commatilde == ',' && number >= line_number && line_number <= number_b)
                        || (commatilde == '~' && (number == line_number || (line_number - number % number_b) == 0))
                    )){
                        strcat(buffer, "\n");
                        strcat(buffer, string);
                    }
                   
                    if(letter = CMD_REPLACE && (
                        (commatilde == ',' && number >= line_number && line_number <= number_b)
                        || (commatilde == '~' && (number == line_number || (line_number - number % number_b) == 0))
                    )){
                        strcpy(buffer, string);
                    }
                   
                    if(letter = CMD_INSERT && (
                        (commatilde == ',' && number >= line_number && line_number <= number_b)
                        || (commatilde == '~' && (number == line_number || (line_number - number % number_b) == 0))
                    )){
                        strcat(string, "\n");
                        strcat(string, buffer);
                        strcpy(buffer, string);
                    }
               
                // and then this which is 4 paramters, 1 of which is verified.
                // this and the one below shouldn't conflict cause of the verification in the same position.
                }else if(sscanf("%d%c%d%c", &number, &commatilde, &number_b, &letter) == 4
                    && (commatilde == ',' || commatilde == '~')){
                       
                    if(letter = CMD_PRINT && (
                        (commatilde == ',' && number >= line_number && line_number <= number_b)
                        || (commatilde == '~' && (number == line_number || (line_number - number % number_b) == 0))
                    )){
                        printf("%s", buffer);
                    }
                   
                    if(letter = CMD_DELETE && (
                        (commatilde == ',' && number >= line_number && line_number <= number_b)
                        || (commatilde == '~' && (number == line_number || (line_number - number % number_b) == 0))
                    )){
                        skip_print = 1;
                    }
               
                // and then this which is also 4, 1 of which is verified.
                // this and the one above shouldn't conflict cause of the verification in the same position.
                }else if(sscanf("%d%c%c%s", &number, &symbol, &letter, string) == 4
                    && symbol == '!'){
               
                    if(letter == CMD_APPENDS && number != line_number){
                        strcat(buffer, "\n");
                        strcat(buffer, string);
                    }
                   
                    if(letter == CMD_REPLACE && number != line_number){
                        strcpy(buffer, string);
                    }
                   
                    if(letter == CMD_INSERT && number == line_number){
                        strcat(string, "\n");
                        strcat(string, buffer);
                        strcpy(buffer, string);
                    }
               
                // this one's three paramters, one which we verify.
                }else if(sscanf("%d%c%c", &number, &symbol, &letter) == 3
                    && symbol == '!'){
                       
                    if(letter == CMD_PRINT && number != line_number){
                        printf("%s", buffer);
                    }
                   
                    if(letter == CMD_DELETE && number != line_number){
                        skip_print = 1;
                    }
               
                // and this one is three, none which we can verify, ergo, less specific.
                }else if(sscanf("%d%c%s", &number, &letter, string) == 3){
                   
                    if(letter == CMD_APPENDS && number == line_number){
                        strcat(buffer, "\n");
                        strcat(buffer, string);
                    }
                   
                    if(letter == CMD_REPLACE && number == line_number){
                        strcpy(buffer, string);
                    }
                   
                    if(letter == CMD_INSERT && number == line_number){
                        strcat(string, "\n");
                        strcat(string, buffer);
                        strcpy(buffer, string);
                    }
                   
                // this one is two. check the number is > 0 can be a verification, although
                // it's not strictly necessary.
                }else if(sscanf("%d%c", &number, &letter) == 2
                    && number > 0){
                       
                    if(letter == CMD_PRINT && number == line_number){
                        printf("%s", buffer);
                    }
                   
                    if(letter == CMD_QUIT && number == line_number){
                        program_mode = MODE_END;
                    }
                   
                    if(letter == CMD_DELETE && number == line_number){
                        skip_print = 1;
                    }

                // this one is also two, and we can verify the symbol.
                }else if(sscanf("%c%c", &symbol, &letter) == 2
                    && symbol == '!'){
               
                    if(letter == CMD_PRINT){
                        // well, if we don't print every line an additional time,
                        // then it just does what it normally does so this doesn't
                        // actually need to do anything?
                    }
                   
                    if(letter = CMD_DELETE){
                        // likewise, if we don't delete every line, then it acts
                        // normally and again, this doesn't do anything.
                        // I don't actually understand the point in !p and !d.
                    }
               
                // and this one is also two, with no verification.
                }else if(sscanf("%c%s", &letter, string) == 2){
               
                    if(letter == CMD_APPENDS){
                        strcat(buffer, "\n");
                        strcat(buffer, string);
                    }
                   
                    if(letter == CMD_REPLACE){
                        strcpy(buffer, string);
                    }
                   
                    if(letter == CMD_INSERT){
                        strcat(string, "\n");
                        strcat(string, buffer);
                        strcpy(buffer, string);
                    }   
               
                // and this one is one paramter, being least specific.
                }else if(sscanf("%c", &letter) == 1){
                   
                    if(letter == CMD_PRINT){
                        printf("%s", buffer);
                    }
                   
                    if(letter == CMD_QUIT){
                        program_mode = MODE_END;
                    }
                   
                    if(letter == CMD_DELETE){
                        skip_print = 1;
                    }
                   
                }
               
                if(skip_print == 0){
                    printf("%s", buffer);
                }
            }
           
        }
    } while(program_mode != MODE_END);
   
    return 0;
}