libtthimage/Tools/tga_incrust.c

140 lines
3.6 KiB
C

/*
# # # #### ##### # # #### ##### ## ##### # #### # #
# ## # # # # # # # # # # # # # # # ## #
# # # # # # # # # #### # # # # # # # # # #
# # # # # ##### # # # # ###### # # # # # # #
# # ## # # # # # # # # # # # # # # # # ##
# # # #### # # #### #### # # # # # #### # #
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "tga_outils.h"
/*::------------------------------------------------------------------::*/
#define ICRU_POKE 2
#define ICRU_POKEMIX 3
#define ICRU_POKEALPHA 4
#define ICRU_POKESCALE 10
#define ICRU_RGBXOR 20
#define ICRU_RECT 30
#define ICRU_RECT2 32
mot_clef mots_clef[] =
{
{ "poke", ICRU_POKE, "ii", "poke it hardly" },
{ "pokemix", ICRU_POKEMIX, "iii", "ponderate it" },
{ "pokealpha", ICRU_POKEALPHA, "ii", "use the alpha channel" },
{ "pokescale", ICRU_POKESCALE, "ii%", "scale before poking" },
{ "rgbxor", ICRU_RGBXOR, "ii", "exclusive OR of poked pix" },
{ "rect", ICRU_RECT, "iir", "only a part of 'what'" },
{ "rect2", ICRU_RECT2, "iir", "only a part of 'what'" },
{ NULL, 0, "WTF", NULL },
};
/*::------------------------------------------------------------------::*/
int usage(int flag)
{
fprintf(stderr, "* TGA incrustator v 0.1.3 [%s] %s \n",
TGA_OUTILS_VERSION, TGA_OUTILS_COPYLEFT);
fprintf(stderr, " compiled %s at %s\n", __DATE__, __TIME__);
fprintf(stderr, "usage:\n\ttga_incrust orig insert mode out\n");
if (flag) {
Image_print_version(0);
liste_mots_clefs(mots_clef, 42);
}
exit(0);
}
/*::------------------------------------------------------------------::*/
/*
* argv[1] image originale
* argv[2] image a incruster
* argv[3] type d'incrustation
* argv[4] image destination
*/
#define FIRST_PARAM 5
int main(int argc, char *argv[])
{
Image_Desc *where, *what;
int foo, idx;
int xpos, ypos;
int commande, nbargs;
dump_command_line(argc, argv, 0);
if (argc==2 && !strcmp(argv[1], "-?")) usage(0);
if (argc==2 && !strcmp(argv[1], "list")) usage(1);
if (argc < 4) usage(1);
#if DEBUG_LEVEL
if (must_be_verbose())
{
fprintf(stderr, "********************************\n");
fprintf(stderr, "* EXPERIMENTAL CORE DUMPER *\n");
fprintf(stderr, "********************************\n");
}
#endif
idx = cherche_mot_clef(argv[3], mots_clef, &commande, &nbargs);
if (idx < 0) {
fprintf(stderr, "tga_incrust: mot-clef '%s' inconnu...\n", argv[3]);
exit (5);
}
if ( (argc-nbargs) != FIRST_PARAM ) {
fprintf(stderr, "%s: bad number of parameters\n", argv[0]);
#if DEBUG_LEVEL
fprintf(stderr, "argc=%d nbargs=%d FIRST_PARAM=%d\n",
argc, nbargs, FIRST_PARAM);
#endif
exit(5);
}
/* analyse des parametres */
idx = 0;
foo = parse_parametres(argc, argv, mots_clef[idx].ptypes, FIRST_PARAM);
#if DEBUG_LEVEL
fprintf(stderr, "parse params -> %d\n", foo);
#endif
if (NULL==(where=Image_TGA_alloc_load(argv[1]))) {
fprintf(stderr, "can't load %s\n", argv[1]);
exit(2);
}
if (NULL==(what=Image_TGA_alloc_load(argv[2]))) {
fprintf(stderr, "can't load %s\n", argv[2]);
exit(2);
}
switch (commande)
{
case ICRU_POKE:
xpos = GIP(0); ypos = GIP(1);
foo = Image_overlay(what, where, xpos, ypos);
if (foo) fprintf(stderr, "overlay -> %d\n", foo);
break;
default:
fprintf(stderr, "%d command not implemented\n", commande);
exit(1);
}
Image_DeAllocate(what); free(what);
foo = Image_TGA_save(argv[4], where, 0);
if (foo) {
fprintf(stderr, "save -> %d\n", foo);
}
Image_DeAllocate(where); free(where);
return 0;
}