function barcode_ean_barcode in Barcode 6.2

Same name and namespace in other branches

1. 7.2 plugins/ean.inc \barcode_ean_barcode()

File

plugins/ean.inc, line 50

Barcode plugin EAN-13: Used with consumer products internationally, 13 characters UPC-A: Used with consumer products in U.S., 12 characters ISBN: Used to mark books, 13 characters

Code

function barcode_ean_barcode($barnumber, $settings) {
  $barnumber = barcode_ean_check_digit($barnumber);
  $bars = barcode_ean_encode($barnumber, $settings);
  if (empty($settings->filename_no_format)) {
    header("Content-type: image/" . $settings->format);
  }
  $scale = $settings->scale;
  if ($scale < 1) {
    $scale = 2;
  }
  $total_y = (double) $scale * $settings->height;
  if (!isset($space)) {
    $space = array(
      'top' => 2 * $scale,
      'bottom' => 2 * $scale,
      'left' => 2 * $scale,
      'right' => 2 * $scale,
    );
  }

  /* count total width */
  $xpos = 0;
  $xpos = $scale * 114;

  /* allocate the image */
  $total_x = $xpos + $space['left'] + $space['right'];
  $xpos = $space['left'] + $scale * 6;
  $height = floor($total_y - $scale * 10);
  $height2 = floor($total_y - $space['bottom']);
  $im = @imagecreatetruecolor($total_x, $total_y);
  $bg_color = @imagecolorallocate($im, $settings->bgcolor[0], $settings->bgcolor[1], $settings->bgcolor[2]);
  @imagefilledrectangle($im, 0, 0, $total_x, $total_y, $bg_color);
  $bar_color = @imagecolorallocate($im, $settings->color[0], $settings->color[1], $settings->color[2]);
  for ($i = 0; $i < strlen($bars); $i++) {
    $h = $height;
    $val = strtoupper($bars[$i]);
    if (preg_match("/[a-z]/i", $val)) {
      $val = ord($val) - 65;
      $h = $height2;
    }
    if ($settings->encode == "UPC-A" && ($i < 10 || $i > strlen($bars) - 13)) {
      $h = $height2;
    }
    if ($val == 1) {
      @imagefilledrectangle($im, $xpos, $space['top'], $xpos + $scale - 1, $h, $bar_color);
    }
    $xpos += $scale;
  }
  if ($settings->encode == "UPC-A") {
    $str = substr($barnumber, 1, 1);
  }
  else {
    $str = substr($barnumber, 0, 1);
  }
  @imagettftext($im, $scale * 6, 0, $space['left'], $height, $bar_color, $settings->font, $str);
  if ($settings->encode == "UPC-A") {
    $str = substr($barnumber, 2, 5);
  }
  else {
    $str = substr($barnumber, 1, 6);
  }
  $x = $space['left'] + $scale * strlen($barnumber) + $scale * 6;
  @imagettftext($im, $scale * 6, 0, $x, $height2, $bar_color, $settings->font, $str);
  if ($settings->encode == "UPC-A") {
    $str = substr($barnumber, 7, 5);
  }
  else {
    $str = substr($barnumber, 7, 6);
  }
  $x = $space['left'] + $scale * strlen($bars) / 1.65 + $scale * 6;
  @imagettftext($im, $scale * 6, 0, $x, $height2, $bar_color, $settings->font, $str);
  if ($settings->encode == "UPC-A") {
    $str = substr($barnumber, 12, 1);
    $x = $total_x - $space['left'] - $scale * 6;
    @imagettftext($im, $scale * 6, 0, $x, $height, $bar_color, $settings->font, $str);
  }
  if ($settings->format == "png") {
    if (!empty($settings->filename_no_format)) {
      @imagepng($im, $settings->filename_no_format . "." . $settings->format);
    }
    else {
      @imagepng($im);
    }
  }
  if ($settings->format == "gif") {
    if (!empty($settings->filename_no_format)) {
      @imagegif($im, $settings->filename_no_format . "." . $settings->format);
    }
    else {
      @imagegif($im);
    }
  }
  if ($settings->format == "jpg" || $settings->format == "jpeg") {
    if (!empty($settings->filename_no_format)) {
      @imagejpeg($im, $settings->filename_no_format . "." . $settings->format);
    }
    else {
      @imagejpeg($im);
    }
  }
  @imagedestroy($im);
}