src/chxj_specified_device.c

   1 /*
   2  * Copyright (C) 2005 QSDN,Inc. All rights reserved.
   3  * Copyright (C) 2005 Atsushi Konno All rights reserved.
   4  *
   5  * Licensed under the Apache License, Version 2.0 (the "License");
   6  * you may not use this file except in compliance with the License.
   7  * You may obtain a copy of the License at
   8  *
   9  *     http://www.apache.org/licenses/LICENSE-2.0
  10  *
  11  * Unless required by applicable law or agreed to in writing, software
  12  * distributed under the License is distributed on an "AS IS" BASIS,
  13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  14  * See the License for the specific language governing permissions and
  15  * limitations under the License.
  16  */
  17 #include "mod_chxj.h"
  18 #include "ap_regex.h"
  19 static device_table  UNKNOWN_DEVICE      = {
  20     NULL, "","UNKNOWN", CHXJ_SPEC_UNKNOWN,  0,  0,0,0,0,0,0,0, ""};
  21
  22 /**
  23  * The device is specified from UserAgent.
  24  * @param r Request_rec is appointed.
  25  * @param userAgent UserAgent is appointed here,
  26  * @return The style which corresponds is returned.
  27  */
  28 device_table*
  29 chxj_specified_device(request_rec* r, const char* user_agent)
  30 {
  31   ap_regex_t *regexp;
  32   ap_regmatch_t match[10];
  33   device_table *returnType = &UNKNOWN_DEVICE;
  34   device_table_list* dtl;
  35   device_table* dt;
  36   mod_chxj_config* conf;
  37   int rtn;
  38   char* device_id;
  39
  40   conf = ap_get_module_config(r->per_dir_config, &chxj_module);
  41   for (dtl = conf->devices; dtl; dtl = dtl->next)
  42   {
  43     if (dtl->pattern == NULL)
  44     {
  45       continue;
  46     }
  47     regexp = ap_pregcomp(r->pool, (const char*)dtl->pattern, AP_REG_EXTENDED|AP_REG_ICASE);
  48     if (regexp == NULL)
  49     {
  50       return returnType;
  51     }
  52
  53     rtn = ap_regexec(regexp, user_agent, regexp->re_nsub + 1, match, 0);
  54     if (rtn == 0)
  55     {
  56       device_id = ap_pregsub(r->pool, "$1", user_agent, regexp->re_nsub + 1, match);
  57       ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "device_id:[%s]", device_id);
  58       for (dt = dtl->table; dt; dt = dt->next)
  59       {
  60         if (strcasecmp(device_id, dt->device_id) == 0)
  61         {
  62           ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "device_name:[%s]", dt->device_name);
  63           returnType = dt;
  64           break;
  65         }
  66       }
  67       if (dt == NULL)
  68       {
  69         for (dt = dtl->table; dt; dt = dt->next)
  70         {
  71           if (dt->next == NULL) {
  72             break;
  73           }
  74         }
  75         if (dt != NULL)
  76         {
  77           returnType = dt;
  78         }
  79       }
  80     }
  81     ap_pregfree(r->pool, regexp);
  82     if (returnType != &UNKNOWN_DEVICE)
  83     {
  84       return returnType;
  85     }
  86   }
  87
  88   return returnType;
  89 }
  90
  91 /*
  92  * vim:ts=2 et
  93  */
  94