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
  19 static device_table_t  UNKNOWN_DEVICE      = {
  20     NULL, "","UNKNOWN", CHXJ_SPEC_UNKNOWN,  0,  0,0,0,0,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_t*
  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_t*      returnType = &UNKNOWN_DEVICE;
  34   device_table_list_t* dtl;
  35   device_table_t* dt;
  36   mod_chxj_config* conf;
  37   char* device_id;
  38
  39   if (! user_agent)
  40     return returnType;
  41
  42
  43   DBG(r, "start chxj_specified_device()");
  44   conf = ap_get_module_config(r->per_dir_config, &chxj_module);
  45   for (dtl = conf->devices; dtl; dtl = dtl->next) {
  46     if (! dtl->pattern) {
  47       DBG(r, "pattern is null");
  48       continue;
  49     }
  50
  51     DBG1(r, "pattern is [%s]", dtl->pattern);
  52     if (! dtl->regexp) {
  53       DBG(r,"compile failed.");
  54       return returnType;
  55     }
  56
  57     if (ap_regexec(regexp, user_agent, regexp->re_nsub + 1, match, 0) == 0) {
  58       device_id = ap_pregsub(r->pool, "$1", user_agent, regexp->re_nsub + 1, match);
  59       DBG1(r, "device_id:[%s]", device_id);
  60       for (dt = dtl->table; dt; dt = dt->next) {
  61         if (strcasecmp(device_id, dt->device_id) == 0) {
  62           DBG1(r, "device_name:[%s]", dt->device_name);
  63           returnType = dt;
  64           break;
  65         }
  66       }
  67
  68       if (! dt) {
  69         for (dt = dtl->table; dt; dt = dt->next) {
  70           if (dt->next == NULL)
  71             break;
  72         }
  73
  74         if (dt)
  75           returnType = dt;
  76       }
  77     }
  78     ap_pregfree(r->pool, regexp);
  79     if (returnType != &UNKNOWN_DEVICE) {
  80       ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "end chxj_specified_device()");
  81       return returnType;
  82     }
  83   }
  84   ap_log_rerror(APLOG_MARK, APLOG_DEBUG, 0, r, "end chxj_specified_device()");
  85
  86   return returnType;
  87 }
  88
  89 /*
  90  * vim:ts=2 et
  91  */
  92