EVOLUTION-NINJA

Edit File: mpdfform.php

<?php

class mpdfform {

var $mpdf = null;

var $forms;
var $formn;

//Active Forms
var $formSubmitNoValueFields;
var $formExportType;
var $formSelectDefaultOption;
var $formUseZapD;
/* Form Styles */
var $form_border_color; 
var $form_background_color; 
var $form_border_width;
var $form_border_style;
var $form_button_border_color; 
var $form_button_background_color;
var $form_button_border_width;
var $form_button_border_style;
var $form_radio_color;
var $form_radio_background_color;

var $form_element_spacing;

// Active forms
var $formMethod;
var $formAction;
var $form_fonts;
var $form_radio_groups;
var $form_checkboxes;
var $pdf_acro_array;

var $pdf_array_co;
var $array_form_button_js;
var $array_form_choice_js;
var $array_form_text_js;

/* Button Text */
var $form_button_text;
var $form_button_text_over;
var $form_button_text_click;
var $form_button_icon;

// FORMS
var $textarea_lineheight;

function mpdfform(&$mpdf) {
	$this->mpdf = $mpdf;

// ACTIVE FORMS
	$this->formExportType = 'xfdf'; // 'xfdf' or 'html'
	$this->formSubmitNoValueFields = true;	// Whether to include blank fields when submitting data
	$this->formSelectDefaultOption = true;	// for Select drop down box; if no option is explicitly maked as selected,
							// this determines whether to select 1st option (as per browser)
							// - affects whether "required" attribute is relevant
	$this->formUseZapD = true;		// Determine whether to use ZapfDingbat icons for radio/checkboxes

// FORM STYLES
	// These can alternatively use a 4 number string to represent CMYK colours
	$this->form_border_color = '0.6 0.6 0.72'; 		// RGB
	$this->form_background_color = '0.975 0.975 0.975'; 	// RGB
	$this->form_border_width = '1';		// 0 doesn't seem to work as it should
	$this->form_border_style = 'S';		// B - Bevelled; D - Double
	$this->form_button_border_color = '0.2 0.2 0.55'; 
	$this->form_button_background_color = '0.941 0.941 0.941';
	$this->form_button_border_width = '1';
	$this->form_button_border_style = 'S';
	$this->form_radio_color = '0.0 0.0 0.4'; 	// radio and checkbox
	$this->form_radio_background_color = '0.9 0.9 0.9';

// FORMS
	$this->textarea_lineheight = 1.25;

// FORM ELEMENT SPACING
	$this->form_element_spacing['select']['outer']['h'] = 0.5;	// Horizontal spacing around SELECT
	$this->form_element_spacing['select']['outer']['v'] = 0.5;	// Vertical spacing around SELECT
	$this->form_element_spacing['select']['inner']['h'] = 0.7;	// Horizontal padding around SELECT
	$this->form_element_spacing['select']['inner']['v'] = 0.7;	// Vertical padding around SELECT
	$this->form_element_spacing['input']['outer']['h'] = 0.5;
	$this->form_element_spacing['input']['outer']['v'] = 0.5;
	$this->form_element_spacing['input']['inner']['h'] = 0.7;
	$this->form_element_spacing['input']['inner']['v'] = 0.7;
	$this->form_element_spacing['textarea']['outer']['h'] = 0.5;
	$this->form_element_spacing['textarea']['outer']['v'] = 0.5;
	$this->form_element_spacing['textarea']['inner']['h'] = 1;
	$this->form_element_spacing['textarea']['inner']['v'] = 0.5;
	$this->form_element_spacing['button']['outer']['h'] = 0.5;
	$this->form_element_spacing['button']['outer']['v'] = 0.5;
	$this->form_element_spacing['button']['inner']['h'] = 2;
	$this->form_element_spacing['button']['inner']['v'] = 1;

// INITIALISE non-configurable
	$this->formMethod = 'POST';
	$this->formAction = '';
	$this->form_fonts = array();
	$this->form_radio_groups = array();
	$this->form_checkboxes = false;
	$this->forms = array();
	$this->pdf_array_co = '';

}

// DIRECTIONALITY
				if (preg_match("/([".$this->mpdf->pregRTLchars."])/u", $texto)) { $this->mpdf->biDirectional = true; }	// *RTL*

// Use OTL OpenType Table Layout - GSUB & GPOS
				if (isset($this->mpdf->CurrentFont['useOTL']) && $this->mpdf->CurrentFont['useOTL']) {
					$texto = $this->mpdf->otl->applyOTL($texto, $this->mpdf->CurrentFont['useOTL']);
					$OTLdata = $this->mpdf->otl->OTLdata;
				}

$this->mpdf->magic_reverse_dir($texto, $this->mpdf->directionality, $OTLdata);

$this->mpdf->SetLineWidth(0.2 /$k );
				if (isset($objattr['disabled']) && $objattr['disabled']) { 
					$this->mpdf->SetFColor($this->mpdf->ConvertColor(225));
					$this->mpdf->SetTColor($this->mpdf->ConvertColor(127));
				}
				else if (isset($objattr['readonly']) && $objattr['readonly']) { 
					$this->mpdf->SetFColor($this->mpdf->ConvertColor(225));
					$this->mpdf->SetTColor($this->mpdf->ConvertColor(0));
				}
				else {
					$this->mpdf->SetFColor($this->mpdf->ConvertColor(250));
					$this->mpdf->SetTColor($this->mpdf->ConvertColor(0));
				}
				$this->mpdf->Cell($w,$h,$texto,1,0,$rtlalign,1,'',0,$this->form_element_spacing['input']['inner']['h'] /$k ,$this->form_element_spacing['input']['inner']['h'] /$k , 'M', 0, false, $OTLdata);
				$this->mpdf->SetFColor($this->mpdf->ConvertColor(255));
				$this->mpdf->SetTColor($this->mpdf->ConvertColor(0));
			}
}

