/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c

Bug Summary

File:	root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c
Warning:	line 681, column 4 Access to field 'type' results in a dereference of an undefined pointer value (loaded from variable 'content_node')
Annotated Source Code

Press '?' to see keyboard shortcuts
Show analyzer invocation
clang -cc1 -cc1 -triple x86_64-pc-linux-gnu -analyze -disable-free -clear-ast-before-backend -disable-llvm-verifier -discard-value-names -main-file-name cairo-pdf-interchange.c -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=security.insecureAPI.UncheckedReturn -analyzer-checker=security.insecureAPI.getpw -analyzer-checker=security.insecureAPI.gets -analyzer-checker=security.insecureAPI.mktemp -analyzer-checker=security.insecureAPI.mkstemp -analyzer-checker=security.insecureAPI.vfork -analyzer-checker=nullability.NullPassedToNonnull -analyzer-checker=nullability.NullReturnedFromNonnull -analyzer-output plist -w -setup-static-analyzer -analyzer-config-compatibility-mode=true -mrelocation-model pic -pic-level 2 -fhalf-no-semantic-interposition -mframe-pointer=all -relaxed-aliasing -ffp-contract=off -fno-rounding-math -mconstructor-aliases -funwind-tables=2 -target-cpu x86-64 -tune-cpu generic -debugger-tuning=gdb -fdebug-compilation-dir=/root/firefox-clang/obj-x86_64-pc-linux-gnu/gfx/cairo/cairo/src -fcoverage-compilation-dir=/root/firefox-clang/obj-x86_64-pc-linux-gnu/gfx/cairo/cairo/src -resource-dir /usr/lib/llvm-21/lib/clang/21 -include /root/firefox-clang/config/gcc_hidden.h -include /root/firefox-clang/obj-x86_64-pc-linux-gnu/mozilla-config.h -I /root/firefox-clang/obj-x86_64-pc-linux-gnu/dist/system_wrappers -U _FORTIFY_SOURCE -D _FORTIFY_SOURCE=2 -D _GLIBCXX_ASSERTIONS -D DEBUG=1 -D HAVE_FT_LOAD_SFNT_TABLE -D PACKAGE_VERSION="moz" -D PACKAGE_BUGREPORT="http://bugzilla.mozilla.org/" -D CAIRO_HAS_PTHREAD -D _GNU_SOURCE -D MOZ_TREE_PIXMAN -D SIZEOF_VOID_P=__SIZEOF_POINTER__ -D SIZEOF_INT=__SIZEOF_INT__ -D SIZEOF_LONG=__SIZEOF_LONG__ -D SIZEOF_LONG_LONG=__SIZEOF_LONG_LONG__ -D HAVE_UINT64_T -D HAVE_CXX11_ATOMIC_PRIMITIVES -D MOZ_HAS_MOZGLUE -D MOZILLA_INTERNAL_API -D IMPL_LIBXUL -D MOZ_SUPPORT_LEAKCHECKING -D STATIC_EXPORTABLE_JS_API -I /root/firefox-clang/gfx/cairo/cairo/src -I /root/firefox-clang/obj-x86_64-pc-linux-gnu/gfx/cairo/cairo/src -I /root/firefox-clang/obj-x86_64-pc-linux-gnu/dist/include -I /root/firefox-clang/obj-x86_64-pc-linux-gnu/dist/include/nspr -I /root/firefox-clang/obj-x86_64-pc-linux-gnu/dist/include/nss -D MOZILLA_CLIENT -I /usr/include/freetype2 -I /usr/include/libpng16 -I /usr/include/freetype2 -I /usr/include/libpng16 -internal-isystem /usr/lib/llvm-21/lib/clang/21/include -internal-isystem /usr/local/include -internal-isystem /usr/lib/gcc/x86_64-linux-gnu/14/../../../../x86_64-linux-gnu/include -internal-externc-isystem /usr/include/x86_64-linux-gnu -internal-externc-isystem /include -internal-externc-isystem /usr/include -O2 -Wno-error=tautological-type-limit-compare -Wno-range-loop-analysis -Wno-error=deprecated-declarations -Wno-error=array-bounds -Wno-error=free-nonheap-object -Wno-error=atomic-alignment -Wno-error=deprecated-builtins -Wno-psabi -Wno-error=builtin-macro-redefined -Wno-unknown-warning-option -Wno-enum-compare -Wno-int-to-pointer-cast -Wno-int-conversion -Wno-incompatible-pointer-types -Wno-sign-compare -Wno-type-limits -Wno-missing-field-initializers -Wno-conversion -Wno-narrowing -Wno-switch -Wno-unused -Wno-unused-variable -Wno-error=uninitialized -Wno-absolute-value -Wno-deprecated-register -Wno-incompatible-pointer-types -Wno-macro-redefined -Wno-shift-negative-value -Wno-tautological-compare -Wno-tautological-constant-out-of-range-compare -Wno-unreachable-code -ferror-limit 19 -fstrict-flex-arrays=1 -stack-protector 2 -fstack-clash-protection -ftrivial-auto-var-init=pattern -fgnuc-version=4.2.1 -fskip-odr-check-in-gmf -vectorize-loops -vectorize-slp -analyzer-checker optin.performance.Padding -analyzer-output=html -analyzer-config stable-report-filename=true -faddrsig -D__GCC_HAVE_DWARF2_CFI_ASM=1 -o /tmp/scan-build-2025-06-30-093548-1913035-1 -x c /root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c
1/* -*- Mode: c; c-basic-offset: 4; indent-tabs-mode: t; tab-width: 8; -*- */
2/* cairo - a vector graphics library with display and print output
*
* Copyright © 2016 Adrian Johnson
*
* This library is free software; you can redistribute it and/or
* modify it either under the terms of the GNU Lesser General Public
* License version 2.1 as published by the Free Software Foundation
* (the "LGPL") or, at your option, under the terms of the Mozilla
* Public License Version 1.1 (the "MPL"). If you do not alter this
* notice, a recipient may use your version of this file under either
* the MPL or the LGPL.
*
* You should have received a copy of the LGPL along with this library
* in the file COPYING-LGPL-2.1; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Suite 500, Boston, MA 02110-1335, USA
* You should have received a copy of the MPL along with this library
* in the file COPYING-MPL-1.1
*
* The contents of this file are subject to the Mozilla Public License
* Version 1.1 (the "License"); you may not use this file except in
* compliance with the License. You may obtain a copy of the License at
* http://www.mozilla.org/MPL/
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY
* OF ANY KIND, either express or implied. See the LGPL or the MPL for
* the specific language governing rights and limitations.
*
* The Original Code is the cairo graphics library.
*
* The Initial Developer of the Original Code is Adrian Johnson.
*
* Contributor(s):
*	Adrian Johnson <ajohnson@redneon.com>
*/


38/* PDF Document Interchange features:
*  - metadata
*  - document outline
*  - tagged pdf
*  - hyperlinks
*  - page labels
*/

46#define _DEFAULT_SOURCE1 /* for localtime_r(), gmtime_r(), snprintf(), strdup() */
47#include "cairoint.h"

49#include "cairo-pdf.h"
50#include "cairo-pdf-surface-private.h"

52#include "cairo-array-private.h"
53#include "cairo-error-private.h"
54#include "cairo-output-stream-private.h"
55#include "cairo-recording-surface-inline.h"
56#include "cairo-recording-surface-private.h"
57#include "cairo-surface-snapshot-inline.h"

59#include <time.h>

61#ifndef HAVE_LOCALTIME_R1
62#define localtime_r(T, BUF) (*(BUF) = *localtime (T))
63#endif
64#ifndef HAVE_GMTIME_R1
65#define gmtime_r(T, BUF) (*(BUF) = *gmtime (T))
66#endif

68/* #define DEBUG_PDF_INTERCHANGE 1 */

70#if DEBUG_PDF_INTERCHANGE
71static void
72print_tree (cairo_pdf_surface_t *surface, cairo_pdf_struct_tree_node_t *node);

74static void
75print_command (cairo_pdf_command_t *command, int indent);

77static void
78print_command_list(cairo_pdf_command_list_t *command_list);
79#endif

81static void
82_cairo_pdf_command_init_key (cairo_pdf_command_entry_t *key)
83{
  key->base.hash = _cairo_hash_uintptr (_CAIRO_HASH_INIT_VALUE5381, (uintptr_t)key->recording_id);
  key->base.hash = _cairo_hash_uintptr (key->base.hash, (uintptr_t)key->command_id);
86}

88static cairo_bool_t
89_cairo_pdf_command_equal (const void *key_a, const void *key_b)
90{
  const cairo_pdf_command_entry_t *a = key_a;
  const cairo_pdf_command_entry_t *b = key_b;

  return a->recording_id == b->recording_id && a->command_id == b->command_id;
95}

97static void
98_cairo_pdf_command_pluck (void *entry, void *closure)
99{
  cairo_pdf_command_entry_t *dest = entry;
  cairo_hash_table_t *table = closure;

  _cairo_hash_table_remove (table, &dest->base);
  free (dest);
105}

107static cairo_pdf_struct_tree_node_t *
108lookup_node_for_command (cairo_pdf_surface_t    *surface,
	 unsigned int            recording_id,
	 unsigned int            command_id)
