//Set 'char *hand[13] values to "FF"
void FF_hand(char *hand[]){
int i =0;
while(i < 3) FF_trick(&hand[(i++)*4]);
FF_trick(&hand[9]);
}
// from UDP made simple at https://www.abc.se/~m6695/udp.html
int main(int argc, char *argv[]) {
struct sockaddr_in si_me, si_oth,si_other[4];
int s, sockFd[4];
socklen_t slen=sizeof(struct sockaddr_in);
ssize_t len;
FILE *fd;
fd = fopen("/var/tmp/serve_client","w");
char buf[BUFLEN]={"start"};
char *trick[4];
FF_trick(trick);
//Game initiation, shuffling and dealing.
Card sorted_deck[52];
Card shuffled_deck[52];
char *deck[52];
new_deck(sorted_deck);
shuffle_deck(sorted_deck,shuffled_deck);
convert_card_struct(shuffled_deck,deck,buf);
Game *game = malloc(sizeof(Game));
memcpy(game->deck,deck,sizeof(deck));
for (int k = 0; k < 4; k++) memcpy(game->buffer[k],buf, sizeof(buf));
for (int k = 0; k < 4; k++) printf("Shuffled deck: \n%s\n\n",game->buffer[k]);
//get communication going
if ((s=socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP))==-1)
diep("socket");
printf("socket open\n");
memset((char *) &si_me, 0, sizeof(si_me));
si_me.sin_family = AF_INET;
si_me.sin_port = htons(GAMEPORT);
si_me.sin_addr.s_addr = htonl(INADDR_ANY);
if (bind(s, (struct sockaddr *) &si_me, sizeof(si_me))==-1)
diep("bind");
printf("bound\n");
//Player initiation
int counter[4];
for(int i=0;i<4;i++){
counter[i] = i;
}
pthread_t players[4];
for(int i=0;i<4;i++){
pthread_t tmp=0;
players[i] = tmp;
}
//Player thread arguments are initiated
Player player[4];
for(int i=0;i<4;i++){
memset((char *) &si_other[i], 0, sizeof(si_other[i]));
Player tmp={i,&s,game,&si_me,&si_other[i]};
memcpy(&player[i], (void *) &tmp, sizeof(tmp));
}
//deal cards into each player's game buffer
for (int k = 0; k < 4; k++) {
sprintf(player[k].game->buffer[k],"%s;",game->deck[k]);
for(int j=4;j<52;j+=4) {
strcat(player[k].game->buffer[k], game->deck[(j+k)]);
strcat(player[k].game->buffer[k],";");
}
printf("Player %d game buffer: %s\n",k,player[k].game->buffer[k]);
}
for (int k = 0; k < 4; k++)printf("Player %d game buffer: %s\n",k,player[k].game->buffer[k]);
//deal cards into player hands
for (int k = 0; k < 4; k++) {
for(int j=0;j<52;j+=4) {
player[k].game->hands[k][j/4] = malloc(3);
strcpy(player[k].game->hands[k][j/4], game->deck[(j+k)]);
}
}
/* print hands
for (int k = 0; k < 4; k++) {
printf("Player %d game hand: ", k);
for (int l = 0; l < 13; l++) {
printf("%s ", player[k].game->hands[k][l]);
}
printf("\n");
}*/
int j=0,connected=0;
void *buffer = (void *) strdup(buf);
bool connections[]={false,false,false,false};
char *this_is_my_pos[4];
do{
printf("inet: %s\tsocket descriptor: %d\n\n",
inet_ntoa(player[j].si_other->sin_addr),
player[j].sockfd);
if((len = recvfrom(s, buffer, BUFLEN, 0, &si_oth, &slen)) == -1) diep("recvfrom()");
//check given position
separate_strings(buffer,";",this_is_my_pos,4);
if((j=find_DD(this_is_my_pos,4))== -1) printf("not a new connection\n");
if(j < 4 && j >= 0 && !connections[j]){
//In preparation for threads
sockFd[j]= s;
player[j].sockfd = &sockFd[j];
strcpy(si_other[j].sin_zero,si_oth.sin_zero);
si_other[j].sin_addr.s_addr=si_oth.sin_addr.s_addr;
si_other[j].sin_port=si_oth.sin_port;
si_other[j].sin_family=si_oth.sin_family;
player[j].si_other = &si_other[j];
printf("pthread to addr: %d\n",si_oth.sin_addr.s_addr);
//pthread_create(&players[j],NULL,&player_waits_or_plays,(void *) &player[j]);
//Signal that four clients are connected
connections[j]=true;
connected += 1;
} else perror("not a new connection\n");
printf("Received packet from IP-address: %s: Port: %d\nPosition: %d\nData: %s\nLength: %d\n",
inet_ntoa(si_oth.sin_addr), ntohs(si_oth.sin_port),
j,
(char *) buffer,(int) len);
//strängen delas upp i fyra
separate_strings(buffer,";",trick,4);
printf("received split into: %s",trick[0]);
for(int i=1;i<4;i++) printf(" %s",trick[i]);
//skicka första handen
printf("\nSending packet: \n%s\nto player %d\n", game->buffer[j],j);
if (sendto(s, game->buffer[j], 200, 0, (struct sockaddr *) &si_oth, slen)==-1)
diep("sendto()");
} while (connected<4);
int starter=0;
// Här börjar spelet, första handen har skickats till klienterna. Vem börjar?
starter=who_starts(game->hands);
int winner=-1;
printf("player %d starts\n", starter);
EE_trick(trick,starter);
printf("Winner: %d\n", winner=check_winner(trick,starter));
EE_trick(trick,starter);
EE_trick(game->trick,starter);
// Lägg nu sticket i fyra buffertar, en till varje spelare (overkill!)
for (int m = 0; m < 4; m++) {
for (int k = 0; k < 4; k++) {
if (!k) sprintf(player[m].game->buffer[m], "%s;", trick[0]);
else {
strcat(game->buffer[m], trick[k]);
strcat(game->buffer[m], ";");
}
printf("Game buffer: %s\n", game->buffer[m]);
}
}
for (int k = 0; k < 4; k++)printf("Player %d game buffer: %s\n",k,player[k].game->buffer[k]);
for (int l = 0; l < 4; l++) {
if ((len = recvfrom(s, buffer, BUFLEN, 0, (struct sockaddr *) &si_oth, &slen)) == -1)
diep("recvfrom()");
if (si_other[l].sin_addr.s_addr == si_oth.sin_addr.s_addr) {
if (sendto(s, game->buffer[l], sizeof(game->buffer[l]), 0, (struct sockaddr *) &si_other[l],
slen) == -1)
diep("sendto()");
printf("Skickar %s till spelare %d\n",game->buffer[l], player[l].pos);
}
}
/*for (int l = 0; l < 4; l) {
if((len = recvfrom(s, buffer, BUFLEN, 0, (struct sockaddr *) &si_oth, &slen)) == -1) diep("recvfrom()");
}*/
int o=0;
do{
if((len = recvfrom(s, buffer, BUFLEN, 0, (struct sockaddr *) &si_oth, &slen)) == -1) diep("recvfrom()");
printf("from addr: %d\n",si_oth.sin_addr.s_addr);
if ((strstr(buffer,"00"))) {
for (int m = 0; m < 4; m++) {
sprintf(player[m].game->buffer[m], "%s;", buffer);
printf("Buffer written: %s\n", buffer);
}
for (int l = 0; l < 4; l++) {
if (si_other[l].sin_addr.s_addr == si_oth.sin_addr.s_addr) {
if (sendto(s, game->buffer[l], sizeof(game->buffer[l]), 0,
(struct sockaddr *) &si_other[l],
slen) == -1)
diep("sendto()");
printf("Skickar %s till spelare %d\n", buffer, player[l].pos);
//pthread_create(&players[l], NULL, &player_waits_or_plays, (void *) &player[l]);
}
}
}
} while (!(strstr(buffer,"00")));
void *new_buffer;
void *best_buffer;
new_buffer = malloc(40);
best_buffer = malloc(40);
int FFs=0, best_count=4;
// så länge första handen spelas vill vi jämföra skickade händer med mottagna händer
while(strstr(buffer, "00") && strstr(buffer,"FF")){
if((len = recvfrom(s, new_buffer, BUFLEN, 0, (struct sockaddr *) &si_oth, &slen)) == -1) diep("recvfrom()");
//Vill du ha hela din hand igen?
if(strstr((char*) new_buffer, "DD")){
for (int i = 0; i < 4; i++) {
if(si_oth.sin_addr.s_addr==player[i].si_other->sin_addr.s_addr){
if (sendto(s, game->hands[i],
sizeof(game->hands[i]), 0,
(struct sockaddr *) &si_other[i],
slen) == -1) diep("sendto()");
// inga onödiga loopar!
break;
}
}
//tillbaka till att ta emot igen!
continue;
}
else if((strcmp((char *) buffer, (char *) new_buffer)) && !(strstr(new_buffer, "EE"))) {
printf("Gammalt stick: %s\nUppdaterat stick: %s",(char*) buffer, (char*) new_buffer);
char *tmp = strdup(new_buffer);
if((FFs= count_FF(tmp)) < best_count) best_count = FFs;
else continue; // skriv inte över sticket om det inte nästa kort spelats
strcpy((char*)buffer, new_buffer);
split((char*) buffer,';',game->trick);
//bufferten måste återställas efter split()
strcpy((char*)buffer, new_buffer);
printf("\nkontroll av pekare: : \n");
for (int i = 0; i < 4; i++) printf("trick %d: %s\n",i,game->trick[i]);
for (int i = 0; i < 4; i++) printf("trick %d: %s\n",i,game->trick[i]);
for (int l = 0; l < 4; l++){
strcpy(game->buffer[l],new_buffer);
if (sendto(s, game->buffer[l], sizeof(game->buffer[l]), 0,
(struct sockaddr *) &si_other[l], slen) == -1)
diep("sendto()");
else printf("Precis skickat %s till spelare %d\n",game->buffer[l], player[l].pos);
}
}
}
assert(!strstr(game->buffer[0],"FF"));
split(game->buffer[0],';',trick);
//Ta reda på vem som vann sticket
//int winner=-1;
printf("Winner: %d\n", winner=check_winner(trick,starter));
// Jag räknar med att klienten ställer frågor om sticket
EE_trick(trick,winner);
EE_trick(game->trick,winner);
// Förmodligen börjar en do-while-loop här som kör så länge
// Switch-sats beroende på
/*while(strcmp(buffer,"quit")){
printf("buffer: %s \n",player[j].game->buffer);
if ((len = recvfrom(s, buffer, BUFLEN, 0, &si_oth, &slen)) == -1) diep("recvfrom()");
printf("Received packet from %s:%d\nData: %s\nLength: %d\n",
inet_ntoa(si_oth.sin_addr), ntohs(si_oth.sin_port), (char *) buffer,len);
*/ //counter[j] = pthread_create(&players[j], NULL, &player_waits_or_plays, (void *) &player[j]);
//pthread_join((players[j]),NULL);
printf("\nclient data: %s \n",buffer);
separate_strings(buffer,";",trick,4);
printf("received split into: %s",trick[0]);
for(int i=1;i<4;i++) printf(" %s",trick[i]);
printf("\n");
/* //Receive data and start game threads for each client
for(int j=0;j<4;j++) {
if ((len = recvfrom(player[j].sockfd, player[j].game->buffer, BUFLEN, 0, &si_other[i], &slen)) == -1) diep("recvfrom()");
counter[j++] = pthread_create(&players[j], NULL, &player_waits_or_plays, (void *) &player[j]);
printf("Received packet from %s:%d\nData: %s\nLength: %d\n",
inet_ntoa(si_other[i].sin_addr), ntohs(si_other[i].sin_port), (char *) buffer,len);
}
// Jag försöker föra över detta till trådarna--------------------//
char cards_to_send[40];
i=0;
sprintf(cards_to_send,"%s;",player[i].game->deck[player[i].pos]);
for(int j=4;j<52;j+=4) {
strcat(cards_to_send, player[i].game->deck[player[i].pos+j]);
strcat(cards_to_send,";");
}
printf("Sending packet2: \n%s\n", cards_to_send);
if (sendto(s, cards_to_send, 40, 0, (struct sockaddr *) &si_other[i], slen)==-1)
diep("sendto()");
int k=0;
*/
close(s);
return 0;
}