$w -= $this->form_element_spacing['textarea']['inner']['h']*2 /$k ;
			$this->mpdf->x += $this->form_element_spacing['textarea']['inner']['h'] /$k ;
			$this->mpdf->y += $this->form_element_spacing['textarea']['inner']['v'] /$k ;

if ($texto != '') $this->mpdf->MultiCell($w,$this->mpdf->FontSize*$this->textarea_lineheight,$texto,0,'',0,'',$blockdir,true,$objattr['OTLdata'], $objattr['rows']);
			$this->mpdf->_out('Q');
			$this->mpdf->SetFColor($this->mpdf->ConvertColor(255));
			$this->mpdf->SetTColor($this->mpdf->ConvertColor(0));
		    }
}

// DIRECTIONALITY
				if (preg_match("/([".$this->mpdf->pregRTLchars."])/u", $texto)) { $this->mpdf->biDirectional = true; }	// *RTL*

$this->mpdf->magic_reverse_dir($texto, $this->mpdf->directionality, $objattr['OTLdata']);

$this->mpdf->Cell($w-($this->mpdf->FontSize*1.4),$h,$texto,1,0,$rtlalign,1,'',0,$this->form_element_spacing['select']['inner']['h'] /$k,$this->form_element_spacing['select']['inner']['h'] /$k , 'M', 0, false, $objattr['OTLdata']) ;
				$this->mpdf->SetFColor($this->mpdf->ConvertColor(190));
				$save_font = $this->mpdf->FontFamily;
           			$save_currentfont = $this->mpdf->currentfontfamily;
				if ($this->mpdf->PDFA || $this->mpdf->PDFX) {
					if (($this->mpdf->PDFA && !$this->mpdf->PDFAauto) || ($this->mpdf->PDFX && !$this->mpdf->PDFXauto)) { $this->mpdf->PDFAXwarnings[] = "Core Adobe font Zapfdingbats cannot be embedded in mPDF - used in Form element: Select - which is required for PDFA1-b or PDFX/1-a. (Different character/font will be substituted.)"; }
			   		$this->mpdf->SetFont('sans');
					if ($this->mpdf->_charDefined($this->mpdf->CurrentFont['cw'], 9660)) { $down = "\xe2\x96\xbc"; }
					else { $down = '='; }
					$this->mpdf->Cell(($this->mpdf->FontSize*1.4),$h,$down,1,0,'C',1,'',0,0,0, 'M') ;
				}
				else {
			  		$this->mpdf->SetFont('czapfdingbats','',0);
			  		$this->mpdf->Cell(($this->mpdf->FontSize*1.4),$h,chr(116),1,0,'C',1,'',0,0,0, 'M') ;
				}
				$this->mpdf->SetFont($save_font,'',0);
           			$this->mpdf->currentfontfamily = $save_currentfont;
				$this->mpdf->SetFColor($this->mpdf->ConvertColor(255));
				$this->mpdf->SetTColor($this->mpdf->ConvertColor(0));
			}
}

// DIRECTIONALITY
				if (preg_match("/([".$this->mpdf->pregRTLchars."])/u", $texto)) { $this->mpdf->biDirectional = true; }	// *RTL*

$this->mpdf->magic_reverse_dir($texto, $this->mpdf->directionality, $OTLdata);

$this->mpdf->Cell($w,$h,$texto,'',0,'C',0,'',0,0,0, 'M', 0, false, $OTLdata ) ;
				$this->mpdf->SetFColor($this->mpdf->ConvertColor(0));
		     }
}

}
}

// In _putpages
function countPageForms($n, &$totaladdnum) {
			foreach( $this->forms as $form ) {
				if ( $form['page'] == $n ) {
					$totaladdnum++;
					if ( $form['typ'] == 'Tx' ) {
						if ( isset($this->array_form_text_js[$form['T']]) ) {
							if ( isset($this->array_form_text_js[$form['T']]['F']) ) { $totaladdnum++; }
							if ( isset($this->array_form_text_js[$form['T']]['K']) ) { $totaladdnum++; }
							if ( isset($this->array_form_text_js[$form['T']]['V']) ) { $totaladdnum++; }
							if ( isset($this->array_form_text_js[$form['T']]['C']) ) { $totaladdnum++; }
						}
					}
					if ( $form['typ'] == 'Bt' ) {
						if ( isset($this->array_form_button_js[$form['T']]) ) { $totaladdnum++; }
						if ( isset($this->form_button_icon[$form['T']]) ) { 
							$totaladdnum++; 
							if ( $this->form_button_icon[$form['T']]['Indexed'] ) { $totaladdnum++; }
						}
						if ( $form['subtype'] == 'radio' ) { $totaladdnum+=2; }
						else if ( $form['subtype'] == 'checkbox' && $this->formUseZapD ) { $totaladdnum++; }
						else if ( $form['subtype'] == 'checkbox' && !$this->formUseZapD ) { $totaladdnum+=2; }
					}
					if ( $form['typ'] == 'Ch' ) {
						if ( isset($this->array_form_choice_js[$form['T']]) ) { $totaladdnum++; }
					}
				}
			}
}