111{
  cairo_pdf_command_entry_t entry_key;
  cairo_pdf_command_entry_t *entry;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  entry_key.recording_id = recording_id;
  entry_key.command_id = command_id;
  _cairo_pdf_command_init_key (&entry_key);
  entry = _cairo_hash_table_lookup (ic->command_to_node_map, &entry_key.base);
  assert (entry != NULL)((void) sizeof ((entry != ((void*)0)) ? 1 : 0), __extension__
 ({ if (entry != ((void*)0)) ; else __assert_fail ("entry != NULL"
, "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 120, __extension__ __PRETTY_FUNCTION__); }));
  return entry->node;
122}

124static cairo_int_status_t
125command_list_add (cairo_pdf_surface_t    *surface,
  unsigned int            command_id,
  cairo_pdf_operation_t   flags)
128{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t command;
  cairo_int_status_t status;

  unsigned num_elements = _cairo_array_num_elements (&ic->current_commands->commands);
  if (command_id > num_elements) {
void *elements;
unsigned additional_elements = command_id - num_elements;
status = _cairo_array_allocate (&ic->current_commands->commands, additional_elements, &elements);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
memset (elements, 0, additional_elements * sizeof(cairo_pdf_command_t));
  }

  command.group = NULL((void*)0);
  command.node = NULL((void*)0);
  command.command_id = command_id;
  command.mcid_index = 0;
  command.flags = flags;
  return _cairo_array_append (&ic->current_commands->commands, &command);
149}

151static cairo_int_status_t
152command_list_push_group (cairo_pdf_surface_t    *surface,
	 unsigned int            command_id,
	 cairo_surface_t        *recording_surface,
	 unsigned int            region_id)
156{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t *command;
  cairo_pdf_command_list_t *group;
  cairo_pdf_recording_surface_commands_t recording_commands;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  group = _cairo_malloc (sizeof(cairo_pdf_command_list_t))((sizeof(cairo_pdf_command_list_t)) != 0 ? malloc(sizeof(cairo_pdf_command_list_t
)) : ((void*)0));
  _cairo_array_init (&group->commands, sizeof(cairo_pdf_command_t));
  group->parent = ic->current_commands;

  command_list_add (surface, command_id, PDF_GROUP);
  command = _cairo_array_index (&ic->current_commands->commands, command_id);
  command->group = group;
  ic->current_commands = group;

  recording_commands.recording_surface = recording_surface;
  recording_commands.command_list = group;
  recording_commands.region_id = region_id;
  status = _cairo_array_append (&ic->recording_surface_commands, &recording_commands);

  return status;
178}

180static void
181command_list_pop_group (cairo_pdf_surface_t    *surface)
182{
  cairo_pdf_interchange_t *ic = &surface->interchange;

  ic->current_commands = ic->current_commands->parent;
186}

188static cairo_bool_t
189command_list_is_group (cairo_pdf_surface_t    *surface,
       unsigned int            command_id)
191{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t *command;
  unsigned num_elements = _cairo_array_num_elements (&ic->current_commands->commands);

  if (command_id >= num_elements)
return FALSE0;

  command = _cairo_array_index (&ic->current_commands->commands, command_id);
  return command->flags == PDF_GROUP;
201}


204/* Is there any content between current command and next
* begin/end/group? */
206static cairo_bool_t
207command_list_has_content (cairo_pdf_surface_t    *surface,
	  unsigned int            command_id,
	  unsigned int           *content_command_id)
210{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t *command;
  unsigned i;
  unsigned num_elements = _cairo_array_num_elements (&ic->current_commands->commands);

  for (i = command_id + 1; i < num_elements; i++) {
command = _cairo_array_index (&ic->current_commands->commands, i);
switch (command->flags) {
   case PDF_CONTENT:
if (content_command_id)
    *content_command_id = i;
return TRUE1;
break;
   case PDF_BEGIN:
   case PDF_END:
   case PDF_GROUP:
return FALSE0;
   case PDF_NONE:
break;
}
  }
  return FALSE0;
233}

235static void
236command_list_set_mcid (cairo_pdf_surface_t          *surface,
       unsigned int                  command_id,
       cairo_pdf_struct_tree_node_t *node,
       int                           mcid_index)
240{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t *command;

  command = _cairo_array_index (&ic->current_commands->commands, command_id);
  command->node = node;
  command->mcid_index = mcid_index;
247}

249static void
250command_list_set_current_recording_commands (cairo_pdf_surface_t    *surface,
			     cairo_surface_t        *recording_surface,
			     unsigned int            region_id)
253{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  unsigned i;
  cairo_pdf_recording_surface_commands_t *commands;
  unsigned num_elements = _cairo_array_num_elements (&ic->recording_surface_commands);

  for (i = 0; i < num_elements; i++) {
commands = _cairo_array_index (&ic->recording_surface_commands, i);
if (commands->region_id == region_id) {
   ic->current_commands = commands->command_list;
   return;
}
  }
  ASSERT_NOT_REACHEDdo { ((void) sizeof ((!"reached") ? 1 : 0), __extension__ ({ if
 (!"reached") ; else __assert_fail ("!\"reached\"", "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 266, __extension__ __PRETTY_FUNCTION__); })); } while (0); /* recording_surface not found */
267}

269static void
270update_mcid_order (cairo_pdf_surface_t       *surface,
   cairo_pdf_command_list_t  *command_list)
272{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_t *command;
  cairo_pdf_page_mcid_t *mcid_elem;
  unsigned i;
  unsigned num_elements = _cairo_array_num_elements (&command_list->commands);

  for (i = 0; i < num_elements; i++) {
command = _cairo_array_index (&command_list->commands, i);
if (command->node) {
   mcid_elem = _cairo_array_index (&command->node->mcid, command->mcid_index);
   mcid_elem->order = ic->mcid_order++;
}

if (command->group)
   update_mcid_order (surface, command->group);
  }
289}

291static void
292_cairo_pdf_content_tag_init_key (cairo_pdf_content_tag_t *key)
293{
  key->base.hash = _cairo_hash_string (key->node->attributes.content.id);
295}

297static cairo_bool_t
298_cairo_pdf_content_tag_equal (const void *key_a, const void *key_b)
299{
  const cairo_pdf_content_tag_t *a = key_a;
  const cairo_pdf_content_tag_t *b = key_b;

  return strcmp (a->node->attributes.content.id, b->node->attributes.content.id) == 0;
304}

306static void
307_cairo_pdf_content_tag_pluck (void *entry, void *closure)
308{
  cairo_pdf_content_tag_t *content_tag = entry;
  cairo_hash_table_t *table = closure;

  _cairo_hash_table_remove (table, &content_tag->base);
  free (content_tag);
314}

316static cairo_status_t
317lookup_content_node_for_ref_node (cairo_pdf_surface_t           *surface,
		  cairo_pdf_struct_tree_node_t  *ref_node,
		  cairo_pdf_struct_tree_node_t **node)
320{
  cairo_pdf_content_tag_t entry_key;
  cairo_pdf_content_tag_t *entry;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  entry_key.node = ref_node;
  _cairo_pdf_content_tag_init_key (&entry_key);
  entry = _cairo_hash_table_lookup (ic->content_tag_map, &entry_key.base);
  if (!entry) {
28
←
Assuming 'entry' is null, which participates in a condition later→
29
←
Taking true branch→
return _cairo_tag_error ("CONTENT_REF ref='%s' not found",
30
←
Returning without writing to '*node'→
31
←
Returning value, which participates in a condition later→
		 ref_node->attributes.content_ref.ref);
  }

  *node = entry->node;
  return CAIRO_STATUS_SUCCESS;
335}

337static void
338write_rect_to_pdf_quad_points (cairo_output_stream_t   *stream,
	       const cairo_rectangle_t *rect,
	       double                   surface_height)
341{
  _cairo_output_stream_printf (stream,
		 "%f %f %f %f %f %f %f %f",
		 rect->x,
		 surface_height - rect->y,
		 rect->x + rect->width,
		 surface_height - rect->y,
		 rect->x + rect->width,
		 surface_height - (rect->y + rect->height),
		 rect->x,
		 surface_height - (rect->y + rect->height));
352}

354static void
355write_rect_int_to_pdf_bbox (cairo_output_stream_t       *stream,
	    const cairo_rectangle_int_t *rect,
	    double                       surface_height)
358{
  _cairo_output_stream_printf (stream,
		 "%d %f %d %f",
		 rect->x,
		 surface_height - (rect->y + rect->height),
		 rect->x + rect->width,
		 surface_height - rect->y);
365}

367static cairo_int_status_t
368add_tree_node (cairo_pdf_surface_t           *surface,
      cairo_pdf_struct_tree_node_t  *parent,
      const char                    *name,
      const char                    *attributes,
      cairo_pdf_struct_tree_node_t **new_node)
373{
  cairo_pdf_struct_tree_node_t *node;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  node = _cairo_malloc (sizeof(cairo_pdf_struct_tree_node_t))((sizeof(cairo_pdf_struct_tree_node_t)) != 0 ? malloc(sizeof(
cairo_pdf_struct_tree_node_t)) : ((void*)0));
  if (unlikely (node == NULL)(__builtin_expect (!!(node == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  node->name = strdup (name);
  node->res = _cairo_pdf_surface_new_object (surface);
  if (node->res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  node->parent = parent;
  cairo_list_init (&node->children);
  _cairo_array_init (&node->mcid, sizeof (cairo_pdf_page_mcid_t));
  node->annot = NULL((void*)0);
  node->extents.valid = FALSE0;

  cairo_list_add_tail (&node->link, &parent->children);

  if (strcmp (node->name, CAIRO_TAG_CONTENT"cairo.content") == 0) {
node->type = PDF_NODE_CONTENT;
status = _cairo_tag_parse_content_attributes (attributes, &node->attributes.content);
  } else if (strcmp (node->name, CAIRO_TAG_CONTENT_REF"cairo.content_ref") == 0) {
node->type = PDF_NODE_CONTENT_REF;
status = _cairo_tag_parse_content_ref_attributes (attributes, &node->attributes.content_ref);
  } else if (strcmp (node->name, "Artifact") == 0) {
node->type = PDF_NODE_ARTIFACT;
  } else {
node->type = PDF_NODE_STRUCT;
  }

  *new_node = node;
  return status;
408}

410static void
411free_node (cairo_pdf_struct_tree_node_t *node)
412{
  cairo_pdf_struct_tree_node_t *child, *next;

  if (!node)
return;

  cairo_list_foreach_entry_safe (child, next, cairo_pdf_struct_tree_node_t,for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&node->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); }), next = ({ const __typeof__
 (((cairo_pdf_struct_tree_node_t *) 0)->link) *mptr__ = (child
->link.next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
); &child->link != (&node->children); child = next
, next = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t *
) 0)->link) *mptr__ = (next->link.next); (cairo_pdf_struct_tree_node_t
 *) ((char *) mptr__ - __builtin_offsetof(cairo_pdf_struct_tree_node_t
, link)); }))
		   &node->children,for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&node->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); }), next = ({ const __typeof__
 (((cairo_pdf_struct_tree_node_t *) 0)->link) *mptr__ = (child
->link.next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
); &child->link != (&node->children); child = next
, next = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t *
) 0)->link) *mptr__ = (next->link.next); (cairo_pdf_struct_tree_node_t
 *) ((char *) mptr__ - __builtin_offsetof(cairo_pdf_struct_tree_node_t
, link)); }))
		   link)for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&node->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); }), next = ({ const __typeof__
 (((cairo_pdf_struct_tree_node_t *) 0)->link) *mptr__ = (child
->link.next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
); &child->link != (&node->children); child = next
, next = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t *
) 0)->link) *mptr__ = (next->link.next); (cairo_pdf_struct_tree_node_t
 *) ((char *) mptr__ - __builtin_offsetof(cairo_pdf_struct_tree_node_t
, link)); }))
  {
cairo_list_del (&child->link);
free_node (child);
  }
  free (node->name);
  _cairo_array_fini (&node->mcid);
  if (node->type == PDF_NODE_CONTENT)
_cairo_tag_free_content_attributes (&node->attributes.content);

  if (node->type == PDF_NODE_CONTENT_REF)
_cairo_tag_free_content_ref_attributes (&node->attributes.content_ref);

  free (node);
434}

436static cairo_status_t
437add_mcid_to_node (cairo_pdf_surface_t          *surface,
  cairo_pdf_struct_tree_node_t *node,
  unsigned int                  command_id,
  int                          *mcid)
441{
  cairo_pdf_page_mcid_t mcid_elem;
  cairo_int_status_t status;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  status = _cairo_array_append (&ic->mcid_to_tree, &node);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  mcid_elem.order = -1;
  mcid_elem.page = _cairo_array_num_elements (&surface->pages);
  mcid_elem.xobject_res = ic->current_recording_surface_res;
  mcid_elem.mcid = _cairo_array_num_elements (&ic->mcid_to_tree) - 1;
  mcid_elem.child_node = NULL((void*)0);
  command_list_set_mcid (surface, command_id, node, _cairo_array_num_elements (&node->mcid));
  *mcid = mcid_elem.mcid;
  return _cairo_array_append (&node->mcid, &mcid_elem);
458}

460static cairo_status_t
461add_child_to_mcid_array (cairo_pdf_surface_t          *surface,
	 cairo_pdf_struct_tree_node_t *node,
	 unsigned int                  command_id,
	 cairo_pdf_struct_tree_node_t *child)
465{
  cairo_pdf_page_mcid_t mcid_elem;

  mcid_elem.order = -1;
  mcid_elem.page = 0;
  mcid_elem.xobject_res.id = 0;
  mcid_elem.mcid = 0;
  mcid_elem.child_node = child;
  command_list_set_mcid (surface, command_id, node, _cairo_array_num_elements (&node->mcid));
  return _cairo_array_append (&node->mcid, &mcid_elem);
475}

