Whamcloud - gitweb
41272f00cb3f6225504f6668f16b13e4ac1a1252
[fs/lustre-release.git] / lustre / osp / osp_dev.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2012, 2013, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/osp/osp_dev.c
37  *
38  * Lustre OST Proxy Device
39  *
40  * Author: Alex Zhuravlev <alexey.zhuravlev@intel.com>
41  * Author: Mikhail Pershin <mike.pershin@intel.com>
42  * Author: Di Wang <di.wang@intel.com>
43  */
44
45 #define DEBUG_SUBSYSTEM S_MDS
46
47 #include <obd_class.h>
48 #include <lustre_param.h>
49 #include <lustre_log.h>
50 #include <lustre_mdc.h>
51
52 #include "osp_internal.h"
53
54 /* Slab for OSP object allocation */
55 struct kmem_cache *osp_object_kmem;
56
57 static struct lu_kmem_descr osp_caches[] = {
58         {
59                 .ckd_cache = &osp_object_kmem,
60                 .ckd_name  = "osp_obj",
61                 .ckd_size  = sizeof(struct osp_object)
62         },
63         {
64                 .ckd_cache = NULL
65         }
66 };
67
68 struct lu_object *osp_object_alloc(const struct lu_env *env,
69                                    const struct lu_object_header *hdr,
70                                    struct lu_device *d)
71 {
72         struct lu_object_header *h = NULL;
73         struct osp_object       *o;
74         struct lu_object        *l;
75
76         OBD_SLAB_ALLOC_PTR_GFP(o, osp_object_kmem, __GFP_IO);
77         if (o != NULL) {
78                 l = &o->opo_obj.do_lu;
79
80                 /* If hdr is NULL, it means the object is not built
81                  * from the top dev(MDT/OST), usually it happens when
82                  * building striped object, like data object on MDT or
83                  * striped object for directory */
84                 if (hdr == NULL) {
85                         h = &o->opo_header;
86                         lu_object_header_init(h);
87                         dt_object_init(&o->opo_obj, h, d);
88                         lu_object_add_top(h, l);
89                 } else {
90                         dt_object_init(&o->opo_obj, h, d);
91                 }
92
93                 l->lo_ops = &osp_lu_obj_ops;
94
95                 return l;
96         } else {
97                 return NULL;
98         }
99 }
100
101 static struct dt_object
102 *osp_find_or_create(const struct lu_env *env, struct osp_device *osp,
103                     struct lu_attr *attr, __u32 reg_id)
104 {
105         struct osp_thread_info *osi = osp_env_info(env);
106         struct dt_object_format dof = { 0 };
107         struct dt_object       *dto;
108         int                  rc;
109         ENTRY;
110
111         lu_local_obj_fid(&osi->osi_fid, reg_id);
112         attr->la_valid = LA_MODE;
113         attr->la_mode = S_IFREG | 0644;
114         dof.dof_type = DFT_REGULAR;
115         dto = dt_find_or_create(env, osp->opd_storage, &osi->osi_fid,
116                                 &dof, attr);
117         if (IS_ERR(dto))
118                 RETURN(dto);
119
120         rc = dt_attr_get(env, dto, attr, NULL);
121         if (rc) {
122                 CERROR("%s: can't be initialized: rc = %d\n",
123                        osp->opd_obd->obd_name, rc);
124                 lu_object_put(env, &dto->do_lu);
125                 RETURN(ERR_PTR(rc));
126         }
127         RETURN(dto);
128 }
129
130 static int osp_write_local_file(const struct lu_env *env,
131                                 struct osp_device *osp,
132                                 struct dt_object *dt_obj,
133                                 struct lu_buf *buf,
134                                 loff_t offset)
135 {
136         struct thandle *th;
137         int rc;
138
139         th = dt_trans_create(env, osp->opd_storage);
140         if (IS_ERR(th))
141                 RETURN(PTR_ERR(th));
142
143         rc = dt_declare_record_write(env, dt_obj, buf->lb_len, offset, th);
144         if (rc)
145                 GOTO(out, rc);
146         rc = dt_trans_start_local(env, osp->opd_storage, th);
147         if (rc)
148                 GOTO(out, rc);
149
150         rc = dt_record_write(env, dt_obj, buf, &offset, th);
151 out:
152         dt_trans_stop(env, osp->opd_storage, th);
153         RETURN(rc);
154 }
155
156 static int osp_init_last_objid(const struct lu_env *env, struct osp_device *osp)
157 {
158         struct osp_thread_info  *osi = osp_env_info(env);
159         struct lu_fid           *fid = &osp->opd_last_used_fid;
160         struct dt_object        *dto;
161         int                     rc;
162         ENTRY;
163
164         dto = osp_find_or_create(env, osp, &osi->osi_attr, MDD_LOV_OBJ_OID);
165         if (IS_ERR(dto))
166                 RETURN(PTR_ERR(dto));
167         /* object will be released in device cleanup path */
168         if (osi->osi_attr.la_size >=
169             sizeof(osi->osi_id) * (osp->opd_index + 1)) {
170                 osp_objid_buf_prep(&osi->osi_lb, &osi->osi_off, &fid->f_oid,
171                                    osp->opd_index);
172                 rc = dt_record_read(env, dto, &osi->osi_lb, &osi->osi_off);
173                 if (rc != 0)
174                         GOTO(out, rc);
175         } else {
176                 fid->f_oid = 0;
177                 osp_objid_buf_prep(&osi->osi_lb, &osi->osi_off, &fid->f_oid,
178                                    osp->opd_index);
179                 rc = osp_write_local_file(env, osp, dto, &osi->osi_lb,
180                                           osi->osi_off);
181         }
182         osp->opd_last_used_oid_file = dto;
183         RETURN(0);
184 out:
185         /* object will be released in device cleanup path */
186         CERROR("%s: can't initialize lov_objid: rc = %d\n",
187                osp->opd_obd->obd_name, rc);
188         lu_object_put(env, &dto->do_lu);
189         osp->opd_last_used_oid_file = NULL;
190         RETURN(rc);
191 }
192
193 static int osp_init_last_seq(const struct lu_env *env, struct osp_device *osp)
194 {
195         struct osp_thread_info  *osi = osp_env_info(env);
196         struct lu_fid           *fid = &osp->opd_last_used_fid;
197         struct dt_object        *dto;
198         int                     rc;
199         ENTRY;
200
201         dto = osp_find_or_create(env, osp, &osi->osi_attr, MDD_LOV_OBJ_OSEQ);
202         if (IS_ERR(dto))
203                 RETURN(PTR_ERR(dto));
204
205         /* object will be released in device cleanup path */
206         if (osi->osi_attr.la_size >=
207             sizeof(osi->osi_id) * (osp->opd_index + 1)) {
208                 osp_objseq_buf_prep(&osi->osi_lb, &osi->osi_off, &fid->f_seq,
209                                    osp->opd_index);
210                 rc = dt_record_read(env, dto, &osi->osi_lb, &osi->osi_off);
211                 if (rc != 0)
212                         GOTO(out, rc);
213         } else {
214                 fid->f_seq = 0;
215                 osp_objseq_buf_prep(&osi->osi_lb, &osi->osi_off, &fid->f_seq,
216                                     osp->opd_index);
217                 rc = osp_write_local_file(env, osp, dto, &osi->osi_lb,
218                                           osi->osi_off);
219         }
220         osp->opd_last_used_seq_file = dto;
221         RETURN(0);
222 out:
223         /* object will be released in device cleanup path */
224         CERROR("%s: can't initialize lov_seq: rc = %d\n",
225                osp->opd_obd->obd_name, rc);
226         lu_object_put(env, &dto->do_lu);
227         osp->opd_last_used_seq_file = NULL;
228         RETURN(rc);
229 }
230
231 static int osp_last_used_init(const struct lu_env *env, struct osp_device *osp)
232 {
233         struct osp_thread_info *osi = osp_env_info(env);
234         int                  rc;
235         ENTRY;
236
237         fid_zero(&osp->opd_last_used_fid);
238         rc = osp_init_last_objid(env, osp);
239         if (rc < 0) {
240                 CERROR("%s: Can not get ids %d from old objid!\n",
241                        osp->opd_obd->obd_name, rc);
242                 RETURN(rc);
243         }
244
245         rc = osp_init_last_seq(env, osp);
246         if (rc < 0) {
247                 CERROR("%s: Can not get ids %d from old objid!\n",
248                        osp->opd_obd->obd_name, rc);
249                 GOTO(out, rc);
250         }
251
252         if (fid_oid(&osp->opd_last_used_fid) != 0 &&
253             fid_seq(&osp->opd_last_used_fid) == 0) {
254                 /* Just upgrade from the old version,
255                  * set the seq to be IDIF */
256                 osp->opd_last_used_fid.f_seq =
257                    fid_idif_seq(fid_oid(&osp->opd_last_used_fid),
258                                 osp->opd_index);
259                 osp_objseq_buf_prep(&osi->osi_lb, &osi->osi_off,
260                                     &osp->opd_last_used_fid.f_seq,
261                                     osp->opd_index);
262                 rc = osp_write_local_file(env, osp, osp->opd_last_used_seq_file,
263                                           &osi->osi_lb, osi->osi_off);
264                 if (rc) {
265                         CERROR("%s : Can not write seq file: rc = %d\n",
266                                osp->opd_obd->obd_name, rc);
267                         GOTO(out, rc);
268                 }
269         }
270
271         if (!fid_is_zero(&osp->opd_last_used_fid) &&
272                  !fid_is_sane(&osp->opd_last_used_fid)) {
273                 CERROR("%s: Got invalid FID "DFID"\n", osp->opd_obd->obd_name,
274                         PFID(&osp->opd_last_used_fid));
275                 GOTO(out, rc = -EINVAL);
276         }
277
278         CDEBUG(D_INFO, "%s: Init last used fid "DFID"\n",
279                osp->opd_obd->obd_name, PFID(&osp->opd_last_used_fid));
280 out:
281         if (rc != 0) {
282                 if (osp->opd_last_used_oid_file != NULL) {
283                         lu_object_put(env, &osp->opd_last_used_oid_file->do_lu);
284                         osp->opd_last_used_oid_file = NULL;
285                 }
286                 if (osp->opd_last_used_seq_file != NULL) {
287                         lu_object_put(env, &osp->opd_last_used_seq_file->do_lu);
288                         osp->opd_last_used_seq_file = NULL;
289                 }
290         }
291
292         RETURN(rc);
293 }
294
295 static void osp_last_used_fini(const struct lu_env *env, struct osp_device *d)
296 {
297         /* release last_used file */
298         if (d->opd_last_used_oid_file != NULL) {
299                 lu_object_put(env, &d->opd_last_used_oid_file->do_lu);
300                 d->opd_last_used_oid_file = NULL;
301         }
302
303         if (d->opd_last_used_seq_file != NULL) {
304                 lu_object_put(env, &d->opd_last_used_seq_file->do_lu);
305                 d->opd_last_used_seq_file = NULL;
306         }
307 }
308
309 static int osp_disconnect(struct osp_device *d)
310 {
311         struct obd_import *imp;
312         int rc = 0;
313
314         imp = d->opd_obd->u.cli.cl_import;
315
316         /* Mark import deactivated now, so we don't try to reconnect if any
317          * of the cleanup RPCs fails (e.g. ldlm cancel, etc).  We don't
318          * fully deactivate the import, or that would drop all requests. */
319         LASSERT(imp != NULL);
320         spin_lock(&imp->imp_lock);
321         imp->imp_deactive = 1;
322         spin_unlock(&imp->imp_lock);
323
324         ptlrpc_deactivate_import(imp);
325
326         /* Some non-replayable imports (MDS's OSCs) are pinged, so just
327          * delete it regardless.  (It's safe to delete an import that was
328          * never added.) */
329         (void)ptlrpc_pinger_del_import(imp);
330
331         rc = ptlrpc_disconnect_import(imp, 0);
332         if (rc != 0)
333                 CERROR("%s: can't disconnect: rc = %d\n",
334                        d->opd_obd->obd_name, rc);
335
336         ptlrpc_invalidate_import(imp);
337
338         RETURN(rc);
339 }
340
341 static int osp_shutdown(const struct lu_env *env, struct osp_device *d)
342 {
343         int                      rc = 0;
344         ENTRY;
345
346         LASSERT(env);
347
348         rc = osp_disconnect(d);
349
350         if (!d->opd_connect_mdt) {
351                 /* stop sync thread */
352                 osp_sync_fini(d);
353
354                 /* stop precreate thread */
355                 osp_precreate_fini(d);
356
357                 /* release last_used file */
358                 osp_last_used_fini(env, d);
359         }
360
361         obd_fid_fini(d->opd_obd);
362
363         RETURN(rc);
364 }
365
366 static int osp_process_config(const struct lu_env *env,
367                               struct lu_device *dev, struct lustre_cfg *lcfg)
368 {
369         struct osp_device               *d = lu2osp_dev(dev);
370         struct lprocfs_static_vars       lvars = { 0 };
371         int                              rc;
372
373         ENTRY;
374
375         switch (lcfg->lcfg_command) {
376         case LCFG_PRE_CLEANUP:
377                 rc = osp_disconnect(d);
378                 break;
379         case LCFG_CLEANUP:
380                 lu_dev_del_linkage(dev->ld_site, dev);
381                 rc = osp_shutdown(env, d);
382                 break;
383         case LCFG_PARAM:
384                 lprocfs_osp_init_vars(&lvars);
385
386                 LASSERT(d->opd_obd);
387                 rc = class_process_proc_param(PARAM_OSC, lvars.obd_vars,
388                                               lcfg, d->opd_obd);
389                 if (rc > 0)
390                         rc = 0;
391                 if (rc == -ENOSYS) {
392                         /* class_process_proc_param() haven't found matching
393                          * parameter and returned ENOSYS so that layer(s)
394                          * below could use that. But OSP is the bottom, so
395                          * just ignore it */
396                         CERROR("%s: unknown param %s\n",
397                                (char *)lustre_cfg_string(lcfg, 0),
398                                (char *)lustre_cfg_string(lcfg, 1));
399                         rc = 0;
400                 }
401                 break;
402         default:
403                 CERROR("%s: unknown command %u\n",
404                        (char *)lustre_cfg_string(lcfg, 0), lcfg->lcfg_command);
405                 rc = 0;
406                 break;
407         }
408
409         RETURN(rc);
410 }
411
412 static int osp_recovery_complete(const struct lu_env *env,
413                                  struct lu_device *dev)
414 {
415         struct osp_device       *osp = lu2osp_dev(dev);
416         int                      rc = 0;
417
418         ENTRY;
419         osp->opd_recovery_completed = 1;
420
421         if (!osp->opd_connect_mdt && osp->opd_pre != NULL)
422                 wake_up(&osp->opd_pre_waitq);
423         RETURN(rc);
424 }
425
426 const struct lu_device_operations osp_lu_ops = {
427         .ldo_object_alloc       = osp_object_alloc,
428         .ldo_process_config     = osp_process_config,
429         .ldo_recovery_complete  = osp_recovery_complete,
430 };
431
432 /**
433  * provides with statfs from corresponded OST
434  *
435  */
436 static int osp_statfs(const struct lu_env *env, struct dt_device *dev,
437                       struct obd_statfs *sfs)
438 {
439         struct osp_device *d = dt2osp_dev(dev);
440
441         ENTRY;
442
443         if (unlikely(d->opd_imp_active == 0))
444                 RETURN(-ENOTCONN);
445
446         if (d->opd_pre == NULL)
447                 RETURN(0);
448
449         /* return recently updated data */
450         *sfs = d->opd_statfs;
451
452         /*
453          * layer above osp (usually lod) can use ffree to estimate
454          * how many objects are available for immediate creation
455          */
456         spin_lock(&d->opd_pre_lock);
457         LASSERTF(fid_seq(&d->opd_pre_last_created_fid) ==
458                  fid_seq(&d->opd_pre_used_fid),
459                  "last_created "DFID", next_fid "DFID"\n",
460                  PFID(&d->opd_pre_last_created_fid),
461                  PFID(&d->opd_pre_used_fid));
462         sfs->os_fprecreated = fid_oid(&d->opd_pre_last_created_fid) -
463                               fid_oid(&d->opd_pre_used_fid);
464         sfs->os_fprecreated -= d->opd_pre_reserved;
465         spin_unlock(&d->opd_pre_lock);
466
467         LASSERT(sfs->os_fprecreated <= OST_MAX_PRECREATE * 2);
468
469         CDEBUG(D_OTHER, "%s: "LPU64" blocks, "LPU64" free, "LPU64" avail, "
470                LPU64" files, "LPU64" free files\n", d->opd_obd->obd_name,
471                sfs->os_blocks, sfs->os_bfree, sfs->os_bavail,
472                sfs->os_files, sfs->os_ffree);
473         RETURN(0);
474 }
475
476 static int osp_sync(const struct lu_env *env, struct dt_device *dev)
477 {
478         ENTRY;
479
480         /*
481          * XXX: wake up sync thread, command it to start flushing asap?
482          */
483
484         RETURN(0);
485 }
486
487 const struct dt_device_operations osp_dt_ops = {
488         .dt_statfs       = osp_statfs,
489         .dt_sync         = osp_sync,
490         .dt_trans_create = osp_trans_create,
491         .dt_trans_start  = osp_trans_start,
492         .dt_trans_stop   = osp_trans_stop,
493 };
494
495 static int osp_connect_to_osd(const struct lu_env *env, struct osp_device *m,
496                               const char *nextdev)
497 {
498         struct obd_connect_data *data = NULL;
499         struct obd_device       *obd;
500         int                      rc;
501
502         ENTRY;
503
504         LASSERT(m->opd_storage_exp == NULL);
505
506         OBD_ALLOC_PTR(data);
507         if (data == NULL)
508                 RETURN(-ENOMEM);
509
510         obd = class_name2obd(nextdev);
511         if (obd == NULL) {
512                 CERROR("%s: can't locate next device: %s\n",
513                        m->opd_obd->obd_name, nextdev);
514                 GOTO(out, rc = -ENOTCONN);
515         }
516
517         rc = obd_connect(env, &m->opd_storage_exp, obd, &obd->obd_uuid, data,
518                          NULL);
519         if (rc) {
520                 CERROR("%s: cannot connect to next dev %s: rc = %d\n",
521                        m->opd_obd->obd_name, nextdev, rc);
522                 GOTO(out, rc);
523         }
524
525         m->opd_dt_dev.dd_lu_dev.ld_site =
526                 m->opd_storage_exp->exp_obd->obd_lu_dev->ld_site;
527         LASSERT(m->opd_dt_dev.dd_lu_dev.ld_site);
528         m->opd_storage = lu2dt_dev(m->opd_storage_exp->exp_obd->obd_lu_dev);
529
530 out:
531         OBD_FREE_PTR(data);
532         RETURN(rc);
533 }
534
535 static int osp_init0(const struct lu_env *env, struct osp_device *m,
536                      struct lu_device_type *ldt, struct lustre_cfg *cfg)
537 {
538         struct obd_device       *obd;
539         struct obd_import       *imp;
540         class_uuid_t            uuid;
541         char                    *src, *tgt, *mdt, *osdname = NULL;
542         int                     rc;
543         long                    idx;
544
545         ENTRY;
546
547         mutex_init(&m->opd_async_requests_mutex);
548         obd = class_name2obd(lustre_cfg_string(cfg, 0));
549         if (obd == NULL) {
550                 CERROR("Cannot find obd with name %s\n",
551                        lustre_cfg_string(cfg, 0));
552                 RETURN(-ENODEV);
553         }
554         m->opd_obd = obd;
555
556         /* There is no record in the MDT configuration for the local disk
557          * device, so we have to extract this from elsewhere in the profile.
558          * The only information we get at setup is from the OSC records:
559          * setup 0:{fsname}-OSTxxxx-osc[-MDTxxxx] 1:lustre-OST0000_UUID 2:NID
560          * Note that 1.8 generated configs are missing the -MDTxxxx part.
561          * We need to reconstruct the name of the underlying OSD from this:
562          * {fsname}-{svname}-osd, for example "lustre-MDT0000-osd".  We
563          * also need to determine the OST index from this - will be used
564          * to calculate the offset in shared lov_objids file later */
565
566         src = lustre_cfg_string(cfg, 0);
567         if (src == NULL)
568                 RETURN(-EINVAL);
569
570         tgt = strrchr(src, '-');
571         if (tgt == NULL) {
572                 CERROR("%s: invalid target name %s\n",
573                        m->opd_obd->obd_name, lustre_cfg_string(cfg, 0));
574                 RETURN(-EINVAL);
575         }
576
577         if (strncmp(tgt, "-osc", 4) == 0) {
578                 /* Old OSC name fsname-OSTXXXX-osc */
579                 for (tgt--; tgt > src && *tgt != '-'; tgt--)
580                         ;
581                 if (tgt == src) {
582                         CERROR("%s: invalid target name %s\n",
583                                m->opd_obd->obd_name, lustre_cfg_string(cfg, 0));
584                         RETURN(-EINVAL);
585                 }
586
587                 if (strncmp(tgt, "-OST", 4) != 0) {
588                         CERROR("%s: invalid target name %s\n",
589                                m->opd_obd->obd_name, lustre_cfg_string(cfg, 0));
590                         RETURN(-EINVAL);
591                 }
592
593                 idx = simple_strtol(tgt + 4, &mdt, 16);
594                 if (mdt[0] != '-' || idx > INT_MAX || idx < 0) {
595                         CERROR("%s: invalid OST index in '%s'\n",
596                                m->opd_obd->obd_name, src);
597                         RETURN(-EINVAL);
598                 }
599                 m->opd_index = idx;
600                 m->opd_group = 0;
601                 idx = tgt - src;
602         } else {
603                 /* New OSC name fsname-OSTXXXX-osc-MDTXXXX */
604                 if (strncmp(tgt, "-MDT", 4) != 0 &&
605                     strncmp(tgt, "-OST", 4) != 0) {
606                         CERROR("%s: invalid target name %s\n",
607                                m->opd_obd->obd_name, lustre_cfg_string(cfg, 0));
608                         RETURN(-EINVAL);
609                 }
610
611                 idx = simple_strtol(tgt + 4, &mdt, 16);
612                 if (*mdt != '\0' || idx > INT_MAX || idx < 0) {
613                         CERROR("%s: invalid OST index in '%s'\n",
614                                m->opd_obd->obd_name, src);
615                         RETURN(-EINVAL);
616                 }
617
618                 /* Get MDT index from the name and set it to opd_group,
619                  * which will be used by OSP to connect with OST */
620                 m->opd_group = idx;
621                 if (tgt - src <= 12) {
622                         CERROR("%s: invalid mdt index retrieve from %s\n",
623                                m->opd_obd->obd_name, lustre_cfg_string(cfg, 0));
624                         RETURN(-EINVAL);
625                 }
626
627                 if (strncmp(tgt - 12, "-MDT", 4) == 0)
628                         m->opd_connect_mdt = 1;
629
630                 idx = simple_strtol(tgt - 8, &mdt, 16);
631                 if (mdt[0] != '-' || idx > INT_MAX || idx < 0) {
632                         CERROR("%s: invalid OST index in '%s'\n",
633                                m->opd_obd->obd_name, src);
634                         RETURN(-EINVAL);
635                 }
636
637                 m->opd_index = idx;
638                 idx = tgt - src - 12;
639         }
640         /* check the fsname length, and after this everything else will fit */
641         if (idx > MTI_NAME_MAXLEN) {
642                 CERROR("%s: fsname too long in '%s'\n",
643                        m->opd_obd->obd_name, src);
644                 RETURN(-EINVAL);
645         }
646
647         OBD_ALLOC(osdname, MAX_OBD_NAME);
648         if (osdname == NULL)
649                 RETURN(-ENOMEM);
650
651         memcpy(osdname, src, idx); /* copy just the fsname part */
652         osdname[idx] = '\0';
653
654         mdt = strstr(mdt, "-MDT");
655         if (mdt == NULL) /* 1.8 configs don't have "-MDT0000" at the end */
656                 strcat(osdname, "-MDT0000");
657         else
658                 strcat(osdname, mdt);
659         strcat(osdname, "-osd");
660         CDEBUG(D_HA, "%s: connect to %s (%s)\n", obd->obd_name, osdname, src);
661
662         if (m->opd_connect_mdt) {
663                 struct client_obd *cli = &m->opd_obd->u.cli;
664
665                 OBD_ALLOC(cli->cl_rpc_lock, sizeof(*cli->cl_rpc_lock));
666                 if (!cli->cl_rpc_lock)
667                         GOTO(out_fini, rc = -ENOMEM);
668                 osp_init_rpc_lock(cli->cl_rpc_lock);
669         }
670
671         m->opd_dt_dev.dd_lu_dev.ld_ops = &osp_lu_ops;
672         m->opd_dt_dev.dd_ops = &osp_dt_ops;
673         obd->obd_lu_dev = &m->opd_dt_dev.dd_lu_dev;
674
675         rc = osp_connect_to_osd(env, m, osdname);
676         if (rc)
677                 GOTO(out_fini, rc);
678
679         rc = ptlrpcd_addref();
680         if (rc)
681                 GOTO(out_disconnect, rc);
682
683         rc = client_obd_setup(obd, cfg);
684         if (rc) {
685                 CERROR("%s: can't setup obd: %d\n", m->opd_obd->obd_name, rc);
686                 GOTO(out_ref, rc);
687         }
688
689         osp_lprocfs_init(m);
690
691         rc = obd_fid_init(m->opd_obd, NULL, m->opd_connect_mdt ?
692                           LUSTRE_SEQ_METADATA : LUSTRE_SEQ_DATA);
693         if (rc) {
694                 CERROR("%s: fid init error: rc = %d\n",
695                        m->opd_obd->obd_name, rc);
696                 GOTO(out_proc, rc);
697         }
698
699         if (!m->opd_connect_mdt) {
700                 /* Initialize last id from the storage - will be
701                  * used in orphan cleanup. */
702                 rc = osp_last_used_init(env, m);
703                 if (rc)
704                         GOTO(out_proc, rc);
705
706
707                 /* Initialize precreation thread, it handles new
708                  * connections as well. */
709                 rc = osp_init_precreate(m);
710                 if (rc)
711                         GOTO(out_last_used, rc);
712                 /*
713                  * Initialize synhronization mechanism taking
714                  * care of propogating changes to OST in near
715                  * transactional manner.
716                  */
717                 rc = osp_sync_init(env, m);
718                 if (rc)
719                         GOTO(out_precreat, rc);
720         }
721
722         /*
723          * Initiate connect to OST
724          */
725         ll_generate_random_uuid(uuid);
726         class_uuid_unparse(uuid, &m->opd_cluuid);
727
728         imp = obd->u.cli.cl_import;
729
730         rc = ptlrpc_init_import(imp);
731         if (rc)
732                 GOTO(out, rc);
733         if (osdname)
734                 OBD_FREE(osdname, MAX_OBD_NAME);
735         RETURN(0);
736
737 out:
738         if (!m->opd_connect_mdt)
739                 /* stop sync thread */
740                 osp_sync_fini(m);
741 out_precreat:
742         /* stop precreate thread */
743         if (!m->opd_connect_mdt)
744                 osp_precreate_fini(m);
745 out_last_used:
746         if (!m->opd_connect_mdt)
747                 osp_last_used_fini(env, m);
748 out_proc:
749         ptlrpc_lprocfs_unregister_obd(obd);
750         lprocfs_obd_cleanup(obd);
751         if (m->opd_symlink)
752                 lprocfs_remove(&m->opd_symlink);
753         client_obd_cleanup(obd);
754 out_ref:
755         ptlrpcd_decref();
756 out_disconnect:
757         if (m->opd_connect_mdt) {
758                 struct client_obd *cli = &m->opd_obd->u.cli;
759                 if (cli->cl_rpc_lock != NULL) {
760                         OBD_FREE_PTR(cli->cl_rpc_lock);
761                         cli->cl_rpc_lock = NULL;
762                 }
763         }
764         obd_disconnect(m->opd_storage_exp);
765 out_fini:
766         if (osdname)
767                 OBD_FREE(osdname, MAX_OBD_NAME);
768         RETURN(rc);
769 }
770
771 static struct lu_device *osp_device_free(const struct lu_env *env,
772                                          struct lu_device *lu)
773 {
774         struct osp_device *m = lu2osp_dev(lu);
775
776         ENTRY;
777
778         if (cfs_atomic_read(&lu->ld_ref) && lu->ld_site) {
779                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_ERROR, NULL);
780                 lu_site_print(env, lu->ld_site, &msgdata, lu_cdebug_printer);
781         }
782         dt_device_fini(&m->opd_dt_dev);
783         OBD_FREE_PTR(m);
784         RETURN(NULL);
785 }
786
787 static struct lu_device *osp_device_alloc(const struct lu_env *env,
788                                           struct lu_device_type *t,
789                                           struct lustre_cfg *lcfg)
790 {
791         struct osp_device *m;
792         struct lu_device  *l;
793
794         OBD_ALLOC_PTR(m);
795         if (m == NULL) {
796                 l = ERR_PTR(-ENOMEM);
797         } else {
798                 int rc;
799
800                 l = osp2lu_dev(m);
801                 dt_device_init(&m->opd_dt_dev, t);
802                 rc = osp_init0(env, m, t, lcfg);
803                 if (rc != 0) {
804                         osp_device_free(env, l);
805                         l = ERR_PTR(rc);
806                 }
807         }
808         return l;
809 }
810
811 static struct lu_device *osp_device_fini(const struct lu_env *env,
812                                          struct lu_device *d)
813 {
814         struct osp_device *m = lu2osp_dev(d);
815         struct obd_import *imp;
816         int                rc;
817
818         ENTRY;
819
820         if (m->opd_async_requests != NULL) {
821                 out_destroy_update_req(m->opd_async_requests);
822                 m->opd_async_requests = NULL;
823         }
824
825         if (m->opd_storage_exp)
826                 obd_disconnect(m->opd_storage_exp);
827
828         imp = m->opd_obd->u.cli.cl_import;
829
830         if (imp->imp_rq_pool) {
831                 ptlrpc_free_rq_pool(imp->imp_rq_pool);
832                 imp->imp_rq_pool = NULL;
833         }
834
835         if (m->opd_symlink)
836                 lprocfs_remove(&m->opd_symlink);
837
838         LASSERT(m->opd_obd);
839         ptlrpc_lprocfs_unregister_obd(m->opd_obd);
840         lprocfs_obd_cleanup(m->opd_obd);
841
842         if (m->opd_connect_mdt) {
843                 struct client_obd *cli = &m->opd_obd->u.cli;
844                 if (cli->cl_rpc_lock != NULL) {
845                         OBD_FREE_PTR(cli->cl_rpc_lock);
846                         cli->cl_rpc_lock = NULL;
847                 }
848         }
849
850         rc = client_obd_cleanup(m->opd_obd);
851         LASSERTF(rc == 0, "error %d\n", rc);
852
853         ptlrpcd_decref();
854
855         RETURN(NULL);
856 }
857
858 static int osp_reconnect(const struct lu_env *env,
859                          struct obd_export *exp, struct obd_device *obd,
860                          struct obd_uuid *cluuid,
861                          struct obd_connect_data *data,
862                          void *localdata)
863 {
864         return 0;
865 }
866
867 static int osp_prepare_fid_client(struct osp_device *osp)
868 {
869         LASSERT(osp->opd_obd->u.cli.cl_seq != NULL);
870         if (osp->opd_obd->u.cli.cl_seq->lcs_exp != NULL)
871                 return 0;
872
873         LASSERT(osp->opd_exp != NULL);
874         osp->opd_obd->u.cli.cl_seq->lcs_exp =
875                                 class_export_get(osp->opd_exp);
876         return 0;
877 }
878
879 /*
880  * we use exports to track all LOD users
881  */
882 static int osp_obd_connect(const struct lu_env *env, struct obd_export **exp,
883                            struct obd_device *obd, struct obd_uuid *cluuid,
884                            struct obd_connect_data *data, void *localdata)
885 {
886         struct osp_device       *osp = lu2osp_dev(obd->obd_lu_dev);
887         struct obd_connect_data *ocd;
888         struct obd_import       *imp;
889         struct lustre_handle     conn;
890         int                      rc;
891
892         ENTRY;
893
894         CDEBUG(D_CONFIG, "connect #%d\n", osp->opd_connects);
895
896         rc = class_connect(&conn, obd, cluuid);
897         if (rc)
898                 RETURN(rc);
899
900         *exp = class_conn2export(&conn);
901         /* Why should there ever be more than 1 connect? */
902         osp->opd_connects++;
903         LASSERT(osp->opd_connects == 1);
904
905         osp->opd_exp = *exp;
906
907         imp = osp->opd_obd->u.cli.cl_import;
908         imp->imp_dlm_handle = conn;
909
910         LASSERT(data != NULL);
911         LASSERT(data->ocd_connect_flags & OBD_CONNECT_INDEX);
912         ocd = &imp->imp_connect_data;
913         *ocd = *data;
914
915         imp->imp_connect_flags_orig = ocd->ocd_connect_flags;
916
917         ocd->ocd_version = LUSTRE_VERSION_CODE;
918         ocd->ocd_index = data->ocd_index;
919         imp->imp_connect_flags_orig = ocd->ocd_connect_flags;
920
921         rc = ptlrpc_connect_import(imp);
922         if (rc) {
923                 CERROR("%s: can't connect obd: rc = %d\n", obd->obd_name, rc);
924                 GOTO(out, rc);
925         }
926
927         ptlrpc_pinger_add_import(imp);
928 out:
929         RETURN(rc);
930 }
931
932 /*
933  * once last export (we don't count self-export) disappeared
934  * osp can be released
935  */
936 static int osp_obd_disconnect(struct obd_export *exp)
937 {
938         struct obd_device *obd = exp->exp_obd;
939         struct osp_device *osp = lu2osp_dev(obd->obd_lu_dev);
940         int                rc;
941         ENTRY;
942
943         /* Only disconnect the underlying layers on the final disconnect. */
944         LASSERT(osp->opd_connects == 1);
945         osp->opd_connects--;
946
947         rc = class_disconnect(exp);
948         if (rc) {
949                 CERROR("%s: class disconnect error: rc = %d\n",
950                        obd->obd_name, rc);
951                 RETURN(rc);
952         }
953
954         /* destroy the device */
955         class_manual_cleanup(obd);
956
957         RETURN(rc);
958 }
959
960 /*
961  * lprocfs helpers still use OBD API, let's keep obd_statfs() support
962  */
963 static int osp_obd_statfs(const struct lu_env *env, struct obd_export *exp,
964                           struct obd_statfs *osfs, __u64 max_age, __u32 flags)
965 {
966         struct obd_statfs       *msfs;
967         struct ptlrpc_request   *req;
968         struct obd_import       *imp = NULL;
969         int                      rc;
970
971         ENTRY;
972
973         /* Since the request might also come from lprocfs, so we need
974          * sync this with client_disconnect_export Bug15684 */
975         down_read(&exp->exp_obd->u.cli.cl_sem);
976         if (exp->exp_obd->u.cli.cl_import)
977                 imp = class_import_get(exp->exp_obd->u.cli.cl_import);
978         up_read(&exp->exp_obd->u.cli.cl_sem);
979         if (!imp)
980                 RETURN(-ENODEV);
981
982         /* We could possibly pass max_age in the request (as an absolute
983          * timestamp or a "seconds.usec ago") so the target can avoid doing
984          * extra calls into the filesystem if that isn't necessary (e.g.
985          * during mount that would help a bit).  Having relative timestamps
986          * is not so great if request processing is slow, while absolute
987          * timestamps are not ideal because they need time synchronization. */
988         req = ptlrpc_request_alloc(imp, &RQF_OST_STATFS);
989
990         class_import_put(imp);
991
992         if (req == NULL)
993                 RETURN(-ENOMEM);
994
995         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
996         if (rc) {
997                 ptlrpc_request_free(req);
998                 RETURN(rc);
999         }
1000         ptlrpc_request_set_replen(req);
1001         req->rq_request_portal = OST_CREATE_PORTAL;
1002         ptlrpc_at_set_req_timeout(req);
1003
1004         if (flags & OBD_STATFS_NODELAY) {
1005                 /* procfs requests not want stat in wait for avoid deadlock */
1006                 req->rq_no_resend = 1;
1007                 req->rq_no_delay = 1;
1008         }
1009
1010         rc = ptlrpc_queue_wait(req);
1011         if (rc)
1012                 GOTO(out, rc);
1013
1014         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
1015         if (msfs == NULL)
1016                 GOTO(out, rc = -EPROTO);
1017
1018         *osfs = *msfs;
1019
1020         EXIT;
1021 out:
1022         ptlrpc_req_finished(req);
1023         return rc;
1024 }
1025
1026 static int osp_import_event(struct obd_device *obd, struct obd_import *imp,
1027                             enum obd_import_event event)
1028 {
1029         struct osp_device *d = lu2osp_dev(obd->obd_lu_dev);
1030
1031         switch (event) {
1032         case IMP_EVENT_DISCON:
1033                 d->opd_got_disconnected = 1;
1034                 d->opd_imp_connected = 0;
1035                 if (d->opd_connect_mdt)
1036                         break;
1037
1038                 if (d->opd_pre != NULL) {
1039                         osp_pre_update_status(d, -ENODEV);
1040                         wake_up(&d->opd_pre_waitq);
1041                 }
1042
1043                 CDEBUG(D_HA, "got disconnected\n");
1044                 break;
1045         case IMP_EVENT_INACTIVE:
1046                 d->opd_imp_active = 0;
1047                 if (d->opd_connect_mdt)
1048                         break;
1049
1050                 if (d->opd_pre != NULL) {
1051                         osp_pre_update_status(d, -ENODEV);
1052                         wake_up(&d->opd_pre_waitq);
1053                 }
1054
1055                 CDEBUG(D_HA, "got inactive\n");
1056                 break;
1057         case IMP_EVENT_ACTIVE:
1058                 d->opd_imp_active = 1;
1059
1060                 if (osp_prepare_fid_client(d) != 0)
1061                         break;
1062
1063                 if (d->opd_got_disconnected)
1064                         d->opd_new_connection = 1;
1065                 d->opd_imp_connected = 1;
1066                 d->opd_imp_seen_connected = 1;
1067                 if (d->opd_connect_mdt)
1068                         break;
1069
1070                 if (d->opd_pre != NULL)
1071                         wake_up(&d->opd_pre_waitq);
1072
1073                 __osp_sync_check_for_work(d);
1074                 CDEBUG(D_HA, "got connected\n");
1075                 break;
1076         case IMP_EVENT_INVALIDATE:
1077                 if (obd->obd_namespace == NULL)
1078                         break;
1079                 ldlm_namespace_cleanup(obd->obd_namespace, LDLM_FL_LOCAL_ONLY);
1080                 break;
1081         case IMP_EVENT_OCD:
1082         case IMP_EVENT_DEACTIVATE:
1083         case IMP_EVENT_ACTIVATE:
1084                 break;
1085         default:
1086                 CERROR("%s: unsupported import event: %#x\n",
1087                        obd->obd_name, event);
1088         }
1089         return 0;
1090 }
1091
1092 static int osp_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1093                          void *karg, void *uarg)
1094 {
1095         struct obd_device       *obd = exp->exp_obd;
1096         struct osp_device       *d;
1097         struct obd_ioctl_data   *data = karg;
1098         int                      rc = 0;
1099
1100         ENTRY;
1101
1102         LASSERT(obd->obd_lu_dev);
1103         d = lu2osp_dev(obd->obd_lu_dev);
1104         LASSERT(d->opd_dt_dev.dd_ops == &osp_dt_ops);
1105
1106         if (!try_module_get(THIS_MODULE)) {
1107                 CERROR("%s: can't get module. Is it alive?", obd->obd_name);
1108                 return -EINVAL;
1109         }
1110
1111         switch (cmd) {
1112         case OBD_IOC_CLIENT_RECOVER:
1113                 rc = ptlrpc_recover_import(obd->u.cli.cl_import,
1114                                            data->ioc_inlbuf1, 0);
1115                 if (rc > 0)
1116                         rc = 0;
1117                 break;
1118         case IOC_OSC_SET_ACTIVE:
1119                 rc = ptlrpc_set_import_active(obd->u.cli.cl_import,
1120                                               data->ioc_offset);
1121                 break;
1122         case OBD_IOC_PING_TARGET:
1123                 rc = ptlrpc_obd_ping(obd);
1124                 break;
1125         default:
1126                 CERROR("%s: unrecognized ioctl %#x by %s\n", obd->obd_name,
1127                        cmd, current_comm());
1128                 rc = -ENOTTY;
1129         }
1130         module_put(THIS_MODULE);
1131         return rc;
1132 }
1133
1134 static int osp_obd_get_info(const struct lu_env *env, struct obd_export *exp,
1135                             __u32 keylen, void *key, __u32 *vallen, void *val,
1136                             struct lov_stripe_md *lsm)
1137 {
1138         int rc = -EINVAL;
1139
1140         if (KEY_IS(KEY_OSP_CONNECTED)) {
1141                 struct obd_device       *obd = exp->exp_obd;
1142                 struct osp_device       *osp;
1143
1144                 if (!obd->obd_set_up || obd->obd_stopping)
1145                         RETURN(-EAGAIN);
1146
1147                 osp = lu2osp_dev(obd->obd_lu_dev);
1148                 LASSERT(osp);
1149                 /*
1150                  * 1.8/2.0 behaviour is that OST being connected once at least
1151                  * is considered "healthy". and one "healthy" OST is enough to
1152                  * allow lustre clients to connect to MDS
1153                  */
1154                 RETURN(!osp->opd_imp_seen_connected);
1155         }
1156
1157         RETURN(rc);
1158 }
1159
1160 int osp_fid_alloc(struct obd_export *exp, struct lu_fid *fid,
1161                   struct md_op_data *op_data)
1162 {
1163         struct client_obd *cli = &exp->exp_obd->u.cli;
1164         struct lu_client_seq *seq = cli->cl_seq;
1165
1166         ENTRY;
1167         RETURN(seq_client_alloc_fid(NULL, seq, fid));
1168 }
1169
1170 /* context key constructor/destructor: mdt_key_init, mdt_key_fini */
1171 LU_KEY_INIT_FINI(osp, struct osp_thread_info);
1172 static void osp_key_exit(const struct lu_context *ctx,
1173                          struct lu_context_key *key, void *data)
1174 {
1175         struct osp_thread_info *info = data;
1176
1177         info->osi_attr.la_valid = 0;
1178 }
1179
1180 struct lu_context_key osp_thread_key = {
1181         .lct_tags = LCT_MD_THREAD,
1182         .lct_init = osp_key_init,
1183         .lct_fini = osp_key_fini,
1184         .lct_exit = osp_key_exit
1185 };
1186
1187 /* context key constructor/destructor: mdt_txn_key_init, mdt_txn_key_fini */
1188 LU_KEY_INIT_FINI(osp_txn, struct osp_txn_info);
1189
1190 struct lu_context_key osp_txn_key = {
1191         .lct_tags = LCT_OSP_THREAD | LCT_TX_HANDLE,
1192         .lct_init = osp_txn_key_init,
1193         .lct_fini = osp_txn_key_fini
1194 };
1195 LU_TYPE_INIT_FINI(osp, &osp_thread_key, &osp_txn_key);
1196
1197 static struct lu_device_type_operations osp_device_type_ops = {
1198         .ldto_init           = osp_type_init,
1199         .ldto_fini           = osp_type_fini,
1200
1201         .ldto_start          = osp_type_start,
1202         .ldto_stop           = osp_type_stop,
1203
1204         .ldto_device_alloc   = osp_device_alloc,
1205         .ldto_device_free    = osp_device_free,
1206
1207         .ldto_device_fini    = osp_device_fini
1208 };
1209
1210 static struct lu_device_type osp_device_type = {
1211         .ldt_tags     = LU_DEVICE_DT,
1212         .ldt_name     = LUSTRE_OSP_NAME,
1213         .ldt_ops      = &osp_device_type_ops,
1214         .ldt_ctx_tags = LCT_MD_THREAD | LCT_DT_THREAD,
1215 };
1216
1217 static struct obd_ops osp_obd_device_ops = {
1218         .o_owner        = THIS_MODULE,
1219         .o_add_conn     = client_import_add_conn,
1220         .o_del_conn     = client_import_del_conn,
1221         .o_reconnect    = osp_reconnect,
1222         .o_connect      = osp_obd_connect,
1223         .o_disconnect   = osp_obd_disconnect,
1224         .o_get_info     = osp_obd_get_info,
1225         .o_import_event = osp_import_event,
1226         .o_iocontrol    = osp_iocontrol,
1227         .o_statfs       = osp_obd_statfs,
1228         .o_fid_init     = client_fid_init,
1229         .o_fid_fini     = client_fid_fini,
1230         .o_fid_alloc    = osp_fid_alloc,
1231 };
1232
1233 struct llog_operations osp_mds_ost_orig_logops;
1234
1235 static int __init osp_mod_init(void)
1236 {
1237         struct lprocfs_static_vars       lvars;
1238         cfs_proc_dir_entry_t            *osc_proc_dir;
1239         int                              rc;
1240
1241         rc = lu_kmem_init(osp_caches);
1242         if (rc)
1243                 return rc;
1244
1245         lprocfs_osp_init_vars(&lvars);
1246
1247         rc = class_register_type(&osp_obd_device_ops, NULL, NULL,
1248 #ifndef HAVE_ONLY_PROCFS_SEQ
1249                                 lvars.module_vars,
1250 #endif
1251                                 LUSTRE_OSP_NAME, &osp_device_type);
1252
1253         /* create "osc" entry in procfs for compatibility purposes */
1254         if (rc != 0) {
1255                 lu_kmem_fini(osp_caches);
1256                 return rc;
1257         }
1258
1259         lprocfs_lwp_init_vars(&lvars);
1260
1261         rc = class_register_type(&lwp_obd_device_ops, NULL, NULL,
1262 #ifndef HAVE_ONLY_PROCFS_SEQ
1263                                 lvars.module_vars,
1264 #endif
1265                                 LUSTRE_LWP_NAME, &lwp_device_type);
1266         if (rc != 0) {
1267                 class_unregister_type(LUSTRE_OSP_NAME);
1268                 lu_kmem_fini(osp_caches);
1269                 return rc;
1270         }
1271
1272         /* Note: add_rec/delcare_add_rec will be only used by catalogs */
1273         osp_mds_ost_orig_logops = llog_osd_ops;
1274         osp_mds_ost_orig_logops.lop_add = llog_cat_add_rec;
1275         osp_mds_ost_orig_logops.lop_declare_add = llog_cat_declare_add_rec;
1276
1277         osc_proc_dir = lprocfs_srch(proc_lustre_root, "osc");
1278         if (osc_proc_dir == NULL) {
1279                 osc_proc_dir = lprocfs_register("osc", proc_lustre_root, NULL,
1280                                                 NULL);
1281                 if (IS_ERR(osc_proc_dir))
1282                         CERROR("osp: can't create compat entry \"osc\": %d\n",
1283                                (int) PTR_ERR(osc_proc_dir));
1284         }
1285         return rc;
1286 }
1287
1288 static void __exit osp_mod_exit(void)
1289 {
1290         lprocfs_try_remove_proc_entry("osc", proc_lustre_root);
1291
1292         class_unregister_type(LUSTRE_LWP_NAME);
1293         class_unregister_type(LUSTRE_OSP_NAME);
1294         lu_kmem_fini(osp_caches);
1295 }
1296
1297 MODULE_AUTHOR("Intel, Inc. <http://www.intel.com/>");
1298 MODULE_DESCRIPTION("Lustre OST Proxy Device ("LUSTRE_OSP_NAME")");
1299 MODULE_LICENSE("GPL");
1300
1301 cfs_module(osp, LUSTRE_VERSION_STRING, osp_mod_init, osp_mod_exit);