src/mark.c

   1 #include <stdio.h>
   2 #include <string.h>
   3 #include <stdlib.h>
   4 #include <unistd.h>
   5 #include "mark.h"
   6 #include "yuv.h"
   7 #include "dir_seperator.h"
   8
   9 //extern "C" void save_palette(const char *filename);
  10 //extern "C" void load_palette(const char *filename);
  11
  12 struct mark_palette mark_palette[255];
  13
  14 /* save palette */
  15 void save_palette(const char *filename)
  16 {
  17         char name[256];
  18         FILE *fp;
  19         int i;
  20
  21         sprintf(name, "%s_palette", filename);
  22 //      printf("saving palette '%s'\n", name);
  23         fp = fopen(name, "w");
  24         if (!fp) {
  25                 printf("failed to save palette '%s'\n", name);
  26                 return;
  27         }
  28         for (i = 0; i < 255; i++)
  29                 fprintf(fp, "%03d %03d %03d \"%s\" %f %f\n", mark_palette[i].r, mark_palette[i].g, mark_palette[i].b, mark_palette[i].name, mark_palette[i].bright, mark_palette[i].contrast);
  30         fprintf(fp, "blacklevel %f\n", black_level);
  31         fprintf(fp, "whitelevel %f\n", white_level);
  32         fprintf(fp, "fadelevel %f\n", fade_level);
  33         fprintf(fp, "yuv_mod %d\n", yuv_mod);
  34         fclose(fp);
  35 }
  36
  37 /* load palette */
  38 int load_palette(const char *filename)
  39 {
  40         char name[256];
  41         char line[256],*p,*q;
  42         FILE *fp;
  43         int i;
  44         int r, g, b;
  45         float bright = 0, contrast = 1;
  46
  47         sprintf(name, "%s_palette", filename);
  48 //      printf("loading palette '%s'\n", name);
  49         fp = fopen(name, "r");
  50         if (!fp) {
  51                 printf("palette setting '%s' does not (yet) exists\n", name);
  52                 return -1;
  53         }
  54         for (i = 0; ; i++) {
  55                 if (!fgets(line, sizeof(line), fp))
  56                         break;
  57                 line[sizeof(line)-1] = '\0';
  58                 if (line[0]) line[strlen(line)-1] = '\0';
  59                 if (line[0] && line[strlen(line)-1] == '\r') line[strlen(line)-1] = '\0';
  60
  61                 /* check for special attrs */
  62                 if (!strncmp(line, "blacklevel ", 11)) {
  63                         p = line + 11;
  64                         sscanf(p, "%lf", &black_level);
  65                         continue;
  66                 }
  67                 if (!strncmp(line, "whitelevel ", 11)) {
  68                         p = line + 11;
  69                         sscanf(p, "%lf", &white_level);
  70                         continue;
  71                 }
  72                 if (!strncmp(line, "fadelevel ", 10)) {
  73                         p = line + 10;
  74                         sscanf(p, "%lf", &fade_level);
  75                         continue;
  76                 }
  77                 if (!strncmp(line, "yuv_mod ", 8)) {
  78                         p = line + 8;
  79                         sscanf(p, "%d", &yuv_mod);
  80                         continue;
  81                 }
  82
  83                 /* read palette */
  84                 if (i == 256)
  85                         break;
  86                 sscanf(line, "%d %d %d", &r, &g, &b);
  87                 if (!(p = strchr(line, '\"')))
  88                         continue;
  89                 p++;
  90                 strcpy(mark_palette[i].name, p);
  91                 if ((q = strchr(mark_palette[i].name, '\"')))
  92                         *q = '\0';
  93                 if ((p = strchr(p, '\"'))) {
  94                         p++;
  95                         sscanf(p, "%f %f", &bright, &contrast);
  96                 }
  97                 mark_palette[i].r = r;
  98                 mark_palette[i].g = g;
  99                 mark_palette[i].b = b;
 100                 mark_palette[i].bright = bright;
 101                 mark_palette[i].contrast = contrast;
 102         }
 103         fclose(fp);
 104         return 0;
 105 }
 106
 107 /* save marked area, if any. return 0, if no pixle is marked and erase existing file */
 108 int save_marked(unsigned char *img_mark_buffer, int width, int height, const char *filename)
 109 {
 110         char name[256];
 111         int i, rc;
 112         FILE *fp;
 113
 114         for (i = 0; i < width * height; i++) {
 115                 if (img_mark_buffer[i])
 116                         break;
 117         }
 118         sprintf(name, "%s_marked", filename);
 119         if (i == width * height) {
 120 //              printf("delete marked frame=%s\n", name);
 121                 /* empty, so delete */
 122                 unlink(name);
 123
 124                 return 0;
 125         } else {
 126 //              printf("save marked frame=%s\n", name);
 127                 /* not empty, so save */
 128                 fp = fopen(name, "w");
 129                 if (!fp) {
 130                         write_failed:
 131                         printf("failed to save marked frame=%s\n", name);
 132                         return -1;
 133                 }
 134                 rc = fwrite(img_mark_buffer, width * height, 1, fp);
 135                 fclose(fp);
 136                 if (rc != 1)
 137                         goto write_failed;
 138
 139                 return 1;
 140         }
 141 }
 142
 143 int load_marked(unsigned char *img_mark_buffer, int width, int height, const char *filename)
 144 {
 145         char name[256];
 146         FILE *fp;
 147         int rc;
 148
 149         sprintf(name, "%s_marked", filename);
 150 //      printf("load marked frame=%s\n", name);
 151         fp = fopen(name, "r");
 152         if (!fp) {
 153                 read_failed:
 154 //              printf("failed to load marked frame=%s\n", name);
 155                 return -1;
 156         }
 157         rc = fread(img_mark_buffer, width * height, 1, fp);
 158         fclose(fp);
 159         if (rc != 1)
 160                 goto read_failed;
 161
 162         return 0;
 163 }
 164