477static cairo_int_status_t
478add_annotation (cairo_pdf_surface_t           *surface,
cairo_pdf_struct_tree_node_t  *node,
const char                    *name,
const char                    *attributes)
482{
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_annotation_t *annot;

  annot = _cairo_malloc (sizeof (cairo_pdf_annotation_t))((sizeof (cairo_pdf_annotation_t)) != 0 ? malloc(sizeof (cairo_pdf_annotation_t
)) : ((void*)0));
  if (unlikely (annot == NULL)(__builtin_expect (!!(annot == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_tag_parse_link_attributes (attributes, &annot->link_attrs);
  if (unlikely (status)(__builtin_expect (!!(status), 0))) {
free (annot);
return status;
  }

  if (annot->link_attrs.link_page == 0)
annot->link_attrs.link_page = _cairo_array_num_elements (&surface->pages);

  annot->node = node;

  annot->res = _cairo_pdf_surface_new_object (surface);
  if (annot->res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  node->annot = annot;
  status = _cairo_array_append (&ic->annots, &annot);

  return status;
510}

512static void
513free_annotation (cairo_pdf_annotation_t *annot)
514{
  _cairo_tag_free_link_attributes (&annot->link_attrs);
  free (annot);
517}

519static void
520cairo_pdf_interchange_clear_annotations (cairo_pdf_surface_t *surface)
521{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  int num_elems, i;

  num_elems = _cairo_array_num_elements (&ic->annots);
  for (i = 0; i < num_elems; i++) {
cairo_pdf_annotation_t * annot;

_cairo_array_copy_element (&ic->annots, i, &annot);
free_annotation (annot);
  }
  _cairo_array_truncate (&ic->annots, 0);
533}

535static void
536cairo_pdf_interchange_write_node_mcid (cairo_pdf_surface_t            *surface,
		       cairo_pdf_page_mcid_t          *mcid_elem,
		       int                             page)
539{
  cairo_pdf_page_info_t *page_info;

  page_info = _cairo_array_index (&surface->pages, mcid_elem->page - 1);
  if (mcid_elem->page == page && mcid_elem->xobject_res.id == 0) {
_cairo_output_stream_printf (surface->object_stream.stream, "%d ", mcid_elem->mcid);
  } else {
_cairo_output_stream_printf (surface->object_stream.stream,
		     "\n       << /Type /MCR ");
if (mcid_elem->page != page) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "/Pg %d 0 R ",
			 page_info->page_res.id);
}
if (mcid_elem->xobject_res.id != 0) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "/Stm %d 0 R ",
			 mcid_elem->xobject_res.id);
}
_cairo_output_stream_printf (surface->object_stream.stream,
		     "/MCID %d >> ",
		     mcid_elem->mcid);
  }
562}

564static int
565_mcid_order_compare (const void *a,
     const void *b)
567{
  const cairo_pdf_page_mcid_t *mcid_a = a;
  const cairo_pdf_page_mcid_t *mcid_b = b;

  if (mcid_a->order < mcid_b->order)
return -1;
  else if (mcid_a->order > mcid_b->order)
return 1;
  else
return 0;
577}

579static cairo_int_status_t
580cairo_pdf_interchange_write_node_object (cairo_pdf_surface_t            *surface,
			 cairo_pdf_struct_tree_node_t   *node,
			 int                             depth)
583{
  cairo_pdf_page_mcid_t *mcid_elem, *child_mcid_elem;
  unsigned i, j, num_mcid;
  int first_page = 0;
  cairo_pdf_page_info_t *page_info;
  cairo_int_status_t status;
  cairo_bool_t has_children = FALSE0;

  /* The Root node is written in cairo_pdf_interchange_write_struct_tree(). */
  if (!node->parent)
1
Assuming field 'parent' is non-null→
return CAIRO_STATUS_SUCCESS;

  if (node->type == PDF_NODE_CONTENT ||
2
←
Assuming field 'type' is not equal to PDF_NODE_CONTENT→
5
←
Taking false branch→
node->type == PDF_NODE_CONTENT_REF ||
3
←
Assuming field 'type' is not equal to PDF_NODE_CONTENT_REF→
node->type == PDF_NODE_ARTIFACT)
4
←
Assuming field 'type' is not equal to PDF_NODE_ARTIFACT→
  {
return CAIRO_STATUS_SUCCESS;
  }

  status = _cairo_pdf_surface_object_begin (surface, node->res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
6
←
Assuming 'status' is 0→
7
←
Taking false branch→
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Type /StructElem\n"
		 "   /S /%s\n"
		 "   /P %d 0 R\n",
		 node->name,
		 node->parent->res.id);

  /* Write /K entry (children of this StructElem) */
  num_mcid = _cairo_array_num_elements (&node->mcid);
  if (num_mcid > 0 ) {
8
←
Assuming 'num_mcid' is > 0→
9
←
Taking true branch→
_cairo_array_sort (&node->mcid, _mcid_order_compare);
/* Find the first MCID element and use the page number to set /Pg */
for (i = 0; i9.1
'i' is < 'num_mcid'
 < num_mcid; i++) {
10
←
Loop condition is true.  Entering loop body→
17
←
Assuming 'i' is >= 'num_mcid'→
   mcid_elem = _cairo_array_index (&node->mcid, i);
   assert (mcid_elem->order != -1)((void) sizeof ((mcid_elem->order != -1) ? 1 : 0), __extension__
 ({ if (mcid_elem->order != -1) ; else __assert_fail ("mcid_elem->order != -1"
, "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 620, __extension__ __PRETTY_FUNCTION__); }));
11
←
Assuming the condition is true→
12
←
Taking true branch→
   if (mcid_elem->child_node) {
13
←
Assuming field 'child_node' is non-null→
14
←
Taking true branch→
if (mcid_elem->child_node->type == PDF_NODE_CONTENT_REF) {
15
←
Assuming field 'type' is not equal to PDF_NODE_CONTENT_REF→
16
←
Taking false branch→
    cairo_pdf_struct_tree_node_t *content_node;
    status = lookup_content_node_for_ref_node (surface, mcid_elem->child_node, &content_node);
    if (status)
	return status;

    /* CONTENT_REF will not have child nodes */
    if (_cairo_array_num_elements (&content_node->mcid) > 0) {
	child_mcid_elem = _cairo_array_index (&content_node->mcid, 0);
	first_page = child_mcid_elem->page;
	page_info = _cairo_array_index (&surface->pages, first_page - 1);
	_cairo_output_stream_printf (surface->object_stream.stream,
				     "   /Pg %d 0 R\n",
				     page_info->page_res.id);
	has_children = TRUE1;
	break;
    }
} else {
    has_children = TRUE1;
}
   } else {
first_page = mcid_elem->page;
page_info = _cairo_array_index (&surface->pages, first_page - 1);
_cairo_output_stream_printf (surface->object_stream.stream,
			     "   /Pg %d 0 R\n",
			     page_info->page_res.id);
has_children = TRUE1;
break;
   }
}

if (has_children17.1
'has_children' is 1
 || node->annot) {
   _cairo_output_stream_printf (surface->object_stream.stream, "   /K ");

   if (num_mcid17.2
'num_mcid' is <= 1
 > 1 || node->annot)
18
←
Assuming field 'annot' is null→
19
←
Taking false branch→
_cairo_output_stream_printf (surface->object_stream.stream, "[ ");

   for (i = 0; i < num_mcid; i++) {
20
←
Loop condition is true.  Entering loop body→
if (node->annot20.1
Field 'annot' is null
) {
21
←
Taking false branch→
    if (node->annot->link_attrs.link_page != first_page) {
	page_info = _cairo_array_index (&surface->pages, node->annot->link_attrs.link_page - 1);
	_cairo_output_stream_printf (surface->object_stream.stream,
				     "<< /Type /OBJR /Pg %d 0 R /Obj %d 0 R >> ",
				     page_info->page_res.id,
				     node->annot->res.id);
    } else {
	_cairo_output_stream_printf (surface->object_stream.stream,
				     "<< /Type /OBJR /Obj %d 0 R >> ",
				     node->annot->res.id);
    }
}
mcid_elem = _cairo_array_index (&node->mcid, i);
if (mcid_elem->child_node) {
22
←
Assuming field 'child_node' is non-null→
23
←
Taking true branch→
    if (mcid_elem->child_node->type == PDF_NODE_CONTENT_REF) {
24
←
Assuming field 'type' is equal to PDF_NODE_CONTENT_REF→
25
←
Taking true branch→
	cairo_pdf_struct_tree_node_t *content_node;
26
←
'content_node' declared without an initial value→
	status = lookup_content_node_for_ref_node (surface, mcid_elem->child_node, &content_node);
27
←
Calling 'lookup_content_node_for_ref_node'→
32
←
Returning from 'lookup_content_node_for_ref_node'→
	if (status)
33
←
Assuming 'status' is 0→
34
←
Taking false branch→
	    return status;

	assert (content_node->type == PDF_NODE_CONTENT)((void) sizeof ((content_node->type == PDF_NODE_CONTENT) ?
: 0), __extension__ ({ if (content_node->type == PDF_NODE_CONTENT
) ; else __assert_fail ("content_node->type == PDF_NODE_CONTENT"
, "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 681, __extension__ __PRETTY_FUNCTION__); }));
35
←
Access to field 'type' results in a dereference of an undefined pointer value (loaded from variable 'content_node')

	/* CONTENT_REF will not have child nodes */
	for (j = 0; j < _cairo_array_num_elements (&content_node->mcid); j++) {
	    child_mcid_elem = _cairo_array_index (&content_node->mcid, j);
	    cairo_pdf_interchange_write_node_mcid (surface, child_mcid_elem, first_page);
	}
    } else if (mcid_elem->child_node->type != PDF_NODE_CONTENT) {
	_cairo_output_stream_printf (surface->object_stream.stream,
				     " %d 0 R ",
				     mcid_elem->child_node->res.id);
    }
} else {
    cairo_pdf_interchange_write_node_mcid (surface, mcid_elem, first_page);
}
   }

   if (num_mcid > 1 || node->annot)
_cairo_output_stream_printf (surface->object_stream.stream, "]");
}

_cairo_output_stream_printf (surface->object_stream.stream, "\n");
  }

  _cairo_output_stream_printf (surface->object_stream.stream,
		 ">>\n");

  _cairo_pdf_surface_object_end (surface);

  return _cairo_output_stream_get_status (surface->object_stream.stream);
711}

713static void
714init_named_dest_key (cairo_pdf_named_dest_t *dest)
715{
  dest->base.hash = _cairo_hash_bytes (_CAIRO_HASH_INIT_VALUE5381,
			 dest->attrs.name,
			 strlen (dest->attrs.name));
719}

721static cairo_bool_t
722_named_dest_equal (const void *key_a, const void *key_b)
723{
  const cairo_pdf_named_dest_t *a = key_a;
  const cairo_pdf_named_dest_t *b = key_b;

  return strcmp (a->attrs.name, b->attrs.name) == 0;
728}

730static void
731_named_dest_pluck (void *entry, void *closure)
732{
  cairo_pdf_named_dest_t *dest = entry;
  cairo_hash_table_t *table = closure;

  _cairo_hash_table_remove (table, &dest->base);
  _cairo_tag_free_dest_attributes (&dest->attrs);
  free (dest);
739}

741static cairo_int_status_t
742cairo_pdf_interchange_write_explicit_dest (cairo_pdf_surface_t *surface,
                                        int                  page,
                                        cairo_bool_t         has_pos,
                                        double               x,
                                        double               y)
747{
  cairo_pdf_page_info_t *page_info;

  page_info = _cairo_array_index (&surface->pages, page - 1);

  if (has_pos) {
     _cairo_output_stream_printf (surface->object_stream.stream,
                                  "[%d 0 R /XYZ %f %f 0]\n",
                                  page_info->page_res.id,
                                  x,
                                  page_info->height - y);
  } else {
     _cairo_output_stream_printf (surface->object_stream.stream,
                                  "[%d 0 R /XYZ null null 0]\n",
                                  page_info->page_res.id);
  }

  return CAIRO_STATUS_SUCCESS;
765}

767static cairo_int_status_t
768cairo_pdf_interchange_write_dest (cairo_pdf_surface_t *surface,
		  cairo_link_attrs_t  *link_attrs)
770{
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  /* If the dest is known, emit an explicit dest */
  if (link_attrs->link_type == TAG_LINK_DEST_AND_URI || link_attrs->link_type == TAG_LINK_DEST) {
cairo_pdf_named_dest_t key;
cairo_pdf_named_dest_t *named_dest;

/* check if we already have this dest */
key.attrs.name = link_attrs->dest;
init_named_dest_key (&key);
named_dest = _cairo_hash_table_lookup (ic->named_dests, &key.base);
if (named_dest) {
   double x = 0;
   double y = 0;

   if (named_dest->extents.valid) {
x = named_dest->extents.extents.x;
y = named_dest->extents.extents.y;
   }

   if (named_dest->attrs.x_valid)
x = named_dest->attrs.x;

   if (named_dest->attrs.y_valid)
y = named_dest->attrs.y;

   if (named_dest->attrs.internal) {
_cairo_output_stream_printf (surface->object_stream.stream, "   /Dest ");
status = cairo_pdf_interchange_write_explicit_dest (surface,
						    named_dest->page,
						    TRUE1,
						    x, y);
   } else {
char *name = NULL((void*)0);

status = _cairo_utf8_to_pdf_string (named_dest->attrs.name, &name);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
    return status;

_cairo_output_stream_printf (surface->object_stream.stream, "   /Dest %s\n",
			     name);
free (name);
   }
   return status;
}
/* name does not exist */
if (link_attrs->link_type == TAG_LINK_DEST_AND_URI) {
   /* Don't emit anything. The caller will fallback to emitting a URI destination. */
   return CAIRO_INT_STATUS_NOTHING_TO_DO;
}

/* Mising destination. Emit a "do nothing" dest that points to the same page and position. */
_cairo_tag_warning ("Link to dest=\"%s\" not found", link_attrs->dest);
_cairo_output_stream_printf (surface->object_stream.stream, "   /Dest ");
status = cairo_pdf_interchange_write_explicit_dest (surface,
					    link_attrs->link_page,
					    FALSE0,
					    0, 0);
return status;
  }

  /* link_attrs->link_type == TAG_LINK_PAGE */

  if (link_attrs->page < 1)
return _cairo_tag_error ("Link attribute: \"page=%d\" page must be >= 1", link_attrs->page);

  if (link_attrs->page > (int)_cairo_array_num_elements (&surface->pages))
return _cairo_tag_error ("Link attribute: \"page=%d\" page exceeds page count (%d)",
		 link_attrs->page, _cairo_array_num_elements (&surface->pages));

  _cairo_output_stream_printf (surface->object_stream.stream, "   /Dest ");
  return cairo_pdf_interchange_write_explicit_dest (surface,
				      link_attrs->page,
				      link_attrs->has_pos,
				      link_attrs->pos.x,
				      link_attrs->pos.y);
848}

850static cairo_int_status_t
851_cairo_utf8_to_pdf_utf8_hexstring (const char *utf8, char **str_out)
852{
  int i;
  int len;
  unsigned char *p;
  cairo_bool_t ascii;
  char *str;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  ascii = TRUE1;
  p = (unsigned char *)utf8;
  len = 0;
  while (*p) {
if (*p < 32 || *p > 126) {
   ascii = FALSE0;
}
if (*p == '(' || *p == ')' || *p == '\\')
   len += 2;
else
   len++;
p++;
  }

  if (ascii) {
str = _cairo_malloc (len + 3)((len + 3) != 0 ? malloc(len + 3) : ((void*)0));
if (str == NULL((void*)0))
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

str[0] = '(';
p = (unsigned char *)utf8;
i = 1;
while (*p) {
   if (*p == '(' || *p == ')' || *p == '\\')
str[i++] = '\\';
   str[i++] = *p;
   p++;
}
str[i++] = ')';
str[i++] = 0;
  } else {
str = _cairo_malloc (len*2 + 3)((len*2 + 3) != 0 ? malloc(len*2 + 3) : ((void*)0));
if (str == NULL((void*)0))
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

str[0] = '<';
p = (unsigned char *)utf8;
i = 1;
while (*p) {
   if (*p == '\\') {
snprintf(str + i, 3, "%02x", '\\');
i += 2;
   }
   snprintf(str + i, 3, "%02x", *p);
   i += 2;
   p++;
}
str[i++] = '>';
str[i++] = 0;
  }
  *str_out = str;

  return status;
913}

915static cairo_int_status_t
916cairo_pdf_interchange_write_link_action (cairo_pdf_surface_t   *surface,
			 cairo_link_attrs_t    *link_attrs)
918{
  cairo_int_status_t status;
  char *dest = NULL((void*)0);

  if (link_attrs->link_type == TAG_LINK_DEST_AND_URI ||
link_attrs->link_type == TAG_LINK_DEST         ||
link_attrs->link_type == TAG_LINK_PAGE)
  {
status = cairo_pdf_interchange_write_dest (surface, link_attrs);
if (status != CAIRO_INT_STATUS_NOTHING_TO_DO)
   return status;

/* CAIRO_INT_STATUS_NOTHING_TO_DO means that the link type is TAG_LINK_DEST_AND_URI
* and the DEST is missing. Fall through to writing a URI link below.
*/
  }

  if (link_attrs->link_type == TAG_LINK_URI || link_attrs->link_type == TAG_LINK_DEST_AND_URI) {
status = _cairo_utf8_to_pdf_string (link_attrs->uri, &dest);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

if (dest[0] != '(') {
   free (dest);
   return _cairo_tag_error ("Link attribute: \"url=%s\" URI may only contain ASCII characters",
		     link_attrs->uri);
}

_cairo_output_stream_printf (surface->object_stream.stream,
		     "   /A <<\n"
		     "      /Type /Action\n"
		     "      /S /URI\n"
		     "      /URI %s\n"
		     "   >>\n",
		     dest);
free (dest);
  } else if (link_attrs->link_type == TAG_LINK_FILE) {
/* According to "Developing with PDF", Leonard Rosenthol, 2013,
* The F key is encoded in the "standard encoding for the
* platform on which the document is being viewed. For most
* modern operating systems, that's UTF-8"
*
* As we don't know the target platform, we assume UTF-8. The
* F key may contain multi-byte encodings using the hex
* encoding.
*
* For PDF 1.7 we also include the UF key which uses the
* standard PDF UTF-16BE strings.
*/
status = _cairo_utf8_to_pdf_utf8_hexstring (link_attrs->file, &dest);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "   /A <<\n"
		     "      /Type /Action\n"
		     "      /S /GoToR\n"
		     "      /F %s\n",
		     dest);
free (dest);

if (surface->pdf_version >= CAIRO_PDF_VERSION_1_7)
{
   status = _cairo_utf8_to_pdf_string (link_attrs->file, &dest);
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

   _cairo_output_stream_printf (surface->object_stream.stream,
		     "      /UF %s\n",
		     dest);
   free (dest);
}

if (link_attrs->dest) {
   status = _cairo_utf8_to_pdf_string (link_attrs->dest, &dest);
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

   _cairo_output_stream_printf (surface->object_stream.stream,
			 "      /D %s\n",
			 dest);
   free (dest);
} else {
   if (link_attrs->has_pos) {
_cairo_output_stream_printf (surface->object_stream.stream,
			     "      /D [%d /XYZ %f %f 0]\n",
			     link_attrs->page,
			     link_attrs->pos.x,
			     link_attrs->pos.y);
   } else {
_cairo_output_stream_printf (surface->object_stream.stream,
			     "      /D [%d /XYZ null null 0]\n",
			     link_attrs->page);
   }
}
_cairo_output_stream_printf (surface->object_stream.stream,
		     "   >>\n");
  }

  return CAIRO_STATUS_SUCCESS;
1018}

1020static cairo_int_status_t
1021cairo_pdf_interchange_write_annot (cairo_pdf_surface_t    *surface,
		   cairo_pdf_annotation_t *annot,
		   cairo_bool_t            struct_parents)
1024{
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_struct_tree_node_t *node = annot->node;
  int sp;
  int i, num_rects;
  double height;

  num_rects = _cairo_array_num_elements (&annot->link_attrs.rects);
  if (strcmp (node->name, CAIRO_TAG_LINK"Link") == 0 &&
annot->link_attrs.link_type != TAG_LINK_EMPTY &&
(node->extents.valid || num_rects > 0))
  {
status = _cairo_array_append (&ic->parent_tree, &node->res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

sp = _cairo_array_num_elements (&ic->parent_tree) - 1;

status = _cairo_pdf_surface_object_begin (surface, annot->res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "<< /Type /Annot\n"
		     "   /Subtype /Link\n");

if (struct_parents) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /StructParent %d\n",
			 sp);
}

height = surface->height;
if (num_rects > 0) {
   cairo_rectangle_int_t bbox_rect;

   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /QuadPoints [ ");
   for (i = 0; i < num_rects; i++) {
cairo_rectangle_t rectf;
cairo_rectangle_int_t recti;

_cairo_array_copy_element (&annot->link_attrs.rects, i, &rectf);
_cairo_rectangle_int_from_double (&recti, &rectf);
if (i == 0)
    bbox_rect = recti;
else
    _cairo_rectangle_union (&bbox_rect, &recti);

write_rect_to_pdf_quad_points (surface->object_stream.stream, &rectf, height);
_cairo_output_stream_printf (surface->object_stream.stream, " ");
   }
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "]\n"
			 "   /Rect [ ");
   write_rect_int_to_pdf_bbox (surface->object_stream.stream, &bbox_rect, height);
   _cairo_output_stream_printf (surface->object_stream.stream, " ]\n");
} else {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /Rect [ ");
   write_rect_int_to_pdf_bbox (surface->object_stream.stream, &node->extents.extents, height);
   _cairo_output_stream_printf (surface->object_stream.stream, " ]\n");
}

status = cairo_pdf_interchange_write_link_action (surface, &annot->link_attrs);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "   /BS << /W 0 >>\n"
		     ">>\n");

_cairo_pdf_surface_object_end (surface);
status = _cairo_output_stream_get_status (surface->object_stream.stream);
  }

  return status;
1102}

1104static cairo_int_status_t
1105cairo_pdf_interchange_walk_struct_tree (cairo_pdf_surface_t          *surface,
			cairo_pdf_struct_tree_node_t *node,
			int                           depth,
			cairo_int_status_t (*func) (cairo_pdf_surface_t          *surface,
						    cairo_pdf_struct_tree_node_t *node,
			                            int                           depth))
1111{
  cairo_int_status_t status;
  cairo_pdf_struct_tree_node_t *child;

  status = func (surface, node, depth);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  depth++;
  cairo_list_foreach_entry (child, cairo_pdf_struct_tree_node_t,for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&node->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); }); &child->link
 != (&node->children); child = ({ const __typeof__ (((
cairo_pdf_struct_tree_node_t *) 0)->link) *mptr__ = (child
->link.next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
))
	      &node->children, link)for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&node->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); }); &child->link
 != (&node->children); child = ({ const __typeof__ (((
cairo_pdf_struct_tree_node_t *) 0)->link) *mptr__ = (child
->link.next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
))
  {
status = cairo_pdf_interchange_walk_struct_tree (surface, child, depth, func);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
  }
  depth--;

  return CAIRO_STATUS_SUCCESS;
1130}

1132static cairo_int_status_t
1133cairo_pdf_interchange_write_struct_tree (cairo_pdf_surface_t *surface)
1134{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_struct_tree_node_t *child;
  cairo_int_status_t status;

  if (cairo_list_is_empty (&ic->struct_root->children))
return CAIRO_STATUS_SUCCESS;

  status = cairo_pdf_interchange_walk_struct_tree (surface,
				     ic->struct_root,
				     0,
				     cairo_pdf_interchange_write_node_object);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  status = _cairo_pdf_surface_object_begin (surface, surface->struct_tree_root);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Type /StructTreeRoot\n"
		 "   /ParentTree %d 0 R\n",
		 ic->parent_tree_res.id);

  if (cairo_list_is_singular (&ic->struct_root->children)) {
child = cairo_list_first_entry (&ic->struct_root->children, cairo_pdf_struct_tree_node_t, link)({ const __typeof__ (((cairo_pdf_struct_tree_node_t *) 0)->
link) *mptr__ = ((&ic->struct_root->children)->next
); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__ - __builtin_offsetof
(cairo_pdf_struct_tree_node_t, link)); });
_cairo_output_stream_printf (surface->object_stream.stream, "   /K [ %d 0 R ]\n", child->res.id);
  } else {
_cairo_output_stream_printf (surface->object_stream.stream, "   /K [ ");

cairo_list_foreach_entry (child, cairo_pdf_struct_tree_node_t,for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&ic->struct_root->children
)->next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
); &child->link != (&ic->struct_root->children
); child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = (child->link.next); (cairo_pdf_struct_tree_node_t
 *) ((char *) mptr__ - __builtin_offsetof(cairo_pdf_struct_tree_node_t
, link)); }))
		  &ic->struct_root->children, link)for (child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = ((&ic->struct_root->children
)->next); (cairo_pdf_struct_tree_node_t *) ((char *) mptr__
 - __builtin_offsetof(cairo_pdf_struct_tree_node_t, link)); }
); &child->link != (&ic->struct_root->children
); child = ({ const __typeof__ (((cairo_pdf_struct_tree_node_t
 *) 0)->link) *mptr__ = (child->link.next); (cairo_pdf_struct_tree_node_t
 *) ((char *) mptr__ - __builtin_offsetof(cairo_pdf_struct_tree_node_t
, link)); }))
{
   if (child->type == PDF_NODE_CONTENT || child->type == PDF_NODE_ARTIFACT)
continue;

   _cairo_output_stream_printf (surface->object_stream.stream, "%d 0 R ", child->res.id);
}
_cairo_output_stream_printf (surface->object_stream.stream, "]\n");
  }

  _cairo_output_stream_printf (surface->object_stream.stream,
		 ">>\n");
  _cairo_pdf_surface_object_end (surface);

  return CAIRO_STATUS_SUCCESS;
