card.c

#include <stdlib.h>
#include "card.h"
#include "config.h"

struct card_t make_card(const enum cardrank rank, const enum cardsuit suit)
{
    struct card_t card;
    card.rank = rank;
    card.suit = suit;
    return card;
}

struct card_t find_lowest_card(const struct card_t *cards, const int num_cards)
{
    struct card_t lowest = cards[0];
    int i ;

    for (i = 1; i < num_cards; i++)
        if (card_cmp(&cards[i], &lowest) < 0)
            lowest = cards[i];

    return lowest;
}

int special_card(const struct card_t *card)
{
    switch(card->rank) {
    case TWO:   return TRUE;
    case SEVEN: return TRUE;
    case TEN:   return TRUE;
    default:    return FALSE;
    }
}

int card_cmp(const void *card1, const void *card2)
{   
    const struct card_t *icard1 = (const struct card_t *) card1;
    const struct card_t *icard2 = (const struct card_t *) card2;

    if (special_card(icard1) && special_card(icard2))
        return icard1->rank < icard2->rank;
    else if (special_card(icard1) && !special_card(icard2))
        return GT;
    else if (special_card(icard2))
        return LT;
    else if (icard1->rank == icard2->rank)
        return EQ;
    else if (icard1->rank < icard2->rank)
        return LT;
    else
        return GT ;
}

int cards_equal(const struct card_t *card1, const struct card_t *card2)
{
    return ((card1->rank == card2->rank) && (card1->suit == card2->suit));
}

int ranks_equal(const struct card_t *card1, const struct card_t *card2)
{
    return ((card1->rank == card2->rank));
}

int all_ranks_equal(const struct card_t *cards, const int num_cards)
{
    int i = 0;

    for (i = 1; i < num_cards; i++)
        if (!ranks_equal(&cards[i], &cards[0]))
            return FALSE;

    return TRUE ;
}

char* show_rank(const struct card_t *card)
{
    switch(card->rank) {
    case TWO:   return "TWO";
    case THREE: return "THREE";
    case FOUR:  return "FOUR";
    case FIVE:  return "FIVE";
    case SIX:   return "SIX";
    case SEVEN: return "SEVEN";
    case EIGHT: return "EIGHT";
    case NINE:  return "NINE";
    case TEN:   return "TEN";
    case JACK:  return "JACK";
    case QUEEN: return "QUEEN";
    case KING:  return "KING";
    case ACE:   return "ACE";
    default:    return "ERROR!!!";
    }
}

char* show_suit(const struct card_t *card)
{
    switch(card->suit) {
    case HEARTS:   return "HEARTS";
    case DIAMONDS: return "DIAMONDS";
    case CLUBS:    return "CLUBS";
    case SPADES:   return "SPADES";
    default:       return "ERROR!!!!";
    } 
}

void add_card_to_cards(struct card_t cards[], int *num_cards, 
    const struct card_t card)
{
    cards[*num_cards] = card; 
    (*num_cards)++;
}

void remove_card_from_cards(struct card_t cards[], int *num_cards, 
    const struct card_t *card)
{
    struct card_t result[*num_cards-1];
    int added = 0;
    int i;

    for(i = 0; i < *num_cards; i++) {
        if(!cards_equal(&cards[i], card)) {
            result[added] = cards[i];
            added++;    
        }
    }

    for(i = 0; i < added; i++)
        cards[i] = result[i];
    *num_cards = added;
}

void sort_cards(struct card_t *cards, const int num_cards) {
    qsort(cards, num_cards, sizeof(struct card_t), card_cmp);
}