// In _putpages
function addFormIds($n, &$s, &$annotid) {
				foreach( $this->forms as $form ) {
					if ( $form['page'] == $n ) {
						$s .= ($annotid) . ' 0 R ';
						$annotid++;
						if ( $form['typ'] == 'Tx' ) {
							if ( isset($this->array_form_text_js[$form['T']]) ) {
								if ( isset($this->array_form_text_js[$form['T']]['F']) ) { $annotid++; }
								if ( isset($this->array_form_text_js[$form['T']]['K']) ) { $annotid++; }
								if ( isset($this->array_form_text_js[$form['T']]['V']) ) { $annotid++; }
								if ( isset($this->array_form_text_js[$form['T']]['C']) ) { $annotid++; }
							}
						}
						if ( $form['typ'] == 'Bt' ) {
							if ( isset($this->array_form_button_js[$form['T']]) ) { $annotid++; }
							if ( isset($this->form_button_icon[$form['T']]) ) { 
								$annotid++; 
								if ( $this->form_button_icon[$form['T']]['Indexed'] ) { $annotid++; }
							}
							if ( $form['subtype'] == 'radio' ) { $annotid+=2; }
							else if ( $form['subtype'] == 'checkbox' && $this->formUseZapD ) { $annotid++; }
							else if ( $form['subtype'] == 'checkbox' && !$this->formUseZapD ) { $annotid+=2; }
						}
						if ( $form['typ'] == 'Ch' ) {
							if ( isset($this->array_form_choice_js[$form['T']]) ) { $annotid++; }
						}
					}
				}
}

// In _putannots
function _putFormItems($n, $hPt) {
				foreach( $this->forms as $val) {
					if ( $val['page'] == $n ) {
						if ( $val['typ'] == 'Tx' ) $this->_putform_tx( $val, $hPt );
						if ( $val['typ'] == 'Ch' ) $this->_putform_ch( $val, $hPt );
						if ( $val['typ'] == 'Bt' ) $this->_putform_bt( $val, $hPt );
					}
				}
}

// In _putannots
function _putRadioItems($n) {
		// Output Radio Groups
		$key = 1;
		foreach($this->form_radio_groups AS $name=>$frg) {
			$this->mpdf->_newobj();
			$this->pdf_acro_array .= $this->mpdf->n.' 0 R ';
			$this->mpdf->_out('<<');
			$this->mpdf->_out('/Type /Annot ');
			$this->mpdf->_out('/Subtype /Widget');
			$this->mpdf->_out('/NM '.$this->mpdf->_textstring(sprintf('%04u-%04u', $n, (3000 + $key++))));
			$this->mpdf->_out('/M '.$this->mpdf->_textstring('D:'.date('YmdHis')));
			$this->mpdf->_out('/Rect [0 0 0 0] ');
			$this->mpdf->_out('/FT /Btn ');
			if (isset($frg['disabled']) && $frg['disabled']) { $flags=array(1,3,15,16); }	// NoExport and readonly
			else { $flags=array(15,16); }	// Flags for Radiobutton, and NoToggleToOff
			$this->mpdf->_out('/Ff '.$this->_setflag($flags) );
			$kstr = '';
			$optstr = '';
			foreach($frg['kids'] AS $kid) {
				$kstr .= $this->forms[$kid['n']]['obj'].' 0 R ';
		//		$optstr .= ' '.$this->mpdf->_textstring($kid['OPT']).' ';
			}
			$this->mpdf->_out('/Kids [ '.$kstr.' ] ');	// 11 0 R 12 0 R etc.
		//	$this->mpdf->_out('/Opt [ '.$optstr.' ] ');

//V entry holds index corresponding to the appearance state of
			//whichever child field is currently in the on state = or Off
			if (isset($frg['on'])) { $state = $frg['on']; }
			else { $state = 'Off'; }
         		$this->mpdf->_out('/V /'.$state.' ');
         		$this->mpdf->_out('/DV /'.$state.' ');
         		$this->mpdf->_out('/T '.$this->mpdf->_textstring($name).' ');
			$this->mpdf->_out('>>');
			$this->mpdf->_out('endobj');
		}
}

function SetFormButtonJS( $name, $js ) {
	$js = str_replace("\t",' ', trim($js) );
	if ( isset($name) && isset($js) ) {
		$this->array_form_button_js[$this->mpdf->_escape($name)] = array(
				'js' => $js
				);
	}
}

function SetFormChoiceJS( $name, $js ) {
	$js = str_replace("\t",' ', trim($js) );
	if ( isset($name) && isset($js) ) {
		$this->array_form_choice_js[$this->mpdf->_escape($name)] = array(
				'js' => $js
				);
	}
}

function Win1252ToPDFDocEncoding($txt) {
	$Win1252ToPDFDocEncoding = array(
		chr(0200) => chr(0240), chr(0214) => chr(0226), chr(0212) => chr(0227), chr(0237) => chr(0230), 
		chr(0225) => chr(0200), chr(0210) => chr(0032), chr(0206) => chr(0201), chr(0207) => chr(0202),
		chr(0205) => chr(0203), chr(0227) => chr(0204), chr(0226) => chr(0205), chr(0203) => chr(0206),
		chr(0213) => chr(0210), chr(0233) => chr(0211), chr(0211) => chr(0213), chr(0204) => chr(0214),
		chr(0223) => chr(0215), chr(0224) => chr(0216), chr(0221) => chr(0217), chr(0222) => chr(0220),
		chr(0202) => chr(0221), chr(0232) => chr(0235), chr(0230) => chr(0037), chr(0231) => chr(0222),
		chr(0216) => chr(0231), chr(0240) => chr(0040)
	); // mPDF 5.3.46
	return strtr($txt, $Win1252ToPDFDocEncoding );
}

}

