| OLD | NEW |
| (Empty) |
| 1 /* | |
| 2 * Copyright (C) 2009 Red Hat, Inc. | |
| 3 * | |
| 4 * This is part of HarfBuzz, a text shaping library. | |
| 5 * | |
| 6 * Permission is hereby granted, without written agreement and without | |
| 7 * license or royalty fees, to use, copy, modify, and distribute this | |
| 8 * software and its documentation for any purpose, provided that the | |
| 9 * above copyright notice and the following two paragraphs appear in | |
| 10 * all copies of this software. | |
| 11 * | |
| 12 * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR | |
| 13 * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES | |
| 14 * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN | |
| 15 * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH | |
| 16 * DAMAGE. | |
| 17 * | |
| 18 * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, | |
| 19 * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND | |
| 20 * FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS | |
| 21 * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO | |
| 22 * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. | |
| 23 * | |
| 24 * Red Hat Author(s): Behdad Esfahbod | |
| 25 */ | |
| 26 | |
| 27 #include "hb-private.h" | |
| 28 | |
| 29 #include "hb-blob-private.h" | |
| 30 | |
| 31 #ifdef HAVE_SYS_MMAN_H | |
| 32 #ifdef HAVE_UNISTD_H | |
| 33 #include <unistd.h> | |
| 34 #endif /* HAVE_UNISTD_H */ | |
| 35 #include <sys/mman.h> | |
| 36 #endif /* HAVE_SYS_MMAN_H */ | |
| 37 | |
| 38 #include <stdio.h> | |
| 39 #include <errno.h> | |
| 40 | |
| 41 HB_BEGIN_DECLS | |
| 42 | |
| 43 | |
| 44 #ifndef HB_DEBUG_BLOB | |
| 45 #define HB_DEBUG_BLOB (HB_DEBUG+0) | |
| 46 #endif | |
| 47 | |
| 48 hb_blob_t _hb_blob_nil = { | |
| 49 HB_REFERENCE_COUNT_INVALID, /* ref_count */ | |
| 50 | |
| 51 0, /* length */ | |
| 52 | |
| 53 HB_MUTEX_INIT, /* lock */ | |
| 54 | |
| 55 0, /* lock_count */ | |
| 56 HB_MEMORY_MODE_READONLY, /* mode */ | |
| 57 | |
| 58 NULL, /* data */ | |
| 59 | |
| 60 NULL, /* destroy */ | |
| 61 NULL /* user_data */ | |
| 62 }; | |
| 63 | |
| 64 static void | |
| 65 _hb_blob_destroy_user_data (hb_blob_t *blob) | |
| 66 { | |
| 67 if (blob->destroy) { | |
| 68 blob->destroy (blob->user_data); | |
| 69 blob->destroy = NULL; | |
| 70 blob->user_data = NULL; | |
| 71 } | |
| 72 } | |
| 73 | |
| 74 static void | |
| 75 _hb_blob_unlock_and_destroy (hb_blob_t *blob) | |
| 76 { | |
| 77 hb_blob_unlock (blob); | |
| 78 hb_blob_destroy (blob); | |
| 79 } | |
| 80 | |
| 81 hb_blob_t * | |
| 82 hb_blob_create (const char *data, | |
| 83 unsigned int length, | |
| 84 hb_memory_mode_t mode, | |
| 85 hb_destroy_func_t destroy, | |
| 86 void *user_data) | |
| 87 { | |
| 88 hb_blob_t *blob; | |
| 89 | |
| 90 if (!length || !HB_OBJECT_DO_CREATE (hb_blob_t, blob)) { | |
| 91 if (destroy) | |
| 92 destroy (user_data); | |
| 93 return &_hb_blob_nil; | |
| 94 } | |
| 95 | |
| 96 hb_mutex_init (blob->lock); | |
| 97 blob->lock_count = 0; | |
| 98 | |
| 99 blob->data = data; | |
| 100 blob->length = length; | |
| 101 blob->mode = mode; | |
| 102 | |
| 103 blob->destroy = destroy; | |
| 104 blob->user_data = user_data; | |
| 105 | |
| 106 if (blob->mode == HB_MEMORY_MODE_DUPLICATE) { | |
| 107 blob->mode = HB_MEMORY_MODE_READONLY; | |
| 108 if (!hb_blob_try_writable (blob)) { | |
| 109 hb_blob_destroy (blob); | |
| 110 return &_hb_blob_nil; | |
| 111 } | |
| 112 } | |
| 113 | |
| 114 return blob; | |
| 115 } | |
| 116 | |
| 117 hb_blob_t * | |
| 118 hb_blob_create_sub_blob (hb_blob_t *parent, | |
| 119 unsigned int offset, | |
| 120 unsigned int length) | |
| 121 { | |
| 122 hb_blob_t *blob; | |
| 123 const char *pdata; | |
| 124 | |
| 125 if (!length || offset >= parent->length || !HB_OBJECT_DO_CREATE (hb_blob_t, bl
ob)) | |
| 126 return &_hb_blob_nil; | |
| 127 | |
| 128 pdata = hb_blob_lock (parent); | |
| 129 | |
| 130 blob->data = pdata + offset; | |
| 131 blob->length = MIN (length, parent->length - offset); | |
| 132 | |
| 133 hb_mutex_lock (parent->lock); | |
| 134 blob->mode = parent->mode; | |
| 135 hb_mutex_unlock (parent->lock); | |
| 136 | |
| 137 blob->destroy = (hb_destroy_func_t) _hb_blob_unlock_and_destroy; | |
| 138 blob->user_data = hb_blob_reference (parent); | |
| 139 | |
| 140 return blob; | |
| 141 } | |
| 142 | |
| 143 hb_blob_t * | |
| 144 hb_blob_create_empty (void) | |
| 145 { | |
| 146 return &_hb_blob_nil; | |
| 147 } | |
| 148 | |
| 149 hb_blob_t * | |
| 150 hb_blob_reference (hb_blob_t *blob) | |
| 151 { | |
| 152 HB_OBJECT_DO_REFERENCE (blob); | |
| 153 } | |
| 154 | |
| 155 unsigned int | |
| 156 hb_blob_get_reference_count (hb_blob_t *blob) | |
| 157 { | |
| 158 HB_OBJECT_DO_GET_REFERENCE_COUNT (blob); | |
| 159 } | |
| 160 | |
| 161 void | |
| 162 hb_blob_destroy (hb_blob_t *blob) | |
| 163 { | |
| 164 HB_OBJECT_DO_DESTROY (blob); | |
| 165 | |
| 166 _hb_blob_destroy_user_data (blob); | |
| 167 | |
| 168 free (blob); | |
| 169 } | |
| 170 | |
| 171 unsigned int | |
| 172 hb_blob_get_length (hb_blob_t *blob) | |
| 173 { | |
| 174 return blob->length; | |
| 175 } | |
| 176 | |
| 177 const char * | |
| 178 hb_blob_lock (hb_blob_t *blob) | |
| 179 { | |
| 180 if (HB_OBJECT_IS_INERT (blob)) | |
| 181 return NULL; | |
| 182 | |
| 183 hb_mutex_lock (blob->lock); | |
| 184 | |
| 185 (void) (HB_DEBUG_BLOB && | |
| 186 fprintf (stderr, "%p %s (%d) -> %p\n", blob, __FUNCTION__, | |
| 187 blob->lock_count, blob->data)); | |
| 188 | |
| 189 blob->lock_count++; | |
| 190 | |
| 191 hb_mutex_unlock (blob->lock); | |
| 192 | |
| 193 return blob->data; | |
| 194 } | |
| 195 | |
| 196 void | |
| 197 hb_blob_unlock (hb_blob_t *blob) | |
| 198 { | |
| 199 if (HB_OBJECT_IS_INERT (blob)) | |
| 200 return; | |
| 201 | |
| 202 hb_mutex_lock (blob->lock); | |
| 203 | |
| 204 (void) (HB_DEBUG_BLOB && | |
| 205 fprintf (stderr, "%p %s (%d) -> %p\n", blob, __FUNCTION__, | |
| 206 blob->lock_count, blob->data)); | |
| 207 | |
| 208 assert (blob->lock_count > 0); | |
| 209 blob->lock_count--; | |
| 210 | |
| 211 hb_mutex_unlock (blob->lock); | |
| 212 } | |
| 213 | |
| 214 hb_bool_t | |
| 215 hb_blob_is_writable (hb_blob_t *blob) | |
| 216 { | |
| 217 hb_memory_mode_t mode; | |
| 218 | |
| 219 if (HB_OBJECT_IS_INERT (blob)) | |
| 220 return FALSE; | |
| 221 | |
| 222 hb_mutex_lock (blob->lock); | |
| 223 | |
| 224 mode = blob->mode; | |
| 225 | |
| 226 hb_mutex_unlock (blob->lock); | |
| 227 | |
| 228 return mode == HB_MEMORY_MODE_WRITABLE; | |
| 229 } | |
| 230 | |
| 231 | |
| 232 static hb_bool_t | |
| 233 _try_make_writable_inplace_unix_locked (hb_blob_t *blob) | |
| 234 { | |
| 235 #if defined(HAVE_SYS_MMAN_H) && defined(HAVE_MPROTECT) | |
| 236 uintptr_t pagesize = -1, mask, length; | |
| 237 const char *addr; | |
| 238 | |
| 239 #if defined(HAVE_SYSCONF) && defined(_SC_PAGE_SIZE) | |
| 240 pagesize = (uintptr_t) sysconf (_SC_PAGE_SIZE); | |
| 241 #elif defined(HAVE_SYSCONF) && defined(_SC_PAGESIZE) | |
| 242 pagesize = (uintptr_t) sysconf (_SC_PAGESIZE); | |
| 243 #elif defined(HAVE_GETPAGESIZE) | |
| 244 pagesize = (uintptr_t) getpagesize (); | |
| 245 #endif | |
| 246 | |
| 247 if ((uintptr_t) -1L == pagesize) { | |
| 248 (void) (HB_DEBUG_BLOB && | |
| 249 fprintf (stderr, "%p %s: failed to get pagesize: %s\n", blob, __FUNCTION__
, strerror (errno))); | |
| 250 return FALSE; | |
| 251 } | |
| 252 (void) (HB_DEBUG_BLOB && | |
| 253 fprintf (stderr, "%p %s: pagesize is %lu\n", blob, __FUNCTION__, (unsigned l
ong) pagesize)); | |
| 254 | |
| 255 mask = ~(pagesize-1); | |
| 256 addr = (const char *) (((uintptr_t) blob->data) & mask); | |
| 257 length = (const char *) (((uintptr_t) blob->data + blob->length + pagesize-1)
& mask) - addr; | |
| 258 (void) (HB_DEBUG_BLOB && | |
| 259 fprintf (stderr, "%p %s: calling mprotect on [%p..%p] (%lu bytes)\n", | |
| 260 blob, __FUNCTION__, | |
| 261 addr, addr+length, (unsigned long) length)); | |
| 262 if (-1 == mprotect ((void *) addr, length, PROT_READ | PROT_WRITE)) { | |
| 263 (void) (HB_DEBUG_BLOB && | |
| 264 fprintf (stderr, "%p %s: %s\n", blob, __FUNCTION__, strerror (errno))); | |
| 265 return FALSE; | |
| 266 } | |
| 267 | |
| 268 (void) (HB_DEBUG_BLOB && | |
| 269 fprintf (stderr, "%p %s: successfully made [%p..%p] (%lu bytes) writable\n", | |
| 270 blob, __FUNCTION__, | |
| 271 addr, addr+length, (unsigned long) length)); | |
| 272 return TRUE; | |
| 273 #else | |
| 274 return FALSE; | |
| 275 #endif | |
| 276 } | |
| 277 | |
| 278 static void | |
| 279 try_writable_inplace_locked (hb_blob_t *blob) | |
| 280 { | |
| 281 (void) (HB_DEBUG_BLOB && | |
| 282 fprintf (stderr, "%p %s: making writable\n", blob, __FUNCTION__)); | |
| 283 | |
| 284 if (_try_make_writable_inplace_unix_locked (blob)) { | |
| 285 (void) (HB_DEBUG_BLOB && | |
| 286 fprintf (stderr, "%p %s: making writable -> succeeded\n", blob, __FUNCTION
__)); | |
| 287 blob->mode = HB_MEMORY_MODE_WRITABLE; | |
| 288 } else { | |
| 289 (void) (HB_DEBUG_BLOB && | |
| 290 fprintf (stderr, "%p %s: making writable -> FAILED\n", blob, __FUNCTION__)
); | |
| 291 /* Failed to make writable inplace, mark that */ | |
| 292 blob->mode = HB_MEMORY_MODE_READONLY; | |
| 293 } | |
| 294 } | |
| 295 | |
| 296 hb_bool_t | |
| 297 hb_blob_try_writable_inplace (hb_blob_t *blob) | |
| 298 { | |
| 299 hb_memory_mode_t mode; | |
| 300 | |
| 301 if (HB_OBJECT_IS_INERT (blob)) | |
| 302 return FALSE; | |
| 303 | |
| 304 hb_mutex_lock (blob->lock); | |
| 305 | |
| 306 if (blob->mode == HB_MEMORY_MODE_READONLY_MAY_MAKE_WRITABLE) | |
| 307 try_writable_inplace_locked (blob); | |
| 308 | |
| 309 mode = blob->mode; | |
| 310 | |
| 311 hb_mutex_unlock (blob->lock); | |
| 312 | |
| 313 return mode == HB_MEMORY_MODE_WRITABLE; | |
| 314 } | |
| 315 | |
| 316 hb_bool_t | |
| 317 hb_blob_try_writable (hb_blob_t *blob) | |
| 318 { | |
| 319 hb_memory_mode_t mode; | |
| 320 | |
| 321 if (HB_OBJECT_IS_INERT (blob)) | |
| 322 return FALSE; | |
| 323 | |
| 324 hb_mutex_lock (blob->lock); | |
| 325 | |
| 326 if (blob->mode == HB_MEMORY_MODE_READONLY_MAY_MAKE_WRITABLE) | |
| 327 try_writable_inplace_locked (blob); | |
| 328 | |
| 329 if (blob->mode == HB_MEMORY_MODE_READONLY) | |
| 330 { | |
| 331 char *new_data; | |
| 332 | |
| 333 (void) (HB_DEBUG_BLOB && | |
| 334 fprintf (stderr, "%p %s (%d) -> %p\n", blob, __FUNCTION__, | |
| 335 blob->lock_count, blob->data)); | |
| 336 | |
| 337 if (blob->lock_count) | |
| 338 goto done; | |
| 339 | |
| 340 new_data = malloc (blob->length); | |
| 341 if (new_data) { | |
| 342 (void) (HB_DEBUG_BLOB && | |
| 343 fprintf (stderr, "%p %s: dupped successfully -> %p\n", blob, __FUNCTION_
_, blob->data)); | |
| 344 memcpy (new_data, blob->data, blob->length); | |
| 345 _hb_blob_destroy_user_data (blob); | |
| 346 blob->mode = HB_MEMORY_MODE_WRITABLE; | |
| 347 blob->data = new_data; | |
| 348 blob->destroy = free; | |
| 349 blob->user_data = new_data; | |
| 350 } | |
| 351 } | |
| 352 | |
| 353 done: | |
| 354 mode = blob->mode; | |
| 355 | |
| 356 hb_mutex_unlock (blob->lock); | |
| 357 | |
| 358 return mode == HB_MEMORY_MODE_WRITABLE; | |
| 359 } | |
| 360 | |
| 361 | |
| 362 HB_END_DECLS | |
| OLD | NEW |