util.c

Go to the documentation of this file.

 
/* Copyright (c) 2004 - 2006 Derek Foreman, Ben Jansens
   Copyright (c) 2006 - 2013 Thomas Schmitt <scdbackup@gmx.net>
   Provided under GPL version 2 or later.
*/
 
#ifdef HAVE_CONFIG_H
#include "../config.h"
#endif
 
#include <string.h>
 
/* ts A61008 */
/* #include <a ssert.h> */
 
#include <stdlib.h>
#include <stdio.h>
#include <time.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
 
 
/* ts A80914 : This is unneeded. Version info comes from libburn.h.
#include "v ersion.h"
*/
 
#include "util.h"
#include "libburn.h"
 
 
void burn_version(int *major, int *minor, int *micro)
{
/* ts A80408 : switched from configure.ac versioning to libburn.h versioning */
    *major = burn_header_version_major;
    *minor = burn_header_version_minor;
    *micro = burn_header_version_micro;
}
 
 
struct cd_mid_record {
    char *manufacturer;
    int m_li;
    int s_li;
    int f_li;
    char *other_brands;
};
typedef struct cd_mid_record cd_mid_record_t;
 
 
/* ts A90902 */
/** API
   @param flag  Bitfield for control purposes,
                bit0= append "(aka %s)",other_brands to reply
 */