// CHECKBOX
	function SetCheckBox( $w, $h, $name, $value, $title = '', $checked = false, $flags = array(), $disabled=false  ) {
		$this->SetFormButton( $w, $h, $name, $value, 'checkbox', $title, $flags, $checked, $disabled );
		$this->mpdf->x += $w;
	}

// RADIO
	function SetRadio( $w, $h, $name, $value, $title = '', $checked = false, $flags = array(), $disabled=false ) {
		$this->SetFormButton( $w, $h, $name, $value, 'radio', $title, $flags, $checked, $disabled );
		$this->mpdf->x += $w;
	}

function SetFormReset( $w, $h, $name, $value = 'Reset', $title = '', $flags = array(), $background_col=false, $border_col=false, $noprint=false ) {
		if (!$name) { $name = 'Reset'; }
		$this->SetFormButton( $w, $h, $name, $value, 'reset', $title, $flags, false, false, $background_col, $border_col, $noprint);
		$this->mpdf->x += $w;
	}

function SetFormSubmit( $w, $h, $name, $value = 'Submit', $url, $title = '', $typ = 'html', $method = 'POST', $flags = array(), $background_col=false, $border_col=false, $noprint=false) {
		if (!$name) { $name = 'Submit'; }
		$this->SetFormButton( $w, $h, $name, $value, 'submit', $title, $flags, false, false, $background_col, $border_col, $noprint);
		$this->forms[$this->formn]['URL'] = $url;
		$this->forms[$this->formn]['method'] = $method;
		$this->forms[$this->formn]['exporttype'] = $typ;
		$this->mpdf->x += $w;
	}

$this->form_button_text = NULL;
		$this->form_button_text_over = NULL;
		$this->form_button_text_click = NULL;
	}

function SetFormBorderWidth ( $string ) {
	switch( $string ) {
		case 'S': $this->form_border_width = '1'; 
			break;
		case 'M': $this->form_border_width = '2'; 
			break;
		case 'B': $this->form_border_width = '3'; 
			break;
		case '0': $this->form_border_width = '0'; 
			break;
		default: $this->form_border_width = '0'; 
			break;
	}
}

function SetFormBorderStyle ( $string ) {
	switch( $string ) { 
		case 'S': $this->form_border_style = 'S'; 
			break;
		case 'D': $this->form_border_style = 'D /D [3]'; 
			break;
		case 'B': $this->form_border_style = 'B'; 
			break;
		case 'I': $this->form_border_style = 'I'; 
			break;
		case 'U': $this->form_border_style = 'U'; 
			break;
		default: $this->form_border_style = 'B'; 
			break;
	}
}

function SetFormBorderColor ( $r, $g=-1, $b=-1 ) {
	if ( ($r==0 and $g==0 and $b==0) || $g==-1 )
		$this->form_border_color = sprintf('%.3F', $r/255);
	else
		$this->form_border_color = sprintf('%.3F %.3F %.3F', $r/255, $g/255, $b/255);
}

function SetFormBackgroundColor ( $r, $g=-1, $b=-1 ) {
	if ( ($r==0 and $g==0 and $b==0) || $g==-1 )
		$this->form_background_color = sprintf('%.3F', $r/255);
	else
		$this->form_background_color = sprintf('%.3F %.3F %.3F', $r/255, $g/255, $b/255);
}

function SetFormD ( $W, $S, $BC, $BG ) {
	$this->SetFormBorderWidth ( $W );
	$this->SetFormBorderStyle ( $S );
	$this->SetFormBorderColor ( $BC );
	$this->SetFormBackgroundColor ( $BG );
}

function _setflag( $array ) {
	$flag = 0;
	foreach($array as $val) { $flag += 1 << ($val-1); }
	return $flag;
}

function _form_rect( $x, $y, $w, $h, $hPt ) {
	$x = $x * _MPDFK;
	$y = $hPt - ($y  * _MPDFK);
	$x2 = $x + ($w * _MPDFK);
	$y2 = $y - ($h * _MPDFK);
	$rect = sprintf('%.3F %.3F %.3F %.3F', $x, $y2, $x2, $y );
	return $rect;
}

}

if ( $form['subtype'] == 'radio' ) {
		if ((isset($form['disabled']) && $form['disabled']) || (isset($this->form_radio_groups[$form['T']]['disabled']) && $this->form_radio_groups[$form['T']]['disabled'])) { 
			$radio_color = '0.5 0.5 0.5'; 
			$radio_background_color = '0.9 0.9 0.9'; 
		}
		else { 
			$radio_color = $this->form_radio_color; 
			$radio_background_color = $this->form_radio_background_color;
		}
		$this->mpdf->_out('/Parent '.$this->form_radio_groups[$form['T']]['obj_id'].' 0 R ');
		$temp = '';
		$temp .= '/BC [ '.$radio_color." ] ";
		$temp .= '/BG [ '.$radio_background_color." ] ";
		$this->mpdf->_out("/BS << /W 1 /S /S >>");
		$this->mpdf->_out('/MK << '.$temp.' >> ');
		$form['FF'][] = 16;	// Radiobutton
		$form['FF'][] = 15;	// NoToggleOff - must be same as radio button group setting?
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']) );
		if ($this->formUseZapD)
			$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts['czapfdingbats']['i'].' 0 Tf '.$radio_color.' rg)');
		else
			$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$this->mpdf->CurrentFont['fontkey']]['i'].' 0 Tf '.$radio_color.' rg)');
		$this->mpdf->_out("/AP << /N << /".$this->mpdf->_escape($form['V'])." ".($this->mpdf->n+1)." 0 R /Off ".($this->mpdf->n+2)." 0 R >> >>");
		if ( $form['activ'] ) {
			$this->mpdf->_out('/V /'.$this->mpdf->_escape($form['V']).' ');
			$this->mpdf->_out('/DV /'.$this->mpdf->_escape($form['V']).' ');
			$this->mpdf->_out('/AS /'.$this->mpdf->_escape($form['V']).' ');
		}
		else {
			$this->mpdf->_out('/AS /Off ');
		}
		$this->mpdf->_out("/AP << /N << /".$this->mpdf->_escape($form['V'])." ".($this->mpdf->n+1)." 0 R /Off ".($this->mpdf->n+2)." 0 R >> >>");
	//	$this->mpdf->_out('/Opt [ '.$this->mpdf->_textstring($form['OPT']).' '.$this->mpdf->_textstring($form['OPT']).' ]');
	}