1180}

1182static cairo_int_status_t
1183cairo_pdf_interchange_write_annots (cairo_pdf_surface_t *surface,
		    cairo_bool_t         struct_parents)
1185{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  int num_elems, i, page_num;
  cairo_pdf_page_info_t *page_info;
  cairo_pdf_annotation_t *annot;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  num_elems = _cairo_array_num_elements (&ic->annots);
  for (i = 0; i < num_elems; i++) {
_cairo_array_copy_element (&ic->annots, i, &annot);
page_num = annot->link_attrs.link_page;
if (page_num > (int)_cairo_array_num_elements (&surface->pages)) {
   return _cairo_tag_error ("Link attribute: \"link_page=%d\" page exceeds page count (%d)",
		     page_num,
		     _cairo_array_num_elements (&surface->pages));
}

page_info = _cairo_array_index (&surface->pages, page_num - 1);
status = _cairo_array_append (&page_info->annots, &annot->res);
if (status)
   return status;

status = cairo_pdf_interchange_write_annot (surface, annot, struct_parents);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
  }

  return status;
1213}

1215static cairo_int_status_t
1216cairo_pdf_interchange_write_content_parent_elems (cairo_pdf_surface_t *surface)
1217{
  int num_elems, i;
  cairo_pdf_struct_tree_node_t *node;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  num_elems = _cairo_array_num_elements (&ic->mcid_to_tree);
  status = _cairo_pdf_surface_object_begin (surface, ic->content_parent_res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		     "[\n");
  for (i = 0; i < num_elems; i++) {
_cairo_array_copy_element (&ic->mcid_to_tree, i, &node);
_cairo_output_stream_printf (surface->object_stream.stream, "  %d 0 R\n", node->res.id);
  }
  _cairo_output_stream_printf (surface->object_stream.stream,
		 "]\n");
  _cairo_pdf_surface_object_end (surface);

  return status;
1239}

1241static cairo_int_status_t
1242cairo_pdf_interchange_apply_extents_from_content_ref (cairo_pdf_surface_t            *surface,
				      cairo_pdf_struct_tree_node_t   *node,
				      int                             depth)
1245{
  cairo_int_status_t status;

  if (node->type != PDF_NODE_CONTENT_REF)
return CAIRO_STATUS_SUCCESS;

  cairo_pdf_struct_tree_node_t *content_node;
  status = lookup_content_node_for_ref_node (surface, node, &content_node);
  if (status)
return status;

  /* Merge extents with all parent nodes */
  node = node->parent;
  while (node) {
if (node->extents.valid) {
   _cairo_rectangle_union (&node->extents.extents, &content_node->extents.extents);
} else {
   node->extents = content_node->extents;
}
node = node->parent;
  }

  return CAIRO_STATUS_SUCCESS;
1268}

1270static cairo_int_status_t
1271cairo_pdf_interchange_update_extents (cairo_pdf_surface_t *surface)
1272{
  cairo_pdf_interchange_t *ic = &surface->interchange;

  return cairo_pdf_interchange_walk_struct_tree (surface,
				   ic->struct_root,
				   0,
				   cairo_pdf_interchange_apply_extents_from_content_ref);
1279}

1281static cairo_int_status_t
1282cairo_pdf_interchange_write_parent_tree (cairo_pdf_surface_t *surface)
1283{
  int num_elems, i;
  cairo_pdf_resource_t *res;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;

  num_elems = _cairo_array_num_elements (&ic->parent_tree);
  if (num_elems > 0) {
ic->parent_tree_res = _cairo_pdf_surface_new_object (surface);
if (ic->parent_tree_res.id == 0)
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

status = _cairo_pdf_surface_object_begin (surface, ic->parent_tree_res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "<< /Nums [\n");
for (i = 0; i < num_elems; i++) {
   res = _cairo_array_index (&ic->parent_tree, i);
   if (res->id) {
_cairo_output_stream_printf (surface->object_stream.stream,
			     "   %d %d 0 R\n",
			     i,
			     res->id);
   }
}
_cairo_output_stream_printf (surface->object_stream.stream,
		     "  ]\n"
		     ">>\n");
_cairo_pdf_surface_object_end (surface);
  }

  return CAIRO_STATUS_SUCCESS;
1317}

