#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/msg.h>
#include <signal.h>
#include <sys/wait.h>
#include <unistd.h>

struct Message
{
    long type;
    long long x[2];
};

int main(int argc, char *argv[])
{
    struct Message mesg;
    int key = strtol(argv[1], NULL, 10);
    int msg = msgget(key, 0666 | IPC_CREAT);
    int n = strtol(argv[2], NULL, 10);
    long long maxval = strtol(argv[5], NULL, 10);
    int *pid = calloc(n, sizeof(*pid));
    mesg.x[0] = strtol(argv[3], NULL, 10);
    mesg.x[1] = strtol(argv[4], NULL, 10);
    mesg.type = 1;

    for(int i = 0; i < n; i++) {
        if ((pid[i] = fork()) == -1) {
            for(int j = 0; j < i; i++) {
                kill(pid[j], SIGKILL);
            }
            while (wait(NULL) != -1);
            msgctl(msg, IPC_RMID, 0);
            free(pid);
            _exit(1);
        }
        if (!pid[i]) {
            while (1) {
                if (msgrcv(msg, &mesg, sizeof(mesg.x), i + 1, 0) == -1) {
                    free(pid);
                    _exit(0);
                }
                long long x0 = mesg.x[0];
                mesg.x[0] = mesg.x[1];
                mesg.x[1] = x0 + mesg.x[1];
                printf("%d %lld\n", i, mesg.x[1]);
                fflush(stdout);
                if (mesg.x[1] > maxval) {
                    msgctl(msg, IPC_RMID, 0);
                    _exit(0);
                } else {
                    mesg.type = mesg.x[1] % n + 1;
                    msgsnd(msg, &mesg, sizeof(mesg.x), 0);
                }
            }
            _exit(0);
        }
    }
    msgsnd(msg, &mesg, sizeof(mesg.x), 0);
    while(wait(NULL) != -1);
    msgctl(msg, IPC_RMID, 0);
    free(pid);
    return 0;
}