if ( $form['subtype'] == 'reset' ) {
		$temp .= $form['CA'] ? '/CA '.$this->mpdf->_textstring($form['CA']).' ' : '/CA '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['RC'] ? '/RC '.$this->mpdf->_textstring($form['RC']).' ' : '/RC '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['AC'] ? '/AC '.$this->mpdf->_textstring($form['AC']).' ' : '/AC '.$this->mpdf->_textstring($form['T']).' ';
		$this->mpdf->_out("/BS << $bstemp >>");
		$this->mpdf->_out('/MK << '.$temp.' >>');
		$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$form['style']['font']]['i'].' '.$form['style']['fontsize'].' Tf '.$form['style']['fontcolor'].')');
		$this->mpdf->_out('/AA << /D << /S /ResetForm /Flags 1 >> >>');
		$form['FF'][] = 17;
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']) );
	}

if ( $form['subtype'] == 'submit' ) {
		$temp .= $form['CA'] ? '/CA '.$this->mpdf->_textstring($form['CA']).' ' : '/CA '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['RC'] ? '/RC '.$this->mpdf->_textstring($form['RC']).' ' : '/RC '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['AC'] ? '/AC '.$this->mpdf->_textstring($form['AC']).' ' : '/AC '.$this->mpdf->_textstring($form['T']).' ';
		$this->mpdf->_out("/BS << $bstemp >>");
		$this->mpdf->_out("/MK << $temp >>");
		$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$form['style']['font']]['i'].' '.$form['style']['fontsize'].' Tf '.$form['style']['fontcolor'].')');
		// Bit 4 (8) = useGETmethod else use POST
		// Bit 3 (4) = HTML export format (charset chosen by Adobe)--- OR ---
		// Bit 6 (32) = XFDF export format (form of XML in UTF-8)
		if ($form['exporttype'] == 'xfdf') { $flag = 32; }	// 'xfdf' or 'html'
		else {
			if ($form['method'] == 'GET') { $flag = 12; }
			else { $flag = 4; }
		}
		// Bit 2 (2) = IncludeNoValueFields
		if ($this->formSubmitNoValueFields) $flag += 2;
		// To submit a value, needs to be in /AP dictionary, AND this object must contain a /Fields entry
		// listing all fields to output
		$this->mpdf->_out('/AA << /D << /S /SubmitForm /F ('.$form['URL'].') /Flags '.$flag.' >> >>');
		$form['FF'][] = 17;
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']) );
	}

if ( $form['subtype'] == 'js_button' ) {
		// Icon / image
		if ( isset( $this->form_button_icon[ $form['T'] ] ) ) {
			$cc++;
			$temp .= '/TP '.$this->form_button_icon[$form['T']]['pos'].' ';
			$temp .= '/I '.($cc + $this->mpdf->n).' 0 R ';		// Normal icon
			$temp .= '/RI '.($cc + $this->mpdf->n).' 0 R ';		// onMouseOver
			$temp .= '/IX '.($cc + $this->mpdf->n).' 0 R ';		// onClick / onMouseDown
			$temp .= '/IF << /SW /A /S /A /A [0.0 0.0] >> ';	// Icon fit dictionary
			if ($this->form_button_icon[ $form['T'] ]['Indexed']) { $cc++; }
			$put_icon = 1;
		}
		$temp .= $form['CA'] ? '/CA '.$this->mpdf->_textstring($form['CA']).' ' : '/CA '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['RC'] ? '/RC '.$this->mpdf->_textstring($form['RC']).' ' : '/RC '.$this->mpdf->_textstring($form['T']).' ';
		$temp .= $form['AC'] ? '/AC '.$this->mpdf->_textstring($form['AC']).' ' : '/AC '.$this->mpdf->_textstring($form['T']).' ';
		$this->mpdf->_out("/BS << $bstemp >>");
		$this->mpdf->_out("/MK << $temp >>");
		$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$form['style']['font']]['i'].' '.$form['style']['fontsize'].' Tf '.$form['style']['fontcolor'].')');
		$form['FF'][] = 17;
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']) );
		// Javascript
		if ( isset($this->array_form_button_js[$form['T']]) ) {
			$cc++;
			$this->mpdf->_out("/AA << /D ".($cc + $this->mpdf->n)." 0 R >>"); 
			$put_js = 1;
		}
	}

$this->mpdf->_out('>>');
	$this->mpdf->_out('endobj');

// additional objects
	// obj icon
	if ( $put_icon == 1 ) { 
		$this->_put_button_icon( $this->form_button_icon[ $form['T'] ], $form['w'], $form['h'] ); 
		$put_icon = NULL; 
	}
	// obj + 1
	if ( $put_js == 1 ) {
		$this->mpdf->_set_object_javascript( $this->array_form_button_js[$form['T']]['js'] );
		unset( $this->array_form_button_js[$form['T']] );
		$put_js = NULL;
	}