1319static cairo_int_status_t
1320cairo_pdf_interchange_write_outline (cairo_pdf_surface_t *surface)
1321{
  int num_elems, i;
  cairo_pdf_outline_entry_t *outline;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;
  char *name = NULL((void*)0);

  num_elems = _cairo_array_num_elements (&ic->outline);
  if (num_elems < 2)
return CAIRO_INT_STATUS_SUCCESS;

  _cairo_array_copy_element (&ic->outline, 0, &outline);
  outline->res = _cairo_pdf_surface_new_object (surface);
  if (outline->res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  surface->outlines_dict_res = outline->res;
  status = _cairo_pdf_surface_object_begin (surface, outline->res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Type /Outlines\n"
		 "   /First %d 0 R\n"
		 "   /Last %d 0 R\n"
		 "   /Count %d\n"
		 ">>\n",
		 outline->first_child->res.id,
		 outline->last_child->res.id,
		 outline->count);
  _cairo_pdf_surface_object_end (surface);

  for (i = 1; i < num_elems; i++) {
_cairo_array_copy_element (&ic->outline, i, &outline);
_cairo_pdf_surface_update_object (surface, outline->res);

status = _cairo_utf8_to_pdf_string (outline->name, &name);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

status = _cairo_pdf_surface_object_begin (surface, outline->res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "<< /Title %s\n"
		     "   /Parent %d 0 R\n",
		     name,
		     outline->parent->res.id);
free (name);

if (outline->prev) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /Prev %d 0 R\n",
			 outline->prev->res.id);
}

if (outline->next) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /Next %d 0 R\n",
			 outline->next->res.id);
}

if (outline->first_child) {
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /First %d 0 R\n"
			 "   /Last %d 0 R\n"
			 "   /Count %d\n",
			 outline->first_child->res.id,
			 outline->last_child->res.id,
			 outline->count);
}

if (outline->flags) {
   int flags = 0;
   if (outline->flags & CAIRO_PDF_OUTLINE_FLAG_ITALIC)
flags |= 1;
   if (outline->flags & CAIRO_PDF_OUTLINE_FLAG_BOLD)
flags |= 2;
   _cairo_output_stream_printf (surface->object_stream.stream,
			 "   /F %d\n",
			 flags);
}

status = cairo_pdf_interchange_write_link_action (surface, &outline->link_attrs);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     ">>\n");
_cairo_pdf_surface_object_end (surface);
  }

  return status;
1415}

1417/*
* Split a page label into a text prefix and numeric suffix. Leading '0's are
* included in the prefix. eg
*  "3"     => NULL,    3
*  "cover" => "cover", 0
*  "A-2"   => "A-",    2
*  "A-002" => "A-00",  2
*/
1425static char *
1426split_label (const char* label, int *num)
1427{
  int len, i;

  *num = 0;
  len = strlen (label);
  if (len == 0)
return NULL((void*)0);

  i = len;
  while (i > 0 && _cairo_isdigit (label[i-1]))
  i--;

  while (i < len && label[i] == '0')
i++;

  if (i < len)
sscanf (label + i, "%d", num);

  if (i > 0) {
char *s;
s = _cairo_malloc (i + 1)((i + 1) != 0 ? malloc(i + 1) : ((void*)0));
if (!s)
   return NULL((void*)0);

memcpy (s, label, i);
s[i] = 0;
return s;
  }

  return NULL((void*)0);
1457}

1459/* strcmp that handles NULL arguments */
1460static cairo_bool_t
1461strcmp_null (const char *s1, const char *s2)
1462{
  if (s1 && s2)
return strcmp (s1, s2) == 0;

  if (!s1 && !s2)
return TRUE1;

  return FALSE0;
1470}