char *burn_guess_cd_manufacturer(int m_li, int s_li, int f_li,
                                 int m_lo, int s_lo, int f_lo, int flag)
{
    static cd_mid_record_t mid_list[]= {
    {"SKC",                                 96, 40,  0,  ""},
    {"Ritek Corp"                         , 96, 43, 30,  ""},
    {"TDK / Ritek"                        , 97, 10,  0,  "TRAXDATA"},
    {"TDK Corporation"                    , 97, 15,  0,  ""},
    {"Ritek Corp"                         , 97, 15, 10,  "7-plus, Aopen, PONY, Power Source, TDK, TRAXDATA, HiCO, PHILIPS, Primdisc, Victor.JVC, OPTI STORAGE, Samsung"},
    {"Mitsubishi Chemical Corporation"    , 97, 15, 20,  ""},
    {"Nan-Ya Plastics Corporation"        , 97, 15, 30,  "Hatron, MMore, Acer, LITEON"},
    {"Delphi"                             , 97, 15, 50,  ""},
    {"Shenzhen SG&SAST"                   , 97, 16, 20,  ""},
    {"Moser Baer India Limited"           , 97, 17,  0,  "EMTEC, Intenso, YAKUMO, PLATINUM, Silver Circle"},
    {"SKY media Manufacturing SA"         , 97, 17, 10,  ""},
    {"Wing"                               , 97, 18, 10,  ""},
    {"DDT"                                , 97, 18, 20,  ""},
    {"Daxon Technology Inc. / Acer"       , 97, 22, 60,  "Maxmax, Diamond Data, BenQ, gold, SONY"},
    {"Taiyo Yuden Company Limited"        , 97, 24,  0,  "Maxell, FUJIFILM, SONY"},
    {"Sony Corporation"                   , 97, 24, 10,  "LeadData, Imation"},
    {"Computer Support Italcard s.r.l"    , 97, 24, 20,  ""},
    {"Unitech Japan Inc."                 , 97, 24, 30,  ""},
    {"MPO, France"                        , 97, 25,  0,  "TDK"},
    {"Hitachi Maxell Ltd."                , 97, 25, 20,  ""},
    {"Infodisc Technology Co,Ltd."        , 97, 25, 30,  "MEMOREX, SPEEDA, Lead data"},
    {"Xcitec"                             , 97, 25, 60,  ""},
    {"Fornet International Pte Ltd"       , 97, 26,  0,  "COMPUSA, Cdhouse"},
    {"Postech Corporation"                , 97, 26, 10,  "Mr.Platinum"},
    {"SKC Co Ltd."                        , 97, 26, 20,  "Infinite"},
    {"Fuji Photo Film Co,Ltd."            , 97, 26, 40,  ""},
    {"Lead Data Inc."                     , 97, 26, 50,  "SONY, Gigastorage, MIRAGE"},
    {"CMC Magnetics Corporation"          , 97, 26, 60,  "Daxon, Verbatim, Memorex, Bi-Winner, PLEXTOR, YAMAHA, Melody, Office DEPOT, Philips, eMARK, imation, HyperMedia, Samsung, Shintaro, Techworks"},
    {"Ricoh Company Limited"              , 97, 27,  0,  "Sony, Digital Storage, Csita"},
    {"Plasmon Data Systems Ltd"           , 97, 27, 10,  "Ritek, TDK, EMTEC, ALPHAPET, MANIA"},
    {"Princo Corporation"                 , 97, 27, 20,  ""},
    {"Pioneer"                            , 97, 27, 30,  ""},
    {"Eastman Kodak Company"              , 97, 27, 40,  ""},
    {"Mitsui Chemicals Inc."              , 97, 27, 50,  "MAM-A, TDK"},
    {"Ricoh Company Limited"              , 97, 27, 60,  "Ritek"},
    {"Gigastorage Corporation"            , 97, 28, 10,  "MaxMax, Nan-Ya"},
    {"Multi Media Masters&Machinary SA"   , 97, 28, 20,  "King, Mmirex"},
    {"Ritek Corp"                         , 97, 31,  0,  "TDK"},
    {"Grand Advance Technology Sdn. Bhd." , 97, 31, 30,  ""},
    {"TDK Corporation"                    , 97, 32, 00,  ""},
    {"Prodisc Technology Inc."            , 97, 32, 10,  "Smartbuy, Mitsubishi, Digmaster, LG, Media Market"},
    {"Mitsubishi Chemical Corporation"    , 97, 34, 20,  "YAMAHA, Verbatim"},
    {"Mitsui Chemicals Inc."              , 97, 48, 50, ""},
    {"TDK Corporation"                    , 97, 49,  0, ""},
    {"", 0, 0, 0, ""}
    };
 
    int i, f_li_0;
    char buf[1024];
    char *result = NULL;
 
    if (m_li == 0 && s_li == 2 && f_li == 0) {
        result = strdup("(no manufacturer code)");
        return result;
    }
    f_li_0 = f_li - (f_li % 10);
    for (i = 0; mid_list[i].manufacturer[0]; i++) {
        if (m_li == mid_list[i].m_li &&
            s_li == mid_list[i].s_li &&
            (f_li_0 == mid_list[i].f_li || f_li == mid_list[i].f_li))
    break;
    }
    if (mid_list[i].manufacturer[0] == 0) {
        sprintf(buf, "Unknown CD manufacturer. Please report code '%2.2dm%2.2ds%2.2df/%2.2dm%2.2ds%2.2df', the human readable brand, size, and speed to scdbackup@gmx.net.", m_li, s_li, f_li, m_lo, s_lo, f_lo);
        result = strdup(buf);
        return result;
    }
 
    /* Compose, allocate and copy result */
    if ((flag & 1) && mid_list[i].other_brands[0]) {
        sprintf(buf, "%s  (aka %s)",
            mid_list[i].manufacturer, mid_list[i].other_brands);
        result = strdup(buf);
    } else
        result = strdup(mid_list[i].manufacturer);
    return result;
}
 
 
/* ts A90904 */
struct dvd_mid_record {
    char *mc1;
    int mc1_sig_len;
    char *manufacturer;
};
typedef struct dvd_mid_record dvd_mid_record_t;
 