// RADIO and CHECK BOX appearance streams
	$filter=($this->mpdf->compress) ? '/Filter /FlateDecode ' : '';
	if ( $form['subtype'] == 'radio' ) {
		// output 2 appearance streams for radio buttons on/off
		if ($this->formUseZapD) {
			$fs = sprintf('%.3F', $form['style']['fontsize']*1.25);
			$fi = 'czapfdingbats';
			$r_on = 'q '.$radio_color .' rg BT /F'.$this->mpdf->fonts[$fi]['i'].' '.$fs.' Tf 0 0 Td (4) Tj ET Q';
			$r_off = 'q '.$radio_color .' rg BT /F'.$this->mpdf->fonts[$fi]['i'].' '.$fs.' Tf 0 0 Td (8) Tj ET Q';
		}
		else {
			$matrix = sprintf('%.3F 0 0 %.3F 0 %.3F', $form['style']['fontsize']*1.33/10, $form['style']['fontsize']*1.25/10, $form['style']['fontsize']);
			$fill = $radio_background_color.' rg 3.778 -7.410 m 2.800 -7.410 1.947 -7.047 1.225 -6.322 c 0.500 -5.600 0.138 -4.747 0.138 -3.769 c 0.138 -2.788 0.500 -1.938 1.225 -1.213 c 1.947 -0.491 2.800 -0.128 3.778 -0.128 c 4.757 -0.128 5.610 -0.491 6.334 -1.213 c 7.056 -1.938 7.419 -2.788 7.419 -3.769 c 7.419 -4.747 7.056 -5.600 6.334 -6.322 c 5.610 -7.047 4.757 -7.410 3.778 -7.410 c h f ';
			$circle = '3.778 -6.963 m 4.631 -6.963 5.375 -6.641 6.013 -6.004 c 6.653 -5.366 6.972 -4.619 6.972 -3.769 c 6.972 -2.916 6.653 -2.172 6.013 -1.532 c 5.375 -0.894 4.631 -0.576 3.778 -0.576 c 2.928 -0.576 2.182 -0.894 1.544 -1.532 c 0.904 -2.172 0.585 -2.916 0.585 -3.769 c 0.585 -4.619 0.904 -5.366 1.544 -6.004 c 2.182 -6.641 2.928 -6.963 3.778 -6.963 c h 3.778 -7.410 m 2.800 -7.410 1.947 -7.047 1.225 -6.322 c 0.500 -5.600 0.138 -4.747 0.138 -3.769 c 0.138 -2.788 0.500 -1.938 1.225 -1.213 c 1.947 -0.491 2.800 -0.128 3.778 -0.128 c 4.757 -0.128 5.610 -0.491 6.334 -1.213 c 7.056 -1.938 7.419 -2.788 7.419 -3.769 c 7.419 -4.747 7.056 -5.600 6.334 -6.322 c 5.610 -7.047 4.757 -7.410 3.778 -7.410 c h f ';
			$r_on = 'q '.$matrix.' cm '.$fill .$radio_color.' rg '.$circle.'  '.$radio_color.' rg
5.184 -5.110 m 4.800 -5.494 4.354 -5.685 3.841 -5.685 c 3.331 -5.685 2.885 -5.494 2.501 -5.110 c 2.119 -4.725 1.925 -4.279 1.925 -3.769 c 1.925 -3.257 2.119 -2.810 2.501 -2.429 c 2.885 -2.044 3.331 -1.853 3.841 -1.853 c 4.354 -1.853 4.800 -2.044 5.184 -2.429 c 5.566 -2.810 5.760 -3.257 5.760 -3.769 c 5.760 -4.279 5.566 -4.725 5.184 -5.110 c h 
f Q ';
			$r_off = 'q '.$matrix.' cm '.$fill .$radio_color.' rg '.$circle.'  Q ';
		}

$this->mpdf->_newobj();
		$p=($this->mpdf->compress) ? gzcompress($r_on) : $r_on;
		$this->mpdf->_out('<<'.$filter.'/Length '.strlen($p).' /Resources 2 0 R>>');
		$this->mpdf->_putstream($p);
		$this->mpdf->_out('endobj');

$this->mpdf->_newobj();
		$p=($this->mpdf->compress) ? gzcompress($r_off) : $r_off;
		$this->mpdf->_out('<<'.$filter.'/Length '.strlen($p).' /Resources 2 0 R>>');
		$this->mpdf->_putstream($p);
		$this->mpdf->_out('endobj');
	}
	if ( $form['subtype'] == 'checkbox' ) {
		// First output appearance stream for check box on
		if ($this->formUseZapD) {
			$fs = sprintf('%.3F', $form['style']['fontsize']*1.25);
			$fi = 'czapfdingbats';
			$cb_on = 'q '.$radio_color .' rg BT /F'.$this->mpdf->fonts[$fi]['i'].' '.$fs.' Tf 0 0 Td (4) Tj ET Q';
			$cb_off = 'q '.$radio_color .' rg BT /F'.$this->mpdf->fonts[$fi]['i'].' '.$fs.' Tf 0 0 Td (8) Tj ET Q';
		}
		else {
			$matrix = sprintf('%.3F 0 0 %.3F 0 %.3F', $form['style']['fontsize']*1.33/10, $form['style']['fontsize']*1.25/10, $form['style']['fontsize']);
			$fill = $radio_background_color.' rg 7.395 -0.070 m 7.395 -7.344 l 0.121 -7.344 l 0.121 -0.070 l 7.395 -0.070 l h  f ';
			$square = '0.508 -6.880 m 6.969 -6.880 l 6.969 -0.534 l 0.508 -0.534 l 0.508 -6.880 l h 7.395 -0.070 m 7.395 -7.344 l 0.121 -7.344 l 0.121 -0.070 l 7.395 -0.070 l h ';
			$cb_on = 'q '.$matrix.' cm '.$fill. $radio_color.' rg '.$square.' f '.$radio_color.' rg
6.321 -1.352 m 5.669 -2.075 5.070 -2.801 4.525 -3.532 c 3.979 -4.262 3.508 -4.967 3.112 -5.649 c 3.080 -5.706 3.039 -5.779 2.993 -5.868 c 2.858 -6.118 2.638 -6.243 2.334 -6.243 c 2.194 -6.243 2.100 -6.231 2.052 -6.205 c 2.003 -6.180 1.954 -6.118 1.904 -6.020 c 1.787 -5.788 1.688 -5.523 1.604 -5.226 c 1.521 -4.930 1.480 -4.721 1.480 -4.600 c 1.480 -4.535 1.491 -4.484 1.512 -4.447 c 1.535 -4.410 1.579 -4.367 1.647 -4.319 c 1.733 -4.259 1.828 -4.210 1.935 -4.172 c 2.040 -4.134 2.131 -4.115 2.205 -4.115 c 2.267 -4.115 2.341 -4.232 2.429 -4.469 c 2.437 -4.494 2.444 -4.511 2.448 -4.522 c 2.451 -4.531 2.456 -4.546 2.465 -4.568 c 2.546 -4.795 2.614 -4.910 2.668 -4.910 c 2.714 -4.910 2.898 -4.652 3.219 -4.136 c 3.539 -3.620 3.866 -3.136 4.197 -2.683 c 4.426 -2.367 4.633 -2.103 4.816 -1.889 c 4.998 -1.676 5.131 -1.544 5.211 -1.493 c 5.329 -1.426 5.483 -1.368 5.670 -1.319 c 5.856 -1.271 6.066 -1.238 6.296 -1.217 c 6.321 -1.352 l h  f  Q ';
			$cb_off = 'q '.$matrix.' cm '.$fill. $radio_color.' rg '.$square.' f Q ';

}
		$this->mpdf->_newobj();
		$p=($this->mpdf->compress) ? gzcompress($cb_on) : $cb_on;
		$this->mpdf->_out('<<'.$filter.'/Length '.strlen($p).' /Resources 2 0 R>>');
		$this->mpdf->_putstream($p);
		$this->mpdf->_out('endobj');

// output appearance stream for check box off (only if not using ZapfDingbats)
		if (!$this->formUseZapD) {
			$this->mpdf->_newobj();
			$p=($this->mpdf->compress) ? gzcompress($cb_off) : $cb_off;
			$this->mpdf->_out('<<'.$filter.'/Length '.strlen($p).' /Resources 2 0 R>>');
			$this->mpdf->_putstream($p);
			$this->mpdf->_out('endobj');
		}

}
	return $n;
}

