Hosting sin soporte para PDFlib

[zxeus]

Hola, instale una web de otro hosting en mi hosting y la web usa PDFlib para generar reportes sobre clientes pero me salta el error "El archivo no empieza por '%PDF-" siempre, contacte con el soporte del hosting (yoursite.ch) y me dicen que no dan soporte a PDFlib pero si a FPDFlib. ¿Cual es la forma mas rapida de solucionarlo? pego aqui el archivo completo que genera el pdf pero creo que las funciones entre uno y otro son distintas. No hay alguna manera de simplemente hacer funcionar el PDFlib en este hosting?

[zxeus]

Código PHP:

  <?PHP
 
class pdf  {
    
    var $p;
    
    function generate_pdf ($page_method, $table_name, $table_key_name, $table_key_values) {
        if  (!defined("CURRENCY_SYMBOL_PRINT")) {
            define("CURRENCY_SYMBOL_PRINT","$");
        }
        global $db_hostname;
        global $db_user;
        global $db_password;
        global $db_name;
        global $db_type;
        $user_serial = false;
        $company_serial = false;
        
        if (!$table_name || !$table_key_name || !$table_key_values) {
            return false;
        }
        $this->conn = &ADONewConnection($db_type);
        $this->conn->PConnect($db_hostname,$db_user,$db_password,$db_name);
        $this->conn->SetFetchMode(ADODB_FETCH_ASSOC);
        if (!empty($GLOBALS['debug_mode'])) {
            $this->conn->debug=$GLOBALS['debug_mode'];
        } else {
            $this->conn->debug=false;
        }            
        
        $data_class = new data_class;
        $variable_array = $data_class->variable_array($page_method);
        $need_comma=false;
        $foreign_tables=null;
        $extra_where_clauses= ' ' . $table_key_name . ' in (' . $table_key_values . ') ';
        $foreign_where_clause= null;
        $foreign_table_name_posix=1;
        $order_by_clause=null;
        $query_sql = 'select ';
        $need_where = true;
        
        $query_sql .= ' * ';
        // get the field names required
        
        foreach ($variable_array as $key=>$value) {
            if (isset($value['field_order_by']) && $value['field_order_by']) {
                if ($order_by_clause) {
                    if (isset($value['field_order_by_reverse']) && $value['field_order_by_reverse']) {
                        $order_by_clause .= ', ' . $key . ' DESC ';
                    } else {
                        $order_by_clause .= ', ' . $key . ' ';
                    }
                } else {
                    if (isset($value['field_order_by_reverse']) && $value['field_order_by_reverse']) {
                        $order_by_clause .= ' order by ' . $key . ' DESC ';
                    } else {
                        $order_by_clause .= ' order by ' . $key . ' ';
                    }
                }
            }
            $need_comma=true;
        }
        
        $query_sql .= " from " . $table_name;
        
        if ($extra_where_clauses) {
            if ($need_where) {
                $query_sql .= " where ";
            } else {
                $query_sql .= " and ";
            }
            $need_where = false;
            $query_sql .= $extra_where_clauses;
        }
        if ($order_by_clause) {
            $query_sql .= $order_by_clause;
        }
        
        $rs = $this->conn->Execute($query_sql);
        
        if (!$rs) {
            // This means the record was not found
            return false;
        } else {
            /* This is where font/image/PDF input files live. Adjust as necessary. */
            $searchpath = BASE_DIR . '/pdf/data';
            
            PDF_set_parameter($this->p, "SearchPath", $searchpath);
            PDF_set_value($this->p, "compress", 9);
            
            PDF_set_info($this->p, "Creator", "PDFlib");
            PDF_set_info($this->p, "Author", SYSTEM_NAME);
            PDF_set_info($this->p, "Title", 'Land Document');
            
            $query_sql = 'select distinct template_serial from template, deal, company where deal.deal_serial in (' . $table_key_values . ') and deal.deal_company_serial = company.company_serial and template.template_serial = company.company_template_serial';
            $rs_template = $this->conn->Execute($query_sql);
            if (!$template = $rs_template->FetchRow()) {
                return false;
            } else {
                // Let's generate the pdf
                $infile = BASE_DIR . '/templates/template_' . $template['template_serial'] . '.pdf';
                $blockcontainer = PDF_open_pdi($this->p, $infile, "", 0);
                if ($blockcontainer == 0){
                    die ("Couldn't open input file $infile.\n");
                }
                
                while ($data = $rs->FetchRow()) {
                    for ($page_number=1; $page_number < 14; $page_number++) {
                        $page = PDF_open_pdi_page($this->p, $blockcontainer, $page_number, "");
                        if ($page == 0){
                            // no problem just break out of the for loop
                            continue;
                        }
                        PDF_begin_page($this->p, 20, 20);        /* dummy page size */
                        
                        /* This will adjust the page size to the block container's size. */
                        PDF_fit_pdi_page($this->p, $page, 0, 0, "adjustpage");
                        /* Fill all text blocks with dynamic data */
                        foreach ($variable_array as $key=>$value) {
                            $i=0;
                            while ($blockname = PDF_get_pdi_parameter($this->p, "vdp/Blocks[$i]/Name", $blockcontainer, $page, 0)) {
                                if ($blockname == $key || ((strpos($key, '___') === (strlen($key) - 4)) && $blockname == $key)) {
                                    if (strpos($key, '___') === (strlen($key) - 4)) {
                                        $key = substr($key, 0 ,strlen($key) - 4);
                                    }
                                    if (isset($data[$key]) && !empty($data[$key]) && ($value['field_type'] == 'text' || $value['field_type'] == 'select' || $value['field_type'] == 'hidden' || $value['field_type'] == 'key')) {
                                        $suffix = null;
                                        $prefix = null;
                                        $suffix = PDF_get_pdi_parameter($this->p, "vdp/Blocks/$blockname/Custom/suffix", $blockcontainer, $page, 0);
                                        $prefix = PDF_get_pdi_parameter($this->p, "vdp/Blocks/$blockname/Custom/prefix", $blockcontainer, $page, 0);
                                        
                                        if ($value['field_value_type'] == 'currency') {
                                            if (isset($data[$key . '_poa']) && $data[$key . '_poa']) {
                                                $temp_value = 'P.O.A.';
                                            } else {   

[zxeus]

Código PHP:

  $show_currency_symbol = PDF_get_pdi_parameter($this->p, "vdp/Blocks/$blockname/Custom/show_currency_symbol", $blockcontainer, $page, 0);
                                                if ($key == 'deal_stock_price_per_share') {
                                                    $number_decimals = 3;
                                                } else {
                                                    $number_decimals = 0;
                                                }
                                                if ($show_currency_symbol == 'no') {
                                                    $temp_value = number_format($data[$key], $number_decimals);
                                                } else {
                                                    $temp_value = CURRENCY_SYMBOL_PRINT . ' ' . number_format($data[$key], $number_decimals);
                                                }
                                            }
                                        } elseif ($value['field_value_type'] == 'date') {
                                            $temp_value = date("F d, Y", strtotime($data[$key]));
                                        } elseif ($value['field_value_type'] == 'timestamp') {
                                            $temp_value = date("D d, M Y, h:i", $data[$key]);
                                        } elseif (($value['field_type'] == 'select' && $value['field_select_type'] == 'foreign_key') ||
                                        ($value['field_type'] == 'hidden' && isset($value['field_select_type']) && $value['field_select_type'] == 'foreign_key') ) {
                                            $sub_query_sql = null;
                                            $show_boolean = PDF_get_pdi_parameter($this->p, "vdp/Blocks/$blockname/Custom/show_boolean", $blockcontainer, $page, 0);
                                            
                                            if ($show_boolean == 'yes' && isset($value['field_select_boolean_name'])) {
                                                $sub_query_sql .= 'select ' . $value['field_select_boolean_name'] . ' from ' . $value['field_select_foreign_key_table'] . ' ';
                                            } else {
                                                $sub_query_sql .= 'select ' . $value['field_select_foreign_key'] . ' from ' . $value['field_select_foreign_key_table'] . ' ';
                                            }
                                            $sub_query_sql .= ' where ' . $value['field_select_foreign_key_serial'] . '=\'' .    $data[$key] . '\'';
                                            $rs_sub = $this->conn->Execute($sub_query_sql);
                                            if (!$rs_sub || $rs_sub->RecordCount() != 1) {
                                                // This means the record was not found
                                                // So we print nothing
                                                $temp_value = null;
                                            } else {
                                                $sub_data = $rs_sub->fields;
                                                if ($show_boolean == 'yes') {
                                                    $temp_value = $sub_data[$value['field_select_boolean_name']];
                                                    if ($temp_value == 1) {
                                                        $temp_value = $prefix . 'yes' . $suffix;
                                                    } else {
                                                        $temp_value = $prefix . 'no' . $suffix;
                                                    }
                                                } else {
                                                    $temp_value = $sub_data[$value['field_select_foreign_key']];
                                                    $temp_value = $prefix . $temp_value . $suffix;
                                                }
                                            }
                                        } else {
                                            $temp_value = $prefix . $data[$key] . $suffix;
                                        }
                                        if (!PDF_fill_textblock($this->p, $page, $blockname, $temp_value, "embedding encoding winansi pdiwarning")) {
                                            printf("Warning: couldn't fill block '%s' in '%s'.\n", $blockname, $infile);
                                        }
                                    } elseif ($value['field_type'] == 'textarea') {
                                        $temp_value = stripslashes((trim($data[$key])));
                                        $fontsize = PDF_get_pdi_value($this->p, "vdp/Blocks[$i]/fontsize", $blockcontainer, $page, 0);
                                        $fontname = PDF_get_pdi_parameter($this->p, "vdp/Blocks[$i]/fontname", $blockcontainer, $page, 0);
                                        $lleftx = PDF_get_pdi_value($this->p, "vdp/Blocks[$i]/Rect[0]", $blockcontainer, $page, 0);
                                        $llefty = PDF_get_pdi_value($this->p, "vdp/Blocks[$i]/Rect[1]", $blockcontainer, $page, 0);
                                        $urightx = PDF_get_pdi_value($this->p, "vdp/Blocks[$i]/Rect[2]", $blockcontainer, $page, 0);
                                        $urighty = PDF_get_pdi_value($this->p, "vdp/Blocks[$i]/Rect[3]", $blockcontainer, $page, 0);
                                        $regularfont = PDF_load_font($this->p, $fontname, "winansi", "");
                                        PDF_setfont($this->p, $regularfont, $fontsize);
                                        $leading = $fontsize + 2;
                                        PDF_set_value($this->p, "leading", $leading);
                                        while (PDF_show_boxed($this->p, $temp_value, $lleftx, $llefty, $urightx - $lleftx,
                                        $urighty - $llefty, 'justify', 'blind') != 0) {
                                            $fontsize = $fontsize - 0.5;
                                            PDF_setfont($this->p, $regularfont, $fontsize);
                                            $leading = $fontsize + 2;
                                            PDF_set_value($this->p, "leading", $leading);
                                        }
                                        PDF_show_boxed($this->p, $temp_value, $lleftx, $llefty, $urightx - $lleftx,
                                        $urighty - $llefty, 'justify');
                                    }
                                }
                                $i++;
                            }
                        }
                        
                        PDF_end_page($this->p);            /* close page */
                        PDF_close_pdi_page($this->p, $page);
                    }
                }
                
            }
            PDF_close_pdi($this->p, $blockcontainer);
            PDF_close($this->p);                /* close PDF document */
            
            return true;
        }
    }
    