/* ts A90904 */
char *burn_guess_manufacturer(int prf,
             char *media_code1, char *media_code2, int flag)
{
    int i, l = 0, m_li, s_li, f_li, m_lo, s_lo, f_lo;
    char buf[1024];
    char *result = NULL, *cpt;
 
    /* Important Note: media_code1 and media_code2 are supposed to be
                       encoded by burn_util_make_printable_word().
                       Especially: ' ' -> '_' , {"_%/" unprintables -> %XY)
    */
    static dvd_mid_record_t mid_list[]= {
    {"AML",         8, "UML"},
    {"BeAll",       5, "BeAll Developers, Inc."},
    {"CMC",         3, "CMC Magnetics Corporation"},
    {"DAXON",       5, "Daxon Technology Inc. / Acer"},
    {"Daxon",       5, "Daxon Technology Inc. / Acer"},
    {"FUJI",        4, "Fujifilm Holdings Corporation"},
    {"INFODISC",    8, "New Star Digital Co., Ltd."},
    {"INFOME",      6, "InfoMedia Inc."},
    {"ISMMBD",      6, "Info Source Multi Media Ltd."},
    {"JVC",         3, "JVC Limited"},
    {"KIC01RG",     7, "AMC"},
    {"LD",          8, "Lead Data Inc."},
    {"LGE",         3, "LG Electronics"},
    {"MAM",         8, "Mitsui Advanced Media, Inc. Europe"},
    {"MAXELL",      6, "Hitachi Maxell Ltd."},
    {"MBI",         3, "Moser Baer India Limited"},
    {"MCC",         8, "Mitsubishi Chemical Corporation"},
    {"MCI",         8, "Mitsui Chemicals Inc."},
    {"MEI",         3, "Panasonic Corporation"},
    {"MILLEN",      8, "Millenniata Inc."},
    {"MKM",         3, "Mitsubishi Kagaku Media Co."},
    {"MMC",         8, "Mitsubishi Kagaku Media Co."},
    {"MXL",         8, "Hitachi Maxell Ltd."},
    {"NANYA",       5, "Nan-Ya Plastics Corporation"},
    {"NSD",         8, "NESA International Inc."},
    {"OPTODISC",    8, "Optodisc Technology Corporation"},
    {"OTCBDR",      8, "Optodisc Technology Corporation"},
    {"PHILIP",      8, "Moser Baer India Limited"},
    {"PHILIPS",     8, "Philips"},
    {"PRINCO",      6, "Princo Corporation"},
    {"PRODISC",     7, "Prodisc Technology Inc."},
    {"Prodisc",     7, "Prodisc Technology Inc."},
    {"PVC",         3, "Pioneer"},
    {"RICOHJPN",    8, "Ricoh Company Limited"},
    {"RITEK",       5, "Ritek Corp"},
    {"SONY",        4, "Sony Corporation"},
    {"TDK",         3, "TDK Corporation"},
    {"TTG",         3, "TDK Corporation"},
    {"TTH",         3, "TDK Corporation"},
    {"TY",          8, "Taiyo Yuden Company Limited"},
    {"TYG",         3, "Taiyo Yuden Company Limited"},
    {"UME",         3, "UmeDisc Limited"},
    {"UTJR001",     7, "Unifino Inc."},
    {"VERBAT",      5, "Mitsubishi Kagaku Media Co."},
    {"YUDEN",       5, "Taiyo Yuden Company Limited"},
    {"", 0, ""}
    };
 
    if (media_code2 != NULL &&
        (prf == -1 || prf == 0x09 || prf == 0x0A)) {
        if (strlen(media_code2) == 9 && media_code1[0] == '9' &&
            media_code1[2] == 'm' && media_code1[5] == 's' &&
            media_code1[8] == 'f' &&
            strchr(media_code1, '%') == NULL) {
            sscanf(media_code1, "%dm%ds%df", &m_li, &s_li, &f_li);
            sscanf(media_code2, "%dm%ds%df", &m_lo, &s_lo, &f_lo);
            if (m_li >= 96 && m_li <= 97 && m_lo > 0) {
                result = burn_guess_cd_manufacturer(
                    m_li, s_li, f_li, m_lo, s_lo, f_lo, 0);
                return result;
            }
        }
    }
 
    /* DVD-R do not keep manufacturer id apart from media id.
       Some manufacturers use a blank as separator which would now be '_'.
    */
    cpt = strchr(media_code1, '_');
    if (cpt != NULL && (prf == -1 || prf ==  0x11 || prf == 0x13 ||
                         prf == 0x14 || prf == 0x15))
        l = cpt - media_code1;
 
    for (i = 0; mid_list[i].mc1[0]; i++) {
        if (strncmp(mid_list[i].mc1, media_code1,
             mid_list[i].mc1_sig_len) == 0)
    break;
        if (l > 0)
            if (strncmp(mid_list[i].mc1, media_code1, l) == 0)
    break;
    }
    if (mid_list[i].mc1[0] == 0) {
        sprintf(buf, "Unknown DVD/BD manufacturer. Please report code '%s/%s', the human readable brand, size, and speed to scdbackup@gmx.net.", 
            media_code1, media_code2);
        result = strdup(buf);
        return result;
    }
    result = strdup(mid_list[i].manufacturer);
    return result;
}
 
 
/* ts A90905 */
/* Make *text a single printable word */
/* IMPORTANT: text must be freeable memory !
   @param flag bit0=escape '/' too
               bit1=(overrides bit0) do not escape " _/"
*/
int burn_util_make_printable_word(char **text, int flag)
{
    int i, esc_add = 0, ret;
    char *wpt, *rpt, *new_text = NULL;
 
    if (flag & 2)
        flag &= ~1;
 
    for (i = 0; (*text)[i]; i++) {
        rpt = (*text) + i;
        if (*rpt < 32 || *rpt > 126 || *rpt == 96 ||
            ((*rpt == '_' || *rpt == '%') && (!(flag & 2))) ||
            (*rpt == '/' && (flag & 1)))
            esc_add += 2;
    }
    if (esc_add) {
        new_text = calloc(strlen(*text) + esc_add + 1, 1);
        if (new_text == NULL) {
            ret = -1;
            goto ex;
        }
        wpt = new_text;
        for (i = 0; (*text)[i]; i++) {
            rpt = (*text) + i;
            if (*rpt < 32 || *rpt > 126 || *rpt == 96 ||
                ((*rpt == '_' || *rpt == '%') && (!(flag & 2))) ||
                (*rpt == '/' && (flag & 1))) {
                sprintf(wpt, "%%%2.2X", 
                    (unsigned int) *((unsigned char *) rpt));
                wpt+= 3;
            } else
                *(wpt++) = *rpt;
        }
        *wpt = 0;
        free(*text);
        *text = new_text;
    }
    if (!(flag & 2))
        for (i = 0; (*text)[i]; i++)
            if ((*text)[i] == ' ')
                (*text)[i] = '_';
    ret = 1;
ex:
    return ret;
}
 
 
/* ts B11216 */
/** Read a line from fp and strip LF or CRLF */
char *burn_sfile_fgets(char *line, int maxl, FILE *fp)
{
    int l;
    char *ret;
 
    ret = fgets(line, maxl, fp);
    if (ret == NULL)
        return NULL;
    l = strlen(line);
    if (l > 0)
        if (line[l - 1] == '\r')
            line[--l] = 0;
    if (l > 0)
        if (line[l - 1] == '\n')
            line[--l] = 0;
    if(l > 0)
        if(line[l - 1] == '\r')
            line[--l] = 0;
    return ret;
}
 
 
char *burn_printify(char *msg)
{
    char *cpt;
 
    for (cpt = msg; *cpt != 0; cpt++)
        if (*cpt < 32 || *cpt > 126)
            *cpt = '#';
    return msg;
}
 
 
/* ts B30521 */
void burn_int_to_lsb(int val, char *target)
{
    unsigned char *buf;
 
    buf = (unsigned char *) target;
    buf[0] = val & 0xff;
    buf[1] = (val >> 8) & 0xff;
    buf[2] = (val >> 16) & 0xff;
    buf[3] = (val >> 24) & 0xff;
}
 
 
/* ts B30609 */
double burn_get_time(int flag)
{
    int ret;
    struct timeval tv;
 
#ifdef Libburn_use_clock_gettime_monotoniC
#ifdef _POSIX_TIMERS
#ifdef _POSIX_MONOTONIC_CLOCK
 
    /* Enable by
         export CFLAGS=-DLibburn_use_clock_gettime_monotoniC
         export LIBS=-lrt
         ./configure ... && make clean && make
    */
 
    struct timespec tp;
    ret = clock_gettime(CLOCK_MONOTONIC, &tp);
    if (ret == 0)
        return ((double) tp.tv_sec) + ((double) tp.tv_nsec) * 1.0e-9;
 
#endif /* _POSIX_MONOTONIC_CLOCK */
#endif /* _POSIX_TIMERS */
#endif /* Xorriso_use_clock_gettime_monotoniC */
 
    ret = gettimeofday(&tv, NULL);
    if (ret == 0)
        return ((double) tv.tv_sec) + ((double) tv.tv_usec) * 1.0e-6;
    return (double) time(NULL);
}
 
/* ts B40609 */
off_t burn_sparse_file_addsize(off_t write_start, struct stat *stbuf)
{
    off_t add_size;
 
    add_size = stbuf->st_blocks * (off_t) 512;
    if (add_size < stbuf->st_size) {
        /* Sparse file */
        if (write_start < stbuf->st_size) {
            /* Might write into sparse gaps */
            if (write_start > add_size)
                add_size = write_start;
        } else {
            /* Will not write into sparse area */
            add_size = stbuf->st_size;
        }
    }
    return add_size;
}