function _putform_ch( $form, $hPt ) {
	$put_js = 0;
	$this->mpdf->_newobj();
	$n = $this->mpdf->n;
	$this->pdf_acro_array .= $n.' 0 R ';
	$this->forms[ $form['n'] ]['obj'] = $n;

$this->mpdf->_out('<<');
	$this->mpdf->_out('/Type /Annot ');
	$this->mpdf->_out('/Subtype /Widget');
	$this->mpdf->_out('/Rect [ '.$this->_form_rect($form['x'],$form['y'],$form['w'],$form['h'], $hPt).' ]');
	$this->mpdf->_out('/F 4');
	$this->mpdf->_out('/FT /Ch');
	if ($form['Q']) $this->mpdf->_out('/Q '.$form['Q'].'');
	$temp = '';
	$temp .= '/W '.$form['BS_W'].' ';
	$temp .= '/S /'.$form['BS_S'].' ';
	$this->mpdf->_out("/BS << $temp >>");

$temp = '';
	$temp .= '/BC [ '.$form['BC_C']." ] ";
	$temp .= '/BG [ '.$form['BG_C']." ] ";
	$this->mpdf->_out('/MK << '.$temp.' >>');

$this->mpdf->_out('/NM '.$this->mpdf->_textstring(sprintf('%04u-%04u', $n, (6000 + $form['n']))));
	$this->mpdf->_out('/M '.$this->mpdf->_textstring('D:'.date('YmdHis')));

$this->mpdf->_out('/T '.$this->mpdf->_textstring($form['T']) );
	$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$form['style']['font']]['i'].' '.$form['style']['fontsize'].' Tf '.$form['style']['fontcolor'].')');

$opt = '';
	for( $i = 0; $i < count($form['OPT']['VAL']) ; $i++ ) {
		$opt .= '[ '.$this->mpdf->_textstring($form['OPT']['VAL'][$i]).' '.$this->mpdf->_textstring($form['OPT']['OPT'][$i]).' ] ';
	}
	$this->mpdf->_out('/Opt [ '.$opt.']');

// selected
	$selectItem = false;
	$selectIndex = false;
	foreach ( $form['OPT']['SEL'] as $selectKey => $selectVal ) {
      	$selectName = $this->mpdf->_textstring($form['OPT']['VAL'][$selectVal]);
      	$selectItem .= ' '.$selectName.' ';
      	$selectIndex .= ' '.$selectVal.' ';
	}
	if ( $selectItem ) {
		if (count($form['OPT']['SEL']) < 2) {
	      	$this->mpdf->_out('/V '.$selectItem.' ');
	      	$this->mpdf->_out('/DV '.$selectItem.' ');
		}
		else {
	      	$this->mpdf->_out('/V ['.$selectItem.'] ');
	      	$this->mpdf->_out('/DV ['.$selectItem.'] ');
		}
	      $this->mpdf->_out('/I ['.$selectIndex.'] ');
	}
    
	if ( is_array($form['FF']) && count($form['FF'])>0 ) {
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']).' ');
	}
	// Javascript
	if ( isset($this->array_form_choice_js[$form['T']]) ) {
		$this->mpdf->_out("/AA << /V ".($this->mpdf->n+1)." 0 R >>"); 
		$put_js = 1;
	}