    function display_pdf ($page_method, $table_name, $table_key_name, $table_key_values) {
 
        header("Content-type: application/pdf");
        if (strpos(strtolower($_SERVER['HTTP_USER_AGENT']), 'contype') === false) {
            $this->p = PDF_new();
            if ( !strchr($_SERVER['SERVER_SOFTWARE'], 'Win32')) {
                PDF_set_parameter($this->p, 'license', 'L500602-010000');
            }
 
            /*  open new PDF file; insert a file name to create the PDF on disk */
            PDF_open_file($this->p, null);
 
            if ($this->generate_pdf ($page_method, $table_name, $table_key_name, $table_key_values)) {
                //$buf = PDF_get_buffer($this->p);
                //$len = strlen($buf);
 
                header("Content-Disposition: inline; filename=tp1.pdf");
                print PDF_get_buffer($this->p);
 
                PDF_delete($this->p);                /* delete the PDFlib object */
                return true;
            } else {
                PDF_delete($this->p);                /* delete the PDFlib object */
                return false;
            }
        }
 
    }
    
    function generate_pdf_file ($page_method, $table_name, $table_key_name, $table_key_values) {
        
        
        $filename = '/tmp/tp1_' . str_replace(',', '_', $table_key_values . '.pdf');
        $this->p = PDF_new();
        PDF_set_parameter($this->p, 'license', 'L500602-010000');
        
        /*  open new PDF file; insert a file name to create the PDF on disk */
        PDF_open_file($this->p, $filename);
        
        if ($this->generate_pdf ($page_method, $table_name, $table_key_name, $table_key_values)) {
            PDF_delete($this->p);                /* delete the PDFlib object */
            return $filename;
        } else {
            PDF_delete($this->p);                /* delete the PDFlib object */
            return false;
        }
    }
}
?>