1472static cairo_int_status_t
1473cairo_pdf_interchange_write_page_labels (cairo_pdf_surface_t *surface)
1474{
  int num_elems, i;
  char *label;
  char *prefix;
  char *prev_prefix;
  int num, prev_num;
  cairo_int_status_t status;
  cairo_bool_t has_labels;

  /* Check if any labels defined */
  num_elems = _cairo_array_num_elements (&surface->page_labels);
  has_labels = FALSE0;
  for (i = 0; i < num_elems; i++) {
_cairo_array_copy_element (&surface->page_labels, i, &label);
if (label) {
   has_labels = TRUE1;
   break;
}
  }

  if (!has_labels)
return CAIRO_STATUS_SUCCESS;

  surface->page_labels_res = _cairo_pdf_surface_new_object (surface);
  if (surface->page_labels_res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_pdf_surface_object_begin (surface, surface->page_labels_res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Nums [\n");
  prefix = NULL((void*)0);
  prev_prefix = NULL((void*)0);
  num = 0;
  prev_num = 0;
  for (i = 0; i < num_elems; i++) {
_cairo_array_copy_element (&surface->page_labels, i, &label);
if (label) {
   prefix = split_label (label, &num);
} else {
   prefix = NULL((void*)0);
   num = i + 1;
}

if (!strcmp_null (prefix, prev_prefix) || num != prev_num + 1) {
   _cairo_output_stream_printf (surface->object_stream.stream,  "   %d << ", i);

   if (num)
_cairo_output_stream_printf (surface->object_stream.stream,  "/S /D /St %d ", num);

   if (prefix) {
char *s;
status = _cairo_utf8_to_pdf_string (prefix, &s);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
    return status;

_cairo_output_stream_printf (surface->object_stream.stream,  "/P %s ", s);
free (s);
   }

   _cairo_output_stream_printf (surface->object_stream.stream,  ">>\n");
}
free (prev_prefix);
prev_prefix = prefix;
prefix = NULL((void*)0);
prev_num = num;
  }
  free (prefix);
  free (prev_prefix);
  _cairo_output_stream_printf (surface->object_stream.stream,
		 "  ]\n"
		 ">>\n");
  _cairo_pdf_surface_object_end (surface);

  return CAIRO_STATUS_SUCCESS;
1551}

1553static void
1554_collect_external_dest (void *entry, void *closure)
1555{
  cairo_pdf_named_dest_t *dest = entry;
  cairo_pdf_surface_t *surface = closure;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  if (!dest->attrs.internal)
ic->sorted_dests[ic->num_dests++] = dest;
1562}

1564static int
1565_dest_compare (const void *a, const void *b)
1566{
  const cairo_pdf_named_dest_t * const *dest_a = a;
  const cairo_pdf_named_dest_t * const *dest_b = b;

  return strcmp ((*dest_a)->attrs.name, (*dest_b)->attrs.name);
1571}

1573static cairo_int_status_t
1574_cairo_pdf_interchange_write_document_dests (cairo_pdf_surface_t *surface)
1575{
  int i;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;
  cairo_pdf_page_info_t *page_info;

  if (ic->num_dests == 0) {
ic->dests_res.id = 0;
      return CAIRO_STATUS_SUCCESS;
  }

  ic->sorted_dests = calloc (ic->num_dests, sizeof (cairo_pdf_named_dest_t *));
  if (unlikely (ic->sorted_dests == NULL)(__builtin_expect (!!(ic->sorted_dests == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  ic->num_dests = 0;
  _cairo_hash_table_foreach (ic->named_dests, _collect_external_dest, surface);

  qsort (ic->sorted_dests, ic->num_dests, sizeof (cairo_pdf_named_dest_t *), _dest_compare);

  ic->dests_res = _cairo_pdf_surface_new_object (surface);
  if (ic->dests_res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_pdf_surface_object_begin (surface, ic->dests_res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Names [\n");
  for (i = 0; i < ic->num_dests; i++) {
cairo_pdf_named_dest_t *dest = ic->sorted_dests[i];
double x = 0;
double y = 0;
char *name = NULL((void*)0);

if (dest->attrs.internal)
   continue;

if (dest->extents.valid) {
   x = dest->extents.extents.x;
   y = dest->extents.extents.y;
}

if (dest->attrs.x_valid)
   x = dest->attrs.x;

if (dest->attrs.y_valid)
   y = dest->attrs.y;

status = _cairo_utf8_to_pdf_string (dest->attrs.name, &name);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

page_info = _cairo_array_index (&surface->pages, dest->page - 1);
_cairo_output_stream_printf (surface->object_stream.stream,
		     "   %s [%d 0 R /XYZ %f %f 0]\n",
		     name,
		     page_info->page_res.id,
		     x,
		     page_info->height - y);
free (name);

  }
  _cairo_output_stream_printf (surface->object_stream.stream,
		 "  ]\n"
		 ">>\n");
  _cairo_pdf_surface_object_end (surface);

  return CAIRO_STATUS_SUCCESS;
1645}

1647static cairo_int_status_t
1648cairo_pdf_interchange_write_names_dict (cairo_pdf_surface_t *surface)
1649{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;

  status = _cairo_pdf_interchange_write_document_dests (surface);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  surface->names_dict_res.id = 0;
  if (ic->dests_res.id != 0) {
surface->names_dict_res = _cairo_pdf_surface_new_object (surface);
if (surface->names_dict_res.id == 0)
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

status = _cairo_pdf_surface_object_begin (surface, surface->names_dict_res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_output_stream_printf (surface->object_stream.stream,
		     "<< /Dests %d 0 R >>\n",
		     ic->dests_res.id);
_cairo_pdf_surface_object_end (surface);
  }

  return CAIRO_STATUS_SUCCESS;
1674}

1676static cairo_int_status_t
1677cairo_pdf_interchange_write_docinfo (cairo_pdf_surface_t *surface)
1678{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;
  unsigned int i, num_elems;
  struct metadata *data;
  unsigned char *p;

  surface->docinfo_res = _cairo_pdf_surface_new_object (surface);
  if (surface->docinfo_res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_pdf_surface_object_begin (surface, surface->docinfo_res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  _cairo_output_stream_printf (surface->object_stream.stream,
		 "<< /Producer (cairo %s (https://cairographics.org))\n",
		 cairo_version_string_moz_cairo_version_string ());

  if (ic->docinfo.title)
_cairo_output_stream_printf (surface->object_stream.stream, "   /Title %s\n", ic->docinfo.title);

  if (ic->docinfo.author)
_cairo_output_stream_printf (surface->object_stream.stream, "   /Author %s\n", ic->docinfo.author);

  if (ic->docinfo.subject)
_cairo_output_stream_printf (surface->object_stream.stream, "   /Subject %s\n", ic->docinfo.subject);

  if (ic->docinfo.keywords)
_cairo_output_stream_printf (surface->object_stream.stream, "   /Keywords %s\n", ic->docinfo.keywords);

  if (ic->docinfo.creator)
_cairo_output_stream_printf (surface->object_stream.stream, "   /Creator %s\n", ic->docinfo.creator);

  if (ic->docinfo.create_date)
_cairo_output_stream_printf (surface->object_stream.stream, "   /CreationDate %s\n", ic->docinfo.create_date);

  if (ic->docinfo.mod_date)
_cairo_output_stream_printf (surface->object_stream.stream, "   /ModDate %s\n", ic->docinfo.mod_date);

  num_elems = _cairo_array_num_elements (&ic->custom_metadata);
  for (i = 0; i < num_elems; i++) {
data = _cairo_array_index (&ic->custom_metadata, i);
if (data->value) {
   _cairo_output_stream_printf (surface->object_stream.stream, "   /");
   /* The name can be any utf8 string. Use hex codes as
    * specified in section 7.3.5 of PDF reference
    */
   p = (unsigned char *)data->name;
   while (*p) {
if (*p < 0x21 || *p > 0x7e || *p == '#' || *p == '/')
    _cairo_output_stream_printf (surface->object_stream.stream, "#%02x", *p);
else
    _cairo_output_stream_printf (surface->object_stream.stream, "%c", *p);
p++;
   }
   _cairo_output_stream_printf (surface->object_stream.stream, " %s\n", data->value);
}
  }

  _cairo_output_stream_printf (surface->object_stream.stream,
		 ">>\n");
  _cairo_pdf_surface_object_end (surface);

  return CAIRO_STATUS_SUCCESS;
1743}

1745static cairo_int_status_t
1746_cairo_pdf_interchange_begin_structure_tag (cairo_pdf_surface_t    *surface,
			    cairo_tag_type_t        tag_type,
			    const char             *name,
			    const char             *attributes)
1750{
  int mcid;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_command_entry_t *command_entry;
  cairo_pdf_struct_tree_node_t *parent_node;
  unsigned int content_command_id;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
ic->content_emitted = FALSE0;
status = add_tree_node (surface, ic->current_analyze_node, name, attributes, &ic->current_analyze_node);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

status = command_list_add (surface, ic->command_id, PDF_BEGIN);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

/* Add to command_id to node map. */
command_entry = _cairo_malloc (sizeof(cairo_pdf_command_entry_t))((sizeof(cairo_pdf_command_entry_t)) != 0 ? malloc(sizeof(cairo_pdf_command_entry_t
)) : ((void*)0));
command_entry->recording_id = ic->recording_id;
command_entry->command_id = ic->command_id;
command_entry->node = ic->current_analyze_node;
_cairo_pdf_command_init_key (command_entry);
status = _cairo_hash_table_insert (ic->command_to_node_map, &command_entry->base);
if (unlikely(status)(__builtin_expect (!!(status), 0)))
   return status;

if (tag_type & TAG_TYPE_LINK) {
   status = add_annotation (surface, ic->current_analyze_node, name, attributes);
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;
}

if (ic->current_analyze_node->type == PDF_NODE_CONTENT) {
   cairo_pdf_content_tag_t *content = _cairo_malloc (sizeof(cairo_pdf_content_tag_t))((sizeof(cairo_pdf_content_tag_t)) != 0 ? malloc(sizeof(cairo_pdf_content_tag_t
)) : ((void*)0));
   content->node = ic->current_analyze_node;
   _cairo_pdf_content_tag_init_key (content);
   status = _cairo_hash_table_insert (ic->content_tag_map, &content->base);
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;
}

ic->content_emitted = FALSE0;

  } else if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
if (ic->marked_content_open) {
   status = _cairo_pdf_operators_tag_end (&surface->pdf_operators);
   ic->marked_content_open = FALSE0;
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;
}

ic->current_render_node = lookup_node_for_command (surface, ic->recording_id, ic->command_id);
if (ic->current_render_node->type == PDF_NODE_ARTIFACT) {
   if (command_list_has_content (surface, ic->command_id, NULL((void*)0))) {
status = _cairo_pdf_operators_tag_begin (&surface->pdf_operators, name, -1);
ic->marked_content_open = TRUE1;
   }
} else if (ic->current_render_node->type == PDF_NODE_CONTENT_REF) {
   parent_node = ic->current_render_node->parent;
   add_child_to_mcid_array (surface, parent_node, ic->command_id, ic->current_render_node);
} else {
   parent_node = ic->current_render_node->parent;
   add_child_to_mcid_array (surface, parent_node, ic->command_id, ic->current_render_node);
   if (command_list_has_content (surface, ic->command_id, &content_command_id)) {
add_mcid_to_node (surface, ic->current_render_node, content_command_id, &mcid);
const char *tag_name = name;
if (ic->current_render_node->type == PDF_NODE_CONTENT)
    tag_name = ic->current_render_node->attributes.content.tag_name;

status = _cairo_pdf_operators_tag_begin (&surface->pdf_operators, tag_name, mcid);
ic->marked_content_open = TRUE1;
   }
}
  }

  return status;
1828}

1830static cairo_int_status_t
1831_cairo_pdf_interchange_begin_dest_tag (cairo_pdf_surface_t    *surface,
		       cairo_tag_type_t        tag_type,
		       const char             *name,
		       const char             *attributes)
1835{
  cairo_pdf_named_dest_t *dest;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
dest = calloc (1, sizeof (cairo_pdf_named_dest_t));
if (unlikely (dest == NULL)(__builtin_expect (!!(dest == ((void*)0)), 0)))
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

status = _cairo_tag_parse_dest_attributes (attributes, &dest->attrs);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
{
   free (dest);
   return status;
}

dest->page = _cairo_array_num_elements (&surface->pages);
init_named_dest_key (dest);
status = _cairo_hash_table_insert (ic->named_dests, &dest->base);
if (unlikely (status)(__builtin_expect (!!(status), 0))) {
   free (dest->attrs.name);
   free (dest);
   return status;
}

_cairo_tag_stack_set_top_data (&ic->analysis_tag_stack, dest);
ic->num_dests++;
  }

  return status;
1866}

1868cairo_int_status_t
1869_cairo_pdf_interchange_tag_begin (cairo_pdf_surface_t    *surface,
		  const char             *name,
		  const char             *attributes)
1872{
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_tag_type_t tag_type;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  if (ic->ignore_current_surface)
      return CAIRO_STATUS_SUCCESS;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
status = _cairo_tag_stack_push (&ic->analysis_tag_stack, name, attributes);

  } else if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
status = _cairo_tag_stack_push (&ic->render_tag_stack, name, attributes);
  }
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  tag_type = _cairo_tag_get_type (name);
  if (tag_type & (TAG_TYPE_STRUCTURE|TAG_TYPE_CONTENT|TAG_TYPE_CONTENT_REF|TAG_TYPE_ARTIFACT)) {
status = _cairo_pdf_interchange_begin_structure_tag (surface, tag_type, name, attributes);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
  }

  if (tag_type & TAG_TYPE_DEST) {
status = _cairo_pdf_interchange_begin_dest_tag (surface, tag_type, name, attributes);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
  }

  return status;
1903}

1905static cairo_int_status_t
1906_cairo_pdf_interchange_end_structure_tag (cairo_pdf_surface_t    *surface,
			  cairo_tag_type_t        tag_type,
			  cairo_tag_stack_elem_t *elem)
1909{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  int mcid;
  unsigned int content_command_id;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
assert (ic->current_analyze_node->parent != NULL)((void) sizeof ((ic->current_analyze_node->parent != ((
void*)0)) ? 1 : 0), __extension__ ({ if (ic->current_analyze_node
->parent != ((void*)0)) ; else __assert_fail ("ic->current_analyze_node->parent != NULL"
, "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 1916, __extension__ __PRETTY_FUNCTION__); }));
status = command_list_add (surface, ic->command_id, PDF_END);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

ic->content_emitted = FALSE0;
ic->current_analyze_node = ic->current_analyze_node->parent;

  } else if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
if (ic->marked_content_open) {
   status = _cairo_pdf_operators_tag_end (&surface->pdf_operators);
   ic->marked_content_open = FALSE0;
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;
}
ic->current_render_node = ic->current_render_node->parent;
if (ic->current_render_node->parent &&
   command_list_has_content (surface, ic->command_id, &content_command_id))
{
   add_mcid_to_node (surface, ic->current_render_node, content_command_id, &mcid);
   status = _cairo_pdf_operators_tag_begin (&surface->pdf_operators,
				     ic->current_render_node->name, mcid);
   ic->marked_content_open = TRUE1;
}
  }

  return status;
1943}

1945cairo_int_status_t
1946_cairo_pdf_interchange_tag_end (cairo_pdf_surface_t *surface,
		const char          *name)
1948{
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_tag_type_t tag_type;
  cairo_tag_stack_elem_t *elem;

  if (ic->ignore_current_surface)
      return CAIRO_STATUS_SUCCESS;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
status = _cairo_tag_stack_pop (&ic->analysis_tag_stack, name, &elem);

  } else if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
status = _cairo_tag_stack_pop (&ic->render_tag_stack, name, &elem);
  }
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  tag_type = _cairo_tag_get_type (name);
  if (tag_type & (TAG_TYPE_STRUCTURE|TAG_TYPE_CONTENT|TAG_TYPE_CONTENT_REF|TAG_TYPE_ARTIFACT)) {
status = _cairo_pdf_interchange_end_structure_tag (surface, tag_type, elem);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   goto cleanup;
  }

cleanup:
  _cairo_tag_stack_free_elem (elem);

  return status;
1977}

1979cairo_int_status_t
1980_cairo_pdf_interchange_command_id (cairo_pdf_surface_t  *surface,
		   unsigned int          recording_id,
		   unsigned int          command_id)
1983{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  int mcid;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  ic->recording_id = recording_id;
  ic->command_id = command_id;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER && ic->current_render_node) {
/* TODO If the group does not have tags we don't need to close the current tag. */
if (command_list_is_group (surface, command_id)) {
   /* A "Do /xnnn" can not be inside a tag (since the
    * XObject may also contain tags). Close the tag.
    */
   if (ic->marked_content_open) {
status = _cairo_pdf_operators_tag_end (&surface->pdf_operators);
ic->marked_content_open = FALSE0;
   }
   /* If there is any more content after this and we are
    * inside a tag (current node is not the root node),
    * ensure that the next command will open the tag.
    */
   if (command_list_has_content (surface, command_id, NULL((void*)0)) && ic->current_render_node->parent) {
ic->render_next_command_has_content = TRUE1;
   }
} else if (ic->render_next_command_has_content) {
   /* After a "Do /xnnn" operation, if there is more content, open the tag. */
   add_mcid_to_node (surface, ic->current_render_node, ic->command_id, &mcid);
   status = _cairo_pdf_operators_tag_begin (&surface->pdf_operators,
				     ic->current_render_node->name, mcid);
   ic->marked_content_open = TRUE1;
   ic->render_next_command_has_content = FALSE0;
}
  }

  return status;
2019}

2021/* Check if this use of recording surface is or will need to be part of the the struct tree */
2022cairo_bool_t
2023_cairo_pdf_interchange_struct_tree_requires_recording_surface (
  cairo_pdf_surface_t           *surface,
  const cairo_surface_pattern_t *recording_surface_pattern,
  cairo_analysis_source_t        source_type)
2027{
  cairo_surface_t *recording_surface = recording_surface_pattern->surface;
  cairo_surface_t *free_me = NULL((void*)0);
  cairo_bool_t requires_recording = FALSE0;

  if (recording_surface_pattern->base.extend != CAIRO_EXTEND_NONE)
return FALSE0;

  if (_cairo_surface_is_snapshot (recording_surface))
free_me = recording_surface = _cairo_surface_snapshot_get_target (recording_surface);

  if (_cairo_surface_is_recording(recording_surface) &&
      _cairo_recording_surface_has_tags(recording_surface))
  {
/* Check if tags are to be ignored in this source */
switch (source_type) {
   case CAIRO_ANALYSIS_SOURCE_PAINT:
   case CAIRO_ANALYSIS_SOURCE_FILL:
requires_recording = TRUE1;
break;
   case CAIRO_ANALYSIS_SOURCE_MASK: /* TODO: allow SOURCE_MASK with solid MASK_MASK */
   case CAIRO_ANALYSIS_MASK_MASK:
   case CAIRO_ANALYSIS_SOURCE_STROKE:
   case CAIRO_ANALYSIS_SOURCE_SHOW_GLYPHS:
   case CAIRO_ANALYSIS_SOURCE_NONE:
break;
}
  }

  cairo_surface_destroy_moz_cairo_surface_destroy (free_me);
  return requires_recording;
2058}

2060/* Called at the start of a recording group during analyze. This will
* be called during the analysis of the drawing operation. */
2062cairo_int_status_t
2063_cairo_pdf_interchange_recording_source_surface_begin (
  cairo_pdf_surface_t           *surface,
  const cairo_surface_pattern_t *recording_surface_pattern,
  unsigned int                   region_id,
  cairo_analysis_source_t        source_type)
2068{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_recording_surface_stack_entry_t element;
  cairo_int_status_t status;

  /* A new recording surface is being replayed */
  ic->ignore_current_surface = TRUE1;
  if (_cairo_pdf_interchange_struct_tree_requires_recording_surface (surface,
						       recording_surface_pattern,
						       source_type))
  {
ic->ignore_current_surface = FALSE0;
  }

  element.ignore_surface = ic->ignore_current_surface;
  element.current_node = ic->current_analyze_node;
  ic->content_emitted = FALSE0;

  /* Push to stack so that the current source identifiers can be
   * restored after this recording surface has ended. */
  status = _cairo_array_append (&ic->recording_surface_stack, &element);
  if (status)
return status;

  if (ic->ignore_current_surface)
return CAIRO_STATUS_SUCCESS;

  status = command_list_push_group (surface, ic->command_id, recording_surface_pattern->surface, region_id);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  return CAIRO_INT_STATUS_ANALYZE_RECORDING_SURFACE_PATTERN;
2100}

2102/* Called at the end of a recording group during analyze. */
2103cairo_int_status_t
2104_cairo_pdf_interchange_recording_source_surface_end (
  cairo_pdf_surface_t           *surface,
  const cairo_surface_pattern_t *recording_surface_pattern,
  unsigned int                   region_id,
  cairo_analysis_source_t        source_type)
2109{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_recording_surface_stack_entry_t element;
  cairo_recording_surface_stack_entry_t *element_ptr;

  if (!ic->ignore_current_surface)
command_list_pop_group (surface);

  if (_cairo_array_pop_element (&ic->recording_surface_stack, &element)) {
element_ptr = _cairo_array_last_element (&ic->recording_surface_stack);
if (element_ptr) {
   ic->ignore_current_surface = element_ptr->ignore_surface;
   assert (ic->current_analyze_node == element_ptr->current_node)((void) sizeof ((ic->current_analyze_node == element_ptr->
current_node) ? 1 : 0), __extension__ ({ if (ic->current_analyze_node
 == element_ptr->current_node) ; else __assert_fail ("ic->current_analyze_node == element_ptr->current_node"
, "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 2121, __extension__ __PRETTY_FUNCTION__); }));
} else {
   /* Back at the page content. */
   ic->ignore_current_surface = FALSE0;
}
ic->content_emitted = FALSE0;
return CAIRO_STATUS_SUCCESS;
  }
  ASSERT_NOT_REACHEDdo { ((void) sizeof ((!"reached") ? 1 : 0), __extension__ ({ if
 (!"reached") ; else __assert_fail ("!\"reached\"", "/root/firefox-clang/gfx/cairo/cairo/src/cairo-pdf-interchange.c"
, 2129, __extension__ __PRETTY_FUNCTION__); })); } while (0); /* _recording_source_surface_begin/end mismatch */

  return CAIRO_STATUS_SUCCESS;
2132}

2134/* Called at the start of a recording group during render. This will
* be called after the end of page content. */
2136cairo_int_status_t
2137_cairo_pdf_interchange_emit_recording_surface_begin (cairo_pdf_surface_t     *surface,
				     cairo_surface_t         *recording_surface,
				     int                      region_id,
				     cairo_pdf_resource_t     surface_resource,
				     int                     *struct_parents)
2142{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status;

  /* When
   * _cairo_pdf_interchange_struct_tree_requires_recording_surface()
   * is false, the region_id of the recording surface is set to 0.
   */
  if (region_id == 0) {
ic->ignore_current_surface = TRUE1;
return CAIRO_STATUS_SUCCESS;
  }

  command_list_set_current_recording_commands (surface, recording_surface, region_id);

  ic->ignore_current_surface = FALSE0;
  _cairo_array_truncate (&ic->mcid_to_tree, 0);
  ic->current_recording_surface_res = surface_resource;

  ic->content_parent_res = _cairo_pdf_surface_new_object (surface);
  if (ic->content_parent_res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_array_append (&ic->parent_tree, &ic->content_parent_res);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  *struct_parents = _cairo_array_num_elements (&ic->parent_tree) - 1;

  ic->render_next_command_has_content = FALSE0;

  return CAIRO_STATUS_SUCCESS;
2174}

2176/* Called at the end of a recording group during render. */
2177cairo_int_status_t
2178_cairo_pdf_interchange_emit_recording_surface_end (cairo_pdf_surface_t     *surface,
				   cairo_surface_t         *recording_surface)
2180{
  cairo_pdf_interchange_t *ic = &surface->interchange;

  if (ic->ignore_current_surface)
return CAIRO_STATUS_SUCCESS;

  ic->current_recording_surface_res.id = 0;
  return cairo_pdf_interchange_write_content_parent_elems (surface);
2188}

2190static void _add_operation_extents_to_dest_tag (cairo_tag_stack_elem_t *elem,
				void                   *closure)
2192{
  const cairo_rectangle_int_t *extents = (const cairo_rectangle_int_t *) closure;
  cairo_pdf_named_dest_t *dest;

  if (_cairo_tag_get_type (elem->name)  & TAG_TYPE_DEST) {
if (elem->data) {
   dest = (cairo_pdf_named_dest_t *) elem->data;
   if (dest->extents.valid) {
_cairo_rectangle_union (&dest->extents.extents, extents);
   } else {
dest->extents.extents = *extents;
dest->extents.valid = TRUE1;
   }
}
  }
2207}

2209cairo_int_status_t
2210_cairo_pdf_interchange_add_operation_extents (cairo_pdf_surface_t         *surface,
			      const cairo_rectangle_int_t *extents)
2212{
  cairo_pdf_interchange_t *ic = &surface->interchange;

  /* Add extents to current node and all DEST tags on the stack */
  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
if (ic->current_analyze_node) {
   if (ic->current_analyze_node->extents.valid) {
_cairo_rectangle_union (&ic->current_analyze_node->extents.extents, extents);
   } else {
ic->current_analyze_node->extents.extents = *extents;
ic->current_analyze_node->extents.valid = TRUE1;
   }
}

_cairo_tag_stack_foreach (&ic->analysis_tag_stack,
		  _add_operation_extents_to_dest_tag,
		  (void*)extents);
  }

  return CAIRO_STATUS_SUCCESS;
2232}

2234cairo_int_status_t
2235_cairo_pdf_interchange_add_content (cairo_pdf_surface_t *surface)
2236{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  if (ic->ignore_current_surface)
      return CAIRO_STATUS_SUCCESS;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
status = command_list_add (surface, ic->command_id, PDF_CONTENT);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
  }

  return status;
2250}

2252/* Called at the start of 1emiting the page content during analyze or render */
2253cairo_int_status_t
2254_cairo_pdf_interchange_begin_page_content (cairo_pdf_surface_t *surface)
2255{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  int mcid;
  unsigned int content_command_id;
  cairo_pdf_command_list_t *page_commands;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_ANALYZE) {
status = _cairo_array_allocate (&ic->page_commands, 1, (void**)&page_commands);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

_cairo_array_init (&page_commands->commands, sizeof(cairo_pdf_command_t));
page_commands->parent = NULL((void*)0);
ic->current_commands = page_commands;
ic->ignore_current_surface = FALSE0;
  } else if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
ic->current_commands = _cairo_array_last_element (&ic->page_commands);
/* Each page has its own parent tree to map MCID to nodes. */
_cairo_array_truncate (&ic->mcid_to_tree, 0);
ic->ignore_current_surface = FALSE0;
ic->content_parent_res = _cairo_pdf_surface_new_object (surface);
if (ic->content_parent_res.id == 0)
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

status = _cairo_array_append (&ic->parent_tree, &ic->content_parent_res);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

surface->page_parent_tree = _cairo_array_num_elements (&ic->parent_tree) - 1;

if (ic->next_page_render_node && ic->next_page_render_node->parent &&
   command_list_has_content (surface, -1, &content_command_id))
{
   add_mcid_to_node (surface, ic->next_page_render_node, content_command_id, &mcid);
   const char *tag_name = ic->next_page_render_node->name;
   if (ic->next_page_render_node->type == PDF_NODE_CONTENT)
tag_name = ic->next_page_render_node->attributes.content.tag_name;

   status = _cairo_pdf_operators_tag_begin (&surface->pdf_operators, tag_name, mcid);
   ic->marked_content_open = TRUE1;
}
ic->render_next_command_has_content = FALSE0;
  }

  return status;
2301}

2303/* Called at the end of emiting the page content during analyze or render */
2304cairo_int_status_t
2305_cairo_pdf_interchange_end_page_content (cairo_pdf_surface_t *surface)
2306{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;

  if (surface->paginated_mode == CAIRO_PAGINATED_MODE_RENDER) {
/* If a content tag is open across pages, the old page needs an EMC emitted. */
if (ic->marked_content_open) {
   status = _cairo_pdf_operators_tag_end (&surface->pdf_operators);
   ic->marked_content_open = FALSE0;
}
ic->next_page_render_node = ic->current_render_node;
  }

  return status;
2320}

2322cairo_int_status_t
2323_cairo_pdf_interchange_write_page_objects (cairo_pdf_surface_t *surface)
2324{
  return cairo_pdf_interchange_write_content_parent_elems (surface);
2326}

2328cairo_int_status_t
2329_cairo_pdf_interchange_write_document_objects (cairo_pdf_surface_t *surface)
2330{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_int_status_t status = CAIRO_STATUS_SUCCESS;
  cairo_tag_stack_structure_type_t tag_type;
  cairo_bool_t write_struct_tree = FALSE0;

  status = cairo_pdf_interchange_update_extents (surface);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  tag_type = _cairo_tag_stack_get_structure_type (&ic->analysis_tag_stack);
  if (tag_type == TAG_TREE_TYPE_TAGGED || tag_type == TAG_TREE_TYPE_STRUCTURE ||
tag_type == TAG_TREE_TYPE_LINK_ONLY)
  {
write_struct_tree = TRUE1;
  }

  status = cairo_pdf_interchange_write_annots (surface, write_struct_tree);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  if (write_struct_tree) {
surface->struct_tree_root = _cairo_pdf_surface_new_object (surface);
if (surface->struct_tree_root.id == 0)
   return _cairo_error (CAIRO_STATUS_NO_MEMORY);

ic->struct_root->res = surface->struct_tree_root;

status = cairo_pdf_interchange_write_parent_tree (surface);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

unsigned num_pages = _cairo_array_num_elements (&ic->page_commands);
for (unsigned i = 0; i < num_pages; i++) {
   cairo_pdf_command_list_t *command_list;
   command_list = _cairo_array_index (&ic->page_commands, i);
   update_mcid_order (surface, command_list);
}

status = cairo_pdf_interchange_write_struct_tree (surface);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;

if (tag_type == TAG_TREE_TYPE_TAGGED)
   surface->tagged = TRUE1;
  }

  status = cairo_pdf_interchange_write_outline (surface);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  status = cairo_pdf_interchange_write_page_labels (surface);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  status = cairo_pdf_interchange_write_names_dict (surface);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  status = cairo_pdf_interchange_write_docinfo (surface);

  return status;
2392}

2394static void
2395_cairo_pdf_interchange_set_create_date (cairo_pdf_surface_t *surface)
2396{
  time_t utc, local, offset;
  struct tm tm_local, tm_utc;
  char buf[50];
  int buf_size;
  char *p;
  cairo_pdf_interchange_t *ic = &surface->interchange;

  utc = time (NULL((void*)0));
  localtime_r (&utc, &tm_local);
  strftime (buf, sizeof(buf), "(D:%Y%m%d%H%M%S", &tm_local);

  /* strftime "%z" is non standard and does not work on windows (it prints zone name, not offset).
   * Calculate time zone offset by comparing local and utc time_t values for the same time.
   */
  gmtime_r (&utc, &tm_utc);
  tm_utc.tm_isdst = tm_local.tm_isdst;
  local = mktime (&tm_utc);
  offset = difftime (utc, local);

  if (offset == 0) {
strcat (buf, "Z");
  } else {
if (offset > 0) {
   strcat (buf, "+");
} else {
   strcat (buf, "-");
   offset = -offset;
}
p = buf + strlen (buf);
buf_size = sizeof (buf) - strlen (buf);
snprintf (p, buf_size, "%02d'%02d", (int)(offset/3600), (int)(offset%3600)/60);
  }
  strcat (buf, ")");
  ic->docinfo.create_date = strdup (buf);
2431}

2433cairo_int_status_t
2434_cairo_pdf_interchange_init (cairo_pdf_surface_t *surface)
2435{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_outline_entry_t *outline_root;
  cairo_int_status_t status;

  _cairo_tag_stack_init (&ic->analysis_tag_stack);
  _cairo_tag_stack_init (&ic->render_tag_stack);
  ic->struct_root = calloc (1, sizeof(cairo_pdf_struct_tree_node_t));
  if (unlikely (ic->struct_root == NULL)(__builtin_expect (!!(ic->struct_root == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  ic->struct_root->res.id = 0;
  cairo_list_init (&ic->struct_root->children);
  _cairo_array_init (&ic->struct_root->mcid, sizeof(cairo_pdf_page_mcid_t));

  ic->current_analyze_node = ic->struct_root;
  ic->current_render_node = NULL((void*)0);
  ic->next_page_render_node = ic->struct_root;
  _cairo_array_init (&ic->recording_surface_stack, sizeof(cairo_recording_surface_stack_entry_t));
  ic->current_recording_surface_res.id = 0;
  ic->command_to_node_map = _cairo_hash_table_create (_cairo_pdf_command_equal);
  if (unlikely (ic->command_to_node_map == NULL)(__builtin_expect (!!(ic->command_to_node_map == ((void*)0
)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  ic->content_tag_map = _cairo_hash_table_create (_cairo_pdf_content_tag_equal);
  if (unlikely (ic->content_tag_map == NULL)(__builtin_expect (!!(ic->content_tag_map == ((void*)0)), 0
)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  _cairo_array_init (&ic->parent_tree, sizeof(cairo_pdf_resource_t));
  _cairo_array_init (&ic->mcid_to_tree, sizeof(cairo_pdf_struct_tree_node_t *));
  _cairo_array_init (&ic->annots, sizeof(cairo_pdf_annotation_t *));
  ic->parent_tree_res.id = 0;
  cairo_list_init (&ic->extents_list);
  ic->named_dests = _cairo_hash_table_create (_named_dest_equal);
  if (unlikely (ic->named_dests == NULL)(__builtin_expect (!!(ic->named_dests == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  _cairo_array_init (&ic->page_commands, sizeof(cairo_pdf_command_list_t));
  ic->current_commands = NULL((void*)0);
  _cairo_array_init (&ic->recording_surface_commands, sizeof(cairo_pdf_recording_surface_commands_t));

  ic->num_dests = 0;
  ic->sorted_dests = NULL((void*)0);
  ic->dests_res.id = 0;
  ic->ignore_current_surface = FALSE0;
  ic->content_emitted = FALSE0;
  ic->marked_content_open = FALSE0;
  ic->render_next_command_has_content = FALSE0;
  ic->mcid_order = 0;

  _cairo_array_init (&ic->outline, sizeof(cairo_pdf_outline_entry_t *));
  outline_root = calloc (1, sizeof(cairo_pdf_outline_entry_t));
  if (unlikely (outline_root == NULL)(__builtin_expect (!!(outline_root == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  memset (&ic->docinfo, 0, sizeof (ic->docinfo));
  _cairo_array_init (&ic->custom_metadata, sizeof(struct metadata));
  _cairo_pdf_interchange_set_create_date (surface);
  status = _cairo_array_append (&ic->outline, &outline_root);

  return status;
2496}

2498static void
2499_cairo_pdf_interchange_free_outlines (cairo_pdf_surface_t *surface)
2500{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  int num_elems, i;

  num_elems = _cairo_array_num_elements (&ic->outline);
  for (i = 0; i < num_elems; i++) {
cairo_pdf_outline_entry_t *outline;

_cairo_array_copy_element (&ic->outline, i, &outline);
free (outline->name);
_cairo_tag_free_link_attributes (&outline->link_attrs);
free (outline);
  }
  _cairo_array_fini (&ic->outline);
2514}

2516void
2517_cairo_pdf_interchange_fini (cairo_pdf_surface_t *surface)
2518{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  unsigned int i, num_elems;
  struct metadata *data;

  _cairo_tag_stack_fini (&ic->analysis_tag_stack);
  _cairo_tag_stack_fini (&ic->render_tag_stack);
  _cairo_array_fini (&ic->mcid_to_tree);
  cairo_pdf_interchange_clear_annotations (surface);
  _cairo_array_fini (&ic->annots);

  _cairo_array_fini (&ic->recording_surface_stack);
  _cairo_array_fini (&ic->parent_tree);

  _cairo_hash_table_foreach (ic->command_to_node_map,
	       _cairo_pdf_command_pluck,
	       ic->command_to_node_map);
  _cairo_hash_table_destroy (ic->command_to_node_map);

  _cairo_hash_table_foreach (ic->named_dests, _named_dest_pluck, ic->named_dests);
  _cairo_hash_table_destroy (ic->named_dests);

  _cairo_hash_table_foreach (ic->content_tag_map, _cairo_pdf_content_tag_pluck, ic->content_tag_map);
  _cairo_hash_table_destroy(ic->content_tag_map);

  free_node (ic->struct_root);

  num_elems = _cairo_array_num_elements (&ic->recording_surface_commands);
  for (i = 0; i < num_elems; i++) {
cairo_pdf_recording_surface_commands_t *recording_command;
cairo_pdf_command_list_t *command_list;

recording_command = _cairo_array_index (&ic->recording_surface_commands, i);
command_list = recording_command->command_list;
_cairo_array_fini (&command_list->commands);
free (command_list);
  }
  _cairo_array_fini (&ic->recording_surface_commands);

  num_elems = _cairo_array_num_elements (&ic->page_commands);
  for (i = 0; i < num_elems; i++) {
cairo_pdf_command_list_t *command_list;
command_list = _cairo_array_index (&ic->page_commands, i);
_cairo_array_fini (&command_list->commands);
  }
  _cairo_array_fini (&ic->page_commands);

  free (ic->sorted_dests);
  _cairo_pdf_interchange_free_outlines (surface);
  free (ic->docinfo.title);
  free (ic->docinfo.author);
  free (ic->docinfo.subject);
  free (ic->docinfo.keywords);
  free (ic->docinfo.creator);
  free (ic->docinfo.create_date);
  free (ic->docinfo.mod_date);

  num_elems = _cairo_array_num_elements (&ic->custom_metadata);
  for (i = 0; i < num_elems; i++) {
data = _cairo_array_index (&ic->custom_metadata, i);
free (data->name);
free (data->value);
  }
  _cairo_array_fini (&ic->custom_metadata);
2582}

2584cairo_int_status_t
2585_cairo_pdf_interchange_add_outline (cairo_pdf_surface_t        *surface,
		    int                         parent_id,
		    const char                 *name,
		    const char                 *link_attribs,
		    cairo_pdf_outline_flags_t   flags,
		    int                        *id)
2591{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_pdf_outline_entry_t *outline;
  cairo_pdf_outline_entry_t *parent;
  cairo_int_status_t status;

  if (parent_id < 0 || parent_id >= (int)_cairo_array_num_elements (&ic->outline))
return CAIRO_STATUS_SUCCESS;

  outline = _cairo_malloc (sizeof(cairo_pdf_outline_entry_t))((sizeof(cairo_pdf_outline_entry_t)) != 0 ? malloc(sizeof(cairo_pdf_outline_entry_t
)) : ((void*)0));
  if (unlikely (outline == NULL)(__builtin_expect (!!(outline == ((void*)0)), 0)))
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  status = _cairo_tag_parse_link_attributes (link_attribs, &outline->link_attrs);
  if (unlikely (status)(__builtin_expect (!!(status), 0))) {
free (outline);
return status;
  }

  outline->res = _cairo_pdf_surface_new_object (surface);
  if (outline->res.id == 0)
return _cairo_error (CAIRO_STATUS_NO_MEMORY);

  outline->name = strdup (name);
  outline->flags = flags;
  outline->count = 0;

  _cairo_array_copy_element (&ic->outline, parent_id, &parent);

  outline->parent = parent;
  outline->first_child = NULL((void*)0);
  outline->last_child = NULL((void*)0);
  outline->next = NULL((void*)0);
  if (parent->last_child) {
parent->last_child->next = outline;
outline->prev = parent->last_child;
parent->last_child = outline;
  } else {
parent->first_child = outline;
parent->last_child = outline;
outline->prev = NULL((void*)0);
  }

  *id = _cairo_array_num_elements (&ic->outline);
  status = _cairo_array_append (&ic->outline, &outline);
  if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;

  /* Update Count */
  outline = outline->parent;
  while (outline) {
if (outline->flags & CAIRO_PDF_OUTLINE_FLAG_OPEN) {
   outline->count++;
} else {
   outline->count--;
   break;
}
outline = outline->parent;
  }

  return CAIRO_STATUS_SUCCESS;
2652}

2654/*
* Date must be in the following format:
*
*     YYYY-MM-DDThh:mm:ss[Z+-]hh:mm
*
* Only the year is required. If a field is included all preceding
* fields must be included.
*/
2662static char *
2663iso8601_to_pdf_date_string (const char *iso)
2664{
  char buf[40];
  const char *p;
  int i;

  /* Check that utf8 contains only the characters "0123456789-T:Z+" */
  p = iso;
  while (*p) {
     if (!_cairo_isdigit (*p) && *p != '-' && *p != 'T' &&
         *p != ':' && *p != 'Z' && *p != '+')
         return NULL((void*)0);
     p++;
  }

  p = iso;
  strcpy (buf, "(");

 /* YYYY (required) */
  if (strlen (p) < 4)
     return NULL((void*)0);

  strncat (buf, p, 4);
  p += 4;

  /* -MM, -DD, Thh, :mm, :ss */
  for (i = 0; i < 5; i++) {
if (strlen (p) < 3)
   goto finish;

strncat (buf, p + 1, 2);
p += 3;
  }

  /* Z, +, - */
  if (strlen (p) < 1)
     goto finish;
  strncat (buf, p, 1);
  p += 1;

  /* hh */
  if (strlen (p) < 2)
goto finish;

  strncat (buf, p, 2);
  strcat (buf, "'");
  p += 2;

  /* :mm */
  if (strlen (p) < 3)
goto finish;

  strncat (buf, p + 1, 2);
  strcat (buf, "'");

finish:
  strcat (buf, ")");
  return strdup (buf);
2721}

2723cairo_int_status_t
2724_cairo_pdf_interchange_set_metadata (cairo_pdf_surface_t  *surface,
		     cairo_pdf_metadata_t  metadata,
		     const char           *utf8)
2727{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  cairo_status_t status;
  char *s = NULL((void*)0);

  if (utf8) {
if (metadata == CAIRO_PDF_METADATA_CREATE_DATE ||
   metadata == CAIRO_PDF_METADATA_MOD_DATE) {
   s = iso8601_to_pdf_date_string (utf8);
} else {
   status = _cairo_utf8_to_pdf_string (utf8, &s);
   if (unlikely (status)(__builtin_expect (!!(status), 0)))
return status;
}
  }

  switch (metadata) {
case CAIRO_PDF_METADATA_TITLE:
   free (ic->docinfo.title);
   ic->docinfo.title = s;
   break;
case CAIRO_PDF_METADATA_AUTHOR:
   free (ic->docinfo.author);
   ic->docinfo.author = s;
   break;
case CAIRO_PDF_METADATA_SUBJECT:
   free (ic->docinfo.subject);
   ic->docinfo.subject = s;
   break;
case CAIRO_PDF_METADATA_KEYWORDS:
   free (ic->docinfo.keywords);
   ic->docinfo.keywords = s;
   break;
case CAIRO_PDF_METADATA_CREATOR:
   free (ic->docinfo.creator);
   ic->docinfo.creator = s;
   break;
case CAIRO_PDF_METADATA_CREATE_DATE:
   free (ic->docinfo.create_date);
   ic->docinfo.create_date = s;
   break;
case CAIRO_PDF_METADATA_MOD_DATE:
   free (ic->docinfo.mod_date);
   ic->docinfo.mod_date = s;
   break;
  }

  return CAIRO_STATUS_SUCCESS;
2775}

2777static const char *reserved_metadata_names[] = {
  "",
  "Title",
  "Author",
  "Subject",
  "Keywords",
  "Creator",
  "Producer",
  "CreationDate",
  "ModDate",
  "Trapped",
2788};

2790cairo_int_status_t
2791_cairo_pdf_interchange_set_custom_metadata (cairo_pdf_surface_t  *surface,
			    const char           *name,
			    const char           *value)
2794{
  cairo_pdf_interchange_t *ic = &surface->interchange;
  struct metadata *data;
  struct metadata new_data;
  int i, num_elems;
  cairo_int_status_t status;
  char *s = NULL((void*)0);

  if (name == NULL((void*)0))
return CAIRO_STATUS_NULL_POINTER;

  for (i = 0; i < ARRAY_LENGTH (reserved_metadata_names)((int) (sizeof (reserved_metadata_names) / sizeof (reserved_metadata_names
[0]))); i++) {
if (strcmp(name, reserved_metadata_names[i]) == 0)
   return CAIRO_STATUS_INVALID_STRING;
  }

  /* First check if we already have an entry for this name. If so,
   * update the value. A NULL value means the entry has been removed
   * and will not be emitted. */
  num_elems = _cairo_array_num_elements (&ic->custom_metadata);
  for (i = 0; i < num_elems; i++) {
data = _cairo_array_index (&ic->custom_metadata, i);
if (strcmp(name, data->name) == 0) {
   free (data->value);
   data->value = NULL((void*)0);
   if (value && strlen(value)) {
status = _cairo_utf8_to_pdf_string (value, &s);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
    return status;
data->value = s;
   }
   return CAIRO_STATUS_SUCCESS;
}
  }

  /* Add new entry */
  status = CAIRO_STATUS_SUCCESS;
  if (value && strlen(value)) {
new_data.name = strdup (name);
status = _cairo_utf8_to_pdf_string (value, &s);
if (unlikely (status)(__builtin_expect (!!(status), 0)))
   return status;
new_data.value = s;
status = _cairo_array_append (&ic->custom_metadata, &new_data);
  }

  return status;
2841}

2843#if DEBUG_PDF_INTERCHANGE
2844static cairo_int_status_t
2845print_node (cairo_pdf_surface_t          *surface,
   cairo_pdf_struct_tree_node_t *node,
   int                           depth)
2848{
  if (node == NULL((void*)0)) {
printf("%*sNode: ptr: NULL\n", depth*2, "");
  } else if (node == surface->interchange.struct_root) {
     printf("%*sNode: ptr: %p root\n", depth*2, "", node);
  } else {
     printf("%*sNode: ptr: %p name: '%s'\n", depth*2, "", node, node->name);
  }
  depth++;
  printf("%*sType: ", depth*2, "");
  switch (node->type) {
case PDF_NODE_STRUCT:
   printf("STRUCT\n");
   break;
case PDF_NODE_CONTENT:
   printf("CONTENT\n");
   printf("%*sContent.id: %s\n", depth*2, "", node->attributes.content.id);
   printf("%*sContent.tag_name: %s\n", depth*2, "", node->attributes.content.tag_name);
   break;
case PDF_NODE_CONTENT_REF:
   printf("CONTENT_REF\n");
   printf("%*sContent_Ref.ref: %s\n", depth*2, "", node->attributes.content_ref.ref);
   break;
case PDF_NODE_ARTIFACT:
   printf("ARTIFACT\n");
   break;
  }
  printf("%*sres: %d\n", depth*2, "", node->res.id);
  printf("%*sparent: %p\n", depth*2, "", node->parent);
  printf("%*sannot:", depth*2, "");
  if (node->annot)
printf(" node: %p res: %d", node->annot->node,  node->annot->res.id);
  printf("\n");
  printf("%*sextents: ", depth*2, "");
  if (node->extents.valid) {
printf("x: %d  y: %d  w: %d  h: %d\n",
      node->extents.extents.x,
      node->extents.extents.y,
      node->extents.extents.width,
      node->extents.extents.height);
  } else {
printf("not valid\n");
  }

  printf("%*smcid: ", depth*2, "");
  int num_mcid = _cairo_array_num_elements (&node->mcid);
  for (int i = 0; i < num_mcid; i++) {
cairo_pdf_page_mcid_t *mcid_elem = _cairo_array_index (&node->mcid, i);
if (mcid_elem->child_node) {
   printf("(order: %d, %p) ", mcid_elem->order, mcid_elem->child_node);
} else {
   printf("(order: %d, pg: %d, xobject_res: %d, mcid: %d) ",
   mcid_elem->order, mcid_elem->page, mcid_elem->xobject_res.id, mcid_elem->mcid);
}
  }
  printf("\n");
  return CAIRO_STATUS_SUCCESS;
2905}

2907static void
2908print_tree (cairo_pdf_surface_t          *surface,
   cairo_pdf_struct_tree_node_t *node)
2910{
  printf("Structure Tree:\n");
  cairo_pdf_interchange_walk_struct_tree (surface, node, 0, print_node);
2913}

2915static void
2916print_command (cairo_pdf_command_t *command, int indent)
2917{
  printf("%*s%d  ", indent*2, "", command->command_id);
  switch (command->flags) {
case PDF_CONTENT:
   printf("CONTENT");
   break;
case PDF_BEGIN:
   printf("BEGIN");
   break;
case PDF_END:
   printf("END");
break;
case PDF_GROUP:
   printf("GROUP: %p", command->group);
   break;
case PDF_NONE:
   printf("NONE");
   break;
  }
  printf("  node: %p index: %d\n", command->node, command->mcid_index);
2937}

2939static void
2940print_commands (cairo_pdf_command_list_t *command_list, int indent)
2941{
  cairo_pdf_command_t *command;
  unsigned i;
  unsigned num_elements = _cairo_array_num_elements (&command_list->commands);

  for (i = 0; i < num_elements; i++) {
command = _cairo_array_index (&command_list->commands, i);
print_command (command, indent);
if (command->flags == PDF_GROUP)
   print_commands (command->group, indent + 1);
  }
2952}

2954static void
2955print_command_list(cairo_pdf_command_list_t *command_list)
2956{
  printf("Command List: %p\n", command_list);
  print_commands (command_list, 0);
  printf("end\n");
2960}
2961#endif