Add core engine: tarot + astrology reading generator with CLI and i18n
Plain-C, dependency-free engine that produces a personalized daily Celtic Cross tarot spread and natal-chart/transit astrology reading, plus a standalone CLI (dist/deck-engine) and run.sh wrapper. Includes English/German output via a simple key=value translation format, and docs/diagrams describing the architecture and I/O.
This commit is contained in:
ml
@@ -0,0 +1,261 @@
|
||||
#include "tarot.h"
|
||||
#include "i18n.h"
|
||||
#include <stddef.h>
|
||||
#include <string.h>
|
||||
|
||||
/* Card meanings are condensed from A. E. Waite, The Pictorial Key to the
|
||||
* Tarot (1911), Part III §3 "The Greater Arcana and their Divinatory
|
||||
* Meanings" (public domain). Waite gives several alternative readings
|
||||
* for some cards; these keep his own wording, trimmed to the core
|
||||
* clauses. */
|
||||
typedef struct {
|
||||
const char *name;
|
||||
const char *image_file;
|
||||
const char *upright;
|
||||
const char *reversed;
|
||||
} TarotCardInfo;
|
||||
|
||||
static const TarotCardInfo k_cards[TAROT_DECK_SIZE] = {
|
||||
[CARD_FOOL] = {
|
||||
"The Fool", "RWS_Tarot_00_Fool.jpeg",
|
||||
"Folly, mania, extravagance, intoxication, delirium, frenzy.",
|
||||
"Negligence, absence, carelessness, apathy, nullity, vanity."
|
||||
},
|
||||
[CARD_MAGICIAN] = {
|
||||
"The Magician", "RWS_Tarot_01_Magician.jpeg",
|
||||
"Skill, diplomacy, address, subtlety; self-confidence, will.",
|
||||
"Physician, Magus, mental disease, disgrace, disquiet."
|
||||
},
|
||||
[CARD_HIGH_PRIESTESS] = {
|
||||
"The High Priestess", "RWS_Tarot_02_High_Priestess.jpeg",
|
||||
"Secrets, mystery, the future as yet unrevealed; silence, tenacity, wisdom, science.",
|
||||
"Passion, moral or physical ardour, conceit, surface knowledge."
|
||||
},
|
||||
[CARD_EMPRESS] = {
|
||||
"The Empress", "RWS_Tarot_03_Empress.jpeg",
|
||||
"Fruitfulness, action, initiative, length of days; also difficulty, doubt, ignorance.",
|
||||
"Light, truth, the unravelling of involved matters, public rejoicings; vacillation."
|
||||
},
|
||||
[CARD_EMPEROR] = {
|
||||
"The Emperor", "RWS_Tarot_04_Emperor.jpeg",
|
||||
"Stability, power, protection, realization; aid, reason, conviction, authority and will.",
|
||||
"Benevolence, compassion, credit; also confusion to enemies, obstruction, immaturity."
|
||||
},
|
||||
[CARD_HIEROPHANT] = {
|
||||
"The Hierophant", "RWS_Tarot_05_Hierophant.jpeg",
|
||||
"Marriage, alliance, captivity, servitude; by another account, mercy, goodness, inspiration.",
|
||||
"Society, good understanding, concord, over-kindness, weakness."
|
||||
},
|
||||
[CARD_LOVERS] = {
|
||||
"The Lovers", "RWS_Tarot_06_Lovers.jpeg",
|
||||
"Attraction, love, beauty, trials overcome.",
|
||||
"Failure, foolish designs; marriage frustrated, contrarieties of all kinds."
|
||||
},
|
||||
[CARD_CHARIOT] = {
|
||||
"The Chariot", "RWS_Tarot_07_Chariot.jpeg",
|
||||
"Succour, providence; also war, triumph, presumption, vengeance, trouble.",
|
||||
"Riot, quarrel, dispute, litigation, defeat."
|
||||
},
|
||||
[CARD_STRENGTH] = {
|
||||
"Strength", "RWS_Tarot_08_Strength.jpeg",
|
||||
"Power, energy, action, courage, magnanimity; complete success and honours.",
|
||||
"Despotism, abuse of power, weakness, discord, sometimes even disgrace."
|
||||
},
|
||||
[CARD_HERMIT] = {
|
||||
"The Hermit", "RWS_Tarot_09_Hermit.jpeg",
|
||||
"Prudence, circumspection; also, and especially, treason, dissimulation, roguery, corruption.",
|
||||
"Concealment, disguise, policy, fear, unreasoned caution."
|
||||
},
|
||||
[CARD_WHEEL_OF_FORTUNE] = {
|
||||
"Wheel of Fortune", "RWS_Tarot_10_Wheel_of_Fortune.jpeg",
|
||||
"Destiny, fortune, success, elevation, luck, felicity.",
|
||||
"Increase, abundance, superfluity."
|
||||
},
|
||||
[CARD_JUSTICE] = {
|
||||
"Justice", "RWS_Tarot_11_Justice.jpeg",
|
||||
"Equity, rightness, probity, executive; triumph of the deserving side in law.",
|
||||
"Law in all its departments, legal complications, bigotry, bias, excessive severity."
|
||||
},
|
||||
[CARD_HANGED_MAN] = {
|
||||
"The Hanged Man", "RWS_Tarot_12_Hanged_Man.jpeg",
|
||||
"Wisdom, circumspection, discernment, trials, sacrifice, intuition, divination, prophecy.",
|
||||
"Selfishness, the crowd, body politic."
|
||||
},
|
||||
[CARD_DEATH] = {
|
||||
"Death", "RWS_Tarot_13_Death.jpeg",
|
||||
"End, mortality, destruction, corruption; loss of a benefactor, or many contrarieties.",
|
||||
"Inertia, sleep, lethargy, petrifaction, somnambulism; hope destroyed."
|
||||
},
|
||||
[CARD_TEMPERANCE] = {
|
||||
"Temperance", "RWS_Tarot_14_Temperance.jpeg",
|
||||
"Economy, moderation, frugality, management, accommodation.",
|
||||
"Things connected with churches, religions, sects, the priesthood; disunion, competing interests."
|
||||
},
|
||||
[CARD_DEVIL] = {
|
||||
"The Devil", "RWS_Tarot_15_Devil.jpeg",
|
||||
"Ravage, violence, vehemence, extraordinary efforts, force, fatality.",
|
||||
"Evil fatality, weakness, pettiness, blindness."
|
||||
},
|
||||
[CARD_TOWER] = {
|
||||
"The Tower", "RWS_Tarot_16_Tower.jpeg",
|
||||
"Misery, distress, indigence, adversity, calamity, disgrace, deception, ruin; unforeseen catastrophe.",
|
||||
"The same in a lesser degree; also oppression, imprisonment, tyranny."
|
||||
},
|
||||
[CARD_STAR] = {
|
||||
"The Star", "RWS_Tarot_17_Star.jpeg",
|
||||
"Loss, theft, privation, abandonment; another reading says hope and bright prospects.",
|
||||
"Arrogance, haughtiness, impotence."
|
||||
},
|
||||
[CARD_MOON] = {
|
||||
"The Moon", "RWS_Tarot_18_Moon.jpeg",
|
||||
"Hidden enemies, danger, calumny, darkness, terror, deception, occult forces, error.",
|
||||
"Instability, inconstancy, silence, lesser degrees of deception and error."
|
||||
},
|
||||
[CARD_SUN] = {
|
||||
"The Sun", "RWS_Tarot_19_Sun.jpeg",
|
||||
"Material happiness, fortunate marriage, contentment.",
|
||||
"The same in a lesser sense."
|
||||
},
|
||||
[CARD_JUDGEMENT] = {
|
||||
"Judgement", "RWS_Tarot_20_Judgement.jpeg",
|
||||
"Change of position, renewal, outcome; another account specifies total loss through lawsuit.",
|
||||
"Weakness, pusillanimity, simplicity; also deliberation, decision, sentence."
|
||||
},
|
||||
[CARD_WORLD] = {
|
||||
"The World", "RWS_Tarot_21_World.jpeg",
|
||||
"Assured success, recompense, voyage, route, emigration, flight, change of place.",
|
||||
"Inertia, fixity, stagnation, permanence."
|
||||
},
|
||||
};
|
||||
|
||||
/* Position names and one-line descriptions follow Waite's own account
|
||||
* of "An Ancient Celtic Method of Divination" (Part III §7), in his
|
||||
* original drawing order. */
|
||||
typedef struct {
|
||||
const char *name;
|
||||
const char *description;
|
||||
} PositionInfo;
|
||||
|
||||
static const PositionInfo k_positions[TAROT_SPREAD_SIZE] = {
|
||||
[POSITION_PRESENT] = {
|
||||
"The Present",
|
||||
"This covers him: the general influence affecting the matter."
|
||||
},
|
||||
[POSITION_CHALLENGE] = {
|
||||
"The Challenge",
|
||||
"This crosses him: the nature of the obstacle in the matter."
|
||||
},
|
||||
[POSITION_CROWN] = {
|
||||
"The Crown",
|
||||
"This crowns him: the aim or ideal, the best that can be achieved."
|
||||
},
|
||||
[POSITION_FOUNDATION] = {
|
||||
"The Foundation",
|
||||
"This is beneath him: the basis of the matter, already actual."
|
||||
},
|
||||
[POSITION_RECENT_PAST] = {
|
||||
"The Recent Past",
|
||||
"This is behind him: the influence that is just passing away."
|
||||
},
|
||||
[POSITION_NEAR_FUTURE] = {
|
||||
"The Near Future",
|
||||
"This is before him: the influence now coming into action."
|
||||
},
|
||||
[POSITION_ATTITUDE] = {
|
||||
"Himself",
|
||||
"His position or attitude in the circumstances."
|
||||
},
|
||||
[POSITION_ENVIRONMENT] = {
|
||||
"His House",
|
||||
"His environment and the tendencies at work therein."
|
||||
},
|
||||
[POSITION_HOPES_AND_FEARS] = {
|
||||
"Hopes and Fears",
|
||||
"His hopes or fears in the matter."
|
||||
},
|
||||
[POSITION_OUTCOME] = {
|
||||
"The Outcome",
|
||||
"What will come: the final result of the matter."
|
||||
},
|
||||
};
|
||||
|
||||
/* Slugs used to build i18n.c lookup keys ("card.<slug>.name", etc.) -
|
||||
* translation files key off these, not the enum names, so renaming a C
|
||||
* enumerator never silently breaks a .lang file. */
|
||||
static const char *const k_card_slug[TAROT_DECK_SIZE] = {
|
||||
[CARD_FOOL] = "fool",
|
||||
[CARD_MAGICIAN] = "magician",
|
||||
[CARD_HIGH_PRIESTESS] = "high_priestess",
|
||||
[CARD_EMPRESS] = "empress",
|
||||
[CARD_EMPEROR] = "emperor",
|
||||
[CARD_HIEROPHANT] = "hierophant",
|
||||
[CARD_LOVERS] = "lovers",
|
||||
[CARD_CHARIOT] = "chariot",
|
||||
[CARD_STRENGTH] = "strength",
|
||||
[CARD_HERMIT] = "hermit",
|
||||
[CARD_WHEEL_OF_FORTUNE] = "wheel_of_fortune",
|
||||
[CARD_JUSTICE] = "justice",
|
||||
[CARD_HANGED_MAN] = "hanged_man",
|
||||
[CARD_DEATH] = "death",
|
||||
[CARD_TEMPERANCE] = "temperance",
|
||||
[CARD_DEVIL] = "devil",
|
||||
[CARD_TOWER] = "tower",
|
||||
[CARD_STAR] = "star",
|
||||
[CARD_MOON] = "moon",
|
||||
[CARD_SUN] = "sun",
|
||||
[CARD_JUDGEMENT] = "judgement",
|
||||
[CARD_WORLD] = "world",
|
||||
};
|
||||
|
||||
static const char *const k_position_slug[TAROT_SPREAD_SIZE] = {
|
||||
[POSITION_PRESENT] = "present",
|
||||
[POSITION_CHALLENGE] = "challenge",
|
||||
[POSITION_CROWN] = "crown",
|
||||
[POSITION_FOUNDATION] = "foundation",
|
||||
[POSITION_RECENT_PAST] = "recent_past",
|
||||
[POSITION_NEAR_FUTURE] = "near_future",
|
||||
[POSITION_ATTITUDE] = "attitude",
|
||||
[POSITION_ENVIRONMENT] = "environment",
|
||||
[POSITION_HOPES_AND_FEARS] = "hopes_and_fears",
|
||||
[POSITION_OUTCOME] = "outcome",
|
||||
};
|
||||
|
||||
static const char *card_field(const char *slug, const char *field, const char *fallback) {
|
||||
char key[64];
|
||||
strcpy(key, "card.");
|
||||
strcat(key, slug);
|
||||
strcat(key, ".");
|
||||
strcat(key, field);
|
||||
return i18n_get(key, fallback);
|
||||
}
|
||||
|
||||
static const char *position_field(const char *slug, const char *field, const char *fallback) {
|
||||
char key[64];
|
||||
strcpy(key, "position.");
|
||||
strcat(key, slug);
|
||||
strcat(key, ".");
|
||||
strcat(key, field);
|
||||
return i18n_get(key, fallback);
|
||||
}
|
||||
|
||||
const char *tarot_card_name(TarotCard card) {
|
||||
return card_field(k_card_slug[card], "name", k_cards[card].name);
|
||||
}
|
||||
|
||||
const char *tarot_card_image_file(TarotCard card) {
|
||||
/* Not translated - it's a filename, not display text. */
|
||||
return k_cards[card].image_file;
|
||||
}
|
||||
|
||||
const char *tarot_card_meaning(TarotCard card, bool reversed) {
|
||||
return card_field(k_card_slug[card], reversed ? "reversed" : "upright",
|
||||
reversed ? k_cards[card].reversed : k_cards[card].upright);
|
||||
}
|
||||
|
||||
const char *tarot_position_name(CelticCrossPosition position) {
|
||||
return position_field(k_position_slug[position], "name", k_positions[position].name);
|
||||
}
|
||||
|
||||
const char *tarot_position_description(CelticCrossPosition position) {
|
||||
return position_field(k_position_slug[position], "desc", k_positions[position].description);
|
||||
}
|
||||
Reference in New Issue
Block a user