$this->mpdf->_out('>>');
	$this->mpdf->_out('endobj');
	// obj + 1
	if ( $put_js == 1 ) {
		$this->mpdf->_set_object_javascript( $this->array_form_choice_js[$form['T']]['js'] );
		unset( $this->array_form_choice_js[$form['T']] );
		$put_js = NULL;
	}

return $n;
}

function _putform_tx( $form, $hPt ) {
	$put_js = 0;
	$this->mpdf->_newobj();
	$n = $this->mpdf->n;
	$this->pdf_acro_array .= $n.' 0 R ';
	$this->forms[ $form['n'] ]['obj'] = $n;

$this->mpdf->_out('<<');
	$this->mpdf->_out('/Type /Annot ');
	$this->mpdf->_out('/Subtype /Widget ');

$this->mpdf->_out('/Rect [ '.$this->_form_rect($form['x'],$form['y'],$form['w'],$form['h'], $hPt).' ] ');
	$form['hidden'] ? $this->mpdf->_out('/F 2 ') : $this->mpdf->_out('/F 4 ');
	$this->mpdf->_out('/FT /Tx ');

$this->mpdf->_out('/H /N ');
	$this->mpdf->_out('/R 0 ');

if ( is_array($form['FF']) && count($form['FF'])>0 ) {
		$this->mpdf->_out('/Ff '.$this->_setflag($form['FF']).' ');
	}
	if ( isset($form['maxlen']) && $form['maxlen']>0 ) {
		$this->mpdf->_out('/MaxLen '.$form['maxlen']);
	}

$temp = '';
	$temp .= '/W '.$form['BS_W'].' ';
	$temp .= '/S /'.$form['BS_S'].' ';
	$this->mpdf->_out("/BS << $temp >>");

$temp = '';
	$temp .= '/BC [ '.$form['BC_C']." ] ";
	$temp .= '/BG [ '.$form['BG_C']." ] ";
	$this->mpdf->_out('/MK <<'.$temp.' >>');

$this->mpdf->_out('/T '.$this->mpdf->_textstring($form['T']) );
	$this->mpdf->_out('/TU '.$this->mpdf->_textstring($form['TU']) );
	if ($form['V'] || $form['V']==='0')
		$this->mpdf->_out('/V '.$this->mpdf->_textstring($form['V']) );
	$this->mpdf->_out('/DV '.$this->mpdf->_textstring($form['DV']) );
	$this->mpdf->_out('/DA (/F'.$this->mpdf->fonts[$form['style']['font']]['i'].' '.$form['style']['fontsize'].' Tf '.$form['style']['fontcolor'].')');
	if ( $form['Q'] ) $this->mpdf->_out('/Q '.$form['Q'].'');

$this->mpdf->_out('/NM '.$this->mpdf->_textstring(sprintf('%04u-%04u', $n, (5000 + $form['n']))));
	$this->mpdf->_out('/M '.$this->mpdf->_textstring('D:'.date('YmdHis')));

if ( isset($this->array_form_text_js[$form['T']]) ) {
		$put_js = 1;
		$cc = 0;
		$js_str = '';

if ( isset($this->array_form_text_js[$form['T']]['F']) ) { 
			$cc++; 
			$js_str .= '/F '.($cc + $this->mpdf->n).' 0 R '; 
		}
		if ( isset($this->array_form_text_js[$form['T']]['K']) ) { 
			$cc++; 
			$js_str .= '/K '.($cc + $this->mpdf->n).' 0 R '; 
		}
		if ( isset($this->array_form_text_js[$form['T']]['V']) ) { 
			$cc++; 
			$js_str .= '/V '.($cc + $this->mpdf->n).' 0 R '; 
		}
		if ( isset($this->array_form_text_js[$form['T']]['C']) ) { 
			$cc++; 
			$js_str .= '/C '.($cc + $this->mpdf->n).' 0 R '; 
			$this->pdf_array_co .= $this->mpdf->n.' 0 R ';
		}
		$this->mpdf->_out('/AA << '.$js_str.' >>');
	}

$this->mpdf->_out('>>');
	$this->mpdf->_out('endobj');

if ( $put_js == 1 ) {
		if ( isset($this->array_form_text_js[$form['T']]['F']) ) { 
			$this->mpdf->_set_object_javascript( $this->array_form_text_js[$form['T']]['F']['js'] ); 
			unset( $this->array_form_text_js[$form['T']]['F'] );
		}
		if ( isset($this->array_form_text_js[$form['T']]['K']) ) { 
			$this->mpdf->_set_object_javascript( $this->array_form_text_js[$form['T']]['K']['js'] ); 
			unset( $this->array_form_text_js[$form['T']]['K'] );
		}
		if ( isset($this->array_form_text_js[$form['T']]['V']) ) { 
			$this->mpdf->_set_object_javascript( $this->array_form_text_js[$form['T']]['V']['js'] ); 
			unset( $this->array_form_text_js[$form['T']]['V'] );
		}
		if ( isset($this->array_form_text_js[$form['T']]['C']) ) { 
			$this->mpdf->_set_object_javascript( $this->array_form_text_js[$form['T']]['C']['js'] ); 
			unset( $this->array_form_text_js[$form['T']]['C'] );
		}
	}
	return $n;
}

}